ServerSocket

[DarkItachiPL]

Hej!
Mam problem z odbieraniem pakietów przez serwer. Używam SocketServer. Gdy próbuję zgrać buffer do mojego typu danych podczas odczytywania pakietu komendą:

socket.ReceiveBuf(MojTypDanych,socket.ReceiveLength);

To wszystko działa, lecz jeśli chcę najpierw zgrać buffer do zmiennej integer, a następnie wgrać do tych danych to wyskakuje mi błąd o zgodności

[Error] Unit1.pas(112): Incompatible types: 'Integer' and 'PData_Login'

Z góry dziękuję za pomoc. O to struktura:

  PData_Login = ^TData_Login;
  TData_Login = packed record
    Header: THeader;
    Login: Int;
    Haslo: Int;
    wersja: Int;
    ZeroChar: Char;
    ClientIP: Int;
  end;

 

[thc_flow]

Nie rzutujesz (konwertujesz typu) danych podczas odbierania, skoro otrzymujesz wynik w PDataLogin, to nie jest on Integerem, rzutuj typy!

 

[DarkItachiPL]

Jak rzutuję tak:

Data_Login:=PData_Login(buffer);

To otrzymuję:

[Error] Unit1.pas(112): Incompatible types: 'TData_Login' and 'PData_Login'

A jeśli rzutuję tak:

Data_Login:=TData_Login(buffer);

To otrzymuję:

[Error] Unit1.pas(112): Invalid typecast

Z góry dziękuję za pomoc..