Paramater wärend der Laufzeit übergeben?

[Tommy1988]

Super Ich hab kapiert wie das funktioniert. Ich habe mir vorher alles viel schwieriger vorgestellt und mich deswegen da nicht rangetraut.

Folgendes hab ich gemacht (OnShow):

Delphi-Quellcode:

var
Liste: TStringList;
begin

Label1.Caption := ParamStr(1); // Dateipfad holen plus Dateiname -und Endung

Liste := TStringlist.Create;
Liste.LoadFromFile(Label1.Caption);
Label2.Caption := Liste.Strings[Liste.Count];

In der Textdatei ist die erste Zeile mit "XXXXXXXXXXXXXXXXX" gefüllt.
XXX[...] wird folständig im Label2 angezeigt

Edit: Eine Frage bezüglich http://www.delphipraxis.net/internal...t=registrieren dieses Codes hätte ich aber noch. Das Icon, dass die Datei dann hat ist ja das Icon, meines Testprogramms. In meinem Fall das komische DelphiIcon da.

Kann man das via ImageList ändern? Ich lade ein Bild in eine ImageList und übergebe es an die Funktion?
Wenn das so geht, ich habe keine Ahnung, wo ich in der Funktion etwas ändern muss. Weil OpenKey('DefaultIcon'... hört sich für mich seltsam an