Zitat von
knödel18:
von TMemo in ein Array of Strings
Hi,
dann sollte das so in etwa gehen:
Delphi-Quellcode:
uses Types;
var
S: TStringDynArray;
I: Integer;
begin
SetLength(S, Memo1.Lines.Count);
for i := 0 to Memo1.Lines.Count - 1 do
S[i] := Memo1.Lines[i];
end;
mfG
mirage228