Results 1 to 4 of 4

Thread: [ICS] onDataAvailable don't works with TCP

  1. #1

    [ICS] onDataAvailable don't works with TCP

    Im trying ICS here, i liked a lot, its vry simple and works fine

    Im having only a proble,
    onDataAvailable event only works in UDP protocol

    on TCP the event simply don't trigger :?

    What im doing wrong ?

    code:

    [pascal]procedure TForm1.initsocketClick(Sender: TObject);
    begin
    socket.Proto := 'tcp';
    socket.Port:= '47110';
    socket.Addr := '127.0.0.1';
    socket.Listen;

    end;

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    client.Proto := 'tcp';
    client.Port := '47110';
    client.Addr := '127.0.0.1';
    client.Connect;
    end;

    procedure TForm1.Button2Click(Sender: TObject);
    begin
    client.SendStr(InputBox('','',''));
    end;

    procedure TForm1.socketDataAvailable(Sender: TObject; ErrCode: Word);
    begin
    ShowMessage(socket.ReceiveStr);
    end;[/pascal]

    if i chage tcp to udp it works fine :?
    From brazil (:

    Pascal pownz!

  2. #2

    [ICS] onDataAvailable don't works with TCP

    Someone please help me, i don't have found a solution :?
    From brazil (:

    Pascal pownz!

  3. #3

    [ICS] onDataAvailable don't works with TCP

    i got a something like that when i used standard tcp components on delphi 5.

    try to store the data in a variable before print it


    Code:
    procedure TForm1.socketDataAvailable(Sender: TObject; ErrCode: Word);
    var 
         temp_data: string;
    begin 
         
         temp_data:= socket.ReceiveStr;
         ShowMessage(temp_data);
    end;
    Will: "Before you learn how to cook a fish you must first learn how to catch a fish." coolest

  4. #4

    [ICS] onDataAvailable don't works with TCP

    Quote Originally Posted by Paizo
    i got a something like that when i used standard tcp components on delphi 5.

    try to store the data in a variable before print it


    Code:
    procedure TForm1.socketDataAvailable(Sender: TObject; ErrCode: Word);
    var 
         temp_data: string;
    begin 
         
         temp_data:= socket.ReceiveStr;
         ShowMessage(temp_data);
    end;
    But the event is now launched while on TCP, only on udp,

    i already checked linemode its False ;/
    From brazil (:

    Pascal pownz!

Bookmarks

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •