It is not that it could not be.
If your call is iteration based and you have conditions to get out you can use it too.
BOS TAURUS: Questions and Suggestions
Moderator: Rathinagiri
- Rathinagiri
- Posts: 5471
- Joined: Tue Jul 29, 2008 6:30 pm
- DBs Used: MariaDB, SQLite, SQLCipher and MySQL
- Location: Sivakasi, India
- Contact:
Re: BOS TAURUS: Questions and Suggestions
East or West HMG is the Best.
South or North HMG is worth.
...the possibilities are endless.
South or North HMG is worth.
...the possibilities are endless.
- esgici
- Posts: 4543
- Joined: Wed Jul 30, 2008 9:17 pm
- DBs Used: DBF
- Location: iskenderun / Turkiye
- Contact:
Re: BOS TAURUS: Questions and Suggestions
Code: Select all
#include "minigui.ch"
PROCEDURE Main()
DEFINE WINDOW frmOnPainTst;
AT 0,0;
WIDTH 700;
HEIGHT 600;
TITLE "Testing ON PAINT proc behaviour";
ON PAINT MsgBox( ThisWindow.Name ) ; // OK with 3.0.41 and hangup with 3.1.1 :(
MAIN
ON KEY ESCAPE ACTION ThisWindow.Release
END WINDOW // frmOnPainTst
CENTER WINDOW frmOnPainTst
ACTIVATE WINDOW frmOnPainTst
RETURN // frmOnPainTst.Main()
Viva INTERNATIONAL HMG
- srvet_claudio
- Posts: 2193
- Joined: Thu Feb 25, 2010 8:43 pm
- Location: Uruguay
- Contact:
Re: BOS TAURUS: Questions and Suggestions
Hi Friend,
this is possible with hmg.3.1.3
Best Regards,
Claudio.
this is possible with hmg.3.1.3
Best Regards,
Claudio.
Code: Select all
#include "minigui.ch"
PROCEDURE Main()
DEFINE WINDOW frmOnPainTst;
AT 0,0;
WIDTH 700;
HEIGHT 600;
TITLE "Testing ON PAINT proc behaviour";
ON PAINT OnPaint(); /* MsgBox( ThisWindow.Name ) ; OK with 3.0.41 and hangup with 3.1.1 :( */
MAIN
ON KEY ESCAPE ACTION ThisWindow.Release
END WINDOW // frmOnPainTst
CENTER WINDOW frmOnPainTst
ACTIVATE WINDOW frmOnPainTst
RETURN // frmOnPainTst.Main()
Procedure OnPaint
DISABLE WINDOW EVENT OF frmOnPainTst // avoid re-entry while processing the events (HMG.3.1.3)
MsgBox( ThisWindow.Name )
ENABLE WINDOW EVENT OF frmOnPainTst
return