*.mat Datei Inhalt in Listbox einlesen und in Edit anzeigen

[DRPEnc]

Hi, Ich hab vor zwei Tagen delphiprogrammieren angefangen...

Arbeite aber schon an einem großen Projekt. Ich nenne es DRPEnc.

Nun bin ich aber wieder an einen Punkt gekommen wo ich nicht weiter komme.
Somit kommt Ihr Jungs und Mädels ins Spiel.

Um es abzukürzen, hier das Problem:

Ich hab eine Datei mit der Endung *.mat. Diese ist eine TXT-Datei.
Dies ist zum Beispiel der Inhalt:

Code:

 8,16,19,22,26,27,29,34,
16,16,22,24,27,29,34,35,
19,22,26,27,29,34,35,38,
22,22,26,27,29,34,35,40,
22,26,27,29,32,35,40,48,
26,27,29,32,35,40,48,50,
26,27,29,35,40,48,50,60,
27,29,35,40,48,50,60,62

Was ist nun das Endziehl? Das hier:

Code:

:intra_matrix=8,16,19,22,26,27,29,...,62

Alles halt in eine Zeile.

Den Dateinamen kann ich ja zum Beispiel mit:

Delphi-Quellcode:

//Open Input File
procedure TForm1.Button11Click(Sender: TObject);
begin
OpenDialog1.Execute;
//Show Path in Edit 1
form1.ListBox1.Items.LoadFromFile(OpenDialog1.FileName);
//Debug
edit1.text:='   ' + '"' + OpenDialog1.FileName + '"'

end;

einlesen und in Edit1 anzeigen lassen.

Hier will ich aber erreichen, das ich den Inhalt der *.mat-Datei welche 8Zeilig ist in eine Zeile schreiben und was davorschreiben.
Somit muss was ähnliches her...

Ich hab das Forum hier 30 Minuten durchsucht und nichts passendes gefunden...

Dies funktioniert garnicht (Ich hab desshalb die Zeilen deaktiviert...):

Delphi-Quellcode:

procedure TForm4.Button1Click(Sender: TObject);
//var
//line;
begin
OpenDialog1.Execute;
if Opendialog1.execute then
//form1.ListBox4.Items.lines.loadfromfile(Opendialog1.filename);
//Debug
//edit1.text:=':intra_matrix=' + lines.loadfromfile(Opendialog1.filename)
end;

Kann mir Einer von Euch damit helfen? Währe sehr dankbar.

[edit=Luckie]Unnötig lange zeile gekürzt. Mfg, Luckie[/edit]