parameter funkcie void type

[miro.pp]

Prechazam na delphi z c++ builder. prepisujem cast aplikacie z c++ do delphi.
pouzivam tam na seriovu komunikaciu komponentu CPportLib
funkcia write a read mi v C++ fungovala bez problemov. Na udaje ukazoval smernik na pole char.

pre delphi je funkcia definovana ako :

TcustomComPort.Write(void type, integer)
function Write(Const Buffer, Count integer

TcustomComPort.Reade(void type@, integer)
function Read(var Buffer; Count: Integer): Integer;

Funkcie write / read davaju nespravne udaje.
Viete ni poradit, ako zadat prvy parameter pre funkciu read / write v Delphi ?
PS: ak pouzivam WriteLn, ReadLn a udaje zadavam v stringu ide to v poriadku.
Dakujem za odpoved :-)

[Stanislav Hruška]

Nabudúce:
Nesluší sa dávať otázku na dve fóra naraz. Ak už to urobíš, tak to máš oznámiť a dať odkaz.
Poradiť neviem.

[vandrovnik]

Já tady vidím:
    function Write(const Buffer; Count: Integer): Integer;

Co tam předáváš jako ten první parametr? Pokud to je string (nebo array of char apod.), bude možná problém v tom, že v současných Delphi je jeden znak (char) v tom stringu tvořen dvěma bajty.

Mohlo by fungovat třeba:
var Buf: array[0..1023] of AnsiChar;
...
ComPort.Write(Buf[0], 1024);

[miro.pp]

dakujem za odpoved, vyskusam :-)

[Radek Červinka]

Já tady vidím:
    function Write(const Buffer; Count: Integer): Integer;

Co tam předáváš jako ten první parametr? Pokud to je string (nebo array of char apod.), bude možná problém v tom, že v současných Delphi je jeden znak (char) v tom stringu tvořen dvěma bajty.

Mohlo by fungovat třeba:
var Buf: array[0..1023] of AnsiChar;
...
ComPort.Write(Buf[0], 1024);

pokud je buf string pak
nebo ComPort.Write(AnsiString(buf)[1], Length(buf))
a to si zabal do nejake procedury