string zum array of char

[dizzy]

Über einen Cast gehts:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
type
  TCharArray = array[0..255] of Char;
  PCharArray = ^TCharArray;
var
  a: TCharArray;
  s: String;
begin
  s := 'Test';
  a := PCharArray(s)^;
  Form1.Caption := a;
end;

mit einem ShortString:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
type
  TCharArray = array[0..255] of Char;
var
  a: TCharArray;
  s: String[255];
begin
  s := 'Test';
  a := TCharArray(s);
  Form1.Caption := a;
end;

Problem hier: Es schleichen sich am Anfang und ende ein paar Zeichen ein. Hab's auf die Schnelle nicht hinbekommen dass das sauber wird, aber es kompiliert schonmal

\\edit: Boah, aber Millisekunden zu lahm