Einzelnen Beitrag anzeigen

danu1104

Registriert seit: 4. Dez 2006
75 Beiträge
 
Delphi 2006 Personal
 
#1

Header einer datei auslesen.

  Alt 6. Mär 2010, 07:16
Ich brauche eurer hilfe und zwar gehts um:

Header einer datei auslesen um mit der Header Information eine *.pak zu öffnen.

Frage 1:

Ist sowas möglich? (wenn ja siehe frage 2)

Frage 2:

Wenn ja wie fange ich an, ich kenn mich mit delphi eigenermasen aus aber es reicht für soetwas noch nicht aus.

Ich bedanke mich natürlich für jede hilfe / antwort die man kriegen kann


Edit:

habe es mit dieser variante versucht ich bekomme aber nur ausgaben womit ich nix anfangen kann

Delphi-Quellcode:
var
   OpenDialog : TOpenDialog;
   Headerfs:TfileStream;
begin
  OpenDialog := TOpenDialog.Create(Self);
  OpenDialog.Filter := 'PAK FILES|*.pak';
  if OpenDialog.Execute then
  begin
    Headerfs:=TfileStream.Create(ExtractFilePath(OpenDialog.Filename)+'data.hd',fmShareDenyWrite);
    PAK := TcymPak.Create(Self, OpenDialog.Filename);
    PAK.Header.LoadFromStream(Headerfs);
    PAK.Header.DirOffset:=????;
    renderlist;
  end;
  OpenDialog.Free;
end;
Daniel
  Mit Zitat antworten Zitat