Ergebnis der Suchanfrage

• Forum: Software-Projekte der Mitglieder

  Re: .: CheckIt! :.

   
    by St.Pauli, 22. Dez 2005
  Du must einfach nur den Pfad der Funktion übergeben, z.B. 'C:\Test.txt' - also als String :wink:
  
  Edit:
  
  
  ...
  VAR Datei1, Datei2 : string;
  begin
  Datei1 := 'C:\Test1.txt';
  Datei2 := 'C:\Test2.txt';
• Forum: Software-Projekte der Mitglieder

  Re: .: CheckIt! :.

   
    by St.Pauli, 22. Dez 2005
  Öffne doch mal die Unit und schau dir die Funktionen an. Bei der Funktion HashFile bist du richtig^^ Du trägst die FileCompare-Unit in uses-Klausel ein. Dann einfach:
  
  IF (HashFile(Datei1) = HashFile(Datei2)) THEN
  Dateien sind gleich
  
  @ dahead: Ja, wird von Paint unterstützt.
• Forum: Software-Projekte der Mitglieder

  Re: .: CheckIt! :.

   
    by St.Pauli, 21. Dez 2005
  Mit der MD5 - Unit wäre das:
  
  IF (MD5Print(MD5File(Datei1)) <> MD5Print(MD5File(Datei2))) THEN
  Dateien sind ungleich!
• Forum: Software-Projekte der Mitglieder

  Re: .: CheckIt! :.

   
    by St.Pauli, 21. Dez 2005
  Ansonsten einfach selber machen. Entweder mittels der md5-Unit, oder dem DEC, etc... Wenn mich nicht alles täuscht hat sowohl das DEC als auch die MD5 Unit schon eine Funktion zum Hashen von Dateien.
• Forum: Software-Projekte der Mitglieder

  Re: .: CheckIt! :.

   
    by St.Pauli, 21. Dez 2005
  Hi,
  
  ich find es irgendwie komisch wie verglichen wird? Die Unterschiede können ja manchmal ganz hilfreich sein, aber warum gibst du nicht einfach noch ne Option an, um per Hash zu vergleichen?
  
  Bei mir hat dein Programm auch schon ein bisschen gebraucht um 2 Dateien (108 KB und 28 KB) zu vergleichen, und blieb auch eine Zeit lang hängen^^ Kann natürlich auch an meinem 1 MHZ Rechner hängen ...