Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Form class titlebar = 0, showwindow = 2
Message
General information
Forum:
Visual FoxPro
Category:
Classes - VCX
Title:
Form class titlebar = 0, showwindow = 2
Environment versions
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Network:
Windows 2008 Server
Database:
Visual FoxPro
Application:
Desktop
Miscellaneous
Thread ID:
01389395
Message ID:
01389395
Views:
230
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
Next
Reply
Map
View

Click here to load this message in the networking platform