StringGrid und txt Dateien

[Alterauge]

Hallo,
habe eine Frage zum StringGrid.

In einem Ordner werden TXT – Dateien gesammelt, die so aussehen:

2012-08-03 14-42-32__EOT.txt

Diese Dateien würde ich gerne in ein StringGrid laden.

Das StringGrid sollte folgende Spalten haben:
1.) Laufende Nr.
2.) Name TXT Datei
3.) Inhalt TXT Datei

Wer hat vielleicht eine Idee?

[p80286]

Wie sehen denn die Inhalte der Dateien aus?

So als ungefährer Ansatz:

Delphi-Quellcode:

var
  tempstrings : tstrings;
  dateiinhalt : tstrings;

for i:=0 to dateiliste.Count-1 do begin
  dateiinhalt.loadfromfile(dateiliste[i]);
  temstrings.add(inttostr(i));
  tempstrings.add(dateiliste[i]);
  tempstrings.add(dateiinhalt.text);
  mystringgrid.rows[i].add(tempstrings);
end;

Ohne Gewähr! ist mal so eben runtergetippt;
die Create's und Free's usw. fehlen vollkommen.

Und ob das in der Praxis überhaupt funktioniert häng vor allem vom Inhalt der Textdatei ab.

Gruß
K-H

[Luckie]

Zerleg den Dateinamen mit pos(ex) und copy.