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

juppy

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

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

  • Посещение

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

    7

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

  1. А вот это вот жутсво кто-нибудь пробовал проделать?... Источник
  2. Всем привет! Чот тема заглохла, а ответа так и нет. У меня вот с таким манифестом публикуется: <uses-sdk android:minSdkVersion="19" android:targetSdkVersion="28" android:maxSdkVersion="27" /> А вот с таким уже нет: <uses-sdk android:minSdkVersion="19" android:targetSdkVersion="28" android:maxSdkVersion="28" /> Поет песенку про то, что надо еще и 64 бит сборку бла бла. Все бы итак хорошо, но проблема проявляется так, что на 64 разрядные телефоны в Плей Маркете приложение не выдается в поиске. Как можно решить эту проблему? ЗЫ Delphi 10.3 Version 26.0.33219.4899
  3. Всем привет! Помогите пожалуйста разобраться. Проблема следующая: Есть структура: type PTreeItem = ^TTreeItem; TTreeItem = record FType:integer; // 0 - Group, 1 - Item FCode: String; FParent: String; FDescription: string; FChildCount: string; FExpanded:boolean; FTradeMark:string; FBUOM:string; FUPP:Double; end; Мне нужно ее сохранить в LisBox-е, чтобы обрабатывать вместе с итемеми лисбокса Есть вот такая конструкция при заполнении листбокса: var TreeItem:PTreeItem; LBI:TListBoxItem; begin New(TreeItem); TreeItem.FType := 0; TreeItem.FCode := ClientDataSet1.FieldByName('CategoryNo').AsString; TreeItem.FParent := ClientDataSet1.FieldByName('ParentCategoryNo').AsString; TreeItem.FDescription := ClientDataSet1.FieldByName('Description').AsString; TreeItem.FExpanded := false; TreeItem.FChildCount := ClientModule1.ClientDataSet1.FieldByName('ChildCount').AsString; LBI := TListBoxItem.Create(self); LBI.Data := TObject(TreeItem); <<<<<<------------------------- вот здесь под Android вылетает ошибка. LBI.Text := TreeItem.FDescription; LBI.Parent := lbItemTree; Помогите разобраться что я делаю не так? Ошибка: Access violation at address....
×
×
  • Создать...