Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Dateiinhalt Prüfen

    Delphi
    by Gehstock, 27. Dez 2007
  Nee er war einfach zu groß hab ihn verkleinert jetzt klappt es
  
  von Buffer:Arrayof Char; zu Buffer:Arrayof Char;
  
  FS := TFileStream.Create(OpenDialog1.Filename,fmopenreadwrite);
  FS.Position := $3c;
  FS.ReadBuffer(Buffer,4);
  Memo1.Lines.Add(Buffer);
  end
• Forum: Object-Pascal / Delphi-Language

  Re: Dateiinhalt Prüfen

    Delphi
    by Gehstock, 27. Dez 2007
  Ok geht so
  FS := TFileStream.Create(OpenDialog1.Filename,fmopenreadwrite);
  FS.Position := $3c;
  FS.ReadBuffer(Buffer,4);
  S := Copy(Buffer,1,4);
  Memo1.Lines.Add(s);
  
  aber ein problem hab ich hier bei
  FS.ReadBuffer(Buffer,3); liest das programm CJK
  aber bei
• Forum: Object-Pascal / Delphi-Language

  Dateiinhalt Prüfen

    Delphi
    by Gehstock, 27. Dez 2007
  und zwar soll die Datei anhand eines wertes identifiziert werden
  bei Hex $3c-$3f da soll 544B4A43 Drinstehen
  
  hab mal ein Codeschnipsel dazu gefunden welches mir aber nichts sagt
  Dword((@buf)^):=$544B4A43; // CJKT
  bzw
  Dword((@buf)^):=$544B4A43; // CJKT
  
  hab die datei erstmal nur in einen Filestream geladen