Aleks Serov

Читал что народ юзает layout но не понял как? (((

Тоесть если программа запущена на планшете у которого экран больше то чтобы увеличились и кнопки на форме и произошло их автовыравнивание чтобы они не наехали друг на друга после увеличения размеров

Здравствуйте мастера! Сделал программку на Delphi 10.3 для своего планшета 7", а потом запустил на планшете брата, у него 10". И все компоненты остались вверху-слева а внизу и справа получилось пустое место. Как сделать автомасштабирование размеров компонент и чтобы они выравнивались под размер экрана планшета и не наезжали друг на друга?

Всем спасибо! Буду пробовать...

Integer читать из базы? AsInteger в конце строки кода написать?

чето форум глючит, удаляет в коде квадратные скобки с переменной i цикла после Item

Нас троке TListViewItem (ListView1.Items.Item).Data['Cost'].AsCurrency вылетает ошибка: Invalid class type cast (((( где i - переменная цикла перебирающего список

Большое спасибо! Буду пробовать...

Здравствуйте! Вывожу данные в список ListView который состоит из двух колонок: Text1, Text2(DynamicAppearance): var MyItem:TListViewItem; begin MyItem :=Form1.Listview1.Items.Add; MyItem.Data['Text1']:='Яблоки';//товар MyItem.Data['Text2']:='100';//цена MyItem :=Form1.Listview1.Items.Add; MyItem.Data['Text1']:='Груши';//товар MyItem.Data['Text2']:='120';//цена MyItem :=Form1.Listview1.Items.Add; MyItem.Data['Text1']:='Дыни';//товар MyItem.Data['Text2']:='80';//цена end; Заполнил строки и теперь по нажатию кнопки надо посчитать общую сумму товаров. В VCL в цикле легко и просто, а вот в FMX нет такого понятия SubItems в ListView и обратиться к нему нельзя ((( Перепробовал все что удалось нагулить, результат нулевой. Как решить вопрос?

Спасибо Равиль! Скачал по ссылке: https://github.com/rzaripov1990/ModernListView Посмотрю, попробую разобраться...

Спасибо!

посмотрю ListView , можт придумаю чего.... спасибо за советы!

Сделал вывод изображений в ListBox, код такой: var I: Integer; Size: TSize; ListBoxItem: TListBoxItem; Item: TCustomBitmapItem; begin Listbox1.BeginUpdate; for I := 0 to 7 do begin ListBoxItem := TListBoxItem.Create(nil); Size := TSize.Create(130,245); ListBoxItem.StylesData['image'] := ImageList1.Bitmap(Size,i); ListBox1.AddObject(ListBoxItem); end; Listbox1.EndUpdate; end; Но более 8 изображений почему-то вывести нельзя, если поменять в циклe 7 на 8 например то первое изображение после вывода исчезнет, будут видны только последние 8. В чем трабла непонятно.. ((

Похоже кроме автора никто ModernLV не пользуется, наверное оч.сложно...

Я скачал ModernLV но как с ним работать не пойму. Если не сложно приведите простой пример кода для вывода изображений в ListView. Спасибо!

А как тогда реализовать на ListView?

Может реализовать нужную задачу будет проще на ListBox с тремя колонками добавляя в них картинки? Только как это реализовать я тоже не оч.представляю... ((

Всем привет! Посоветуйте как лучше сделать просмотрщик картинок из ImageList? (berlin, android) Хочу выводить по три картинки(фото) в каждой строке списка с возможностью выбора любого фото для увеличения Добавил на форму ImageList с 6-ю картинками, ListView в режиме DynamicAppearance(см.вложение) с прикрученным к нему ImageList написал такой код для вывода 6-ти картинок в две строки: var a,i:Integer; begin a:=0; for I:=1 to 2 do begin with ListView1.Items.Add do begin Data['Image1'] := a; Data['Image2'] := a+1; Data['Image3'] := a+2; end; a:=a+3; end; end; Все выводит, но есть одно маленькое "Но", при клике выделяется вся строка, тоесть сразу три картинки а не одна по которой кликнул. Как решить эту проблему?