Entwickler-Ecke :: Thema anzeigen - onError-event in Unit zuweisen

N3tw124rd - Do 24.07.03 08:38
Titel: onError-event in Unit zuweisen

Hi,

ich hab ein kleines Problem und zwar erzeuge ich in einer Unit ein TClientSocket mit der Zeile

Delphi-Quelltext

1:	client := TClientSocket.Create(self);

und in den nächsten Zeilen weise ich proceduren zu die ich aus einem Formular kopiert habe und auf meine Klasse angepasst habe.

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

client.onError := clientError;

procedure TKlasse.clientError(Sender: TObject;
  Socket: TCustomWinSocket; ErrorEvent: TErrorEvent;
  var ErrorCode: Integer);
begin
  ErrorCode := 0;
end;

Problem ist das aber bei einem onError-Event nicht meine clientError Procedur aufgerufen wird.
:(

Kann mir jemand helfen ? Muß ich irgendwo anders noch darauf verweisen?

MFG N3tw124rd

Moderiert von Tino: Delphi-Tags hinzugefügt.

lemming - Do 31.07.03 14:04

Ich mach das immer so:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:
9:

procedure TMain.FormCreate(Sender: TObject);
begin
  Application.OnException := Main.OnError;
end;

procedure TMain.OnError(Sender: TObject; E: Exception);
begin
  ShowMessage('Error: ' + E.Message);
end;

Diese Prozedur fängt jede Exception ab.

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!