Forum: Sonstige Fragen zu Delphi
Delphi
by _Ben_,
28. Mai 2004
Hallo nochmal!
Hab's jetzt! Wie ich grad geschrieben hab: der Offset den ich brauch liegt 128 Bytes VOR dem Dateiende...
Also:
FileSeek(hFile, -128, 2);
Ich hab die ganze Zeit 128 geschrieben und bin somit im Nirvana gelandet! :wall:
Jetzt würde mich bloß noch interessieren warum bei mir FileRead in dem Fall gar nichts liest, Luckie aber ein Ergebniss bekommt...
Naja, wenigstens...
Forum: Sonstige Fragen zu Delphi
Delphi
by _Ben_,
28. Mai 2004
Hi,
Ja, beim FileSeek hab ich natürlich blödsinn geschrieben. Das kann so ja nicht gehen. Ich will erst mal einlesen um was für ne ID3-Version es sich handelt. Wenn es sich um V1.0 handelt sollte an Offset -128 vom Dateiende 'TAG' stehen. Dann 30 Byte für Titel, 30 Byte für Interpret etc.
Hab ich geändert. Ist aber eigentlich mal nebensächlich. Ich wär schon froh wenn ich mit FileRead...
Forum: Sonstige Fragen zu Delphi
Delphi
by _Ben_,
27. Mai 2004
Hi,
ich hab hier ein ganz banales Problem. Ich schaff's nicht Daten aus ner Datei einzulesen...
procedure TForm1.Button1Click(Sender: TObject);
var
iReturn: Integer;
iFileHandle: Integer;
TagVersion: array of byte;
begin