Programmieren - alles kontrollieren 4.935 Themen, 20.621 Beiträge

Verfolgung starten Optionen

Socket Programmierung in Delphi 4

[-ASF-]BloodCat (Anonym) / 4 Antworten / Flachansicht Nickles

Hi!

Hat einer Ahnung, wie man in Delphi 4 verhindert, dass Clients
zu einem offenen Server (TServerSocket) connecten können???
Ich schreib da ein prog zum Dateien kopieren im Netz, und wenn der Server auf 'transfer' klickt, dann dürfen keine Clients mehr connecten.

bei Antwort benachrichtigen
Hallo,wenn Du bei einer Anfrage den Client verhungern läßt, statt die ... (Anonym)
ää es sollen beliebig viele connecten können, wenn dann der Server auf ... [-ASF-]BloodCat (Anonym)
(Anonym) [-ASF-]BloodCat (Anonym) „Socket Programmierung in Delphi 4“
Optionen

Hallo,

das Ereignis wird (wahrscheinlich wie bei VB) Connection_Request heißen.
Da mußt Du einfach abfragen, ob gerade transferiert wird. Wenn ja, nimmst Du die Verbindung einfach nicht an.
Für so eine Abfrage eignet sich zum Beispiel ein Boolean. Klickst Du auf "Transfer", setzt Du diese Variable auf TRUE, ist der Transfer abgeschlossen oder startest Du den Server gerade, setzt Du die Variable auf FALSE.

bei Antwort benachrichtigen
Die Verbindung wird aber automatisch angenommen. Wie kann ich das verhindern? [-ASF-]BloodCat (Anonym)