Einzelnen Beitrag anzeigen

Nelphin

Registriert seit: 2. Feb 2009
Ort: Kaiserslautern
71 Beiträge
 
Turbo Delphi für Win32
 
#1

[nicht-Profi] Datentyp auf bestimmte Weise darstellen

  Alt 4. Okt 2011, 21:25
Delphi-Version: 2006
Hallo,

ich möchte gerne einen bestimmten Datentyp aus einer Datei einlesen und entsprechend einer vorliegenden Spezifikation sichtbar machen:

Hier der Teil der Spezifikation, der mir Rätsel aufgibt:

Zitat:
The type is a 16 byte (128-bit) number. It is stored/written to the file using a four-byte word (U32), 2 two-byte words (U16), and 8 one-byte words (U8) such as:
{3F2504E0-4F89-11D3-9A-0C-03-05-E8-2C-33-01}
In the given format types are used as unique identifiers (e.g. Data Segment ID, Object Type ID, etc.)
Also mein Ansatz wäre an die Stelle im File zu springen (die ist mir bekannt) wo dieser Datentyp steht und ihn dann in entsprechenden Variablen einzulesen...

also etwa so:
Delphi-Quellcode:
procedure TForm1.Button6Click(Sender: TObject);
var
fs: TFilestream;
EntryCount:integer;
w32:longword;
w16a,w16b:word;
w8a,w8b,w8c,w8d,w8e,w8f,w8g,w8h:byte;
begin
fs:=TFilestream.Create(edit1.Text,fmopenread);
fs.Position:=89;
fs.ReadBuffer(w32,4);
fs.ReadBuffer(w16a,2);
fs.ReadBuffer(w16b,2);
fs.ReadBuffer(w8a,1);
fs.ReadBuffer(w8b,1);
fs.ReadBuffer(w8c,1);
fs.ReadBuffer(w8d,1);
fs.ReadBuffer(w8e,1);
fs.ReadBuffer(w8f,1);
fs.ReadBuffer(w8g,1);
fs.ReadBuffer(w8h,1);
fs.free;
end;
was mir nicht klar ist, wie ich das jetzt mal auf den bildschirm bekomme damit es so aussieht:

Zitat:
{3F2504E0-4F89-11D3-9A-0C-03-05-E8-2C-33-01}
Für Tipps wäre ich dankbar!

Geändert von Nelphin ( 4. Okt 2011 um 21:46 Uhr)
  Mit Zitat antworten Zitat