Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  AW: Binärdatei mit TFileStream auslesen

    Delphi
    by xZise, 10. Okt 2010
  Moin SirThornberry,
  stimmt das ergibt Sinn, ich dachte Write erwartet einen Pointer, aber Gegenvorschlag einfach das @ wegnehmen?
  
  procedure ShowBinary(var Data; Count: Cardinal; FileName : string);
  var
  s : TStream;
  begin
  s := TFileStream.Create(FileName, fmCreate);
  try
  s.Write(Data, Count);
• Forum: Object-Pascal / Delphi-Language

  AW: Binärdatei mit TFileStream auslesen

    Delphi
    by xZise, 8. Okt 2010
  Moin Eva,
  das Problem ist die Methode "EOF" oder was auch immer das ist. Woher weiß die das der Stream damit gemeint ist? Ich weiß nicht ob es TStream.EOF gibt, aber ansonsten kannst du auch testen:
  while (stream.position + SizeOf(<dein record>) < stream.size) do
  
  
  Die Redbox oder der rote Kasten erscheint (normalerweise), wenn jemand zwischenzeitlich was geschrieben hat, um seinen Post...
• Forum: Object-Pascal / Delphi-Language

  AW: Binärdatei mit TFileStream auslesen

    Delphi
    by xZise, 8. Okt 2010
  Wie klappt das mit TFileStream denn nicht. Also was ist da der Fehler? Dann musst du auch nicht den Umweg über Hex-Werte geben. Was möchtest du den außerdem abspeichern?
  
  Dürfte nicht das funktionieren:
  procedure ShowBinary(var Data; Count: Cardinal; FileName : string);
  var
  s : TStream;
  begin
  s := TFileStream.Create(FileName, fmCreate);
  try
  s.Write(@Data, Count);