Hallo,
ich bekomme immer eine Fehlermeldung "Asynchroner Socket-Fehler 10038." !
Ist am Quelltext was falsch?
Delphi-Quellcode:
procedure TForm1.Button3Click(Sender: TObject);
var
s : String;
begin
ClientSocket1.Port := 1234;
ClientSocket1.Address := '192.168.0.1';
ClientSocket1.Active := true;
try
ClientSocket1.Open;
s := String.Format('<event>'#10'<address>%s</address>'#10'<message>%s</message>'#10'</event>',['0000000','TEST']);
ClientSocket1.Socket.SendText(s);
finally
ClientSocket1.Active := false;
ClientSocket1.Socket.Close;
ClientSocket1.Close;
end;
end;