mmhh was soll ich sagen!?!?
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var l,d,Pfad:string;
begin
l:=edit1.text;
d:=edit2.Text;
label5.caption:=l+ ' - '+d;
listbox1.Items.add(label5.caption);
edit1.Clear;
edit2.Clear;
Pfad := ExtractFilePath(ParamStr(0)) + 'Lateinliste.txt';
ListBox1.Items.SaveToFile(Pfad);
end;
mit dem funktionierts auch nicht