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

krapotkin

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

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

  • Посещение

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

    209

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

  1. да ну полноте ж))) я всегда включаю отображение касания и вижу прям кружок, куда касаюсь и система дает координаты центра этого кружка, так что не загоняйтесь с софтом, это хард
  2. Если вы хотите на чем-то рисовать, не надо портить стены, возьмите бумагу, холст там.. Специально придуман PaintBox именно для ваших целей. Но для демо ровно то же самое вместо PaintBox.OnPaint сделал на Form.OnPaint Работает одинаково, на windows и android. Уверен, что ровно так же все будет на всех остальных ОС. type TForm1 = class(TForm) procedure FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); procedure FormPaint(Sender: TObject; Canvas: TCanvas; const ARect: TRectF); procedure FormMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); private FCrd: TPointF; public end; var Form1: TForm1; implementation {$R *.fmx} procedure TForm1.FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); begin FCrd := PointF(X,Y); end; procedure TForm1.FormMouseUp(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Single); begin Invalidate; end; procedure TForm1.FormPaint(Sender: TObject; Canvas: TCanvas; const ARect: TRectF); begin Canvas.Fill.Color := TAlphaColorRec.Wheat; Canvas.FillRect(rectf(FCrd.X, FCrd.Y, FCrd.X+100, FCrd.Y+100), 0,0,[], 1); end; там в проекте еще дофига разных странных решений и ошибок. Но это уже оффтоп...
  3. ну так еще раз - нельзя рисовать где попало когда захочется FormPaint это обработчик события когда у системы есть настроение порисовать. Просто кликать мышью для этого недостаточно Нужно заявить, что эта часть окна невалидна. По мне, так то, что в Windows это работает - это скорее упущение, баг, а не фича )) Вот после инвалидации система вызовет Paint. На Windows точно так же
  4. потому что нельзя рисовать где попало когда захочется есть событие OnPaint - его и используйте
  5. Такая возможность ВРОДЕ БЫ есть в Alcinoe https://github.com/Zeus64/alcinoe Проверьте, сообщите результаты, всем будет полезно Не для Windows! Я искал как-то, не нашел вообще ничего
  6. думаю, что из приведенного куска кода не ясно абсолютно ничего приведите минимальный проект и выложите сюда
  7. а откуда у вас там адресная строка и навигация? или вы даже не смотрели?
  8. так вот речь и идет о том, что компоненты должны быть отдельно, а данные отдельно если мы под компонентами понимаем одно и то же - экранные компоненты, предназначенные для отображения данных человеку программа не человек, ей компоненты побоку, ей бы переменные, классы, списки. ну и по коду - ошибка - обращение к переменной form1 внутри метода класса TForm1
  9. ну, вообще-то настройки в cnPack есть. Может, там нет именно того, что вам нужно... А про форматирование всех файлов разом я вообще впервые узнал ))
  10. 1. возьмите свежую версию делфи 2. проблема у вас с настройкой окружения для разработки - SDK и NDK. Если все установлено настроено по инструкции, то все и работает
  11. кривое тз всегда дает еще более кривое решение сортировать надо данные, а не компоненты на экране отсортировать список - доли секунды, вывести его на экран - тоже а вот работать с неповоротливыми экранными компонентами это ну никак не быстро
  12. главное не говорить, что за ошибка ) а пока не говорите, могу только поинтересоваться почему Form1.ImageList1 ?
  13. oh yes. sorry. It seems like you have to put equal-size TImages in horizontal scrollbox. All your images should be same-sized because you have fixed heght and width. It they are not then your designer should say what to do.
  14. No problem. Actiaully, they consists of standard Delphi's TPagecontrol, TLayout and TImage. You can simply repeat it right in code.
  15. In order to reduce a time to develop I recommend to look at https://github.com/zhaoyipeng/FMXComponents and use his slideshow component then you can adjust the size to achieve your target values
  16. лучший вариант - именно мониторить сервер не должен звонить клиенту много раз попадал в ситуации, когда клиент хотел синхронного обновления данных , но когда раскладываешь ему нагрузки на сервер и сети для такой "нехитрой" вещицы, сразу оказывалось, что вполне терпит и 10 и 30 секунд даже )
  17. кнопка в стиле имеет состояния Focused, Hot, Normal и Pressed поэтому состояние Disabled у нее отдельно задать не выйдет, можно только унаследоваться и поменять в коде
  18. I think you can't make PDF without ANY 3rd-party. Crossplatform browser incapsulates data maximally, so you can't get its' data to convert. If you make your reports by yourself then you can use Fastreport for FMX. But in your case I don't know how to do it.
  19. про String беспокоиться возможно и не нужно а места TStringList.Create; и соответствующий Free я бы прологировал
  20. Я думаю, что тут нужно серверное решение. Похожее что-то https://pdfcrowd.com/
  21. пока играл с материал-тенями, порушил маленько, не заметил поправил демки, обновил репозитории
  22. Ссылки на исходники https://bitbucket.org/vkrapotkin/vklistview/src/master/ https://bitbucket.org/vkrapotkin/vkexpressionparser/src/master/ https://bitbucket.org/vkrapotkin/vkshadowgenerator/src/master/
  23. e THttpClient есть свойства в которых есть слово Timeout. Их можно установить, и запрос будет вываливаться по Exception поэтому нужно добавить обработку Try Except вместо или дополнительно к Try Finally в обработчике Except можно куда-то записывать результат или так же через синхронизацию например выводить сообщение на экран
×
×
  • Создать...