Thema: Delphi Hex to String

Einzelnen Beitrag anzeigen

Muetze1
(Gast)

n/a Beiträge
 
#22

Re: Hex to String

  Alt 11. Apr 2008, 12:17
Zitat von XXcD:
Also mit dem COnverter weiß ich garnicht ob es sowas gibt und die DLL habe ich schon gemacht.
Ich bin erstaunt, dass VB überhaupt DLLs erstellen kann. Aber du kannst definitiv diese Funktion in Delphi genauso nachbilden, somit ist die Frage ob sich der Aufwand auch nur ansatzweise lohnt.

Zitat von XXcD:
VB DLL:

Public Function HexToString(sMessage As String) As String
Dim i As Integer
For i = 1 To Len(sMessage) Step 2
HexToString = HexToString & Chr(Int("&h" & Mid(sMessage, i, 2)))
Next
End Function


Delphi Code:
Delphi-Quellcode:
function StringToHex(sMessage: string): string; stdcall;
external 'dll.dll';
Wenn ich die Anwendung starte wird mir direkt ne Fehlermeldung rausgegeben, dass die Funktion StringToHex in der dll.dll nicht gefunden wurde.
Naja, hier postest du eine Funktion HexToString() und versuchst aber eine StringToHex() einzubinden. Das könnte Windows vllt. nicht auf Anhieb erkennen, dass es das gleiche sein soll.

Meinen Beitrag von zuvor beachtet? Oder einfach totschweigen da es doch einen illegalen Hintergrund hat?
  Mit Zitat antworten Zitat