Hex to String

[XXcD]

Hab jetzt noch eine Frage dazu, kann ich auch irgendwie die function aus VB in Delphi direkt benutzen?
Entweder den VB Code zu einem Delphi code convertieren, oder in VB eine DLL schreiben und die dann in Delphi einbinden.

Also mit dem COnverter weiß ich garnicht ob es sowas gibt und die DLL habe ich schon gemacht.

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.