OWL Diverse Themen

Timer benutzen

Dazu wird zunächst der Timer gestartet. Dies kann von jeder Memberfunktion von TWindow oder einer abgeleiteten Klasse (z. B. auch TDialog) durch Setzen des Timers erfolgen.

SetTimer(1, 1000);

Damit ein Timer-Ereignis behandelt wird, muß eine EvTimer-Funktion eingerichtet werden.

class tInitDialog : public TDialog {
public:
	tInitDialog(TWindow *parent, TResId resID);
	void SetupWindow();
protected:
	void EvTimer(uint);
	DECLARE_RESPONSE_TABLE(tInitDialog);
private:
	int Sekunden;
};

DEFINE_RESPONSE_TABLE1(tInitDialog, TDialog)
EV_WM_TIMER,
END_RESPONSE_TABLE;

void tInitDialog::EvTimer(uint TimerID)
{
	Sekunden--;
	if (Sekunden<=0) {
		KillTimer(TimerID);
	}
}

#ifdef __OS2__
#define uint UINT
#endif

GetApplication()->LoadString(ResID, buffer, len);