Thema: Memo1

Einzelnen Beitrag anzeigen

mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.851 Beiträge
 
Delphi 11 Alexandria
 
#7

AW: Memo1

  Alt 23. Aug 2011, 17: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
  Mit Zitat antworten Zitat