Hi zusammen,
ich steh da vor einem kleinen Problem, ich habe vor ein paar Tagen mit Delphi angefangen und möchte jetzt folgendes machen. Ich möchte wenn ein Client eine Telnet Verbindung zu meinem "Server" aufnimmt dass diesem einen Text gesendet wird und die Verbindung gleich dannach getrennt wird und am besten ein weiterer connect sagen wir mal für 300sec gesperrt (sich tot stellt) ist wäre luxus.
Ich habe bisher dies geschafft:
Delphi-Quellcode:
procedure TForm1.ServerSocket1ClientConnect(Sender: TObject;
Socket: TCustomWinSocket);
begin
ServerSocket1.Socket.SendText('Hallo Dies ist ein test.');
ServerSocket1.Socket.Close;
end;
ich gebe zu etwas lächerlich jedoch steht jeder mal am anfang und stellt für fortgeschrittene 'dumme' Fragen.
Ich wäre echt froh wenn jemand mir ein funktionierendes Beispiel zusenden/pasten könnte, klingt faul? Ist es aber nicht ich lerne am besten und schnellsten indem ich Code Samples studiere, syntax einpräge und rumprobiere.
ps: die suchen funktion brachte mir nicht viel leider.
--
Gruss blah