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

VladimirS

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

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

  • Посещение

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

    4

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

  1. код, которым ты сохраняешь, - государственная тайна?
  2. FM - это отдельный фреймворк, и на работу совместно с VCL он не заточен. Единственное что заточено - это среда. Она не разрешает в одном проекте использовать визуальные компоненты из разных наборов. Хотя некоторые умельцы смогли скрестить их.
  3. Добавляй свою опцию. Потому что это как проверять - использует приложение драйвера DBExpress или ADO.
  4. А так ты пробовал? ZipCompress->Add(System::Ioutils::TPath::Combine(System::Ioutils::TPath::GetDocumentsPath(),"Folder\test1.txt")
  5. подозреваю, что передается в UTF8 Попробуй сохранить приходящий текст в файл на андроиде, и посмотреть с компа - в какой кодировке он там.
  6. Нельзя потому, что FMX - это Pascal, а Android Studio/Eclipse - это Java.
  7. а какова цель проверки? Постановка задачи - проверка ради проверки?
  8. t := TImage.Create(Form1); Этого вам для начала будет достаточно?
  9. http://www.fast-report.com/ru/product/fast-cube-fmx/ ?
  10. ребята, вы чё, это же все есть в исходниках Embarcadero Открываете модуль с контролом, и ищите его метод "что-то-там-Paint-что-то-там"
  11. какие-то дополнительные визарды установлены в среде, типа gexperts или CnPack?
  12. Пока что склоняюсь к варианту. предложенному GunSmoker: type {$IFDEF AUTOREFCOUNT} TContainerObject = class strict private FValue: Variant; protected constructor Create(const AValue: Variant); public property Value: Variant read FValue; end; constructor TContainerObject.Create(const AValue: Variant); begin inherited Create; FValue := AValue; end; function FakeObject(const AValue: Variant): TObject; begin Result := TContainerObject.Create(AValue); end; function RealObject(const AObject: TObject): Variant; begin Result := (AObject as TContainerObject).Value; end; {$ELSE} FakeObject = TObject; RealObject = Cardinal; {$ENDIF} List.AddObject('Some value', FakeObject(ID)); ID := RealObject(List.Objects[0]);
  13. Жаль, что не было добавленно готового встроенного решения. Аналог TField c AsXXX и конструкторами на каждый тип.
  14. cbxLogin.Items.AddObject(Users.FieldByName('NAME').AsString, TObject(ID)); даёт AV. Как быть?
  15. VladimirS

    ListItemBackground

    См. исходники, конкретно часть TListViewItemObjects = class(TListItemObjects) private FAppearance: TItemAppearanceObjects; function GetDetailObject: TListItemText; function GetGlyphButton: TListItemGlyphButton; function GetImageObject: TListItemImage; function GetTextButton: TListItemTextButton; function GetTextObject: TListItemText; function GetAccessoryObject: TListItemAccessory; function FindObjectT<T: TListItemObject>(const AName: string): T; public procedure Clear; override; property TextObject: TListItemText read GetTextObject; property DetailObject: TListItemText read GetDetailObject; property ImageObject: TListItemImage read GetImageObject; property TextButton: TListItemTextButton read GetTextButton; property GlyphButton: TListItemGlyphButton read GetGlyphButton; property AccessoryObject: TListItemAccessory read GetAccessoryObject; end; и думай, где и что тебе придется поменять, чтобы добавить в него еще один элемент - фон, с цветом/градиентом/картинкой/чем-нибудь-ещё
  16. VladimirS

    ListItemBackground

    Посмотрел исходники. Боюсь, не рассчитано на такое TListView. тебе придется делать потомок TListView, TListViewItem и TListViewItemObject\ или переделать на TListBox.
×
×
  • Создать...