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

Aleks Serov

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

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

  • Посещение

Весь контент Aleks Serov

  1. но тогда перекрасяться все строки.. А как сделать четную одним цветом,а нечетную другим?
  2. Сделал по Вашему совету так: varMyItem:TListViewItem;beginMyItem :=Listview1.Items.Add;MyItem.Data['Text1']:='MyData';TListItemText(MyItem.Objects.FindDrawable('Text1')).TextColor := TAlphaColorRec.Gold; ListView1.Adapter.ResetView(MyItem);ListView1.ApplyStyleLookup;end; Ошибка пропала,но текст свой цвет не меняет, отображается заданным в дизайнере цветом. Похоже что при добавлении в список данных менять их цвет нельзя. Может на update прикрутить тогда?
  3. Привет мастера! Хочу поменять цвет строки в списке при внесении в него данных. Это возможно? Или только потом уже в событии Update? Пробую так: var MyItem:TListViewItem; begin MyItem :=Listview1.Items.Add; MyItem.Data['Text1']:='MyData'; MyItem.Objects.TextObject.TextColor :=TAlphaColorRec.Gold; ListView1.Adapter.ResetView(MyItem); ListView1.ApplyStyleLookup; end; но приложение крашиться на строке: MyItem.Objects.TextObject.TextColor :=TAlphaColorRec.Gold; Подскажите как правильно реализовать нужную мне функцию? Погуглив рабочего решения так и ненашел (((
  4. Установить компоненты можно,но на палитре отображает лишь их виндовую часть (( А под FMX проекты не компилятся у меня (((
  5. Если не сложно скиньте пожалуйста рабочий проект видеоплеера под FMX,а то я уже замучился с ним если честно. Стандартный из примеров не умеет масштабировать ролик оставляя черную рамку при увеличении размеров контрола. Вроде простая вещь, а мороки с этим плеером вагон и маленькая тележка. Ну что стоило разрабам ТMediaControl в Delphi 11 добавить опцию "scaling(stretch) video" или что-то вроде того? Неужели так сложно было?
  6. На GitHub Alcinoe компонент один, ставиться DPK-файлом под Александрию или Сидней версии. У меня в палитре Delphi 11 после установки отображает инфу что компоненты лишь под Винду, скинул скрин в раннем сообщении и на форму добавить нельзя ничего ((
  7. Проект по ссылке https://github.com/bravesoftdz/MediaPlayer_64Bit_Alcinoe компилится с ошибкой:
  8. Проект по ссылке https://github.com/HemulGM/FMXVLC компилится с ошибкой:
  9. Странно что в свойствах обьекта MediaControl нет опции масштабирования,чтобы через инспектор обьектов можно включить при необходимости. Не досмотрели разрабы Delphi 11 )))
  10. Скачал на GitHub и поставил компоненты Alcinoe https://github.com/MagicFoundation/Alcinoe но они под Win32, а мне надо для Android 11 Нашел пример видеоплеера для Андроид: https://github.com/Embarcadero/RADStudio11Demos/tree/main/Object Pascal/Mobile Snippets/VideoPlayback но он не масштабирует ролик в размер MediaControl и видео не на весь экран идет (( Если разрешение ролика меньше размеров контрола то ролик идет как-бы в окне(уменьшенным) а вокруг него черные рамки
  11. Всем привет! Как сделать видеоплеер для Андроид 11 на Delphi 11? В примерах к Дельфи есть только аудиоплеер а видео нет (( Пробовал сам сделать кинул на форму MediaPlayer и MediaControl,указал видеофайл, прописал команды воспроизведения на кнопку,видео проигрывается на форме но не на весь экран и не в той ориентации(нужна альбомная). Подскажите как правильно сделать?
  12. Ищу компонент или пример кода для работы с bluetooth геймпадом для моб.устройств на Android. Пробовал использовать примеры Delphi 11 для работы с bluetooth. Удалось лишь прочитать списков bluetooth устройств спаренных с телефоном. При попытке конекта прогам крашится и данные не удается прочитать с геймпада. Кто работал с геймпадами,поделитесь опытом.. Буду очень признателен!
  13. Трекболл применяют в куче других программ для Андроид, например в приложениях для управления камерами видеонаблюдения. Писать может каждый на чем ему удобно,я на Дельфи уже сделал кучу программ для ПК и моим клиентам пофигу на чем они написаны,на Дельфи или на Сях или на др.языке, главное чтобы программы выполняли нужную им работу. Если незнаете ответа на заданный мною вопрос то зачем писали коммент? Поучить на чем лучше писать? ))) Мне нравиться Дельфи, я на ней уже 30 лет пишу(лишь компоненты сам не делал) и дальше буду писать независимо от советов "бывалых" программистов...
  14. Всем привет! Ищу компонент экранный трекбол для управления персонажем в игре на телефоне. Среда разработки Delphi 11, телефон Самсунг А31, Андроид 11 Долго искал в гугле и на разных форумах в итоге ничего под не нашел. Вдруг есть у кого или может сделать нужный компонент за вменяемую сумму? Рисовать все самому и писать обработчики я не осилю наверно ((
  15. Всем спасибо! Скачаю и гляну исходники...
  16. Есть у кого рабочая прога для Андрюхи 9 сканера штрихкодов под Delphi Rio? Скиньте исходники если не жалко, Большое спасибо!
  17. из папки advancedTestApp удалось скомпилить и запустить на смартфоне но ругается что медленная камера и не распознает ни штрихкод, ни QR-код мобила Samsung J7 Neo, вроде как не самый худший телефон на сегодня )) barCode сканит без проблем, там вроде тоже ZXing: https://barcode-scanner.ru.uptodown.com/android
  18. Не запускается пример в ZXing, вылетает ошибка: [dcc32 Fatal Error] DUnitXTest.dpr(18): F2613 Unit 'TestInsight.DUnitX' not found.
  19. Это платный компонент? Кто-то использовал,работает нормально? Есть примеры для Андрюхи?
  20. Привет мастера! Ищу компонент для чтения штрихкодов средствами Дельфи без скачивания других сторонних программ с Маркета. есть ли такой? Если да, поделитесь ссылкой или статьей по реализации нужного мне функционала. Большое спасибо! Прошерстил форум, всюду предлагают скачать barCode.apk, для интеграции с прогой ZXing но мне бы хотелось все сделать в своей программе если это возможно..
  21. Все решил самостоятельно. Как оказалось забыл прописать в private ClipService: IFMXClipboardService; и еще в FormCreate if not TPlatformServices.Current.SupportsPlatformService(IFMXClipboardService,IInterface(ClipService)) then ClipService:=nil; Теперь все копирует как надо. Может пригодиться кому мой опыт.. )))
  22. Странно но на событии StringGrid1CellClick выполнение такого кода: if StringGrid1.Cells[1,StringGrid1.Row]<>'' then ClipService.SetClipboard(StringGrid1.Cells[1,StringGrid1.Row]); вешает прогу,а при повторно клике на гриде происходит вылет.. ((
  23. Вибра пашет,копирование данных нет )) procedure Vibra; Var Vibrator:JVibrator; begin Vibrator:=TJVibrator.Wrap((TAndroidHelper.Context.getSystemService(TJContext.JavaClass.VIBRATOR_SERVICE) as ILocalObject).GetObjectID); Vibrator.vibrate(100); end;
  24. Привет мастера! Хочу скопировать по длинному тапу данные ячейки StringGrid, на StringGrid1Gesture повесил такой код: if EventInfo.GestureID = System.UITypes.igiLongTap then begin ClipService.SetClipboard(StringGrid1.Cells[1,StringGrid1.Selected]); Vibra; ShowMessage('Данные скопированы'); end; но получаю access violation, пробовал так еще: ClipService.SetClipboard(StringGrid1.Cells[1,StringGrid1.Row]); но та же ошибка,хотя данные в ячейке есть. В чем трабла, кто подскажет? если закоментить строку ClipService сообщение про копирование данных есть, но данных в буфере нет ))
×
×
  • Создать...