home *** CD-ROM | disk | FTP | other *** search
/ ToolBook 3.0 / ToolBook v3.0.iso / tb30 / printwnd.sbk (.txt) < prev    next >
Encoding:
Asymetrix ToolBook File  |  1994-05-19  |  63.3 KB  |  1,563 lines
  1. System
  2. Arial
  3. Arial
  4. Print Window
  5. Dialog
  6. Page 1
  7. Print Window
  8. prnXRes
  9. prnYRes
  10. scrnXRes
  11. scrnYRes
  12. BREAKS
  13. C&File
  14. &Open...    Ctrl+O
  15. &Save    Ctrl+S
  16. Save &As...
  17. saveas
  18. &Import...
  19. import
  20. &Export...
  21. export
  22. Print Set&up...
  23. printsetup
  24. &Print Pages...    Ctrl+P
  25. printpages
  26. Prin&t Report...
  27. printreport
  28. Send &Mail...
  29. sendmail
  30. &Run...
  31. E&xit    Alt+F4
  32. &Edit
  33. &Undo    Ctrl+Z
  34. Cu&t    Ctrl+X
  35. &Copy    Ctrl+C
  36. &Paste    Ctrl+V
  37. paste
  38. C&lear    Del
  39. clear
  40. Select &All    Shift+F9
  41. selectall
  42. Select Pa&ge    Shift+F12
  43. selectpage
  44. &Size to Page    F11
  45. sizetopage
  46. F&ind...    F5
  47. search
  48. Re&place...
  49. replace
  50. Aut&hor    F3
  51. author
  52. &Text
  53. &Character...    F6
  54. character
  55. &Paragraph...    F7
  56. paragraph
  57. &Regular    Ctrl+Space
  58. regular
  59. &Bold    Ctrl+B
  60. &Italic    Ctrl+I
  61. italic
  62. &Underline    Ctrl+U
  63. underline
  64. Stri&keout    Ctrl+K
  65. strikeout
  66. Superscrip&t/Subscript
  67. super/subscript
  68. &Normal Script
  69. normalscript
  70. Su&bscript    Ctrl+L
  71. subscript
  72. Su&perscript    Ctrl+Shift+L
  73. superscript
  74. &Show Hotwords    F9
  75. showhotwords
  76. &Page
  77. &Next    Alt+Right
  78. &Previous    Alt+Left
  79. previous
  80. &First    Alt+Up
  81. first
  82. &Last    Alt+Down
  83. &Back    Shift+F2
  84. &History...    Ctrl+F2
  85. history
  86. N&ew Page    Ctrl+N
  87. newpage
  88. &Help
  89. &Contents    F1
  90. contents
  91. Status &Bar    F12
  92. statusbar
  93. buttonclick
  94.     printmode 
  95.     lockScreen 
  96. e= TRUE
  97. printMode 
  98.             enabled 
  99. B"X" = FALSE
  100. B"Y" = 
  101. "X" = 
  102. "Y" = 
  103. "X" = LIGHTGRAY
  104. "Y" = 
  105. "X" = "0"
  106. "Y" = "0"
  107. B"X" = 
  108. B"Y" = 
  109. "X" = 
  110. "Y" = 
  111. "X" = WHITE
  112. "Y" = 
  113. "X" = "1.0"
  114. "Y" = "1.0"
  115. = 3            
  116. B"X" = 
  117. B"Y" = 
  118. "X" = 
  119. "Y" = 
  120. "X" = 
  121. "Y" = 
  122. "X" = prnXRes 
  123. "dialog"/scrnXRes 
  124. "Y" = prnYRes 
  125.  1993,1994. Asymetrix Corporation. All Rights Reserved.            *
  126. 9gives you permission 
  127. e, revise, 
  128. reuse the        *
  129. --*    individual 
  130. scripts 
  131. your own        *
  132. --*    applications.
  133. You may 
  134. P entire 
  135. --*    substantial part 
  136. redistribution 
  137. i product.        *
  138. retains 
  139.  copyright on 
  140.  original elements 
  141.  . Include 
  142.  notice:
  143. --* "Portions 
  144.  1993, 1994. 
  145. they contain 
  146. copied 
  147. --*    Original Author: Ned Baker
  148. --*    Updated By: Michael Florence
  149. linksysbook
  150. linkDlls
  151. initMenus
  152. printWindow 
  153.     LOCAL STACK winList, nameList, 
  154. , handleList
  155.     whatWin = 
  156. "dialog" 
  157.     status = 0
  158.     LOGPIXELSX = 88
  159.     LOGPIXELSY = 90
  160. device metrics
  161.     driverInfo = getWinIniVar("windows", "
  162. *NULL
  163. "There 
  164. no printer attached."
  165.     deviceName = 
  166.     deviceFile = 
  167.     devicePort = 
  168.     hDC = createIC(
  169.     prnXRes 
  170. getDeviceCaps(
  171.     prnYRes 
  172. deleteDC(
  173. f"DISPLAY",
  174.     scrnXRes 
  175.     scrnYRes 
  176.  = sysopenwindows
  177. windowhandle 
  178.  = getViewerName(
  179. media 
  180. running multimedia toolbook
  181. sysOpenMedia <> "
  182.         mediaList = 
  183. whatClip = 
  184. mmDeviceWindow 
  185.     dropdownitems 
  186. combobox "openWindows" 
  187. currentpage 
  188. listtotextline(
  189. parentwindow 
  190. %modal
  191. isOpen 
  192. prnWindow = 
  193. hWnd = windowHandle 
  194.             printArea = 
  195. area"
  196.             printMode = 
  197. mode"
  198.             X = 
  199.             Y = 
  200.             toTop = 
  201.             update = 
  202. B"statusBar"
  203.         close 
  204.         oldSys = sysSuspendMessages
  205.  = TRUE
  206. oldStatus = 
  207. statusbar
  208.         -- 
  209. pallettes
  210. NOT sysRuntime
  211. lineEndsPalette 
  212. toolbar 
  213. bringWindowToTop(
  214. hWnd1 = 
  215. InvalidateRect(
  216. ",0,0)
  217. updateWindow(
  218. yield()
  219. doPrintWindow(
  220. , X, Y)
  221.         Request "An error occurred during printing:"&CRLF&DIBError(
  222. -- * 
  223. -- * Description:
  224. -- * This function prints the specified 
  225. default
  226. -- * 
  227. -- * Parameters:
  228. -- * WORD 
  229. - Specifies 
  230. emust
  231. xbe iconic 
  232.  be topmost on 
  233. display.
  234. -- * 
  235. `fPrintArea - 
  236. Must be
  237. :        1 (corresponds 
  238. PW_ALL)
  239. PW_CLIENT)
  240. -- * 
  241. fPrintOpt
  242. z options.
  243. PW_BESTFIT)
  244. PW_STRETCHTOPAGE)
  245. PW_SCALE)
  246. -- * 
  247. wXScale, wYScale - X 
  248. Y scaling factors 
  249.  parameter.
  250. If 1 
  251.  are 
  252. these two parameters (
  253. ) should be 0 (zero).
  254. -- * STRING szJobName - 
  255. that 
  256. would like 
  257. job (
  258. pshows up 
  259.  Manager 
  260. %well 
  261. "Now Printing..." 
  262.  box). (Still working on implementing 
  263. version does 
  264. xhave 
  265. -- * Return Value: 0 
  266. successful, a 
  267. z> 0 corresponding 
  268. -- *            
  269. , wPrintArea, wPrintOpt, 
  270. ErrNo 
  271. Z < 1 
  272. c > 2
  273.  < 1 
  274. hDib 
  275. CopyWindowToDIB (
  276. != 0 
  277. wReturn 
  278. PrintDIB (
  279. DestroyDIB (
  280. -- * 
  281. -- * 
  282. -- * 
  283. - specifies 
  284. -- * 
  285. independent bitmap
  286. -- * 
  287. -- * 
  288. - identifies 
  289. -- * 
  290. -- * 
  291. copies 
  292. -- * 
  293. hRectWnd 
  294. GlobalAlloc (66, 8)
  295. lpRectWnd 
  296. GlobalLock (
  297. GetWindowRect (
  298. CopyScreenToDIB (
  299. = 2        -- 
  300. client 
  301. GetClientRect (
  302. .(0, 
  303. .(2, 
  304. .(4, 
  305. .(6, 
  306. clientRect 
  307. ScreenFromClient (
  308. , x1 & "," & y1 & "," & x2 & "," & y2)
  309. .(0, 
  310. .(2, 
  311. .(4, 
  312. .(6, 
  313. GlobalUnlock (
  314. GlobalFree (
  315. CopyWindowToDib
  316. -- * 
  317. -- * 
  318. -- * POINTER 
  319. -- * 
  320. -- * 
  321. -- * 
  322. -- * 
  323. -- * 
  324. hBitmap 
  325. CopyScreenToBitmap (
  326. #= 0 
  327. hPalette 
  328. GetSystemPalette ()
  329. BitmapToDIB (
  330. DeleteObject (
  331. -- * 
  332. -- * 
  333. -- * None
  334. -- * 
  335. -- * 
  336. 4palette
  337. -- * 
  338. -- * 
  339. returns a 
  340. . which represents 
  341. -- * 
  342. 4RGB values 
  343. logical 
  344. -- * 
  345. GetSystemPaletteEntries 
  346.     -- Find out how many 
  347.  entries we want.
  348. GetDC (0)
  349. nColors 
  350. PalEntriesOnDevice (hDC)
  351.     -- Allocate memory 
  352.     -- sizeof(LOGPALETTE) = 64
  353. PALETTEENTRY) = 32
  354. hLogPal 
  355. 64 + (
  356. * 32))
  357.     -- If we didn't 
  358. ?= 0 
  359. ReleaseDC (0, 
  360.     -- Get a 
  361. lpLogPal 
  362.     -- Fill 
  363. palVersion 
  364. palNumEntries fields 
  365.  structure.
  366. x300 (dec = 768) 
  367.  3.0 
  368. later.
  369. 2(0, 
  370. , 768)
  371. 2(2, 
  372. palPalEntry 
  373. tempPointer 
  374. lpPalPalEntry 
  375. (hDC, 0, 
  376.     -- Create 
  377. Once 
  378. done we 
  379. 't need 
  380.     -- so free 
  381. CreatePalette (
  382.     -- Do 
  383. clean up.
  384. -- * 
  385. -- * 
  386. -- * 
  387. context
  388. -- * 
  389. -- * INT
  390. -- * 
  391. -- * 
  392. gets 
  393.     -- SIZEPALETTE = 104
  394. GetDeviceCaps (
  395.     -- For non-
  396.  devices, we will 
  397.  no. 
  398.     -- colors 
  399.         -- NUMCOLORS = 24
  400. -- * 
  401. -- * 
  402. -- * 
  403. -- * 
  404. -- * 
  405. -- * 
  406. -- * 
  407. -- * 
  408. IsRectEmpty (
  409. ) <> 0
  410. hScrDC 
  411. CreateDC ("
  412.  0, 0, 0)
  413. hMemDC 
  414. CreateCompatibleDC (
  415. .(0, 
  416. .(2, 
  417. .(4, 
  418. .(6, 
  419. screen resolution.
  420. xScrn 
  421. , 8)        -- HORZRES
  422. yScrn 
  423. , 10)        -- VERTRES
  424.     -- Make sure 
  425. nX < 0
  426. nY < 0
  427. nWidth 
  428. nHeight 
  429.  compatible 
  430. CreateCompatibleBitmap (
  431.     -- Select 
  432. hOldBitmap 
  433. SelectObject (
  434.     -- Bitblt 
  435. ]SRCCOPY 
  436.  0x00CC0020L = 13369376
  437. BitBlt (
  438. , 0, 0, 
  439. , nX, nY, 13369376)
  440.     -- Do 
  441. DeleteDC (
  442. -- * 
  443. -- * Purpose:
  444. Frees 
  445. associated 
  446. fa DIB
  447. -- * Returns:
  448. Nothing
  449. -- * 
  450. -- * 
  451. -- * 
  452. routine 
  453. actual 
  454. -- * 
  455. PrintBand() 
  456. 7(see below), 
  457. procedure drives the
  458. -- * 
  459.  operation.
  460. () has 
  461. code 
  462. ;banding
  463. -- * 
  464.  printers.
  465. can be distinguished 
  466. -- * 
  467. () API (
  468. -- * 
  469.  repeatedly call 
  470. NEXTBAND escape 
  471. -- * 
  472. supports 
  473. BANDINFO 
  474. -- * 
  475. used 
  476. determine whether 
  477.  "wants" 
  478. -- * graphics (
  479. ignore 
  480. -- * 
  481. -- * 
  482. -- * 
  483. be printed
  484. -- * 
  485. - tells 
  486. , OR 
  487. -- * 
  488. (integers) 
  489. p output 
  490. -- * 
  491. -- * 
  492. errors.h 
  493. description)
  494. -- * One 
  495. : ERR_INVALIDHANDLE
  496. ERR_LOCK
  497. ERR_SETABORTPROC
  498. ERR_STARTDOC
  499. ERR_NEWFRAME
  500. ERR_ENDDOC
  501. ERR_GETDC
  502. ERR_STRETCHDIBITS
  503.  validation.
  504. lpDIBHdr 
  505. bits.
  506. lpBits 
  507. FindDIBBits (
  508. hPrnDC 
  509. GetPrinterDC ()
  510. <> 0 
  511.         -- COLORONCOLOR = 3
  512. SetStretchBltMode (
  513. X, 3)
  514.         -- Determine 
  515.         -- 
  516. . fill 
  517.         -- 
  518. CalculatePrintRect)
  519. hPrintRect 
  520. lpPrintRect 
  521. .(0, 
  522.  * 100)
  523. .(2, 
  524. * 100)
  525. biWidth 
  526. /(4, 
  527. biHeight 
  528. /(8, 
  529.         -- Call Escape() 
  530.  (10) 
  531. strlenszJobName 
  532. StringEscape (
  533. , 10, 
  534. 0, 0)
  535.             -- Something went wrong. Do 
  536.         -- 
  537. BANDINFOSTRUCT.
  538. hBandInfo 
  539. lpBandInfo 
  540.         -- 
  541. initial 
  542. AStructure 
  543.         -- 
  544. $ we 
  545.         -- also 
  546. }! we 
  547. .(0, 
  548. , 1) 
  549. -- bGraphics
  550. .(2, 
  551. -- bText
  552. .(4, 
  553. .(0, 
  554. ))        -- bRectLeft
  555. .(6, 
  556. .(2, 
  557. ))        -- bRectTop
  558. .(8, 
  559. .(4, 
  560. ))        -- bRectRight
  561. .(10, 
  562. .(6, 
  563. ))    -- bRectBottom
  564.         -- 
  565. a rect 
  566.         -- 
  567. funtion 
  568.         -- Check 
  569. If we 
  570. z, loop through
  571.         -- each 
  572. , calling 
  573.         -- (
  574. supported) 
  575. Else,
  576.         -- 
  577. )clipping
  578.         -- 
  579.         -- 
  580.         -- QUERYESCSUPPORT = 8
  581.         -- 
  582. ) = 2
  583. hNEXTBAND 
  584. lpNEXTBAND 
  585. .(0, 
  586. PointerEscape (
  587. , 8, 2, 
  588. ?, 0)
  589.             -- 
  590.             -- 
  591. v    = 24
  592. .(0, 
  593. , 24)
  594. bBandInfoDevice 
  595. , 8, 2, 
  596.             -- Do 
  597. (3), 
  598.             -- 
  599.  returned 
  600. $ where we 
  601.             -- 
  602. exits 
  603. empty.
  604. c(DwordPointerEscape (
  605. , 3, 0, 0, 
  606. ) > 0) 
  607. ) = 0)
  608. -- Do 
  609. needed.
  610. PointerPointerEscape (
  611. , 24, 12, 
  612. -- Pass 
  613. -info flags 
  614. -- data 
  615. Note 
  616. pass 
  617. ! bandinfo
  618. -- stuff 
  619. above (i.e. 
  620. .(0, 
  621. .(2, 
  622. wErrorCode 
  623.             -- 
  624. "whole 
  625. .(0, 
  626. .(0, 
  627. ))        -- 
  628. .(2, 
  629. .(2, 
  630. ))        -- 
  631. .(4, 
  632. .(4, 
  633. ))        -- 
  634. .(6, 
  635. .(6, 
  636. ))        -- 
  637. , 1, 1, 
  638.             -- Non-
  639.  (1).
  640. DwordEscape (
  641.     , 1, 0, 0, 0)
  642.         -- End 
  643. Only 
  644.  (11) 
  645.         -- we did 
  646. xabort 
  647. , 11, 0, 0, 0)
  648.             -- We errored 
  649. , but don't 
  650. E,- we still
  651.             -- 
  652. , box, 
  653.  instances, etc.
  654.         -- 
  655. -- * 
  656. -- * 
  657. "a DC 
  658. ¤tly selected 
  659. -- * 
  660. - on 
  661. -- * History:
  662. GetWinIniVar ("
  663. printDevice 
  664. printDriver 
  665. printPort 
  666. hdcPrint 
  667. CreatePrinterDC (
  668. 7, 0)
  669. += 0 
  670. -- * 
  671. -- * Given 
  672. 'DIB, 
  673. + on the
  674. -- * 
  675. 'image 
  676. `/coordinates).
  677. -- * 
  678. -- * 
  679. R1WORDs 
  680. specify 
  681. -- * Y directions, respectively.
  682. 3', cxDIB, cyDIB
  683. information 
  684. cxPage 
  685. 8)    -- 
  686. pixels (
  687. cyPage 
  688. 10)    -- 
  689. cxInch 
  690. 88)    -- 
  691. N/inch - X (
  692. cyInch 
  693. 90)    -- 
  694.     --    * Best Fit 
  695. preserves
  696.     --    * 
  697. )DIB's aspect 
  698. fills 
  699. horizontally.
  700.     --    *
  701.     --    * 
  702. \)formula 
  703.  calculates 
  704.     --    * 
  705. k$, based on 
  706. *ize 
  707.     --    * 
  708. #*width 
  709. 6*relative 
  710.     --    * a 
  711. G) = 1    -- 
  712. myTop 
  713. myLeft 
  714. myBottom 
  715. ) / (
  716. myRight 
  717. .(0, 
  718. .(2, 
  719. .(4, 
  720. .(6, 
  721. --    * Scaling 
  722. * -- 
  723.     --    * multipliers 
  724. multiply 
  725. height/
  726. b* = 3    -- 
  727. cxMult 
  728. .(0, 
  729. cyMult 
  730. .(2, 
  731. .(0, 
  732. .(2, 
  733. .(4, 
  734. h/ 100))
  735. .(6, 
  736. r/ 100)) 
  737.             -- 
  738. + = 2     -- 
  739. .(0, 
  740. .(2, 
  741. .(4, 
  742. .(6, 
  743. -- * 
  744. -- * 
  745. )ALL 
  746. called 
  747. -- * 
  748. 6(() 
  749. -- * 
  750. lpRectClip 
  751. =-rectangular
  752. -- * 
  753. 1 we 
  754. (i.e. we 
  755. -- * 
  756. fDoText 
  757. fDoGraphics 
  758. -- * appropriately (
  759. -- * 
  760. Normally 
  761. -- * 
  762. M lpRectOut, 
  763. , lpDIBBits
  764. rectOutLeft 
  765. .(0, 
  766. rectOutTop 
  767. .(2, 
  768. rectOutRight 
  769. .(4, 
  770. rectOutBottom 
  771. .(6, 
  772. /(4, 
  773. /(8, 
  774. dblXScaling 
  775. dblYScaling 
  776. },we 
  777. up a temporary 
  778. holds 
  779. v/paper 
  780. WILL be 
  781. intersect 
  782. /lpClipRect 
  783. 8 we NEED 
  784. Then, we 
  785. IntersectRect (
  786. )) = 0
  787. rectLeft 
  788. .(0, 
  789. rectTop 
  790. .(2, 
  791. rectRight 
  792. .(4, 
  793. rectBottom 
  794. .(6, 
  795. rectInLeft 
  796. + 0.5)
  797. rectInTop 
  798. + 0.5)
  799. rectInRight 
  800. + 0.5)
  801. rectInBottom 
  802. + 0.5)
  803. StretchDIBits (
  804. , 0, 13369376)
  805. -- DestDC
  806. -- DestX
  807.                      --        
  808. -- DestY
  809.                      --        
  810. -- DestWidth
  811.                      --        
  812. -- DestHeight
  813. -- SrcX
  814. - (rectInBottm - 
  815. )        -- ScrY
  816. -- SrcWidth
  817. -- SrcHeight
  818. -- lpBitInfo
  819. 0            -- DIB_RGB_COLORS
  820. -- wUsage
  821. 13369376)    -- 
  822. -- dwROP
  823. -- * 
  824. -- * 
  825. -- * 
  826. packed-
  827. (block
  828. -- * 
  829. -- * 
  830. -- * 
  831. -- * 
  832. 4address 
  833. -- * 
  834. ) + PaletteSize (
  835. -- * 
  836. -- * 
  837. -- * 
  838. -- * 
  839. -- * 
  840. -- * 
  841. -- * 
  842. required 
  843. store 
  844. -- * multiplying 
  845. RGBQUAD (
  846. -- * 
  847. f; 3.0-style 
  848. RGBTRIPLE (
  849. OS/2-
  850. -- * 
  851. DIBNumColors (
  852. ) * 4        -- 
  853. -- * 
  854. -- * 
  855. -- * 
  856. -- * 
  857. -- * 
  858. l' table
  859. -- * 
  860. -- * 
  861. -- * 
  862. Hfinding 
  863. !Win3.0 
  864. OS/2-
  865. -- * DIB). If 
  866. (=2, 
  867. (=16, 
  868. (=256,
  869. -- * 
  870. 24, no 
  871.     -- If 
  872. G8biClrUsed 
  873. BITMAPINFOHEADER 
  874.     -- otherwise 
  875.     -- on 
  876. dwClrUsed 
  877. ,(32, 
  878. wBitCount 
  879. 2(14, 
  880. -- * 
  881. -- * 
  882. -- * 
  883. convert
  884. -- * 
  885. -- * 
  886. -- * 
  887. -- * 
  888. -- * 
  889. /:creates a 
  890. 0= 0 
  891. hBitmapStruct 
  892. 9414)
  893. lpBitmapStruct 
  894.     -- 2nd 
  895.  = 14
  896. GetObject (
  897. x, 14, 
  898.     -- If no 
  899. 1 = 0 
  900. GetStockObject (15)
  901.     -- DEFAULT_PALETTE
  902. bmPlanes 
  903. )(8, 
  904. bmBitsPixel 
  905. )(9, 
  906. biBits 
  907. -<= 1
  908. @> 1 
  909. H<= 4
  910. [> 4 
  911. c<= 8
  912. v> 8 
  913. ~<= 24
  914. hBitmapInfo 
  915. ;640)
  916. lpBitmapInfo 
  917. <BITMAPINFOSTRUCTURE
  918. ,(0, 
  919. ;, 40)
  920. /(4, 
  921. .(2, 
  922. /(8, 
  923. .(4, 
  924. 2(12, 
  925. 2(14, 
  926. ,(16, 
  927. , 0)     -- 3rd 
  928. BI_RGB
  929. ,(20, 
  930. /(24, 
  931. /(28, 
  932. ,(32, 
  933. ,(36, 
  934. biSize 
  935. ,(0, 
  936. /(4, 
  937. /(8, 
  938. biPlanes 
  939. 2(12, 
  940. biBitCount 
  941. 2(14, 
  942. biCompression 
  943. ,(16, 
  944. biSizeImage 
  945. ,(20, 
  946. biXPelsPerMeter 
  947. /(24, 
  948. biYPelsPerMeter 
  949. /(28, 
  950. ,(32, 
  951. biClrImportant 
  952. ,(36, 
  953. dwLen 
  954. 40 + 
  955. realize 
  956. SelectPalette (
  957. 5, 0)
  958. RealizePalette (
  959.  = 0 
  960. !6, 1)
  961. lpbi 
  962.     -- Use 
  963. ,(0, 
  964. /(4, 
  965. /(8, 
  966. 2(12, 
  967. 2(14, 
  968. ,(16, 
  969. ,(20, 
  970. /(24, 
  971. /(28, 
  972. ,(32, 
  973. ,(36, 
  974. %GetDIBits 
  975. `?, so 
  976. 6= 0.
  977. FirstGetDIBits (
  978. 8, 0, 
  979. L&, 0, 
  980.     -- If 
  981. ,(20, 
  982. ) = 0
  983. ,(20, 
  984.     -- Realloc 
  985. Bbuffer big enough 
  986.     -- Setting 
  987. ,(0, 
  988. ,(20, 
  989. GlobalReAlloc (
  990. h = 0 
  991. fa NON-
  992. actually 
  993. SecondGetDIBits (
  994. :, 0, 
  995. /(8, 
  996.         -- Clean up 
  997. :, 1)
  998. d;, 1)
  999. A< 0) 
  1000. A>= 28))
  1001.         -- 
  1002. tequivalent 
  1003. MB_OK | MB_ICONSTOP 
  1004. MessageBox(0, "Undefined 
  1005. 'F!", "", 16)
  1006. %B= 0
  1007. 9B= 1
  1008. ErrString 
  1009. "Not a 
  1010. Afile!"
  1011. hB= 2
  1012. "Couldn't allocate 
  1013. F reading 
  1014. F locking 
  1015. G opening 
  1016. 4G creating 
  1017. "C= 7
  1018. ZG getting a DC!"
  1019. HC= 8
  1020. k;Dependent 
  1021. tC= 9
  1022. -() failed!"
  1023. C= 10
  1024. C= 11
  1025. "SetDIBitsToDevice() 
  1026. C= 12
  1027. -: StartDoc 
  1028. D= 13
  1029. E: GetModuleHandle() couldn't 
  1030.  GDI!"
  1031. FD= 14
  1032. #.: SetAbortProc 
  1033. pD= 15
  1034. M.: StartPage 
  1035. D= 16
  1036. D= 17
  1037. .: EndPage 
  1038. D= 18
  1039. .: EndDoc 
  1040. E= 19
  1041. 'E= 20
  1042. Found!"
  1043. JE= 21
  1044. hE= 22
  1045. "General 
  1046. I on 
  1047. E= 23
  1048. E= 24
  1049. E= 25
  1050. QDC!"
  1051. F= 26
  1052. BF= 27
  1053. B#Option!"
  1054. , "", 16) 
  1055.     linkDLL "kernel"
  1056. GJ, DWORD)
  1057.         INT     
  1058. <B        (
  1059. g    getModuleHandle    (
  1060. g    LoadLibrary        (
  1061. b        Yield            ()
  1062. user"
  1063. BringWindowToTop(
  1064. ?            (
  1065. `?        (
  1066. K, INT)
  1067. SetDlgItemText     (
  1068. (        SendMessage        (
  1069. O        UpdateWindow    (
  1070. 5;        (
  1071. M, INT, 
  1072. IntEscape = 
  1073. ,e = 
  1074.         INT        
  1075. tb30win.dll"
  1076. tb30dlg.
  1077. 6MlistToTextline (
  1078. PMtextlineToList (
  1079. V whatViewer
  1080. "&"E&
  1081. initmenus
  1082. = FALSE
  1083. menuItemEnabled(
  1084. ,) = 
  1085. Y..." alias 
  1086. print dialog
  1087. PjVbVbV
  1088. printMode
  1089. ZprnYRes
  1090. printmode
  1091. scrnXRes
  1092. YprnXRes
  1093. scrnYRes
  1094. dialog
  1095. printMode
  1096. buttonclick
  1097. 0T%41
  1098. >wjME^KTP
  1099. initMenus
  1100. wjlinkDlls
  1101. linksysbook
  1102. initMenus
  1103. enterBook
  1104. ,%H.%
  1105. ,%H.%
  1106. ,%H.%
  1107. w,    #>
  1108. ff    device
  1109. An error occurred during printing:
  1110. colorTray
  1111. lineEndsPalette
  1112. DISPLAY
  1113. deviceFile
  1114. printArea
  1115. scrnYRes
  1116. printMode
  1117. kInvalidateRect
  1118. YprnXRes
  1119. openwindows
  1120. deviceName
  1121. {{mmDeviceWindow
  1122. driverInfo
  1123. patternPalette
  1124. kScreateIC
  1125. statusBar
  1126. toolPalette
  1127. mediaList
  1128. NdeleteDC
  1129. yield
  1130. prnWindow
  1131. LOGPIXELSY
  1132. printArea
  1133. ^KgetViewerName
  1134. bringWindowToTop
  1135. update
  1136. whatClip
  1137. printMode
  1138. sysOpenMedia
  1139. LOGPIXELSX
  1140. print mode
  1141. .updateWindow
  1142. linePalette
  1143. windows
  1144. statusbar
  1145. toolbar
  1146. toTop
  1147. listtotextline
  1148. ZprnYRes
  1149. jdoPrintWindow
  1150. dialog
  1151. hWnd1
  1152. polygonPalette
  1153. openWindows
  1154. 4getDeviceCaps
  1155. devicePort
  1156. whatWin
  1157. scrnXRes
  1158. print area
  1159. gDIBError
  1160. *getWinIniVar
  1161. There is no printer attached.
  1162. status
  1163. printWindow
  1164. .&+    +E
  1165. .&+    +E
  1166. .&+    +E
  1167. wReturn
  1168. DestroyDIB
  1169. OjPrintDIB
  1170. ErrNo
  1171. CopyWindowToDIB
  1172. gDIBError
  1173. doPrintWindow
  1174. 1,""m
  1175. 1,""m
  1176. 1,""m
  1177. 1,""m
  1178. GlobalUnlock
  1179. GlobalAlloc
  1180. ScreenFromClient
  1181. EGetClientRect
  1182. GlobalFree
  1183. GlobalLock
  1184. lpRectWnd
  1185. y[GetWindowRect
  1186. CopyScreenToDIB
  1187. hRectWnd
  1188. clientRect
  1189. CopyWindowToDIB
  1190. GetSystemPalette
  1191. DeleteObject
  1192. hPalette
  1193. H:CopyScreenToBitmap
  1194. hBitmap
  1195. BitmapToDIB
  1196. CopyScreenToDIB
  1197. ,!J Y
  1198. ;&PalEntriesOnDevice
  1199. GlobalAlloc
  1200. lpPalPalEntry
  1201. }ReleaseDC
  1202. W2GetSystemPaletteEntries
  1203. GlobalFree
  1204. nColors
  1205. GlobalLock
  1206. GetDC
  1207. GlobalUnlock
  1208. lpLogPal
  1209. tempPointer
  1210. 4>CreatePalette
  1211. hLogPal
  1212. GetSystemPalette
  1213. 4GetDeviceCaps
  1214. nColors
  1215. ErrNo
  1216. gDIBError
  1217. PalEntriesOnDevice
  1218. SelectObject
  1219. DISPLAY
  1220. NDeleteDC
  1221. yScrn
  1222. hOldBitmap
  1223. nHeight
  1224. hScrDC
  1225. 4GetDeviceCaps
  1226. CreateCompatibleBitmap
  1227. xScrn
  1228. nWidth
  1229. hMemDC
  1230. BitBlt
  1231. hBitmap
  1232. jOCreateDC
  1233. 4    IsRectEmpty
  1234. CreateCompatibleDC
  1235. CopyScreenToBitmap
  1236. GlobalFree
  1237. DestroyDIB
  1238. ,!JdY
  1239. ,!JdY
  1240. _2DwordPointerEscape
  1241. bBandInfoDevice
  1242. lpBits
  1243. GlobalAlloc
  1244. biWidth
  1245. wErrorCode
  1246. bGraphics
  1247. SetStretchBltMode
  1248. lpDIBHdr
  1249. GlobalUnlock
  1250. lpPrintRect
  1251. GlobalLock
  1252. z GetPrinterDC
  1253. StringEscape
  1254. PointerPointerEscape
  1255. PrintBand
  1256. biHeight
  1257. 6+CalculatePrintRect
  1258. GlobalFree
  1259. hPrintRect
  1260. hNEXTBAND
  1261.     JPointerEscape
  1262. NDeleteDC
  1263. lpBandInfo
  1264. ErrNo
  1265. FindDIBBits
  1266. bText
  1267. lpNEXTBAND
  1268. hRect
  1269. strlenszJobName
  1270. DwordEscape
  1271. 4    IsRectEmpty
  1272. lpRect
  1273. hPrnDC
  1274. hBandInfo
  1275. gDIBError
  1276. PrintDIB
  1277. device
  1278. printPort
  1279. hdcPrint
  1280. ErrNo
  1281. windows
  1282. printDevice
  1283. printDriver
  1284. CreatePrinterDC
  1285. *GetWinIniVar
  1286. gDIBError
  1287. GetPrinterDC
  1288. cyPage
  1289. cyInch
  1290. 4GetDeviceCaps
  1291. cxPage
  1292. cxInch
  1293. CalculatePrintRect
  1294. wReturn
  1295. GlobalUnlock
  1296. GlobalAlloc
  1297. RStretchDIBits
  1298. GlobalLock
  1299. rectInLeft
  1300. rectLeft
  1301. GlobalFree
  1302. ErrNo
  1303. TUIntersectRect
  1304. lpRect
  1305. hRect
  1306. 4    IsRectEmpty
  1307. rectTop
  1308. gDIBError
  1309. PrintBand
  1310. lpBits
  1311. PaletteSize
  1312. FindDIBBits
  1313. T%DIBNumColors
  1314. PaletteSize
  1315. dwClrUsed
  1316. wBitCount
  1317. DIBNumColors
  1318. GlobalUnlock
  1319. lpBits
  1320. GlobalAlloc
  1321. lpBitmapStruct
  1322. GSelectPalette
  1323. }ReleaseDC
  1324. biHeight
  1325. lpBitmapInfo
  1326. hBitmapStruct
  1327. FirstGetDIBits
  1328. GlobalLock
  1329. GetDC
  1330. SecondGetDIBits
  1331. GetObject
  1332. PaletteSize
  1333. /GlobalReAlloc
  1334. hBitmapInfo
  1335. ruGetStockObject
  1336. GlobalFree
  1337. dwLen
  1338.  vRealizePalette
  1339. BitmapToDIB
  1340. Error getting a DC!
  1341. Error creating printer DC!
  1342. Printer: StartPage failed!
  1343. MessageBox
  1344. Error creating DIB from specified window.
  1345. Printer: SetAbortProc failed!
  1346. Error opening file!
  1347. Undefined Error!
  1348. Printer: StartDoc failed!
  1349. Printing: GetModuleHandle() couldn't find GDI!
  1350. StretchBlt() failed!
  1351. Error: Invalid Print Option!
  1352. StretchDIBits() failed!
  1353. Printer: NEWFRAME failed!
  1354. Error reading file!
  1355. File Not Found!
  1356. Not a Windows DIB file!
  1357. ErrString
  1358. Invalid Handle
  1359. Error locking memory!
  1360. SetDIBits() failed!
  1361. Error creating palette!
  1362. SetDIBitsToDevice() failed!
  1363. General Error on call to DIB function
  1364. Couldn't allocate memory!
  1365. Printer: EndPage failed!
  1366. Error: Invalid Print Area!
  1367. Error getting number of colors, check the device you are using.
  1368. Error creating Device Dependent Bitmap
  1369. Printer: EndDoc failed!
  1370. DIBError
  1371. tb30win.dll
  1372. BitBlt
  1373. CreateCompatibleBitmap
  1374. CreateCompatibleDC
  1375. CreateDC
  1376. CreateDC
  1377. CreatePrinterDC
  1378. CreatePalette
  1379. DeleteDC
  1380. DeleteObject
  1381. Escape
  1382. PointerEscape
  1383. ,&T fin-"
  1384. Escape
  1385. DwordEscape
  1386. Escape
  1387. IntEscape
  1388. Escape
  1389. StringEscape
  1390. Escape
  1391. DwordPointerEscape
  1392. Escape
  1393. PointerPointerEscape
  1394. GetDeviceCaps
  1395. GetDIBits
  1396. FirstGetDIBits
  1397. GetDIBits
  1398. SecondGetDIBits
  1399. ,#Tter:-"
  1400. GetObject
  1401. GetStockObject
  1402. GetSystemPaletteEntries
  1403. ,BT~4
  1404. SelectObject
  1405. SetStretchBltMode
  1406. StretchDIBits
  1407. createIC
  1408. getDeviceCaps
  1409. tb30dlg.dll
  1410. ScreenFromClient
  1411. ,    Uaileg    
  1412. GetWinIniVar
  1413. listToTextline
  1414. textlineToList
  1415. kernel
  1416. GlobalAlloc
  1417. GlobalLock
  1418. GlobalUnlock
  1419. GlobalFree
  1420. GlobalReAlloc
  1421. getModuleHandle
  1422. LoadLibrary
  1423. ,    Tiled-#
  1424. Yield
  1425. BringWindowToTop
  1426. GetClientRect
  1427. GetDC
  1428. GetWindowRect
  1429. IntersectRect
  1430. IsRectEmpty
  1431. MessageBox
  1432. ,#Taile-"
  1433. RealizePalette
  1434. ReleaseDC
  1435. SelectPalette
  1436. SetDlgItemText
  1437. SendMessage
  1438. UpdateWindow
  1439. InvalidateRect
  1440. linkDlls
  1441. viewer
  1442. getViewerName
  1443. printWindow
  1444. Print Window...
  1445. initmenus
  1446. D= 16
  1447. print dialog
  1448. 15,15
  1449. lastUnits
  1450. inside
  1451. outside
  1452. frameupdate
  1453. notifybefore frameupdate
  1454.     x = 
  1455. syspageunitsperpixel
  1456.     y = 
  1457. "inside" 
  1458. "outside" 
  1459. H(2*x)
  1460. H(2*y)
  1461. outside
  1462. inside
  1463. Print &Mode
  1464. print mode
  1465. printmode
  1466. Actual Size
  1467. Fit to Page
  1468. Stretch to Page
  1469. Custom Scale
  1470. frame
  1471. openWindows
  1472. frameUpdate
  1473. notifyBefore frameUpdate
  1474.     b = 
  1475. combobox "openWindows"
  1476.     x = 
  1477. syspageunitsperpixel
  1478.     y = 
  1479. b)-x,(
  1480. b)-y, (
  1481. b)+x, (
  1482. acceptDrop
  1483. draggable
  1484. This field shows the keyword to search for.
  1485. helpInfo
  1486. Available Viewers
  1487. inside
  1488. outside
  1489. frameupdate
  1490. notifybefore frameupdate
  1491.     x = 
  1492. syspageunitsperpixel
  1493.     y = 
  1494. "inside" 
  1495. "outside" 
  1496. H(2*x)
  1497. H(2*y)
  1498. outside
  1499. inside
  1500. openWindows
  1501. Viewer id 0 of Book "D:\JXWORK\TODO.TBK"9
  1502. viewer "balloon"
  1503. viewer "Buttons"
  1504. Viewer id 0r id 0 of Book "D:\JXWORK\TODO.TBK"WND.SBK"BK.TBK"
  1505. Viewer id 0 of Book "D:\JXWORK\SCRAPBK\SCRAPBK.TBK"
  1506. &X Scale
  1507. 3.125
  1508. 3.125
  1509. &Y Scale
  1510. inside
  1511. outside
  1512. frameupdate
  1513. notifybefore frameupdate
  1514.     x = 
  1515. syspageunitsperpixel
  1516.     y = 
  1517. "inside" 
  1518. "outside" 
  1519. H(2*x)
  1520. H(2*y)
  1521. outside
  1522. inside
  1523. print area
  1524. printarea
  1525. buttonclick
  1526. buttonclick
  1527.     printarea 
  1528. printarea
  1529. Entire Window
  1530. Client Area
  1531. Print &Area
  1532. toTop
  1533. Bring Window to Top
  1534. update
  1535. Update All Windows
  1536. statusBar
  1537. Include Status Bar
  1538. buttonclick
  1539. buttonclick
  1540. &Print
  1541. buttonclick
  1542. buttonclick
  1543.     close 
  1544. &Cancel
  1545. frameUpdate
  1546. lastUnits
  1547. frameUpdate
  1548. lastUnits
  1549. enterpage
  1550. frameUpdate
  1551. sysPageUnitsPerPixel <> lastUnits 
  1552. '= TRUE
  1553. frameUpdate 
  1554. '= FALSE
  1555. 15,15
  1556. lastUnits
  1557. )x9$O%
  1558. u'oW@
  1559. 7l8)+
  1560. lXu.          
  1561. ..         
  1562. FILTERS    
  1563.