Eigene Ereignisse ...
Hi all
ich hätte gerne ne Porblem ... also wiefolgt ich versuche seit geraumer Zeit das POP3 Protokoll mit Hilfe der TClientSocket - Komponente. Das Problem ist das ich Verschiedene Anfragen vom Server beantworten muss und um auf die Anfragen zureagiren brauch ich das OnRead Ereigniss, nur weis ich jetzt nicht , da ich ja mehrere Anfragen beantworten muss, wie ich verschiedene OnRead - Ereignisse erzeugen machen kann ... ich hoffe ihr versteht was ich meine MfG BungeeBug |
Vielleicht kannst du dir ja mal eine Komponente ankcuken, bei der der Source dabei ist
|
na andere Möglichkeit gibbet nich?
|
Hi,
noch mal zu deiner Frage. willst du mehrfach nur auf das OnRead-Ereignis reagieren (Wo Problem?) oder im InRead-Ereignes sozusagen vorselectieren und die Nachrichten auf neue dedizierte eigene Ereignisse umleiten (um sie an gegebener Stelle speziell zu verarbeiten)? Gruß oki |
Ich habe vor mit dem TCientSocket auf einen POP3 Server zuverbinden. Das Probem is jetzt das ich auf verschiedene Fragen antworten schicken muss, per Schleife geht das nich weil die einfach "zuschnell" is. Also muss ich wohl immer waren bis das OnRead Ereigniss ausgelöst wird und dann darauf reagieren .. nur hab ich keine Ahnung wie ich abfragen soll ob es ausgelöst worden is ... ich hab mich evl. am Anfang falsch ausgedrückt ..
MfG BungeeBug |
Ja gut,
also wenn du die Client-Socked-Komponente auf dein Form gesetzt hast rufst du einfach über den OI Seite Ereignisse die OnRead-Methode auf und schreibst da Deine Ereignisbehandlung rein. Oder bin ich jetzt am falschen Ende deiner Frage? Gruß oki |
Ich glaub schon ... ich dacht mit das so Wenn ClientSocket1.Onread aktiviert wird dann gucke on ClientSocket1.Socket.RecieveString := blablabla is , dann machen das und das wenn nicht dann tu die und das ..
Könnte dann so aus sehen
Code:
das geht aber nicht ... leider ...
IF ClientSocket1.OnRead = TRUE THEN
BEGIN END ELSE BEGIN END; MfG BungeeBug |
Ne,
das Objekt hat eine Ereignisbehandlung in Form einer Methode implementiert! Die mußt du überschreiben!
Delphi-Quellcode:
wie du über Socked die Nachricht bekommst um sie weiter zu verarbeiten stiht glaube ich in der Hilfe (OI Methode OnRead anclicken und F1 drücken)
procedure TForm1.ClientSocket1Read(Sender: TObject;
Socket: TCustomWinSocket); begin // hier kommt meine Ereignisbehandlung end; Gruß oki |
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:05 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz