BorlandTalk.com

Antonio · Guest

Hi,

* I wanted to show Status information from the SMTPServer in an
Statusbar using the OnStatus Event.
* No Status information is shown.
* Debugging tells me that it doesn't run through the OnStatus Event.

When I didn't know that the OnStatus wasn't executed I tried different possibilities. Here what I have written into the OnStatus Event:

1.

stStatus.Caption := ServerModule.Status;

explain: ServerModule.Status is an public String,
stStatus is an Statusbar with Caption.

2.
If AStatus = hsConnecting then Status := 'Verbinde...';
If AStatus = hsConnected then Status := 'Verbunden.';
If AStatus = hsDisconnecting then Status := 'Beende Verbindung...';
If AStatus = hsDisconnected then Status := 'Verbindung beendet.'

explain: I tried this after reading the TidStatus help.

How can I show Status Information, is the OnStatus Event the right way,
or what have I done wrong?

Thanks for help

greetings
Antonio