Probleme mit Übergabe in DLL

[R2009]

Hi Sir Rufo,
ich habe die Lösung:

Delphi-Quellcode:

function FT_GetComPortNumber(ftHandle:Dword; ComPortNumber:Pchar):FT_Result; stdcall; External FT_DLL_Name name 'FT_GetComPortNumber';

Function GetFTComPortNumber : FT_Result;
var i:Dword;
begin
  Result := FT_GetComportNumber(FT_handle,@i);             //,@SerialNumber   FT_handle
  If Result = FT_OK then FT_Comnumber := 'COM'+IntToStr(i);
end;

Funktioniert jetzt. Dein Tip war Gold wert. Danke!

Grüsse
rainer