Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
How to prevent fox display table info in status bar
Message
 
 
À
08/02/2002 11:31:38
Max Chen
Yx Software
Shunde, Chine
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00617447
Message ID:
00617994
Vues:
21
This message has been marked as a message which has helped to the initial question of the thread.
Hi!

It is hard to do, but possible. Also the approach described below orks differently than usual StatusBarText property - it displays StatusBarText for control that is under mouse, organizing this way something like a very quick tool tip for controls displayed in the status bar.

Create a timer class in your application, put it on the _Screen at start of the application, and in its Timer event set the status bar text to empty string or to the StatusBarText for current control under mouse. SYS(1270) will get you the control, so you will do somethign like following in the Timer event
loObject = SYS(1270)
if type("m.loObject.StatusBarText") == "C"
    set message to m.loObject.StatusBarText
else
    set message to " "
endif
Set the Timer's Interval property to 100 milliseconds. Even when table's information will appear in the status bar, timer will remove it quickly. The only case it will nto be removed quickly is when you run very long programs that work with data. In such case you will have to use DOEVENTS command to force Timer events firing, or just manually update the status bar text.

You can add StatusBarText property to any class for control you have, and have it displayed by the mouse. You can also use ToolTipText instead of the StatusBarText to display it as a tool tip in the status bar.

HTH.

>Is there an easy way to do that ?
>
>I want to keep the status bar but don't want
>it show table info such as : record: 1/10... eof ...
>
>TIA
>
>max.
Vlad Grynchyshyn, Project Manager, MCP
vgryn@yahoo.com
ICQ #10709245
The professional level of programmer could be determined by level of stupidity of his/her bugs

It is not appropriate to say that question is "foolish". There could be only foolish answers. Everybody passed period of time when knows nothing about something.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform