Forum: Object-Pascal / Delphi-Language
Delphi
by Nothine,
19. Aug 2004
hab mal ein bissl rumprobiert, die entsprechung der memcopy funktion ist die funktion move, und denn entsprechenden code will ich euch natürlich auch nicht vorenthalten :roll:
procedure TForm1.Button1Click(Sender: TObject);
var S: string;
A: array of Char;
begin
S := 'blablabla';
SetLength(A,Length(S));
Move(PChar(S)^,A,Length(S));
Form1.Caption := string(A);
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by Nothine,
19. Aug 2004
andererseits ist der cast bei bspw. 56 zeichen (damit hab ichs getestet) mehr als doppelt so schnell :!: kommt also ganz drauf an wofür man das einsetzen will...
Forum: Object-Pascal / Delphi-Language
Delphi
by Nothine,
18. Aug 2004
es geht auch so ^^
procedure TForm1.Button1Click(Sender: TObject);
var A: array of Char;
S: string;
begin
S := 'blablabla';
string(A) := PChar(S);
Form1.Caption := string(A);
end;