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

afors

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

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

  • Посещение

Весь контент afors

  1. Ответ Равиля на похожий вопрос: "... нативные компоненты всегда располагаются выше стилизованных. ждать нужно будущих версии студии, там будут нативные компоненты под андроид и ZOrder"
  2. ... type TOpenTimeEdit = class(TTimeEdit); ... {$R *.fmx} procedure TForm1.Button1Click(Sender: TObject); begin TOpenTimeEdit(TimeEdit1).OpenPicker; end; ...
  3. Как создать или получить KeyStore File? Вопрос решился. Я создал пустой файл и только потом указал к нему путь. Rad Studio сама должна создать его )
  4. procedure TForm1.Button1Click(Sender: TObject); Var s: String; begin s := '×123.txt'; If FileExists (s) Then ShowMessage(s + ' yes') Else ShowMessage (s+ ' No'); end; Вот так FileExists находит файл с символом × в имени. Но этот файл был создан обычным проводником Windows. Total Commander отказался создавать такой файл, заменив × на вопросительный знак. Файл создается программой?
  5. это как-то можно отследить? Текст программно не меняется, он "как есть" с дизайнера проекта, выравнивание по Client
  6. Всем привет! У кого-нибудь бывает такое: Rad Studio 10.1 Berlin Update 2 На Rectangle кидаю компонент Text или Label. Иногда при запуске приложения, примерно 1 из 8 запусков, символы отображаются некорректно. Хотелось бы узнать причину такого поведения.
  7. Нашел решение через TTreeView: TreeView1.ShowCheckBoxes:=True; То что нужно. Но хотелось бы все же увидеть реализацию через ListView.
  8. Подскажите как реализовать список из CheckBox как на картинке. Думаю использовать ListView. Список не большой, до 300 элементов. Если можно пример динамического создания одного чекбокса в ListViewItem. Или может есть более удобные компоненты для реализации этой задачи? Если подобная тема уже поднималась, то можно ссылку на нее...
  9. Равиль, а что дают такие уведомления? Можно на примере популярных приложений или вкратце объяснить?
  10. Присоединяюсь к вышесказанному!!! Можно ли подробнее о курсах?
  11. У меня по нажатии на кнопку. Имеется ввиду при первом обращении к WB unit Unit1; interface uses System.SysUtils, System.Types, System.UITypes, System.Classes, System.Variants, FMX.Types, FMX.Controls, FMX.Forms, FMX.Graphics, FMX.Dialogs, FMX.Controls.Presentation, FMX.StdCtrls, FMX.WebBrowser; type TForm1 = class(TForm) WebBrowser1: TWebBrowser; Button1: TButton; procedure Button1Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var Form1: TForm1; implementation {$R *.fmx} procedure TForm1.Button1Click(Sender: TObject); begin Webbrowser1.Navigate('https://maps.googleapis.com/maps/api/staticmap?center=55.026900,73.302900&size=400x400&sensor=true&format=png32&maptype=satellite&markers=color:0x000000|label:1'); end; end.
  12. Статья полезная, правку реестра уже сделал. Ничего не изменилось. Насколько я понимаю, параметры в адресной строке указывают на то, что google должна вернуть снимок (рисунок) 400х400. Webbrowser1 пытается его скачать, вместо того, чтобы просто отобразить. С толку сбивает то, что это сообщение выходит только один раз при первом обращении к Webbrowser1. Пустяк, но раздражает...
  13. Delphi 10.1 Berlin, Windows7x64, IE8 При запуске Webbrowser1.Navigate('https://maps.googleapis.com/maps/api/staticmap?center=55.026900,73.302900&size=400x400&sensor=true&format=png32&maptype=satellite&markers=color:0x000000|label:1'); браузер будто пытается сохранить файл и выдает ошибку 'Не удалось загрузить staticmap из maps.googleapis.com' При последующих запусках этого же URL Webbrowser1 правильно отображает картинку. Как можно изменить URL или (лучше не URL) свойства Webbrowser1, чтобы избежать этой ошибки? Заранее спасибо за любые советы
  14. Спасибо, отличный компонент! Все работает! Berlin 10.1, Android 5.03
  15. afors

    Google Maps & TWebBrowser

    Есть и второй вопрос: 2) Можно ли заменить TWebBrowser чем-то вроде, TMapView, но для работы в среде Windows? Интересует добавление маркеров на карту. Рассмотрел разные компоненты, в т. ч. Maps.Engine (от уважаемого ZuBy но только для Android), Кто чем пользуется?
  16. afors

    Google Maps & TWebBrowser

    ) Откуда Вы все это знаете ) Спасибо!!! Так и есть. Вставил код: -------------------------- Uses ...Registry, Windows...; ... Var Reg: TRegistry; ... Reg := TRegistry.Create; Reg.RootKey := HKEY_CURRENT_USER; Reg.OpenKey('Software\Microsoft\Internet Explorer\Main\FeatureControl\FEATURE_BROWSER_EMULATION\',True); Reg.WriteInteger(ExtractFileName(ParamStr(0)),11000); Reg.Free; Webbrowser1.Navigate('maps.google.com'); ... -------------------------- Теперь все работает PS: тестирую для версии IE 11 // Reg.WriteInteger(ExtractFileName(ParamStr(0)),11000);
  17. afors

    Google Maps & TWebBrowser

    Доброго времени суток всем. Прошу помощи, т. к. не удалось найти информацию... Нужно работать с картами Google. Приложение Firemonkey для windows (Delphi 10.1 Berlin Update1). При вызове Webbrowser1.Navigate('maps.google.com'); (и других производных гуглокарт) выдается сообщение в окне Webbrowser1: "Ваш браузер не поддерживается..." Пробовал с разными версиями Internet Explorer (8, 10, 11) на разных компах. Результат тот же. При вводе адреса в самом браузере Internet Explorer сайт грузится как надо. На сколько я понимаю, Delphi работает на движке IE (хотя могу и ошибаться). 1) Можно ли решить проблему и как? 2) Можно ли заменить TWebBrowser чем-то вроде TMapView для работы в среде Windows?
  18. )))))) а я столько всего перепробовал. Спасибо за ответ.
×
×
  • Создать...