PAnsiChar & Strings

var
Test1: PChar;
Test2: String;
begin
test2:='hej';
Test1:=pchar(Test2);

end;

hmm kan ikke prøve det da den nu siger den ikke kan create project1.exe der kommer ingen grund bare en Fatal error når jeg prøver at compilere?

det kan være fordi programmet køre

nogle gange i hukommelsen, prøv Ctrl+Alt+Delete og se om det ligger i listen

Vallemanden har besvaret spørgsmålet men jeg ville alligevel teste om der var noget med pchar, pansichar, pwidestring konvertering. Sidstnævnte er jo en 16-bits størrelse og så kunne man jo ikke bare placere en pchar pointer oven på strengen - men det virker.

var
  pc : pChar;
  pac : pAnsiChar;
  pws : pWideChar;
  st : string;
begin
  st := 'Hello world';
  pc := pchar(st);
  pac := pansichar(st);
  pws := pwidestring(st);

  // de peger alle på samme adresse, nemlig strengens første karakter
end;