PC World Komputer 1997 November

home *** CD-ROM | disk | FTP | other *** search

/ PC World Komputer 1997 November / Pcwk1197.iso / LOTUS / Eng-ins / WORDPRO / LWPDBASW.SMM < prev next >

Wrap

INI File | 1995-05-17 | 8.5 KB | 1,137 lines

[ver] 4 [sty] _default.sty [charset] 82 ANSI (Windows, IBM CP 1252) [PanoseFontTable] 9 5 TimesNewRomanPS 257 257 257 257 257 Arial MT 257 257 257 257 257 Arial 2818 1030 514 514 1026 Helv 2818 1029 514 770 1026 Helvetica 2818 1029 514 514 1026 LotusWP Type 257 257 257 257 257 257 257 257 257 257 Times New Roman 514 774 1029 517 1027 MS Sans Serif 2818 1030 514 514 1026 [recfile] 1 1 3 12 1440 1440 [revisions] 0 [prn] HP DeskJet 500 [port] LPT1: [lnopts] 2 Body Text 1 [desc] 800840546 5 746758596 129 0 0 0 0 0 0 [docopts] 5 2 [GramStyle] [lang] 2 [fopts] 0 1 0 0 Continued on next page... Continued from previous page... [tag] Footer 1 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 0 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 0 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 24 1 2 . , $ Footer 0 0 [tag] Header 1 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 0 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 0 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 24 1 2 . , $ Header 0 0 [tag] Title 1 [fnt] Helvetica 360 0 49153 [algn] 4 1 0 0 0 [spc] 33 0 1 144 72 1 100 [brk] 16 [line] 8 0 1 0 0 1 1 10 10 1 [spec] 0 1 0 1 1 0 0 0 0 [nfmt] 16 1 2 . , $ Title 0 0 [tag] Subhead 1 [fnt] Times New Roman 240 0 49155 [algn] 1 1 0 0 0 [spc] 33 0 1 72 72 1 100 [brk] 4 [line] 8 0 1 0 0 1 1 10 10 1 [spec] 0 2 0 1 1 0 0 0 0 [nfmt] 16 1 2 . , $ Subhead 0 0 [tag] Number List 1 [fnt] Times New Roman 240 0 49152 [algn] 1 1 360 360 360 [spc] 33 0 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 0 1 1 10 10 1 [spec] 0 0 <*:>. 0 1 1 0 0 0 0 [nfmt] 16 1 2 . , $ Number List 0 0 [tag] Bullet 1 1 [fnt] Times New Roman 240 0 49152 [algn] 1 1 288 288 288 [spc] 33 0 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 0 1 1 10 10 1 [spec] 0 0 <*5> 0 1 1 0 0 0 0 [nfmt] 24 1 2 . , $ Bullet 1 0 0 [tag] Bullet 1 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 288 288 [spc] 33 0 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 0 1 1 10 10 1 [spec] 0 0 <*0> 0 1 1 0 0 0 0 [nfmt] 16 1 2 . , $ Bullet 0 0 [tag] Body Single 1 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 0 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 0 1 1 10 10 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 24 1 2 . , $ Body Single 0 0 [tag] Body Text 1 [fnt] Times New Roman 240 0 49152 [algn] 1 1 0 0 0 [spc] 33 0 1 0 0 1 100 [brk] 4 [line] 8 0 1 0 0 1 1 144 144 1 [spec] 0 0 0 1 1 0 0 0 0 [nfmt] 280 1 2 . , $ Body Text 0 0 [lay] Standard 513 [rght] 15840 12240 1 720 1440 1 1440 720 0 1 0 1 0 1 1 720 11520 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640 [frght] [lyfrm] 1 13184 0 14400 12240 15840 0 1 3 1 0 0 0 0 0 0 0 16777215 0 [frmlay] 15840 12240 1 1440 792 1 14472 1440 0 1 0 0 0 0 1 1440 10800 2 2 4680 3 9360 [txt] > [hrght] [lyfrm] 1 11136 0 0 12240 1440 0 1 3 1 0 0 0 0 0 0 0 16777215 0 [frmlay] 1440 12240 1 1440 72 1 792 1440 0 1 0 0 0 0 1 1440 10800 1 3 9360 [txt] > [elay] [lay] 1 513 [rght] 15840 12240 1 720 1440 1 1440 720 0 1 0 1 0 1 1 720 11520 12 1 720 1 1440 1 2160 1 2880 1 3600 1 4320 1 5040 1 5760 1 6480 1 7200 1 7920 1 8640 [frght] [lyfrm] 1 13184 0 14400 12240 15840 0 1 3 1 0 0 0 0 0 0 0 16777215 0 [frmlay] 15840 12240 1 1440 792 1 14472 1440 0 1 0 0 0 0 1 1440 10800 2 2 4680 3 9360 [txt] > [hrght] [lyfrm] 1 11136 0 0 12240 1440 0 1 3 1 0 0 0 0 0 0 0 16777215 0 [frmlay] 1440 12240 1 1440 72 1 792 1440 0 1 0 0 0 0 1 1440 10800 1 3 9360 [txt] > [elay] [l1] 1 [edoc] FUNCTION MainDialog() IgnoreKeyboard(2) '/* Turn off keyboard interruptions */ returnvalue = 0 SetDlgCallback(8000, "WatchBox") SetDlgCallback(24, "WatchBox") SetDlgCallback(20, "WatchBox") FillEdit(24, TRUE) <:ZDDE_BookMark1> dlgretval = dialogBox("","lwpdbasw.dlg")<:Z~DDE_BookMark1> if (dlgretval = -1) '/* Major problem */ password = -1 else if (dlgretval = 1) '/* Success*/ entirefile = GetDialogField$(24) selectedfields = GetDialogField$(20) if (entirefile = TRUE) .UserInterface.MacroObj.NamedSetProperty("button","entire") returnvalue = 1 else if (selectedfields = TRUE) .UserInterface.MacroObj.NamedSetProperty("button","selected") fields = GetDialogField$(8000) .UserInterface.MacroObj.NamedSetProperty("fields",fields) returnvalue = 1 else '/* Paranoia */ returnvalue = 0 endif endif else '/*Canceled*/ returnvalue = 0 endif endif </Q>IgnoreKeyboard(0) ' Put keyboard back! return returnvalue END FUNCTION <:p<* >> FUNCTION WatchBox(hdlg, id, text) IgnoreKeyboard(2) '/* Turn off keyboard interruptions */ SWITCH id CASE (24) if (1 = text) DlgClearControl(hdlg, 8000) DlgEnableControl(hdlg, 1, TRUE) endif CASE (20) if (1 = text) DlgEnableControl(hdlg, 1, FALSE) endif CASE (8000) SetDlgItemText(hdlg, 20,TRUE) SetDlgItemText(hdlg, 24,FALSE) DlgEnableControl(hdlg, 1, TRUE) ENDSWITCH </Q>IgnoreKeyboard(0) ' Put keyboard back! END FUNCTION > [Embedded] 00007368 > [macsum4] 2 20 MainDialog 0 0 7 0 WatchBox 819 3 1 36 [macse] 14 MainDialog 29 0 MainDialog 17 1 0 32 2 17 2 29 1 returnvalue 5 0 8 1 17 3 0 41 8000 "WatchBox" 17 4 0 41 24 "WatchBox" 17 5 0 41 20 "WatchBox" 17 6 0 31 24 1 17 7 29 2 dlgretval 0 26 "" "lwpdbasw.dlg" 13 8 2 17 8 6 2 5 -1 18 0 11 00000313 17 9 29 3 password 5 -1 8 3 10 00000781 17 11 6 2 5 1 18 0 11 00000764 17 12 29 4 entirefile 0 27 24 13 8 4 17 13 29 5 selectedfields 0 27 20 13 8 5 17 14 6 4 5 1 18 0 11 00000545 17 15 32 2 101 57 96 "button" "entire" 17 16 5 1 8 1 10 00000751 17 18 6 5 5 1 18 0 11 00000734 17 19 32 2 101 57 96 "button" "selected" 17 20 29 6 fields 0 27 8000 13 8 6 17 21 32 2 101 57 96 "fields" "{6}" 17 22 5 1 8 1 10 00000751 17 24 5 0 8 1 10 00000781 17 28 5 0 8 1 17 32 6 1 15 9 6 0 15 17 33 9 14 WatchBox 29 0 hdlg 29 1 id 29 2 text 29 3 WatchBox 17 1 0 32 2 17 2 5 24 6 1 18 0 11 00000202 17 4 5 1 6 2 18 0 11 00000189 17 5 0 54 "{0}" 8000 17 6 0 53 "{0}" 1 1 10 00000406 5 20 6 1 18 0 11 00000303 17 9 5 1 6 2 18 0 11 00000290 17 10 0 53 "{0}" 1 0 10 00000406 5 8000 6 1 18 0 11 00000406 17 13 0 43 "{0}" 20 1 17 14 0 43 "{0}" 24 0 17 15 0 53 "{0}" 1 1 6 3 15 17 18 9 00007393