Servus,
Der folgende code fügt ListView Dateien aus einem Pfad zu:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
sr: tsearchrec;
found: integer;
begin
found:= findfirst(Edit1.Text+'\*',faanyfile,sr);
while found=0 do
begin
with ListView1.Items.Add do
begin
found:=findnext(sr);
Caption := (sr.Name);
Subitems.Add(formatfloat('0.00',sr.Size / 1024)+' KB');
>>>>>>>>>> Subitems.Add(); <<<<<<<<<<
end;
end;
findclose(sr)
end;
1. Ich will, dass zwischen den Pfeilen (bei Subitems.add()
Das Datum der Datei drinsteht (so wie im explorer) wie mache ich, dass immer das Datum der angezeigt wird ?
2. Was muss ich ändern, damit nur dateien und keine Ordner angezeigt wer den ?
PS: Habe beide fragen in ein Thema gemacht, da sie ja verwand sind.
MFG