Delphi-Quellcode:
procedure TForm1.btn_lesenClick(Sender: TObject);
var lesen: TStringList;
begin
lesen := TStringList.Create;
lbl_nachr.Caption := nachricht;
lesen.Free;
end;
Delphi-Quellcode:
procedure TForm1.btn_lesenClick(Sender: TObject);
var lesen: TStringList;
begin
lesen := TStringList.Create;
lbl_nachr.Caption := lesen[0];
lesen.Free;
end;
Funktioniert aber Trotzdem nicht.
Zitat:
Löschen einer Zeile ( var SList: TStingList; // Creat und Free nicht vergessen )
SList.Delete(0); //löscht die erste Zeile
So hab ich es auf einer Seite gefunden.
Funktioniert aber trotzdem alles nicht.
@Nuklear Ping
Was bringt mir ein Tutorial, hab den Code jetzt einfach mal fast 1:1 abkopiert und trotzdem
Funktioniert es nicht. Da bringt auch ein Tut nichts.
Kann mir wenigstens einer mal die Fehler erklären.