Hallo ich habe folgendes Problem.
Ich habe eine
DLL geschrieben, in der
DLL habe ich eine Funktion zum setzen einer Adresse.
Es gibt die Funktionen:
Delphi-Quellcode:
procedure Set_RS485ProtocolAdress(DataPointer:Byte); stdcall;
begin
aUSS01Obj.RS485:=DataPointer;
end;
procedure Get_RS485ProtocolAdress(DataPointer:PByte); stdcall;
begin
DataPointer^:= aUSS01Obj.RS485;
end;
In der
DLL lege ich ein Objekt an (aObj), welches einen private Variable FRS4885Adresse besitzt
Delphi-Quellcode:
property RS485:Byte
read FRS485Adresse write setRS485;
Nun soll über Visual Basic 6 diese Adresse geändert werden über Set_RS485ProtocolAdress.
Dies klappt auch in VB.NET und in meinem Delphi Prog, aber in VB 6 scheint es nicht zu funktionieren,
habt ihr da eine Ahnung (vielleicht irgendein Problem mit dem Speichermanagement...)?
Vielen Dank!