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

rareMax

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

    553
  • Зарегистрирован

  • Посещение

  • Победитель дней

    35

Активность репутации

  1. Like
    rareMax отреагировална sinuke в Учебное приложение "Слесарное дело"   
    Сделал версию для macOS: https://yadi.sk/d/wBpoFcKe3LgiKx

  2. Like
    rareMax отреагировална rakhmet в Мас адрес или серийный номер системного диска в ОСХ   
    Просто оставлю это здесь.
  3. Like
    rareMax получил реакцию от eser в Маршалинг/ДеМаршалинг в System.JSON   
    Вот я, например, работаю с ТелеграмБот АПИ. У него есть свои типы данных(если их так можно назвать).
    К примеру тип User
    Когда вы запрашиваете какую то инфу с участием этого типа вам придет JSON с такими данными(в моем примере getMe):
    В "result" будет как раз этот тип "User". Что бы не парсить отдельно каждое поле я создал аналогичный класс в делфи:
    TTelegaUser = Class private FID: Integer; FFirstName: String; FLastName: String; FUsername: String; published /// <summary> /// Unique identifier for this user or bot /// </summary> /// <returns></returns> [ALIAS('id')] property ID: Integer read FID write FID; /// <summary> /// User‘s or bot’s first name /// </summary> [ALIAS('first_name')] property FirstName: String read FFirstName write FFirstName; /// <summary> /// Optional. User‘s or bot’s last name /// </summary> [ALIAS('last_name')] property LastName: String read FLastName write FLastName; /// <summary> /// Optional. User‘s or bot’s username /// </summary> [ALIAS('username')] property Username: String read FUsername write FUsername; End; И теперь могу заполнить данными с моего запроса приблизительно так*:
    FtelegUser := TTelegaUser.FromJSON(content); * - На самом деле у меня чуть подругому.
    * - При условии что в "content" у вас будет приблизительно такое содержание:
     
  4. Like
    rareMax отреагировална Rusland в Webbrowser в Windows   
    В ходе работы с js библиотекой leaflet столкнулся с проблемой некорректной работы стандартного веббраузера на виндоуз. 
    Как известно компонент Webbrowser в Windows использует движок Internet Explorer. Но, как выяснилось, по умолчанию он работает в режиме совместимости IE6, даже если у вас установлена гораздо более новая версия.
    Для того чтобы заставить его работать в нужно вам режиме требуется внести правку в реестр:
    HKEY_CURRENT_USER или HKEY_LOCAL_MACHINE SOFTWARE Microsoft Internet Explorer Main FeatureControl FEATURE_BROWSER_EMULATION Project1.exe = (DWORD) 0x00002710 (значения см. ниже) где Project1.exe - это название вашего приложения, а значения параметр принимает следующие:
    Value Description 11001 (0x2AF9 Internet Explorer 11. Webpages are displayed in IE11 edge mode, regardless of the declared !DOCTYPE directive. Failing to declare a !DOCTYPE directive causes the page to load in Quirks. 11000 (0x2AF8) IE11. Webpages containing standards-based !DOCTYPE directives are displayed in IE11 edge mode. Default value for IE11. 10001 (0x2711) Internet Explorer 10. Webpages are displayed in IE10 Standards mode, regardless of the !DOCTYPE directive. 10000 (0x02710) Internet Explorer 10. Webpages containing standards-based !DOCTYPE directives are displayed in IE10 Standards mode. Default value for Internet Explorer 10. 9999 (0x270F) Windows Internet Explorer 9. Webpages are displayed in IE9 Standards mode, regardless of the declared !DOCTYPE directive. Failing to declare a !DOCTYPE directive causes the page to load in Quirks. 9000 (0x2328) Internet Explorer 9. Webpages containing standards-based !DOCTYPE directives are displayed in IE9 mode. Default value for Internet Explorer 9. Important  In Internet Explorer 10, Webpages containing standards-based !DOCTYPE directives are displayed in IE10 Standards mode.   8888 (0x22B8) Webpages are displayed in IE8 Standards mode, regardless of the declared !DOCTYPE directive. Failing to declare a !DOCTYPE directive causes the page to load in Quirks. 8000 (0x1F40) Webpages containing standards-based !DOCTYPE directives are displayed in IE8 mode. Default value for Internet Explorer 8 Important  In Internet Explorer 10, Webpages containing standards-based !DOCTYPE directives are displayed in IE10 Standards mode.   7000 (0x1B58) Webpages containing standards-based !DOCTYPE directives are displayed in IE7 Standards mode. Default value for applications hosting the WebBrowser Control.  
    PS. лично мне помогло исправление ветки HKEY_CURRENT_USER и установка версии IE10
    link
  5. Like
    rareMax получил реакцию от Andrey Efimov в Kernow Software FMX Components for XE7, XE8 & XE10 Seattle   
    Документации, как таковой, нету. Но есть открытый исходный код + примеры.
    Проект переехал на bitBucket и даже обновляется
  6. Like
    rareMax получил реакцию от Anatoliy в Kernow Software FMX Components for XE7, XE8 & XE10 Seattle   
    Документации, как таковой, нету. Но есть открытый исходный код + примеры.
    Проект переехал на bitBucket и даже обновляется
  7. Like
    rareMax получил реакцию от afors в Kernow Software FMX Components for XE7, XE8 & XE10 Seattle   
    Давненько еще нашел этот пак компонентов, но не было времени ознакомиться с ним ближе. Сегодня посмотрел демки - думаю нашему сообществу понравится эта библиотека. Описание оригинальное с гитхаба.
    Как скачать:
    GetIT(нет лицензии на студию? смотрим ниже) Прямая ссылка на последнюю версию С помощью GIT-клиента: https://github.com/gmurt/KernowSoftwareFMX.git .Можете либо встроенным в делфи, либо своим любимым. Могу посоветовать SourceTreeApp. Рекомендую именно этот способ - вам не придется постоянно перекачивать компонент для обновления. Достаточно в приложении нажать одну кнопку - и компонент обновился. 
    Kernow Software FMX Components for XE7, XE8 & XE10 Seattle.
    (May work with earlier versions but untested)
    Firemonkey Slide menu, ListView and Segment buttons for Delphi. Inherits from a non-visual component to keep things simple.
    Includes demo with source. Demo App also available on app store: https://itunes.apple.com/gb/app/kscomponents-reference/id1031179701?mt=8
    Feel free to support the components with a donation ;-)
    If you'd like to support the ksComponents project, you can do so at the following link ;-)
    http://www.kernow-software.co.uk/?page_id=397
    TksTableView
    Cached table view provides native performance regardless of the number of text/items/graphics added support for embedded switches support for embedded buttons support for embedded segment buttons Canvas style methods for adding text/shapes/images Built-in support for Image, Title, SubTitle, Detail and Accessory elements Check list option support - single check or multi check Custom check mark colours Image cropping (square, round rect or circle) "Indicator" colours - add colour indicators to each row "Sticky" headers TksSlideMenu
    set menu background colour set selected item colour set font colours add images to items fade background left or right aligned menus inherites from non-visual Tcomponent for quick integration into existing projects uses bitmap caching for optimised performance TksSegmentButtons
    segment button component support for iOS style badges TksFormTransition
    component for animating transitions between forms TksTabControl
    Tab control component with support for different colours/themes Large number of built-in icons Support for iOS style badges TksNetHttpClient
    enhanced http client with ASync Get method TksTileMenu
    simple but effective main menu component TksChatView
    component for building iOS style chat applications TksSpeedButton
    TSpeedButton descendant with support for iOS style badges Any suggestions for updates are welcome :-)
  8. Like
    rareMax получил реакцию от Anatoliy в Kernow Software FMX Components for XE7, XE8 & XE10 Seattle   
    Давненько еще нашел этот пак компонентов, но не было времени ознакомиться с ним ближе. Сегодня посмотрел демки - думаю нашему сообществу понравится эта библиотека. Описание оригинальное с гитхаба.
    Как скачать:
    GetIT(нет лицензии на студию? смотрим ниже) Прямая ссылка на последнюю версию С помощью GIT-клиента: https://github.com/gmurt/KernowSoftwareFMX.git .Можете либо встроенным в делфи, либо своим любимым. Могу посоветовать SourceTreeApp. Рекомендую именно этот способ - вам не придется постоянно перекачивать компонент для обновления. Достаточно в приложении нажать одну кнопку - и компонент обновился. 
    Kernow Software FMX Components for XE7, XE8 & XE10 Seattle.
    (May work with earlier versions but untested)
    Firemonkey Slide menu, ListView and Segment buttons for Delphi. Inherits from a non-visual component to keep things simple.
    Includes demo with source. Demo App also available on app store: https://itunes.apple.com/gb/app/kscomponents-reference/id1031179701?mt=8
    Feel free to support the components with a donation ;-)
    If you'd like to support the ksComponents project, you can do so at the following link ;-)
    http://www.kernow-software.co.uk/?page_id=397
    TksTableView
    Cached table view provides native performance regardless of the number of text/items/graphics added support for embedded switches support for embedded buttons support for embedded segment buttons Canvas style methods for adding text/shapes/images Built-in support for Image, Title, SubTitle, Detail and Accessory elements Check list option support - single check or multi check Custom check mark colours Image cropping (square, round rect or circle) "Indicator" colours - add colour indicators to each row "Sticky" headers TksSlideMenu
    set menu background colour set selected item colour set font colours add images to items fade background left or right aligned menus inherites from non-visual Tcomponent for quick integration into existing projects uses bitmap caching for optimised performance TksSegmentButtons
    segment button component support for iOS style badges TksFormTransition
    component for animating transitions between forms TksTabControl
    Tab control component with support for different colours/themes Large number of built-in icons Support for iOS style badges TksNetHttpClient
    enhanced http client with ASync Get method TksTileMenu
    simple but effective main menu component TksChatView
    component for building iOS style chat applications TksSpeedButton
    TSpeedButton descendant with support for iOS style badges Any suggestions for updates are welcome :-)
  9. Like
    rareMax отреагировална kami в June FSM (FMX SPb Meeting)   
    небольшой фотоотчет. Будет время - напишу еще и результаты блиц-интервью участников.
    Начало встречи.

    потом было вот это

    ну и эпилог:

    на последнем фото, слева направо (без учета z-order): @kami @Error @Nik @Brovin Yaroslav
  10. Like
    rareMax отреагировална Fedor K в Как отключить TLang на форме/компоненте?   
    Дело в том, что TComboBox лишь контейнер, вам нужно обращаться именно к списку элементов в ListBox. Чтобы запретить перевод можно поступить так:
    var i, count : integer; begin count := cbbFiles.Count - 1; for i := 0 to count do cbbFiles.ListBox.ListItems[i].AutoTranslate := False; end;  
  11. Like
    rareMax отреагировална AliZairov в Native Android VideoView   
    Добрый вечер. Скоро будет полностью подготовлен.

  12. Like
    rareMax отреагировална haword в XE10.2 Tokyo есть запись вебинара от 28.03.2017?   
    ну у них всегда так, можно что то использовать только после первого сервис пака. 
    кстати на многим известном ресурсе появилось описание как вылечить от жадности хотфикс. 
  13. Like
    rareMax отреагировална Равиль Зарипов (ZuBy) в [Заметка] Устанавливаем тему для нативных диалогов в Android   
    Ссылка: http://blog.rzaripov.kz/2017/04/android.html
    Автор: @Равиль Зарипов (ZuBy)
    Описание: Устанавливаем тему для нативных диалогов в Android
  14. Like
    rareMax отреагировална Евгений Корепов в Полноэкранный режим редактора   
    Тоже не хватает такой функции, давно смирился... Сейчас модно использовать гей-дизайнерский подход - рабочая область не должна превышать по размерам пачку сигарет. Прошу прощения за резкие высказывания - бросаю курить и не люблю дизайнеров ;-)
  15. Like
    rareMax отреагировална Олег Киреев в Расчёт тяговой динамики v39.12 автотранспортного средства.   
    Это БЕСПЛАТНОЕ приложение для OS Windows выполняет тягово-динамический
     расчёт транспортного средства (как проверочный так и проектный)
     с механической или 
     автоматической коробкой передач а также троллейбуса
     (электробуса) с электродвигателем. Результаты в основном 
     показаны в виде графиков. Можно исходные данные и  
     результаты вывести в MSWord.
     В базу данных уже введены некоторые внешние 
     характеристики
     двигателей и характеристики коробок передач и 
     гидротрансформаторов.
     Пользователь может вводить свои данные и хранить их.
     Дополнительно можно производить некоторые 
     расчёты на прочность деталей подвески и сохранять их в 
     базе данных.
    Сообщите мне и я направлю Вам файлы приложения.
    СпасиБО EMBARCADERO.
     Автор: Олег Киреев-ведущий инженер-конструктор,
                  kireevoleg1966@gmail.com, +375 29 676 13 84
                  БЕЛАРУСЬ, г.Минск.
     
     
     
     
     
     
     
     
     
     
     
     
     
     
     
     
     
     











     
     
     
     
     
     
     
     
    Расчёт тяговой динамики авто v38.rar
  16. Like
    rareMax отреагировална dnekrasov в Убить поток TThread?   
    В наследнике TThread объявите  
    FCancelledEvent: TSimpleEvent; 
    Переопределите     TerminatedSet; 
    в нем сделайте inherited и FCancelledEvent.SetEvent
    Ну и вместо Sleep используйте FCancelledEvent.WaitFor
    После этого Ваша проблема исчезнет
     
     
  17. Like
    rareMax получил реакцию от Равиль Зарипов (ZuBy) в Текст с картинками и скроллингом   
    А делфи мучать обязательно? Сохрани word как pdf'ку и открывай на телефоне
  18. Like
    rareMax получил реакцию от Major в Текст с картинками и скроллингом   
    А делфи мучать обязательно? Сохрани word как pdf'ку и открывай на телефоне
  19. Like
    rareMax отреагировална enatechno в Прозрачные контролы   
    Это решается редактированием стиля. 
    Например так:
    1). Размещаете TGroupbox на форме
    2). ПКМ на нем
    3). в контекстном меню выбираете Edit Custom Style (или Edit Default style)
    4). в открывшемся редакторе стиля указываете платформу (Android)
    5). выбираете объект background (по умолчанию он белый).
    6). задаете ему свойство Visible=false
  20. Like
    rareMax отреагировална Brovin Yaroslav в Описание TfgRatingBar   
    Доработал компонент. Добавлено:
    Поддержка Tint эффекта - TfgRatingBar.TintColor Автоматический размер - TfgRatingBar.AutoSize Режим только отображения - TfgRatingBar.ReadOnly Событие окончательного изменения рейтинга (отжатие пальца от экрана или кнопки мышки) - TfgRatingBar.OnChange Событие в процессе изменения рейтинга - TfgRatingBar.OnChanging

  21. Like
    rareMax отреагировална ENERGY в Как не показывать главное окно до полной его отрисовки?   
    Да кстати это плохая практика. К примеру под iOS если программа потребляет много памяти сначала получает didReceiveMemoryWarning, затем автоматом убивается системой.
    Android попроще в этом плане, но тоже особо не жалует, и если такая прога будет в фоне, и как только потребуется память, то первыми на вылет.
    В общем это не Винда с ее "бесконечным" виртуальным свопом..
    И хотя игрушки тянут гораздо больше памяти, а FMX гораздо меньше, но все такие вы должны быть в курсе.
  22. Like
    rareMax получил реакцию от Menkos1 в [Windows] Сворачивание приложение   
    Бага это. У меня, если приложение развернуто на весь экран и нажать на иконку в панеле задач - меняет состояние из (Разверное) в (Нормальные размеры), вместо того что бы принять состояние (Свернутое)
  23. Like
    rareMax отреагировална ENERGY в Кнопка с картинкой   
    Чтобы картинка была на всю кнопку - вообще картинки должны быть фиксированного размера, когда одна больше, другая меньше - это смотрится криво. Но если очень нужно тогда так (это для Firemonkey, не для VCL): 
    Бросайте рядом TGlyph - затем в инспекторе объектов мышкой перемещаете его на кнопку. В результате TGlyph должен быть внутри кнопки (TSpeedButton или TButton). Далее настраиваете TGlyph - указываете там ImageList, ImageIndex (можно картинку и без ImageList указать отдельно, там есть соответствующее поле), далее  свойство Stretch  и Align = Client.
     
  24. Like
    rareMax отреагировална ENERGY в Как получить версию APK-файла под Win32?   
    Ну какие под Windows могут быть стандартные средства для чтения файла из другой ОС? Конечно их нету.
    Делается элементарно.
    1. apk - это обычный zip файл. Распаковываете его (в Delphi встроенная поддержка zip - uses System.Zip > TZipFile ), и читаете  все что надо. В Total Commander в такие архивы проще заходить без переименования расширения - нажав Ctrl + PgDown 
    2. Еще проще
    aapt dump badging myapp.apk Выведет детальную информацию об apk. 
    aapt лежит где то в c:\Users\<user>\Documents\Embarcadero\Studio\18.0\PlatformSDKs\android-sdk-windows\build-tools\25.0.0\aapt.exe
    Например чтобы сохранил результат в файл: aapt dump badging myapp.apk > mytextfile.txt
    В первой строчке и будет искомое:
    package: name='com.embarcadero.MyApp' versionCode='1' versionName='1.0.0' platformBuildVersionName=''
     
  25. Like
    rareMax отреагировална Brovin Yaroslav в [TScrollBox] Как определить конец зоны ScrollBox?   
    Добрый вечер,
     
    Используйте событие OnViewportPositionChanged. В параметрах передается позиция контента. Сравнивайте ее с размерами контента.
    if NewViewportPosition.y = ScrollBox1.ContentBounds.Height - ScrollBox1.ClientHeight then ShowMessage('Bottom');
×
×
  • Создать...