Hi
Wenn ich eine Variable vom Typ PAnsiChar habe, spielt es anscheinend keine Rolle, ob ich diese mit new(variable) versehe oder nicht. Bei einem Record aber schon. Wieso ist das so?
Hier der Quellcode:
Delphi-Quellcode:
type
TForm2 = class(TForm)
Button1: TButton;
procedure Button1Click(Sender: TObject);
private
{ Private-Deklarationen }
public
{ Public-Deklarationen }
end;
TDaten = record
name:string;
end;
PDaten = ^TDaten;
var
Form2: TForm2;
daten:array of PDaten;
implementation
{$R *.dfm}
procedure TForm2.Button1Click(Sender: TObject);
var text_s:string;
text_p:PAnsiChar;
begin
text_s:='Irgendwas';
new(text_p); // sinnvoll oder nicht?
text_p:=PAnsiChar(AnsiString(text_s));
setLength(daten,1);
new(daten[0]);
daten[0].name:='Trallala';
Form2.Caption:=WideString(text_p); // nur zum prüfen
end;