Forum: Programmieren allgemein
by DeddyH,
20. Okt 2011
Du bist doch schon nah dran. Nochmal etwas Code, diesmal kommentiert:
function bp4422_init(COMPort: integer; baudRate: integer; timeout_seconds: double; blockCheck: integer; groupAddress: integer; userAddress: integer; instrumentIDString: PChar; resetDevice: integer; var instrumentID: Integer): integer; stdcall; external DLLNAME;
var
instidstring: AnsiString;
instid: integer;
begin
...
Forum: Programmieren allgemein
by DeddyH,
20. Okt 2011
Dir fällt aber schon auf, dass wir beide unterschiedliche Dinge tun?
Forum: Programmieren allgemein
by DeddyH,
19. Okt 2011
Versuch es doch mal in der Art:
var
Blabb: AnsiString;
begin
SetLength(Blabb, 300); //oder eine andere zu erwartende maximale Länge
error := bp4422_read_measure_string(instid, PAnsiChar(Blabb));
SetLength(Blabb, StrLen(PAnsiChar(Blabb)));