Перейти к содержанию
Fire Monkey от А до Я

Лидеры

  1. AngryOwl

    AngryOwl

    Пользователи


    • Баллы

      5

    • Постов

      394


  2. Fedor K

    Fedor K

    Пользователи


    • Баллы

      3

    • Постов

      55


  3. nayk

    nayk

    Пользователи


    • Баллы

      2

    • Постов

      4


  4. krapotkin

    krapotkin

    Пользователи


    • Баллы

      1

    • Постов

      2 185


Популярный контент

Показан контент с высокой репутацией 05.09.2016 во всех областях

  1. Вот тут есть информация: https://www.embarcadero.com/ru/products/delphi/starter-faq Я так понял, что можно продавать ПО, если доход от них не превышает $1000 в год. На то он и Starter.
    2 балла
  2. В общем можно сделать, конечно, установку шрифта в инсталлере программы. И это будет оптимальным решением. Но можно обойтись и без него. Не буду расписывать детали, просто закину приложение и фрагменты кода. Думаю разберетесь. Естественно изменив на свои шрифты и т.п. Все нижеперечисленное - в файл проекта 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
    2 балла
  3. Для сравнения 2-х строк хорошо подходит алгоритм Расстояние Левенштейна. Использовал его реализацию на FMX для поиска по словарям при ошибочном вводе, используя ошибку = 2. Про производительность и пример реализации можно посмотреть тут.
    2 балла
  4. AngryOwl

    Как скрыть MasterButton?

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

    Загрузка PNG в Image из Deployment

    В конкретном случае - речь идет о Android. Тут, в некотором смысле, проще - воспользуйтесь замечательными компонентами FGX от автора данного форума. У компонента TfgApplicationEvents есть все события, которые Вам необходимы. А именно - событие ДО отображения формы (и куча других). Ну если Вам не хватает отладчика - тупо натыкайте в нужных местах "тостов" (Toast), и смотрите - что будет "последним" событием... З.Ы. А зависание программы происходит однозначно из-за того, что Вы пытаетесь что-то изменить в интерфейсе, до момента пока форма еще не стала активной. Решить можно не только синхронизацией, но и каким-нибудь Splash.
    1 балл
  6. Дебаггер не используете что ли? Тупо брикпоинт на OnShow и по шагам идти до ошибки - F7,F8,F9 в помощь
    1 балл
  7. AngryOwl

    Загрузка PNG в Image из Deployment

    Попробуйте загрузку ваших картинок оформить в: TThread.Synchronize(TThread.CurrentThread, procedure begin // тут загрузка ваших картинок end);
    1 балл
  8. Martifan, вы можете использовать любой шрифт, а не только FontAwesome
    1 балл
  9. сорри, ввел в заблуждение. вот картина
    1 балл
  10. sinuke

    Как скрыть MasterButton?

    мне помогает избавится от проблем с multiview : MasterButton.Visible := False; MultiView.MasterButton := nil; когда нужно, то всё возвращаю обратно
    1 балл
  11. Это не баг, а фича. Так и должно работать. При использовании протокола GATT, максимальные пользовательские данные в пакете составляет 20 байт. Если нужно больше, дробите на пакеты.
    1 балл
  12. Fedor K

    Запуск на удаленном ПК.

    Недавно была задача реализовать похожее, ПК и Мак разделял океан. Очень просто для этого использовать LogMeIn Hamachi. Для 5-ти пользователей используется бесплатно. Задержка не заставила себя ждать, но все реально.
    1 балл
Эта таблица лидеров рассчитана в Москва/GMT+03:00
×
×
  • Создать...