Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Delphi Новый топик    Ответить
 приложение не загружается, на многих телефонах висит черный экран.  [new]
Алексей222
Member

Откуда:
Сообщений: 75
Проблема в черном экране при загрузки на многих телефонах
На android 4.0 всё работало замечательно
Но на android 6 и выше на многих телефонах черный экран
У меня на zte android 8.0 если переместить часть форм в Available form то приложение запускается
По этому для каждого телефона после игры с Формами удается запустить
Но это не правильно и формы некоторые нужны
Delphi 10.1 Berlin SdK 25.2.3 32 bit
Приложение https://play.google.com/store/apps/details?id=com.embarcadero.ElectronicDiary
Скажите хоть куда копать
Заранее спасибо
25 апр 19, 10:46    [21871306]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
wadman
Member

Откуда: Санкт-Петербург
Сообщений: 25760
Алексей222
Скажите хоть куда копать

В сторону просмотра logcat во время запуска приложения.
25 апр 19, 10:47    [21871311]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Алексей222
Member

Откуда:
Сообщений: 75
А где смотреть logcat
Это бегущая строка во время компиляции
25 апр 19, 10:50    [21871314]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
sasha27
Member

Откуда: Москва
Сообщений: 174
Алексей222
Проблема в черном экране при загрузки на многих телефонах
На android 4.0 всё работало замечательно
Но на android 6 и выше на многих телефонах черный экран
У меня на zte android 8.0 если переместить часть форм в Available form то приложение запускается
По этому для каждого телефона после игры с Формами удается запустить
Но это не правильно и формы некоторые нужны
Delphi 10.1 Berlin SdK 25.2.3 32 bit
Приложение https://play.google.com/store/apps/details?id=com.embarcadero.ElectronicDiary
Скажите хоть куда копать
Заранее спасибо


Никто не говорит что формы не нужны, не стоит их все создавать при старте приложения.
Есть главная форма, а другие вызывай по мере надобности и потом грохай.
25 апр 19, 10:52    [21871319]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Sinemurius
Member

Откуда:
Сообщений: 79
Если кода еще немного, то я бы предложил вообще использовать только одну форму. А для реализации алгоритма пользоваться tabcontrol-ами и т.д. Избавитесь от многих проблем.
25 апр 19, 11:15    [21871356]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
wadman
Member

Откуда: Санкт-Петербург
Сообщений: 25760
Алексей222
А где смотреть logcat

Всё, что нужно есть в сдк. https://developer.android.com/studio/command-line/logcat
Сделаться "разработчиком" на телефоне, разрешить на нем отладку и подключить его к компьютеру.

Затем запускать приложение и смотреть, что выводит само приложение и что андроид.
25 апр 19, 11:34    [21871394]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Алексей222
Member

Откуда:
Сообщений: 75
sasha27,
Как создать форму я понял
Application.CreateForm(TForm16, Form16);
Form16.Show
А как её потом грохнуть???
25 апр 19, 11:58    [21871435]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
sasha27
Member

Откуда: Москва
Сообщений: 174
Алексей222
sasha27,
Как создать форму я понял
Application.CreateForm(TForm16, Form16);
Form16.Show
А как её потом грохнуть???


в событии формы OnClose пишем:

procedure TForm16.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Form16 :=  nil;
  Action  := caFree;
end;
25 апр 19, 13:00    [21871555]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Алексей222
Member

Откуда:
Сообщений: 75
[DCC Error] reg.pas(115): E2003 Undeclared identifier: 'caFree'
25 апр 19, 13:04    [21871565]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Алексей222
Member

Откуда:
Сообщений: 75
procedure TForm17.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Form17:=nil;
Action:=caFree;
end;
Выдаёт ошибку
25 апр 19, 13:06    [21871566]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Алексей222
Member

Откуда:
Сообщений: 75
sasha27,[DCC Error] reg.pas(115): E2003 Undeclared identifier: 'caFree'
25 апр 19, 14:09    [21871655]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Vizit0r
Member

Откуда: Одесса
Сообщений: 638
TCloseAction.caFree
25 апр 19, 15:09    [21871757]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
krapotkin
Member

Откуда: Екатеринбург
Сообщений: 688
вы доки-то покурите
когда кончаются ссылки на объект, он уничтожится сам
и не надо никаких Application.CreateForm(TForm16, Form16);
Form16 := TForm16.Create(NIL);
Form16 := NIL; // и все ....

для кроссплатформы
FreeAndNil(Form16)
25 апр 19, 15:12    [21871763]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
asutp2
Member

Откуда: Тюмень
Сообщений: 540
Sinemurius
Если кода еще немного, то я бы предложил вообще использовать только одну форму. А для реализации алгоритма пользоваться tabcontrol-ами и т.д. Избавитесь от многих проблем.
На телефонах этот способ не решает проблем. Вместо TTabControl необходимо использовать фреймы, которые в свою очередь нужно динамически создавать/уничтожать.
Рекомендую почитать fire-monkey.ru, там подобная проблема очень детально рассмотрена
25 апр 19, 16:09    [21871833]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
sasha27
Member

Откуда: Москва
Сообщений: 174
Алексей222
sasha27,[DCC Error] reg.pas(115): E2003 Undeclared identifier: 'caFree'


Как ето нет?
У меня и xe5 и хе7 и хе10.2 стоят на компе и везде есть )))

К сообщению приложен файл. Размер - 129Kb
25 апр 19, 16:55    [21871883]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
wadman
Member

Откуда: Санкт-Петербург
Сообщений: 25760
sasha27
У меня и xe5 и хе7 и хе10.2 стоят на компе и везде есть )))

VCL <> FMX.
25 апр 19, 16:57    [21871888]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
sasha27
Member

Откуда: Москва
Сообщений: 174
Это надо в модуле формы, в событии OnClose формы писать.
25 апр 19, 17:15    [21871908]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
sasha27
Member

Откуда: Москва
Сообщений: 174
Алексей222
sasha27,[DCC Error] reg.pas(115): E2003 Undeclared identifier: 'caFree'


Vizit0r дал правильный ответ, попробуйте
25 апр 19, 18:01    [21871936]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Gator
Member

Откуда: Москва
Сообщений: 14885
sasha27
Это надо в модуле формы, в событии OnClose формы писать.

Ты бы или обгащялся по нику, к которому обращаешься.
___________
Кому-нибудь понятно, о чём саша говорит? Неужели он wadmanа спрашивает и собирается писать VCL <> FMX в OnClose?
Так я сразу скажу, VCL <> FMX = True Картинка с другого сайта.
Кто-то возражает?
25 апр 19, 18:03    [21871938]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
sasha27
Member

Откуда: Москва
Сообщений: 174
Алексей222, ответ уже был

Vizit0r
TCloseAction.caFree


пробовал?
25 апр 19, 18:11    [21871946]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
shonli95
Member

Откуда:
Сообщений: 85
wadman, Gator,

FMX.Forms.pas 5280
+
procedure TCommonCustomForm.DoClose(var CloseAction: TCloseAction);
begin
  if Assigned(FOnClose) then
    FOnClose(Self, CloseAction);
  if Assigned(FResultProc) and (CloseAction <> TCloseAction.caNone) then
  begin
    FResultProc(FModalResult);
    FResultProc := nil;
  end;
end;


 TCloseAction = (caNone, caHide, caFree, caMinimize);



= TCloseAction
26 апр 19, 06:05    [21872147]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
Gator
Member

Откуда: Москва
Сообщений: 14885
shonli95,

Это к чему?
26 апр 19, 07:59    [21872188]     Ответить | Цитировать Сообщить модератору
 Re: приложение не загружается, на многих телефонах висит черный экран.  [new]
shonli95
Member

Откуда:
Сообщений: 85
Gator,

Это к тому, что хоть он и привёл справку к VCL но это прекрасно живёт и в FMX
26 апр 19, 12:54    [21872543]     Ответить | Цитировать Сообщить модератору
Все форумы / Delphi Ответить