Information générale
Catégorie:
Gestionnaire d'écran & Écrans
Versions des environnements
I am trying to make a prg so I can use it to make a form when I need a new form with these basic settings, but I get an error when I put "Windowtype=1" line and also I can't see the command button click procedure. Your help will be very much appreciated.
Shafid
The code is as below :
Public oForm
oForm = Createobject("myForm")
oForm.Show()
oForm.saveAs("TestForm")
Define Class myForm As Form
DataSession = 2
Height = 400
Width = 600
minbutton=.f.
closable=.f.
minbutton=.f.
autocenter=.t.
windowtype=1 && can't set this option
Add Object cmdMyCmdBtn AS CommandButton With ;
Caption = '\ Cancel = .T.,;
Left = 125 ,;
Top = 210 , ;
Height = 25
PROCEDURE Click
thisform.release && this does not show in the click prop.
Enddefine
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