home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Visual Basic 4 Unleashed
/
Visual_Basic_4_Unleashed_SAMS_Publishing_1995.iso
/
european
/
docdlg.fr_
/
docdlg.fr
(
.txt
)
Wrap
Visual Basic Form
|
1995-10-05
|
5KB
|
107 lines
frmDocDlg
Document Format
Form15
Frame3
Page Margins:
Label6
&Bottom:
Label5
&Right:
Label4
&Top:
Label3
&Left:
Frame2
Measurement:
Option_Inch
&inch
Option_cm
cmdCancel
&Cancel
cmdOK
Frame1
Page Size:
Label2
&Height:
Label1
&Width:
glwMeasure
glbEnabled
glbCheck~
D_WIDTH
D_HEIGHT
D_LEFT
D_TOP
D_RIGHT
D_BOTTOM
gllVal&
glbValid
MIN_SIZE
TWIPS_IN_CM
cmdCancel_Clicko
cmdOK_Click4
frmMdiParent0
ActiveForm
TextControl1
PageMarginL
PageMarginR
PageWidth
PageMarginT
PageMarginB
PageHeight
TXRuler1
ScaleUnits
@ Form_Load
nCount
SCALE_INCHc
SCALE_MM
frmDocDlg
Option_cmv
Value
Option_Inch
cmdOK
EnabledN
Option_cm_Click
Option_Inch_Click
SetOK
bValid
Val_Change
Index
vContents
nTmpL
cm/inch flag
OK button enabled
check values
value index
current values
value valid flags
minimal widtha
cmdCancel_Click
Quit dialog box
cmdOK_Click
Set the values to current documentl
Quit dialog box
Form_Load
Get current settings from TextControl
Set values in cm
##0.0#
##0.0#
Option_cm_Click
Convert inch values to cm
value index
##0.0#
Option_Inch_Click
Convert cm values to inch
value indexh
##0.0#
SetOK
Update the OK button state
new statet
indext
Check value flags
Switch state if neccessary
Val_Change
item contents
temporary item value
update state of OK button