Ich habe mal versucht das irgendwie umzusetzten, nach einen Tipp von tommie-lie, der hat sich aber leider unter die Dusche verdrückt.
Bitte nicht lachen, mit Zeigern habe ich es nicht so.
Delphi-Quellcode:
type
PString = ^String;
var
StringArray: PString;
implementation
{$R *.dfm}
procedure TForm1.Button1Click(Sender: TObject);
begin
GetMem(StringArray, sizeof(StringArray)+1*sizeof(PString));
PString(StringArray)^ := Edit1.Text;
end;
Ich bekomme allerdings eine AccessViolation.