Information générale
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Wrong icon is shown
All of my forms are Top-Level Forms ( ShowWindow = 2 ).
Some of them ( the wizards ) I don't want to show in the taskbar.
Therefore I use ShowInTaskBar = .F.
There is a small problem with this:
The wrong icon is used in the screen I get when holding down ALT and pressing TAB.
Run the code below to see what I mean.
My question is:
How can I get the right icon in the "ALT+TAB window"?
Rolf
******* Start ********
PUBLIC oform1
oform1=NEWOBJECT("form1")
oform1.Show
RETURN
DEFINE CLASS form1 AS form
Top = 0
Left = 0
Height = 200
Width = 450
ShowWindow = 2
ShowInTaskBar = .F.
DoCreate = .T.
Caption = "Hold down ALT and press TAB. What icon do you see?"
ControlBox = .T.
MaxButton = .F.
MinButton = .F.
Name = "Form1"
ADD OBJECT command1 AS commandbutton WITH ;
Top = 132, ;
Left = 204, ;
Height = 27, ;
Width = 84, ;
Caption = "Close", ;
Name = "Command1"
PROCEDURE Load
this.icon = HOME()+"graphics\icons\flags\flgnorw.ico"
ENDPROC
PROCEDURE command1.Click
thisform.Release
ENDPROC
ENDDEFINE
********** End **********
Suivant
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement