(Moderator)
Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.858 Beiträge
Delphi 11 Alexandria
|
AW: Memo1
23. Aug 2011, 18:12
Delphi-Quellcode:
procedure Form1.Button1Click(Sender:TObject);
var
sl: TStrings;
begin
try
sl := TStringList.Create;
sl.Delimiter := '*';
sl.DelimitedText := AdvStringGrid1.Cells[7,AvancedStringGrid1.Row];
Memo1.Lines.Assign( sl);
finally
sl.free;
end;
end;
Btw. das mit dem Ändern des Betreffs des Threads war Ernst gemeint.
Markus Kinzler
|