Einzelnen Beitrag anzeigen

khh

Registriert seit: 18. Apr 2008
Ort: Südbaden
1.903 Beiträge
 
FreePascal / Lazarus
 
#24

Re: untypisierte dateien

  Alt 8. Apr 2010, 12:41
Zitat von p80286:
Delphi-Quellcode:
type
  tMyrecord = packed record
       f1 : array [0..$4A] of byte;
       name : array [$4B..$63] of char;
       trenn1: byte;
       rest : array [$65..$3FF];
   end;

var
  buffer : array [0..1023] of char;
  myrecord : tMyrecord absolute buffer;
  gelesen : integer;
...
fs:=tfilestream.create(.......);
gelesen:=fs.read(buffer,sizeof(buffer));
...
und dann entweder im Debugger anschauen was in dem Record steht, oder eine Printausgabe machen oder
ich komme der Sache näher, so funktionierts "fast"

bis auf die Umlaute krieg ich die richtige Bezeichnung, aber oemtochar bringt leider nix
Karl-Heinz
  Mit Zitat antworten Zitat