sinuke

Большое спасибо Ярославу, что находит время и фиксит проблемы, которые мы тут поднимаем. И курсы его великолепные!
Спасибо профессионалам, таким как ZuBy, который терпит наши глупые вопросы и помогает.
СПАСИБО!!!

Молодец! Хорошая программа.

uses AndroidApi.JNI.OS, Androidapi.Helpers; var AndrVersion: string; .... AndrVersion := JStringToString(TJBuild_VERSION.JavaClass.release);  

uses AndroidApi.JNI.OS, Androidapi.Helpers; var AndrVersion: string; .... AndrVersion := JStringToString(TJBuild_VERSION.JavaClass.release);  

так и сделал

пока нет решения, вообще не понятно как это делается

познакомился с Delphi еще будучи школьником в 2005 году (до того момента вполне неплохо для своего возраста, считаю, баловался Turbo Pascal 7 под DOS - даже штук пять игр написал простеньких). Некоторое время баловался и забросил. Вот буквально с месяц назад снова "достал из закрамов" свой багаж знаний и написал небольшое и не сильно сложное приложение на FMX (первый опыт). Так что пока только хобби, но что-то меня начинает снова затягивать... =)

познакомился с Delphi еще будучи школьником в 2005 году (до того момента вполне неплохо для своего возраста, считаю, баловался Turbo Pascal 7 под DOS - даже штук пять игр написал простеньких). Некоторое время баловался и забросил. Вот буквально с месяц назад снова "достал из закрамов" свой багаж знаний и написал небольшое и не сильно сложное приложение на FMX (первый опыт). Так что пока только хобби, но что-то меня начинает снова затягивать... =)

познакомился с Delphi еще будучи школьником в 2005 году (до того момента вполне неплохо для своего возраста, считаю, баловался Turbo Pascal 7 под DOS - даже штук пять игр написал простеньких). Некоторое время баловался и забросил. Вот буквально с месяц назад снова "достал из закрамов" свой багаж знаний и написал небольшое и не сильно сложное приложение на FMX (первый опыт). Так что пока только хобби, но что-то меня начинает снова затягивать... =)

что-то оно и у меня "посыпалось". ладн, буду пока сам разбираться. потом чуть что обращусь =)
эх, извиняюсь. лично моя вина. все оказалось довольно просто: делал "оптимизацию" файлов проекта и папку с шрифтом изменил, но в дэплоймент забыл внести изменения. в итоге так и собрал приложение без шрифта

что-то оно и у меня "посыпалось". ладн, буду пока сам разбираться. потом чуть что обращусь =)
эх, извиняюсь. лично моя вина. все оказалось довольно просто: делал "оптимизацию" файлов проекта и папку с шрифтом изменил, но в дэплоймент забыл внести изменения. в итоге так и собрал приложение без шрифта

Попробуйте использовать PreloadContent (если, конечно, Вы его уже не используете)
З.Ы. Это в смысле - по поводу первого появления и прочих лагов "в первый раз"

мне помогает избавится от проблем с multiview :
MasterButton.Visible := False; MultiView.MasterButton := nil; когда нужно, то всё возвращаю обратно

мне помогает избавится от проблем с multiview :
MasterButton.Visible := False; MultiView.MasterButton := nil; когда нужно, то всё возвращаю обратно

В общем можно сделать, конечно, установку шрифта в инсталлере программы. И это будет оптимальным решением.
Но можно обойтись и без него.
Не буду расписывать детали, просто закину приложение и фрагменты кода. Думаю разберетесь. Естественно изменив на свои шрифты и т.п.
Все нижеперечисленное - в файл проекта DPR, перед Application.Initialize;
const CKey = '\Software\Microsoft\Windows NT\CurrentVersion\Fonts'; CFontFileName = 'spherelive.ttf'; CFontName = 'spherelive (TrueType)'; procedure ExecuteWait(const sProgramm: string; const sParams: string = ''; fHide: Boolean = false); var ShExecInfo: TShellExecuteInfo; begin FillChar(ShExecInfo, sizeof(ShExecInfo), 0); with ShExecInfo do begin cbSize := sizeof(ShExecInfo); fMask := SEE_MASK_NOCLOSEPROCESS; lpFile := PChar(sProgramm); lpParameters := PChar(sParams); lpVerb := 'open'; if (not fHide) then nShow := SW_SHOW else nShow := SW_HIDE end; try if (ShellExecuteEx(@ShExecInfo) and (ShExecInfo.hProcess <> 0)) then try WaitForSingleObject(ShExecInfo.hProcess, INFINITE) finally CloseHandle(ShExecInfo.hProcess); end; except On E : Exception do ShowMessage('font install Exception: ' + E.Message); end; end; if not IsFontRegistered(TPath.Combine(ExtractFilePath(ParamStr(0)), CFontFileName), CFontName) then if FileExists(TPath.Combine(ExtractFilePath(ParamStr(0)), 'RegFontC.exe')) then ExecuteWait(TPath.Combine(ExtractFilePath(ParamStr(0)), 'RegFontC.exe')); Application.Initialize; Где будет лежать файл со шрифтом - это уже ваше дело. Можно его куда угодно поместить. Хоть в ресурсы, хоть файлом просто, хоть с инета скачать.
P.S. Ну и конечно - это все именно под винду...
RegFont.zip

тоже интересно узнать, как убрать этот эффект
 
добавлено чуть позже:
разобрался. нужно было убрать этот эффект на итэмах ListBox'а. Нашел стиль listboxitem и удалил у него ActiveStyleObject.

тоже интересно узнать, как убрать этот эффект
 
добавлено чуть позже:
разобрался. нужно было убрать этот эффект на итэмах ListBox'а. Нашел стиль listboxitem и удалил у него ActiveStyleObject.

Лично я только что внедрил себе в проект вот такой код (из этой темы) и все заработало. Это в событии FormKeyUp
{$IFDEF ANDROID} if (Key = vkHardwareBack) and (BackPressed + 2000 > MilliSecondOfTheDay(now))then begin Key := 0; Close; end else begin Key := 0; BackPressed := MilliSecondOfTheDay(now); Toast := TfgToast.Create('Нажмите ''Назад'' еще раз, чтобы выйти из приложения', TfgToastDuration.Short); //Toast из пакета компонет FGX try Toast.Show; finally Toast.DisposeOf; end; Exit; end; {$ENDIF}  

тоже интересно узнать, как убрать этот эффект
 
добавлено чуть позже:
разобрался. нужно было убрать этот эффект на итэмах ListBox'а. Нашел стиль listboxitem и удалил у него ActiveStyleObject.

Лично я только что внедрил себе в проект вот такой код (из этой темы) и все заработало. Это в событии FormKeyUp
{$IFDEF ANDROID} if (Key = vkHardwareBack) and (BackPressed + 2000 > MilliSecondOfTheDay(now))then begin Key := 0; Close; end else begin Key := 0; BackPressed := MilliSecondOfTheDay(now); Toast := TfgToast.Create('Нажмите ''Назад'' еще раз, чтобы выйти из приложения', TfgToastDuration.Short); //Toast из пакета компонет FGX try Toast.Show; finally Toast.DisposeOf; end; Exit; end; {$ENDIF}  

Лично я только что внедрил себе в проект вот такой код (из этой темы) и все заработало. Это в событии FormKeyUp
{$IFDEF ANDROID} if (Key = vkHardwareBack) and (BackPressed + 2000 > MilliSecondOfTheDay(now))then begin Key := 0; Close; end else begin Key := 0; BackPressed := MilliSecondOfTheDay(now); Toast := TfgToast.Create('Нажмите ''Назад'' еще раз, чтобы выйти из приложения', TfgToastDuration.Short); //Toast из пакета компонет FGX try Toast.Show; finally Toast.DisposeOf; end; Exit; end; {$ENDIF}  

Название: Слесарное дело
Платформа: Android, Windows, macOS
Устройство: ПК, смартфон, планшет
Разрешение экрана: любое
Ссылки на скачивание Windows-версии: https://yadi.sk/d/iIeC0OE8ukMoi
Ссылка на скачивание macOS-версии: https://yadi.sk/d/wBpoFcKe3LgiKx
Google Play: https://play.google.com/store/apps/details?id=com.sinukeapps.locksmithery
Описание: Приложение представляет собой электронный конспект по слесарному делу, с помощью которого можно самостоятельно подготовится к занятиям. В него включены 16 тем, поделённые на блоки. Для каждой темы разработаны тесты для самоконтроля. В приложении имеется глоссарий для быстрого поиска по основным понятиям, а также возможность экспорта материалов в текстовый PDF-формат для дальнейшей печати.

http://delphihtmlcomponents.com/

Название: Слесарное дело
Платформа: Android, Windows, macOS
Устройство: ПК, смартфон, планшет
Разрешение экрана: любое
Ссылки на скачивание Windows-версии: https://yadi.sk/d/iIeC0OE8ukMoi
Ссылка на скачивание macOS-версии: https://yadi.sk/d/wBpoFcKe3LgiKx
Google Play: https://play.google.com/store/apps/details?id=com.sinukeapps.locksmithery
Описание: Приложение представляет собой электронный конспект по слесарному делу, с помощью которого можно самостоятельно подготовится к занятиям. В него включены 16 тем, поделённые на блоки. Для каждой темы разработаны тесты для самоконтроля. В приложении имеется глоссарий для быстрого поиска по основным понятиям, а также возможность экспорта материалов в текстовый PDF-формат для дальнейшей печати.

Название: Слесарное дело
Платформа: Android, Windows, macOS
Устройство: ПК, смартфон, планшет
Разрешение экрана: любое
Ссылки на скачивание Windows-версии: https://yadi.sk/d/iIeC0OE8ukMoi
Ссылка на скачивание macOS-версии: https://yadi.sk/d/wBpoFcKe3LgiKx
Google Play: https://play.google.com/store/apps/details?id=com.sinukeapps.locksmithery
Описание: Приложение представляет собой электронный конспект по слесарному делу, с помощью которого можно самостоятельно подготовится к занятиям. В него включены 16 тем, поделённые на блоки. Для каждой темы разработаны тесты для самоконтроля. В приложении имеется глоссарий для быстрого поиска по основным понятиям, а также возможность экспорта материалов в текстовый PDF-формат для дальнейшей печати.