Guck nochmal bei dem C-Code, da sind die vier Zeilen anders herum:
Delphi-Quellcode:
Function ReadEE : FT_Result;
var
ManufacturerBuf : string[32];
ManufacturerIDBuf : string[16];
DescriptionBuf : string[64];
SerialNumberBuf : string[16];
begin
ftData.Manufacturer := @ManufacturerBuf[1]; // Die
ftData.ManufacturerID := @ManufacturerIDBuf[1]; // vier
ftData.Description := @DescriptionBuf[1]; // meine
ftData.SerialNumber := @SerialNumberBuf[1]; // ich
Result := FT_EE_Read(Multi_Handle,@FtData);
if Result <> FT_OK then FT_Error_Report('FT_EE_Read',Result);
end;