powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / приложение не загружается, на многих телефонах висит черный экран.
23 сообщений из 23, страница 1 из 1
приложение не загружается, на многих телефонах висит черный экран.
    #39806045
Алексей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
Скажите хоть куда копать
Заранее спасибо
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806047
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей222Скажите хоть куда копать
В сторону просмотра logcat во время запуска приложения.
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806048
Алексей222
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А где смотреть logcat
Это бегущая строка во время компиляции
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806050
Фотография sasha27
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей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
Скажите хоть куда копать
Заранее спасибо

Никто не говорит что формы не нужны, не стоит их все создавать при старте приложения.
Есть главная форма, а другие вызывай по мере надобности и потом грохай.
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806070
Sinemurius
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Если кода еще немного, то я бы предложил вообще использовать только одну форму. А для реализации алгоритма пользоваться tabcontrol-ами и т.д. Избавитесь от многих проблем.
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806096
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей222А где смотреть logcat
Всё, что нужно есть в сдк. https://developer.android.com/studio/command-line/logcat
Сделаться "разработчиком" на телефоне, разрешить на нем отладку и подключить его к компьютеру.

Затем запускать приложение и смотреть, что выводит само приложение и что андроид.
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806122
Алексей222
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sasha27,
Как создать форму я понял
Application.CreateForm(TForm16, Form16);
Form16.Show
А как её потом грохнуть???
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806204
Фотография sasha27
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей222sasha27,
Как создать форму я понял
Application.CreateForm(TForm16, Form16);
Form16.Show
А как её потом грохнуть???

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

Код: pascal
1.
2.
3.
4.
5.
procedure TForm16.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Form16 :=  nil;
  Action  := caFree;
end;
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806212
Алексей222
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
[DCC Error] reg.pas(115): E2003 Undeclared identifier: 'caFree'
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806213
Алексей222
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
procedure TForm17.FormClose(Sender: TObject; var Action: TCloseAction);
begin
Form17:=nil;
Action:=caFree;
end;
Выдаёт ошибку
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806261
Алексей222
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
sasha27,[DCC Error] reg.pas(115): E2003 Undeclared identifier: 'caFree'
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806317
Vizit0r
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
TCloseAction.caFree
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806321
Фотография krapotkin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
вы доки-то покурите
когда кончаются ссылки на объект, он уничтожится сам
и не надо никаких Application.CreateForm(TForm16, Form16);
Код: pascal
1.
2.
Form16 := TForm16.Create(NIL);
Form16 := NIL; // и все ....


для кроссплатформы
Код: pascal
1.
FreeAndNil(Form16)
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806371
asutp2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
SinemuriusЕсли кода еще немного, то я бы предложил вообще использовать только одну форму. А для реализации алгоритма пользоваться tabcontrol-ами и т.д. Избавитесь от многих проблем.На телефонах этот способ не решает проблем. Вместо TTabControl необходимо использовать фреймы, которые в свою очередь нужно динамически создавать/уничтожать.
Рекомендую почитать fire-monkey.ru , там подобная проблема очень детально рассмотрена
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806399
Фотография sasha27
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей222sasha27,[DCC Error] reg.pas(115): E2003 Undeclared identifier: 'caFree'

Как ето нет?
У меня и xe5 и хе7 и хе10.2 стоят на компе и везде есть )))
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806403
Фотография wadman
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
sasha27У меня и xe5 и хе7 и хе10.2 стоят на компе и везде есть )))
VCL <> FMX.
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806423
Фотография sasha27
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Это надо в модуле формы , в событии OnClose формы писать.
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806447
Фотография sasha27
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей222sasha27,[DCC Error] reg.pas(115): E2003 Undeclared identifier: 'caFree'

Vizit0r дал правильный ответ, попробуйте
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806449
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
sasha27Это надо в модуле формы , в событии OnClose формы писать.
Ты бы или обгащялся по нику, к которому обращаешься.
___________
Кому-нибудь понятно, о чём саша говорит? Неужели он wadmanа спрашивает и собирается писать VCL <> FMX в OnClose?
Так я сразу скажу, VCL <> FMX = True

Кто-то возражает?
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806455
Фотография sasha27
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Алексей222, ответ уже был

Vizit0rTCloseAction.caFree

пробовал?
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806553
shonli95
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
wadman, Gator,

FMX.Forms.pas 5280
Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
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;



Код: pascal
1.
 TCloseAction = (caNone, caHide, caFree, caMinimize);




= TCloseAction
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806563
Фотография Gator
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
shonli95,

Это к чему?
...
Рейтинг: 0 / 0
приложение не загружается, на многих телефонах висит черный экран.
    #39806739
shonli95
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Gator,

Это к тому, что хоть он и привёл справку к VCL но это прекрасно живёт и в FMX
...
Рейтинг: 0 / 0
23 сообщений из 23, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / приложение не загружается, на многих телефонах висит черный экран.
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]