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
Titre:
Form class titlebar = 0, showwindow = 2
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:
01389395
Vues:
231
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
Cheers,
Jamie
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform