enatechno

Пользователи
  • Публикации

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

  • Посещение

  • Days Won

    16

enatechno last won the day on 30 июля

enatechno had the most liked content!

2 подписчика

О enatechno

  • Звание
    Продвинутый пользователь

Информация

  • Пол
    Не определился

Посетители профиля

601 просмотр профиля
  1. uses System.Threading; //.... procedure TForm1.Memo1Tap(Sender: TObject; const [Ref] Point: TPointF); begin TTask.Run(procedure begin TThread.Synchronize(nil, procedure begin ShowMessage(IntToStr(Memo1.SelStart)); end); end); end;
  2. Если нужно просто запустить программу, нажмите на "Подробнее", появится кнопка для запуска. инфа по цифровой подписи: Code Signing сертификаты или сертификаты разработчика. Виды, как выбрать Code signing для Open Source от Certum Code Signing в Windows, просто и недорого Где приобрести сертификат : KSoftware, Comodo, Symantec ... (ссылки есть в статьях) Как подписывать
  3. Как подключаете? Через LiveBindings? Если "да", то это может быть причиной торможения (тем в более в ранних версиях XE). Если заполняете "вручную", то проверьте наличие конструкций BeginUpdate, EndUpdate Grid1.BeginUpdate; try // заполнение finally Grid1.EndUpdate end; Большинство порекомендует Вам перейти на версию Berlin (в ней работа Grid значительно переработана)
  4. Soccerstand (результаты матчей онлайн) http://www.soccerstand.com Android
  5. У TMS есть готовое решение: TTMSFMXSignatureCapture Вот еще видео можно глянуть: Tutorial: Finger Writer with FireMonkey (Delphi DX10.1 Berlin) on Win10, OSX, iOS Tutorial: Signatur Capture in Firemonkey XE5 (Delphi XE5) on Win, iOS and Android
  6. procedure TForm1.FormCreate(Sender: TObject); var i: integer; aRectangle: TRectangle; aLabel: TLabel; aButton: TButton; begin VertScrollBox1.BeginUpdate; try for i := 1 to 30 do begin aRectangle := TRectangle.Create(VertScrollBox1); aRectangle.Parent := VertScrollBox1; aRectangle.Align := TAlignLayout.Top; aRectangle.Height := 60; aRectangle.Margins.Left := 10; aRectangle.Margins.Top := 15; aRectangle.Margins.Right := 15; aRectangle.TagString := 'Rectangle' + i.ToString; aLabel := TLabel.Create(VertScrollBox1); aLabel.Parent := aRectangle; aLabel.Align := TAlignLayout.Client; aLabel.Text := 'Label' + i.ToString; aLabel.Margins.Left := 10; aLabel.TagString := 'Label' + i.ToString; aButton := TButton.Create(VertScrollBox1); aButton.Parent := aRectangle; aButton.Align := TAlignLayout.Right; aButton.Text := 'Button' + i.ToString; aButton.TagString := 'Button' + i.ToString; aButton.Margins.Top := 5; aButton.Margins.Bottom := 5; aButton.Margins.Right := 10; end; finally VertScrollBox1.EndUpdate; end; end;
  7. Основные отличия: TImageControl - при клике на нем во время выполнения десктоп-приложения открывается диалоговое окно открытия файла, где можно выбрать картинку для отображения в ImageControl. Отображаемая картинка автоматически масштабируется под размеры контрола. TImageViewer - наследник от TCustomScrollBox и имеет встроенные скроллбары. На десктопах изображение может смещаться с помощью мыши и масштабироваться (колесиком мыши). Также в демках, идущих с RAD, есть пример как масштабировать изображение с помощью жестов на устройствах с тачскрином.
  8. Да. Если не хотите менять стандартные стили, то лучше использовать ListView c плиточным отображением, о котором писал Равиль в первом посте. Тем более, что в Ваших объявлениях (айтемах) должно отображаться много других полей. Возможно, Вы сами сможете сделать такой вывод, ознакомившись с ранее обсуждавшимися темами:
  9. Когда разберетесь с ListBox и стилем, приступайте к изучению ListView (т.к. использование ListView оптимальнее для мобильных платформ)
  10. Тогда стандартные стили Вам не подойдут. Создавайте свой стиль для ListBoxItem на базе стандартного или "с нуля". Тут описано как это можно сделать. Вот подправил пример. Создал mylistboxitemstyle в котором только 2 элемента - text и image. Этот стиль загружен в StyleBook1 и указан в Listbox1.DefaultItemStyles.ItemStyle. Можете редактировать этот стиль прямо в StyleBook, добавляя новые элементы и располагая их как Вам нужно. tstListbox1.rar
  11. Из стандартных иконку отображают: listboxitembottomdetail, listboxitemleftdetail, listboxitemnodetail, listboxitemrightdetail. tstListbox1.zip
  12. LabelG.StyledSettings := []; ... LabelG.TextSettings.HorzAlign := TTextAlign.Center; with LabelG do - не нужен
  13. Если "используете мобильные данные", то подключаетесь к интернету минуя локальную сеть. В этом случае, РС, к которому хотите подключиться, должен иметь "белый" IP адрес и его надо указывать в настройках подключения мобильного приложения.