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