Also erstmal unterstützt VB6 "von Haus aus" kein Cdecl, vielleicht kann ThunderVb dir da helfen, sonst importierst du halt die Funktion mit GetProcAddress und rufst sie auf.
Hier mal ein kleiner Delphicode von mir:
Code:
type
TSteamDecryptDataForThisMachine = function(EncryptedData :Pchar; EncryptedDataLength : Integer; DecryptedBuffer : Pointer; DecryptedBufferSize : Integer; DecryptedDataSize : PUINT) : Integer; cdecl;
procedure TForm1.Button1Click(Sender: TObject);
var
pwdecrypt : TSteamDecryptDataForThisMachine;
encpwd : Pchar;
retlength : UINT;
password : array[0..99] of char;
begin
encpwd := '093760711C24A4FCB63F19FBA07DF366A7EF01751E1D21F70BBF32F47FD4E06E17D91449DA9396CA8D2B257FF4B1';
pwdecrypt := GetProcAddress(LoadLibrary('C:\Program Files\Steam\steam.dll'),'SteamDecryptDataForThisMachine');
Showmessage(IntToStr(pwdecrypt(encpwd, strlen(encpwd),@password, sizeof(password),@retlength)));
showmessage(password);