Einzelnen Beitrag anzeigen

Gargamel

Registriert seit: 19. Mär 2007
171 Beiträge
 
#1

new(...) bei PAnsiChar?

  Alt 16. Mai 2013, 07:37
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;
  Mit Zitat antworten Zitat