Auslesen/Programmieren

[scp]

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;