String auf Record übertragen

[Union]

Hallo,

ich habe einen Record, in den ich Daten aus einem String eintragen möchte:

Delphi-Quellcode:

type
   SSIDBuffer = Record
      SSIDCMD : char;
      SSIDLEV : char;
      SSIDCODE : array[0..24] of char;
      SSIDPSWD : array[0..7] of char;
      SSIDSDEB : array[0..4] of char;
      SSIDSR : char;
      SSIDCMPR : char;
      SSIDREST : char;
      SSIDSPEC : char;
      SSIDCRED : array[0..2] of char;
      SSIDRSV1 : array[0..4] of char;
      SSIDUSER : array[0..7] of char;
      SSIDCR   : char;
   end;

var
   cmdBuffer : string;

Das könnte ich ja einzeln machen, z.b. so:

Delphi-Quellcode:

with SSIDBuffer do
begin
   SSIDCMD := copy(cmdBuffer,1,1);
   SSIDLEV := copy(cmdBuffer,2,1);
   ...
end;

Das ist mir aber zu umständlich. Geht das irgendwie in einem Schritt ?