Einsteigerfragen zur PROFAN Programmierung
  Suchen
 Zurück zur Übersicht
 AutorThema: DLL-Nutzung
Carlo Keil
Datum:22.06.02 22:10 Antwortenals Email verschicken (carlo.keil@web.de) 


Hallo Profanis,

ich habe eine DLL mit einer Funktion zur Berechnung von Hashcodes
und die folgende Information dazu bekommen:

VOID FAR PASCAL MD5(LPBYTE data,int bytes,LPBYTE hash)

data FAR pointer to the information to hash
bytes number of bytes pointed to by `data'. Must be <=32767.
hash FAR pointer to a a buffer to receive the 16 byte hash

Da mir die entsprechende Erfahrung fehlt wäre ich dankbar wenn
mir jemand, der sich damit auskennt einen kurzen Beispielcode
(Deklarationen, Funktionsaufruf und Resultatausgabe) erstellen
könnte.

Danke
Carlo


Thorsten
Datum:23.06.02 08:14 Antwortenals Email verschicken (mrk@mrk-soft.de) 


>VOID FAR PASCAL MD5(LPBYTE data,int bytes,LPBYTE hash)

Hi,

so ganz Spontan:

declare data#, hush, lData&
def md5(3) !"dllname.dll","md5"

lData& = 200
dim data#,lData&
dim hush#,lData&

String data#,0="1234567890"

value& = md5(data#,lData&,hush#)

print string$(hush#,0)

Es wäre aber einfacher gewesen, die DLL irgendwo auf einer
Page zu legen, das ist jetzt hier mal so aus der Hand
geschrieben.




carlo keil
Datum:23.06.02 12:20 Antwortenals Email verschicken (carlo.keil@web.de) 


Hallo Thorsten,

du hast ja recht (und genau für solche Zwecke habe ich ja auch
die unten benutzte Seite).
Deshalb, und weil ich die Meldung "Fehler beim Laden der DLL"
bekomme, sind jetzt DLL und dein (nur ganz leicht modifizierter)
Beispielcode unter
"http://mitglied.lycos.de/abckeil/linkseite.htm" zu finden.

Herzliche Grüsse und Danke
Carlo



Thorsten
Datum:23.06.02 16:01 Antwortenals Email verschicken (mrk@mrk-soft.de) 


So wie es aussieht, ist es eine 16 Bit DLL, und Profan
ab Version 7.0 läst diese nicht mehr zu.

Frag den Autor der DLL mal, ob er in der lage, ist eine
32 Bit Dll zu erzeugen ...




carlo keil
Datum: 23.06.02 21:41 Antwortenals Email verschicken (carlo.keil@web.de) 


Hallo Thorsten,

> Frag den Autor der DLL mal, ob er in der lage, ist eine
> 32 Bit Dll zu erzeugen ...

ich werde es versuchen.

Vielen Dank für dein Hilfe
Carlo



 Zurück zur Übersicht
 

 Ein kostenloses WebMart Forum
WebMart Homepage Tools kostenlos
Shortwin - denn Glück ist kein Zufall!