Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Form class titlebar = 0, showwindow = 2
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Classes - VCX
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows 2008 Server
Database:
Visual FoxPro
Application:
Desktop
Divers
Thread ID:
01389395
Message ID:
01389404
Vues:
113
This message has been marked as the solution to the initial question of the thread.
Jamie,

Add Desktop = .T.
DEFINE CLASS TestForm AS Form

ShowWindow = 2
Desktop = .T.
TitleBar = 0

...
>Is there a way to make a form class respect titlebar = 0 when showwindow = 2
>
>The code below illustrates that a form class shown as a top level window doesn't respect the titlebar setting whereby issuing a DO FORM with a form that has titlebar = 0 and showwindow = 2 does respect the titlebar setting - ie. the title bar isn't displayed.
>
>
>LOCAL loForm
>
>loForm = CREATEOBJECT("TestForm")
>
>loForm.Show
>
>READ EVENTS
>
>RETURN
>
>DEFINE CLASS TestForm AS Form
>
>TitleBar = 0
>ShowWindow = 2
>
>PROCEDURE Destroy
>  CLEAR EVENTS
>ENDPROC
>
>ADD OBJECT cmdClose AS CloseButton 
>
>ENDDEFINE
>
>DEFINE CLASS CloseButton AS CommandButton 
>
>Height = 22
>Width = 60
>Caption = "\<Close"
>
>PROCEDURE INIT
>  this.Top = thisform.Height - 24
>  this.Left = thisform.Width - 66
>ENDPROC
>
>PROCEDURE CLICK
>  thisform.Release()
>ENDPROC
>  
>ENDDEFINE
>
--sb--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform