home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / VISUAL_B / CODIGO_2 / TOGLPRNT / TOGGLPRT.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1992-09-24  |  3.7 KB  |  116 lines

  1. togglprt
  2. Set Default Printer
  3. Form1
  4. DefaultPrinter
  5. Default Printer
  6.     ToggleBtn
  7.     ToggleBtn
  8. Command1_Click
  9.     FileError
  10.     lpAppName
  11.     lpKeyName
  12.     lpDefault.
  13. lpReturnStringY
  14. Spave!
  15. lpFileName
  16. Valid    
  17. GetPrivateProfileString
  18. NumCharsv
  19. Succ(
  20. WritePrivateProfileString?
  21. lpWriteString
  22. lpString
  23. SpecRecd
  24. Parse
  25. FldSpec
  26.     Remainder;
  27. DataType
  28. ListOrdr
  29. LstWidth(
  30. CustLabl
  31. LablX
  32. LablYd
  33. ValuX
  34. ValuY
  35. ValiCode
  36. ValiSpec
  37. EditMaskR
  38.     SpecsRecd6
  39. SourceP
  40. Target`
  41. Form_Clicka
  42. StopMsg
  43. SngQteh
  44. Quote
  45. Label
  46. msgbos
  47. GetProfileString
  48. WriteProfileString9
  49. AppName
  50. KeyNameU
  51. Defaultw
  52. ReturnString
  53. Answer
  54. Current
  55. Label1"
  56. Command1
  57. Caption
  58. Form_GotFocus
  59. ToggleTo
  60.     Form_Loadr
  61. Command2_Click2
  62. Enabled
  63. TrueD
  64. DfltPrtr
  65. Strip
  66. CommaString
  67. Label1_Click
  68. False
  69. Form_Resize
  70. Wsize
  71. WindowState
  72. MaxSiz
  73. WindowsState
  74.     NowNormal
  75. WasMinimized
  76. NowMinimized
  77. TogglPrt
  78. ToglBtn_Click
  79. ToglBtn
  80. DefaultPrinter
  81. ConfigBtn_Click
  82.     DefltPrt1
  83.     DefltPrt2
  84. HP2Default
  85. FAXdefault2
  86. FAXdefault1
  87. FAXdefault
  88. DefaultPrinter_Click
  89. ToggleBtn_Click
  90.     ToggleBtnX
  91. Copyright JSS, Inc. 1992 - Steve Schiavo, Center Point, TX
  92. Strip
  93. Form_Resize
  94.  Record for future how it "last" was
  95.  This means he "restored" it
  96.  Record so we don't invoke when we minimizeo
  97. windows"
  98. device
  99. Current printer is "
  100. Can't Open File"
  101. Form_Load
  102. Load constants HP2Default and FAXdefault w/precise description of two printers in .INI filel
  103. (Note: You must HAVE lines in your Win.Ini file for "HP2Key= . . ." and "FAXKey= . . .")
  104. windows"
  105. HP2Key
  106. windows"
  107. FAXKey
  108. Invoke the core process for the first time
  109.   Form_Resizee
  110. NowMinimized
  111. NowNormal
  112. ToggleBtn_Click
  113. windows"
  114. device
  115.  Minimize it
  116.