Delphi-PRAXiS
Seite 4 von 4   « Erste     234   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Algorithmen, Datenstrukturen und Klassendesign (https://www.delphipraxis.net/78-algorithmen-datenstrukturen-und-klassendesign/)
-   -   MD5-Prüfroutine für Delphi 10.2 (https://www.delphipraxis.net/194472-md5-pruefroutine-fuer-delphi-10-2-a.html)

Uwe Raabe 29. Nov 2017 12:40

AW: MD5-Prüfroutine für Delphi 10.2
 
Zitat:

Zitat von LTE5 (Beitrag 1387482)
P.S. kannst du ebenfalls bestätigen, dass Embarcaderos Fix gar kein Fix war? Denn wenn hash in den uses steht, wird nach System.Hash gesucht und nicht nach deiner Hash-Unit.
Angeblich wurde das von Embarcadero ja behoben ...

Hier funktioniert das jedenfalls unter 10.2 Tokyo Update 1.

LTE5 29. Nov 2017 12:55

AW: MD5-Prüfroutine für Delphi 10.2
 
Ich musste erst Hash nach weHash umbenennen, sonst wird immer nach System.Hash gesucht.

Wenn ich die Units alle neu runterlade und nichts umbenenne, kompiliere kommt md5.pas(100): E2003 Undeklarierter Bezeichner: 'THashContext'

Benenne ich Hash nach weHash um, ist alles gut.

Uwe Raabe 29. Nov 2017 13:30

AW: MD5-Prüfroutine für Delphi 10.2
 
Zitat:

Zitat von LTE5 (Beitrag 1387487)
Ich musste erst Hash nach weHash umbenennen, sonst wird immer nach System.Hash gesucht.

Komisch. Ich habe ein neues Projekt angelegt. Dabei werden die Unit-Scope-Names auf diesen Wert gesetzt:
Zitat:

Winapi;System.Win;Data.Win;Datasnap.Win;Web.Win;So ap.Win;Xml.Win;Bde;System;Xml;Data;Datasnap;Web;So ap
Dann im Suchpfad das Verzeichnis der crc-hash Units eingetragen.

Das Projekt sieht dann so aus und compiliert ohne Probleme:
Delphi-Quellcode:
program HashTest;

{$APPTYPE CONSOLE}

{$R *.res}

uses
  System.SysUtils,
  hash,
  md5;

procedure Main;
var
  context: THashContext;
begin
  MD5Init(context);
end;

begin
  try
    Main;
  except
    on E: Exception do
      Writeln(E.ClassName, ': ', E.Message);
  end;
end.
Delphi 10.2 Update 1 (Version 25.0.27659.1188)

LTE5 29. Nov 2017 13:32

AW: MD5-Prüfroutine für Delphi 10.2
 
Zitat:

Dann im Suchpfad das Verzeichnis der crc-hash Units eingetragen.
Habe ich nie gemacht. Wird wohl daran liegen.

gammatester 29. Nov 2017 13:50

AW: MD5-Prüfroutine für Delphi 10.2
 
Zitat:

Zitat von LTE5 (Beitrag 1387482)
P.S. kannst du ebenfalls bestätigen, dass Embarcaderos Fix gar kein Fix war? Denn wenn hash in den uses steht, wird nach System.Hash gesucht und nicht nach deiner Hash-Unit.
Angeblich wurde das von Embarcadero ja behoben ...

Es ist behoben, zumindest bei meinem TokyoStarter (Delphi 10.2 Version 25.0.26309.314 ) kann ich die Units sogar parallel benutzen (für Masochisten). Das wird auch schon seit Mai 2017 im Archiv mit separaten einem Testprogramm getestet (File t_emb_we.dpr in $d25.zip, siehe auch das D25-Logfile t_crchash_d25.log)
Code:
G:\CRC_HASH>G:\CRC_HASH\t_emb_we.dproj
G:\CRC_HASH>T_EMB_WE.exe
Test hashing "abc"
Using WE - CRC/Hash
      MD5 900150983cd24fb0d6963f7d28e17f72
  SHA-256 ba7816bf8f01cfea414140de5dae2223b00361a396177a9cb410ff61f20015ad
Using system.hash
      MD5 900150983cd24fb0d6963f7d28e17f72
  SHA-256 ba7816bf8f01cfea414140de5dae2223b00361a396177a9cb410ff61f20015ad

LTE5 29. Nov 2017 13:51

AW: MD5-Prüfroutine für Delphi 10.2
 
Ja ich denke die Lösung war einfach nur die Pfade zu den Hash-Dateien in die Suchpfade mit einzutragen, was ich vorher nie gemacht habe.


Alle Zeitangaben in WEZ +1. Es ist jetzt 01:44 Uhr.
Seite 4 von 4   « Erste     234   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz