Steepe_Hare

Господа, как реализовать такой интерфейс, как на рабочем столе Android-смартфонов?

То есть перелистываешь главное окно пальцем, а внизу перемещается индикатор с кругляшками.

Листание, как я понял, осуществляется через TGestureManager, а панель-индикатор как лучше сделать?

10 часов назад, Alexander сказал:

TCircle.Fill.Kind установить в None

Спасибо!

Кидаю на TImage компонент TCircle. Как сделать круг прозрачным, то есть чтобы была видна только окружность? Понимаю, что можно на канвасе имэджа нарисовать окружность, но нужно именно через компонент TCircle. Спасибо за ответ.

Пытаюсь отправить базу SQLite (.db файл).

Поскольку TShowShareSheetAction отправляет только картинки, решил воспользоваться этим примером:

http://aziga.x10.mx/delphi/index.php?option=com_content&view=article&id=23&Itemid=27

Но получаю "Не удается найти приложение для выполнения этого действия."

Как отправить файл через Share? Спасибо.

Делаю так:

adb pull /data/data/com.embarcadero.ferma/files/base.db c:/111

и получаю adb: error: failed to copy. Permission denied

Пишу приложение, которое сохраняет данные в SQLite. База сохраняется по такому пути: /data/data/com.embarcadero.ferma/files/base.db

Когда подсоединяю смартфон к компу, то этот файл base.db не виден. Как до него достучаться? (например скопировать к себе на комп). Как я понял из поисков, нужно пользоваться утилитой adb?

Заранее спасибо.

В настройках проекта можно поставить галку "Include splash image" и выбрать картинку для заставки. А как получить доступ к окну заставки, то есть, например, динамически менять текст там?

18 минут назад, ZuBy сказал:

если не ошибаюсь, там нужно сменить Position.X := Position.X+1 кодом, чтобы поменялось положение

да, в design-time  на изменение Position.X вообще не реагирует, возвращает обратно

в run-time

У меня, как бы я не манипулировал, один контроль (TLayout) всегда правее другого (прогрессбара)

Такая ситуация. Кидаем на форму TRectangle, делаем align = Top (имитация тулбара).

На ректангл кидаем кнопки, прогрессбары и прочие контроли, ВСЕМ им делаем aligh = Right (ни у кого нет MostRight).

Вопрос: кто (или что) определяет порядок выравнивания, то есть какой контроль будет самый правый, какой будет вторым справа и т.д.?

1 час назад, krapotkin сказал:

можно сделать обычное окно, только прозрачное полностью, а на него положить непрозрачный image и кнопку.

а вызывается псевдомодальная форма на Android / ios так:

form2.ShowModal(procedure (aresult:TModalResult)
begin 
// этот код получает управление при выходе из "модального" окна
end)

 

интересная идея с прозрачностью формы, спасибо

Как сделать такое окно, не закрыв которое не вернешься к главному окну? Если делать по старой доброй Wndows-привычке ShowModal, то оно не поддерживается под Android-ом.

Но ведь делают же модальные окна в играх под Андроидом. Вот пример.

Прошу совета!

Так тоже ошибка:

Warning: error opening ReservedWordsOP.txt
Warning: error opening ReservedWordsC.txt
Parsing xml: C:\Program Files\Embarcadero\Studio\18.0\bin\converters\java2op\bootclasses.xml
Parsing jar: lib_fileexplorer.jar

class or Interface expected

Создается еще jar.log с таким содержанием:

Command:
jar tf "C:\Program Files\Embarcadero\Studio\18.0\bin\converters\java2op\lib_fileexplorer.jar"

Output:
META-INF/MANIFEST.MF
com/lamerman/FileDialog$1.class
com/lamerman/FileDialog$2.class
com/lamerman/FileDialog$3.class
com/lamerman/FileDialog$4.class
com/lamerman/FileDialog$5.class
com/lamerman/FileDialog.class
com/lamerman/SelectionMode.class

Вкладываю сам jar файл.

lib_fileexplorer.zip

Запускаю так:

Java2OP.exe -jar lib_fileexplorer.jar

Нашел утилиту Java2OP, но не делает обертку(

Warning: error opening ReservedWordsOP.txt
Warning: error opening ReservedWordsC.txt
Parsing xml: C:\Program Files\Embarcadero\Studio\18.0\bin\converters\java2op\bootclasses.xml
Parsing jar: lib_fileexplorer.jar

У меня "C:\Program Files\Java\jdk1.8.0_05"

Скажите, может я чего-то не понимаю, но зачем теперь вместо одного TRadioGroup нужно использовать TGroupbox и кучу TRadioButton?

И писать в несколько раз больше код:
 

      if RadioButton1.IsChecked then
        Level := 0
      else if RadioButton2.IsChecked then
        Level := 1
      else if RadioButton3.IsChecked then
        Level := 2
      else
        Level := 3;

      Level := RadioGroup1.ItemIndex;

Возможно ли линковать к Embarcadero Delphi JAR файлы (для Android-приложения), как в старых версиях Delphi можно было линковать OBJ файлы?

Скажите, пожалуйста, как в Берлине проигрывать mp3 файл постоянно (Loop)?

В старых версиях Delphi были свойства AutoRewind, Notify и событие OnNotify, и всё делалось без проблем.

43 минуты назад, Brovin Yaroslav сказал:

Полагаю, что при каждом запуске приложения:

1. Удалять все текущие уведомления приложения.
2. Поставить новое отложенное уведомление на сроком через 3 недели. 

А как получить список уведомлений, которое приложение создало при предыдущих запусках?

Настоящий программист!

Даже на выходных обновляет свой продукт

P.S. Спасибо за ответы в личке

Скажите, пожалуйста, как реализовать такое:

если пользователь не запускал Android-приложение неделю, то отправить уведомление-напоминалку в системную шторку.

Что-то вы меня все запутали.

Как лучше конкретно под ОС Android? (Berlin 10.1)
 

1. if (fr <> nil) then
   begin
     fr.DisposeOf;
     fr := nil;
   end;

2. if (fr <> nil) then
     FreeAndNil(fr);

3. if (fr <> nil) then
   begin
     fr.Parent := nil;
     fr.Free;
     fr := nil;
   end;

6 часов назад, krapotkin сказал:

вы не поверите, этот цикл УЖЕ встроен в программу (см. Application.Run) , и повторять его не надо.

и вам уже написали 2.5 раза, как нужно делать. Под windows, android, и вообще любую платформу

Хорошо, посмотрите этот пример. Под Андроидом кнопка Stop не нажимается, а под Виндами она срабатывает и можно всё остановить.

Дайте, пожалуйста, пример для Андроида, который бы работал, как задумывается! (остановить итерацию) Спасибо!

Proj2.zip

15 минут назад, kami сказал:

излишне. Достаточно fr.Free;

А вот на мобильных платформах это ничего не даст. Там нужно fr.Release; и вот в таком случае проверка на nil будет уместна.

Да и на десктопе тоже, для универсализации.

читал, что под Андроидом нужно DisposeOf делать