Witam.
Liste plików wyświetlam w ListBox za pomocy procedury :
procedure ListaPlikow (ListBox: TListBox; Folder: String);
var
Result: Integer;
SR: TSearchRec;
begin
ListBox.Clear;
Result:=FindFirst(Folder+'\*.*',faAnyFile,SR);
while Result=0 then begin
ListBox.Items.Add(SR.Name);
Result:=FindNext(SR);
end;
end;
Co należy dopisać ,żeby obok nazw plików wyświetlał sie również ich rozmiar.I druga sprawa co dodać ,aby obok katalogów było napisane słowo DIR albo coś innego,żebym mógł rozpoznań ,że to katalog ?