Процедура  Process заполняет Listbox:
procedure TForm1.Process;
Const
   N=100;
var
  I,Index:Integer;
  Item:TListBoxItem;
begin
for I := 1 to N do
    begin
    Item:=TListBoxItem.Create(ListBox1);
    Item.Text:=IntToStr(I);
    ListBox1.AddObject(Item);
    end;
ListBox1.ScrollToItem(Item);
end;
Нужно, чтобы после заполнения Listbox скролировал в конец.
Если процедура запускается нажатием кнопки, то всё нормально.
А если из события формы FormCreate, то Listbox заполняется,
а скролирование не происходит.
Где тут собака порылась ?

Всем привет.
Иногда, особенно когда есть прокрутка списка можно случайно выделить несколько элементов ListBox-а. Ощущение, что чем больше загрузка приложения, тем чаще проявляет себя эта проблема. Бывает редко но жутко раздражает. Работоспособность программы не нарушается.
Что делать? Может "костыли" какие возможно придумать? 
Android.

Здравствуйте, уважаемые!
Пробую писать некое подобие файлового менеджера.
Для вывода папок и файлов использую  ListBox .
Так вот: при обработке события ListBoxItemClick (нажатие  на строку) происходит переход по пути, казанному с этой строке, содержимое этой папки отображается, но строки в ней не нажимаютмя, не реагируют на событие нажатия.
Если проще - строки на первой станице ListBox реагируют на нажатие, а на второй - нет.
Что я делаю не так?
{Клик по Item'у, вперёд} procedure TForm1.FoldersListBoxItemClick(const Sender: TCustomListBox; const Item: TListBoxItem); var ExtFile: string; begin // Сохраняем выбранный путь CurrentPath := CurrentPath+Item.ItemData.Text; //Текущая директория if Item.TagString = 'folder' then //Проверяем, если это папка begin if TDirectory.Exists(CurrentPath) then //Проверяем, если папка существует begin Label1.Text:= 'Нажата строка № '+ inttostr(Item.Index); //Контроль!!! FillFolderListBox(CurrentPath, True); //Процедура заполнения ListBox`а папками и файлами end else if Item.TagString = 'file' then //Иначе - файл begin Label1.Text:='Отправляем файл "'+Item.ItemData.Text+'" на плеер'; //Готовим на исподнение end; end; end; Вот этот код срабатывает один (первый) раз.
 
Прошу помощи, советов, вариантов.

Добрый день.
IDE: Delphi 10.1 Berlin Update2
OS: Windows 7/64 ->Android (тестировал на 4.4.4)
Вопрос 1:
 
Пытаюсь загрузить в Listbox файл с русскими словами: ListBox1.Items.LoadFromFile(TPath.Combine(TPath.GetDocumentsPath, 'test1.txt'));
При запуске на устройстве выдает ошибку: No mapping for the Unicode character exists in the target multi-byte code page
Файл пытался сохранить и в UTF-8, и в ANSI, и в Unicode - без разницы (после смены кодировки делал Deployment)
Как можно это победить?
Вопрос 2:
Вставил напрямую в дизайн-моде список этих же слов (из файла вопрос1) в Listbox - при старте программа очень долго думает. Слов порядка 10000. Как-то можно это ускорить?


 


 


 

Есть один листбокс..) В общем парился я парился, так и не понял как запилить стиль по человечески для итемов в боксе и нашел кнопку Edit default Style. Нашел куда впилить TimageViewer и поставил ему свойство client. Все бы ничего, да вот размер итемов не статичен, а картинка не растягивается, к тому же pngшная картинка не отделяется от фона. Подскажите, как картинку растягивать в зависимости от длины и ширины итемов листбокса и как правильно юзать pngшные картинки (что бы они сохраняли прозрачность). Может я вообще не туда рою и нужно другими способами вставлять картинки под каждый item? Видел много гайдов под listview, но к сожалению мне нужно именно для бокса..
----
п.с. что бы было проще: как нарисовать ровную плашку позади каждого элемента листбокс?

У Мемо есть фича когда нажимаешь (тап по экрану) вылезает клавиатура для редактирования текста.
Можно ли сделать такое-же с ListBox ? Тапаешь по итему и клавой исправляешь текст.

Всем утречка! Интересует вопрос кастмизации listbox в плане дизайна. Хотелось бы что бы плашки имели какой то другой цвет, рамку с обводкой и все на андроиде: в какую сторону рыть? Пилить стиль самому?
Хотелось бы, что бы элементы в листбоксе были темно подсвечены и имели рамочку.. Стили ставил, а вот как поправить что-то в стиле пока не понял.

Суть такова копаюсь в стилях, но не могу понять откуда идет наследования есть контейнер content в нем есть selection т,е выделенный элемент лист бокса , возможно ли создать стиль просто для итемов в листбоксе или это не делается через стиль?

Добрый день.
Как по правому клики мыши.выделить итем в ListBox?. Проблема в том, что если у ListBox есть PoupMenu, оно перекрывает все события.

Собственно вопрос всё ещё копаю в сторону listbox сделал такой listbox
  var
listitem:Tlistboxitem;
listimg1:Timage;
listlabel1:Tlabel;
listLayout:Tlayout;
progres:TProgressBar;
but:TSpeedButton;
begin
listitem:=TListBoxItem.Create(ListBox1);
 listitem.Parent:=ListBox1;
 listitem.Height:=50;
  listimg1:=TImage.Create(listitem);
  listimg1.Parent:=listitem;
  listimg1.Width:=50;
  listimg1.Height:=50;
  listimg1.Align:=TAlignLayout.Left;
  listimg1.Bitmap:=Image1.Bitmap;
  //
    but:=TSpeedButton.Create(listitem);
    but.Parent:=listitem;
    but.StyleLookup:='myControl';
    but.Align:=TAlignLayout.Right;
      listLayout:=TLayout.Create(listitem);
      listLayout.Parent:=listitem;
      listLayout.Align:=TAlignLayout.Client;
       listlabel1:=TLabel.Create(listLayout);
       listlabel1.Parent:=listLayout;
       listlabel1.Align:=TAlignLayout.Top;
       listlabel1.Height:=25;
       listlabel1.StyledSettings:=[TStyledSetting.Family,TStyledSetting.Style];
       listlabel1.TextSettings.Font.Size:=12;
       listlabel1.TextSettings.FontColor:=TAlphaColorRec.White;
       listlabel1.Text:='event';
      end;
  finally
      ListBox1.EndUpdate;
как получить доступ к кнопке в созданном listbox ? или хотя бы  как получить текст в  listlabel1 в выбранном item.
поидее должно работать item.selected но что то опять не работает или я туплю)