Schwerwiegender Fehler

[marabu]

Hi,

du hast bei der Implementierung deiner Methoden den class qualifier vergessen:

Delphi-Quellcode:

procedure TForm1.send_data(s_name,s_data,s_status:string);
begin
  if b_connected then 
  begin
    {Form1.}sock_client.socket.sendtext(s_name+s_data);
  end else 
  begin
  end;
end;

procedure TForm1.send_data2(s_name,s_data,s_status:string);
begin
  if b_connected then 
  begin
    {Form1.}sock_server.socket.Connections[0].sendtext(s_name+s_data);
  end else 
  begin
  end;
end;

Grüße vom marabu