[Doctor_Che]

Как вывести в компонент TLabel имя и размер выделенного файла в компоненте TFilterComboBox?
По заданию необходимо создать обработчик события onChange для FileListBox. Для получения имени выделенного файла использовать свойства Items и ItemIndex (номер выделенного файла) компонента FileListBox.

[Страдалецъ]

Где то так:

Код:

procedure TForm14.FileListBox1Change(Sender: TObject);
begin
 if FileListBox1.ItemIndex = -1 then Exit;
 Label1.Caption := FileListBox1.Items[FileListBox1.ItemIndex];
 try
 with TFileStream.Create(Label1.Caption, fmOpenRead)
 do begin
    Panel1.Caption := IntToStr(Size);
    Free;
    end;
 except
  Panel1.Caption := 'Locked';
 end;
end;

[Doctor_Che]

Спасибо огромное! Помогло!

[Doctor_Che]

А как эти же данные поместить в StatusBar?
И туда же поместить текущее время.
При условии что:
Размер первых двух панелей зависит от значения свойства Directory компонента DirectoryListBox1. Размер третьей панели, отображающей текущее время, не меняется.

[Страдалецъ]

А практически так-же.

Код:

StatusBar1.Panels[0].Text := 'что тут';  
StatusBar1.Panels[1].Text := 'и что тут';

[Doctor_Che]

Ага. Получилось вставить данные в StatusBar.
Правда таймер кудато пропал...
Но не получается сделать так, что бы размер первых двух панелей зависил от значения свойства Directory компонента DirectoryListBox1. А размер третьей панели, отображающей текущее время, не менялся.