Перейти к содержанию
  • Регистрация

Aleks Serov

Пользователи
  • Публикаций

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

  • Посещение

Информация о Aleks Serov

  • Звание
    Пользователь

Посетители профиля

Блок последних пользователей отключён и не показывается другим пользователям.

  1. Тоесть если программа запущена на планшете у которого экран больше то чтобы увеличились и кнопки на форме и произошло их автовыравнивание чтобы они не наехали друг на друга после увеличения размеров
  2. Здравствуйте мастера! Сделал программку на Delphi 10.3 для своего планшета 7", а потом запустил на планшете брата, у него 10". И все компоненты остались вверху-слева а внизу и справа получилось пустое место. Как сделать автомасштабирование размеров компонент и чтобы они выравнивались под размер экрана планшета и не наезжали друг на друга?
  3. Всем спасибо! Буду пробовать...
  4. Integer читать из базы? AsInteger в конце строки кода написать?
  5. чето форум глючит, удаляет в коде квадратные скобки с переменной i цикла после Item
  6. Нас троке TListViewItem (ListView1.Items.Item).Data['Cost'].AsCurrency вылетает ошибка: Invalid class type cast (((( где i - переменная цикла перебирающего список
  7. Большое спасибо! Буду пробовать...
  8. Здравствуйте! Вывожу данные в список 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 и обратиться к нему нельзя ((( Перепробовал все что удалось нагулить, результат нулевой. Как решить вопрос?
  9. Спасибо Равиль! Скачал по ссылке: https://github.com/rzaripov1990/ModernListView Посмотрю, попробую разобраться...
  10. посмотрю ListView , можт придумаю чего.... спасибо за советы!
  11. Сделал вывод изображений в 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. В чем трабла непонятно.. ((
  12. Похоже кроме автора никто ModernLV не пользуется, наверное оч.сложно...
  13. Я скачал ModernLV но как с ним работать не пойму. Если не сложно приведите простой пример кода для вывода изображений в ListView. Спасибо!
×
×
  • Создать...