home *** CD-ROM | disk | FTP | other *** search
/ Piper's Pit BBS/FTP: ibm 0020 - 0029 / ibm0020-0029 / ibm0028.tar / ibm0028 / PV31-4.ZIP / DEMO.PVT < prev    next >
Encoding:
Text File  |  1991-02-01  |  3.0 KB  |  74 lines

  1.  
  2. Press DIALOG LOADONCALL MOVEABLE DISCARDABLE 13, 5, 290, 188
  3. STYLE WS_OVERLAPPEDWINDOW | WS_VISIBLE
  4. CAPTION "Customer - T. C. Brokers & Co."
  5. BEGIN
  6.  /* BondWndProc, , ,  */
  7.      CONTROL "96.00", 1, "Money", WS_CHILD | WS_BORDER | WS_VSCROLL, 8, 48, 76, 13  /*Bond,  */
  8.      CONTROL "", 2, "Table", WS_CHILD | WS_BORDER | WS_VSCROLL, 194, 52, 81, 74  /*BondTable,  */
  9.      CONTROL "Trade", 3, "Button", WS_CHILD | SBS_VERT | BS_DEFPUSHBUTTON, 68, 160, 76, 17  /*Trade,  */
  10.      CONTROL "", 4, "Static", WS_CHILD | SS_BLACKRECT, 80, 12, 161, 19  /*  ,  */
  11.      CONTROL "BOND TRADER", 5, "Static", WS_CHILD | SBS_VERT | SS_CENTER, 74, 6, 158, 18  /*  ,  */
  12.      CONTROL "10,000", 6, "Calcint", WS_CHILD | WS_BORDER, 8, 78, 76, 13  /*  ,  */
  13.      CONTROL "More Data >>", 7, "Button", WS_CHILD | SBS_VERT | BS_DEFPUSHBUTTON, 156, 138, 76, 17  /*  ,  */
  14.      CONTROL "Portfolio", 8, "Button", WS_CHILD | SBS_VERT | BS_DEFPUSHBUTTON, 68, 138, 76, 17  /*  ,  */
  15.      CONTROL "Cancel", 9, "Button", WS_CHILD | SBS_VERT | BS_DEFPUSHBUTTON | BS_CANCEL, 156, 160, 76, 17  /*  ,  */
  16.      CONTROL "", 10, "Real", WS_CHILD | WS_BORDER, 101, 48, 25, 12  /*  ,  */
  17.      CONTROL "", 11, "Real", WS_CHILD | WS_BORDER, 101, 78, 26, 13  /*  ,  */
  18.      CONTROL "", 12, "Static", WS_CHILD | SBS_VERT | SS_ICON, 274, 8, 21, 18  /*  ,  */
  19.      CONTROL "121990", 13, "Date", WS_CHILD | WS_BORDER, 8, 108, 44, 16  /*  ,  */
  20.      CONTROL "121990", 14, "Date", WS_CHILD | WS_BORDER, 101, 107, 44, 16  /*  ,  */
  21.      CONTROL "Bond   Price   ", 0, "text", WS_CHILD, 9, 36, 0, 0
  22.      CONTROL "NEW  YORK  BONDS", 0, "text", WS_CHILD, 195, 36, 0, 0
  23.      CONTROL "Quantity", 0, "text", WS_CHILD, 9, 66, 0, 0
  24.      CONTROL "Yield To Maturity", 0, "text", WS_CHILD, 101, 36, 0, 0
  25.      CONTROL "Yield To Call", 0, "text", WS_CHILD, 101, 66, 0, 0
  26.      CONTROL "Trade Date", 0, "text", WS_CHILD, 8, 95, 0, 0
  27.      CONTROL "Maturity Date", 0, "text", WS_CHILD, 101, 95, 0, 0
  28.      CONTROL "%", 0, "text", WS_CHILD, 131, 47, 0, 0
  29.      CONTROL "%", 0, "text", WS_CHILD, 132, 76, 0, 0
  30. END
  31.  
  32. /* Color Values and Validation strings */
  33. Press RCDATA LOADONCALL MOVEABLE DISCARDABLE
  34. BEGIN
  35. 4,
  36. 0, 0,0, 255,0, 0,0, -1,
  37. 1, "@VSCROLL(120,5) @HSCROLL(160,5) ",0,
  38. 3,
  39. 2, "@TBL(Press.TAB)", 0,
  40. 13, "@DATE()@MASK(**/**/**)", 0,
  41. 14, "@DATE()@MASK(**/**/**)", 0
  42. 7, /* Field Fonts */
  43. 1, 24, "Helv", 0,
  44. 5, 35, "Tms Rmn", 0,
  45. 6, 21, "Tms Rmn", 0,
  46. 10, 24, "Helv", 0,
  47. 11, 24, "Helv", 0,
  48. 13, 24, "Helv", 0,
  49. 14, 24, "Helv", 0,
  50. 9, /* Textfield Fonts */
  51. 1, 21, "Tms Rmn", 0,
  52. 2, 21, "Tms Rmn", 0,
  53. 3, 21, "Tms Rmn", 0,
  54. 4, 21, "Tms Rmn", 0,
  55. 5, 21, "Tms Rmn", 0,
  56. 6, 21, "Tms Rmn", 0,
  57. 7, 21, "Tms Rmn", 0,
  58. 8, 35, "Tms Rmn", 0,
  59. 9, 35, "Tms Rmn", 0,
  60. 9, /* Field Colors */
  61. 1, 0, 0,0, -1,0, 0,0, -1,
  62. 5, 0, 255,0, -256,255, -1,0, 0,
  63. 6, 0, 0,0, -1,255, -1,0, 0,
  64. 8, 0, 0,0, 255,255, -1,0, 0,
  65. 9, 0, 0,0, 255,255, -1,0, 0,
  66. 10, 0, 0,0, -1,0, 0,0, -1,
  67. 11, 0, 0,0, -1,0, 0,0, -1,
  68. 13, 0, 0,0, -1,0, 0,0, -1,
  69. 14, 0, 0,0, -1,0, 0,0, -1,
  70. 0, /* Text Field Colors */
  71. END
  72.  
  73.  
  74.