Einzelnen Beitrag anzeigen

DelphiManiac

Registriert seit: 5. Dez 2005
742 Beiträge
 
#1

Stringübergabe Delphi--> VB 6.0 in DLL

  Alt 14. Mai 2008, 13:45
Hallo,

folgendes Anliegen habe ich:

ich habe eine DLL geschrieben (in Delphi), eine Funktion übernimmt einen String (bzw einen Zeiger auf das 1. Byte) C-konform, schreibt diesen in ein Gerät, das zurücklesen zeigt, dass der String nicht richtig übergeben wurde, da nur irgendwelche Sonderzeichen, (irgendwas aus dem RAM) drin stehen.

Meine Funktion sieht so aus:

Delphi-Quellcode:
function Set_Seriennummer(DataPointer:PChar):Cardinal;stdcall;
var
  Text:string;
  aPointer:PString;
  I:Integer;
begin
  SetLength(Text,17);
  StrCopy(pchar(Text),DataPointer);
  Result:=aObj.Set_Seriennummer(Text);
end;
Meine Frage ist nun wenn ich eine Zeiger auf einen String (PChar) übergeben lasse, wie muss die Deklaration in Visual Basic 6
dann aussehen??

Gruß
DelphiManiac
  Mit Zitat antworten Zitat