FrmVmsFormEditF.h 16 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524
  1. //---------------------------------------------------------------------------
  2. #ifndef FrmVmsFormEditFH
  3. #define FrmVmsFormEditFH
  4. //---------------------------------------------------------------------------
  5. #include <Classes.hpp>
  6. #include <Controls.hpp>
  7. #include <StdCtrls.hpp>
  8. #include <Forms.hpp>
  9. #include <DB.hpp>
  10. #include <DBClient.hpp>
  11. #include <FMTBcd.hpp>
  12. #include <Provider.hpp>
  13. #include <SqlExpr.hpp>
  14. #include <Menus.hpp>
  15. #include <ExtCtrls.hpp>
  16. #include <Graphics.hpp>
  17. #include <ComCtrls.hpp>
  18. #include <ADODB.hpp>
  19. #include <Dialogs.hpp>
  20. #include <ExtDlgs.hpp>
  21. #include <pngimage.hpp>
  22. #include <jpeg.hpp>
  23. //---------------------------------------------------------------------------
  24. //---------------------------------------------------------------------------
  25. #include "WindowMsgF.h"
  26. #include "cxButtons.hpp"
  27. #include "cxCalendar.hpp"
  28. #include "cxContainer.hpp"
  29. #include "cxControls.hpp"
  30. #include "cxDropDownEdit.hpp"
  31. #include "cxEdit.hpp"
  32. #include "cxGraphics.hpp"
  33. #include "cxGroupBox.hpp"
  34. #include "cxLabel.hpp"
  35. #include "cxLookAndFeelPainters.hpp"
  36. #include "cxLookAndFeels.hpp"
  37. #include "cxMaskEdit.hpp"
  38. #include "cxPC.hpp"
  39. #include "cxPCdxBarPopupMenu.hpp"
  40. #include "cxSpinEdit.hpp"
  41. #include "cxSplitter.hpp"
  42. #include "cxTextEdit.hpp"
  43. #include "cxTimeEdit.hpp"
  44. #include "dxSkinBlack.hpp"
  45. #include "dxSkinBlue.hpp"
  46. #include "dxSkinCaramel.hpp"
  47. #include "dxSkinCoffee.hpp"
  48. #include "dxSkinDarkRoom.hpp"
  49. #include "dxSkinDarkSide.hpp"
  50. #include "dxSkinFoggy.hpp"
  51. #include "dxSkinGlassOceans.hpp"
  52. #include "dxSkiniMaginary.hpp"
  53. #include "dxSkinLilian.hpp"
  54. #include "dxSkinLiquidSky.hpp"
  55. #include "dxSkinLondonLiquidSky.hpp"
  56. #include "dxSkinMcSkin.hpp"
  57. #include "dxSkinMoneyTwins.hpp"
  58. #include "dxSkinOffice2007Black.hpp"
  59. #include "dxSkinOffice2007Blue.hpp"
  60. #include "dxSkinOffice2007Green.hpp"
  61. #include "dxSkinOffice2007Pink.hpp"
  62. #include "dxSkinOffice2007Silver.hpp"
  63. #include "dxSkinOffice2010Black.hpp"
  64. #include "dxSkinOffice2010Blue.hpp"
  65. #include "dxSkinOffice2010Silver.hpp"
  66. #include "dxSkinsCore.hpp"
  67. #include "dxSkinscxPCPainter.hpp"
  68. #include "dxSkinSeven.hpp"
  69. #include "dxSkinSharp.hpp"
  70. #include "dxSkinSilver.hpp"
  71. #include "dxSkinStardust.hpp"
  72. #include "cxRadioGroup.hpp"
  73. #include "cxClasses.hpp"
  74. #include "cxCustomData.hpp"
  75. #include "cxData.hpp"
  76. #include "cxDataStorage.hpp"
  77. #include "cxDBData.hpp"
  78. #include "cxFilter.hpp"
  79. #include "cxGrid.hpp"
  80. #include "cxGridCustomTableView.hpp"
  81. #include "cxGridCustomView.hpp"
  82. #include "cxGridDBTableView.hpp"
  83. #include "cxGridLevel.hpp"
  84. #include "cxGridTableView.hpp"
  85. #include "cxStyles.hpp"
  86. #include "cxCheckBox.hpp"
  87. #include "FRAME_VmsListF.h"
  88. #include "cxImage.hpp"
  89. #include "cxButtonEdit.hpp"
  90. #include "cxBlobEdit.hpp"
  91. #include "dxGDIPlusClasses.hpp"
  92. //---------------------------------------------------------------------------
  93. #include "VMSM500MSRCF.h"
  94. #include "VmsDesignerF.h"
  95. #include "cxColorComboBox.hpp"
  96. #include "cxCalc.hpp"
  97. #include "VmsDispF.h"
  98. #include "dxSkinsForm.hpp"
  99. #include "IdBaseComponent.hpp"
  100. #include "IdCoder.hpp"
  101. #include "IdCoder00E.hpp"
  102. #include "IdCoder3to4.hpp"
  103. #include "IdCoderMIME.hpp"
  104. #include "IdCoderUUE.hpp"
  105. //---------------------------------------------------------------------------
  106. #define IMAGE_RESIZE
  107. typedef enum _e_selobj_type
  108. {
  109. eSelObjNone,
  110. eSelObjIfsc,
  111. eSelObjAtmp,
  112. eSelObjPark,
  113. } e_selobj_type;
  114. class TFrmVmsFormEdit : public TForm
  115. {
  116. __published: // IDE-managed Components
  117. TTimer *TmrShow;
  118. TShape *ShpTitle;
  119. TcxButton *BtnClose;
  120. TLabel *LblCaption;
  121. TShape *ShpList;
  122. TEdit *EdFocus;
  123. TPanel *PanelBack;
  124. TPanel *PnlLeft;
  125. TcxSplitter *cxSplitter1;
  126. TcxGroupBox *GrpList;
  127. TPanel *Panel1;
  128. TPanel *Panel3;
  129. TcxGroupBox *cxGroupBox1;
  130. TcxGrid *CxList;
  131. TcxGridTableView *TvList;
  132. TcxGridColumn *Col01;
  133. TcxGridColumn *Col02;
  134. TcxGridColumn *Col03;
  135. TcxGridColumn *Col04;
  136. TcxGridColumn *Col05;
  137. TcxGridColumn *Col06;
  138. TcxGridLevel *GlList;
  139. TPanel *PnlMenu;
  140. TPanel *Panel4;
  141. TImage *ImgDesc01;
  142. TcxLabel *cxLabel18;
  143. TcxComboBox *CbSizeType;
  144. TcxButton *BtnSearch;
  145. TOpenPictureDialog *OpenBmp;
  146. TSaveDialog *SaveDialog;
  147. VmsDesigner *VmsDesigner1;
  148. TcxGridColumn *Col07;
  149. TcxGridColumn *Col08;
  150. TcxGridColumn *Col09;
  151. TcxGridColumn *Col10;
  152. TcxGridColumn *Col12;
  153. TcxGridColumn *Col13;
  154. TImage *ImgDir;
  155. TImage *ImgNull;
  156. TcxLabel *lblText1;
  157. TcxLabel *lblText2;
  158. TcxLabel *lblText3;
  159. TcxLabel *lblText4;
  160. TcxLabel *lblText5;
  161. TcxLabel *lblText6;
  162. TcxLabel *lblText7;
  163. TcxLabel *lblText8;
  164. TcxLabel *lblText9;
  165. TcxLabel *lblText10;
  166. TcxLabel *lblText11;
  167. TcxLabel *lblText12;
  168. TcxLabel *lblText13;
  169. TcxLabel *lblFontName;
  170. TcxLabel *lblImage1;
  171. TcxLabel *lblFile1;
  172. TcxLabel *lblText14;
  173. TcxLabel *lblText15;
  174. TcxLabel *lblText16;
  175. TPanel *Panel6;
  176. TImage *ImgVideo;
  177. TImage *ImgStream;
  178. TcxPageControl *PgFormTab;
  179. TcxTabSheet *TsForm;
  180. TPanel *PnlCmd1;
  181. TImage *ImgTemp;
  182. TImage *ImgDesc02;
  183. TLabel *Label1;
  184. TLabel *Label3;
  185. TImage *ImgDesc03;
  186. TImage *ImgDesc06;
  187. TLabel *Label35;
  188. TImage *ImgDesc04;
  189. TLabel *Label2;
  190. TImage *ImgDesc07;
  191. TLabel *Label5;
  192. TLabel *Label7;
  193. TImage *ImgDesc08;
  194. TImage *ImgDesc09;
  195. TLabel *Label8;
  196. TImage *ImgDesc10;
  197. TLabel *Label9;
  198. TPanel *PnlBack;
  199. TPanel *PnlForm;
  200. TImage *ImgForm;
  201. TcxTextEdit *EdFormId;
  202. TcxTextEdit *EdFormName1;
  203. TcxTextEdit *EdFormDesc1;
  204. TcxTextEdit *EdSizeType;
  205. TcxComboBox *CbFormKind;
  206. TcxComboBox *CbFormDsplMthd;
  207. TcxComboBox *CbFormDsplDrct;
  208. TColorBox *CbFormColor1;
  209. TcxTabSheet *TsFormObject;
  210. TcxButton *BtnSaveImgFile;
  211. TPanel *PnlCmd2;
  212. TcxPageControl *PgObject;
  213. TcxTabSheet *TsObject;
  214. TPanel *PnlTopLeftBottom;
  215. TImage *ImgDesc16;
  216. TLabel *Label12;
  217. TcxComboBox *CbVmsObjType;
  218. TcxButton *BtnAddText;
  219. TcxGrid *CxObjList;
  220. TcxGridTableView *TvObjList;
  221. TcxGridColumn *ColSeq;
  222. TcxGridColumn *ColId;
  223. TcxGridColumn *ColKind;
  224. TcxGridColumn *ColType;
  225. TcxGridColumn *ColData;
  226. TcxGridColumn *ColX;
  227. TcxGridColumn *ColY;
  228. TcxGridColumn *ColIfscId;
  229. TcxGridColumn *TvObjListColumn9;
  230. TcxGridColumn *TvObjListColumn10;
  231. TcxGridColumn *TvObjListColumn11;
  232. TcxGridColumn *ColMem;
  233. TcxGridLevel *GlObjList;
  234. TPanel *Panel5;
  235. TcxButton *BtnUp;
  236. TcxButton *BtnDown;
  237. TcxButton *BtnObjDelete;
  238. TcxPageControl *PgEdit;
  239. TcxTabSheet *TsEdit;
  240. TPanel *PnlDesigner;
  241. TPanel *PnlMove;
  242. TcxButton *BtnMoveLeft;
  243. TcxButton *BtnMoveRight;
  244. TcxButton *BtnMoveUp;
  245. TcxButton *BtnMoveDown;
  246. TcxButton *BtnAlignLeft;
  247. TcxButton *BtnAlignRight;
  248. TcxButton *BtnAlignTop;
  249. TcxButton *BtnAlignBottom;
  250. TcxButton *BtnCenterWidth;
  251. TcxButton *BtnCenterHieght;
  252. TcxLabel *cxLabel1;
  253. TPanel *PnlPreview;
  254. TImage *ImgEdtTemp;
  255. TPanel *PnlEdtBack;
  256. TPanel *PnlEditForm;
  257. TPanel *PnlEdit;
  258. TLabel *Label22;
  259. TPanel *PnlObjTop;
  260. TImage *ImgDesc23;
  261. TLabel *Label4;
  262. TImage *ImgDesc22;
  263. TLabel *Label6;
  264. TImage *ImgDesc12;
  265. TLabel *Label11;
  266. TLabel *Lbl99;
  267. TImage *ImgDesc99;
  268. TcxComboBox *CbObjType;
  269. TcxCheckBox *ChkBlinking;
  270. TcxSpinEdit *SeLeft;
  271. TcxSpinEdit *SeTop;
  272. TColorBox *CbBkColor;
  273. TcxComboBox *Cb99;
  274. TEdit *EdObjSeq;
  275. TPanel *PnlObjText;
  276. TImage *ImgDesc05;
  277. TLabel *Label15;
  278. TImage *ImgDesc18;
  279. TLabel *Label16;
  280. TcxTextEdit *EdTextData;
  281. TcxSpinEdit *SeFontSize;
  282. TcxCheckBox *ChkFontBold;
  283. TcxComboBox *CbFontName;
  284. TcxComboBox *CbTextAlign;
  285. TColorBox *CbFontColor;
  286. TcxMaskEdit *EdObjId;
  287. TPanel *PnlIfsc;
  288. TImage *ImgDesc25;
  289. TLabel *LblTag;
  290. TcxButtonEdit *EdIfscId;
  291. TButton *BtnIfscErase;
  292. TcxTabSheet *TsDirect;
  293. TPanel *Panel7;
  294. TPanel *PnlReForm;
  295. TRichEdit *ReForm;
  296. TRichEdit *ReFormTemp;
  297. TPanel *Panel8;
  298. TcxButton *BtnLeftRe;
  299. TcxButton *BtnRightRe;
  300. TcxButton *BtnCenterRe;
  301. TcxButton *BtnBoldRe;
  302. TcxSpinEdit *SeFontSizeRe;
  303. TcxComboBox *CbFontNameRe;
  304. TColorBox *CbFontColorRe;
  305. TPanel *PnlReFormView;
  306. TPanel *PnlRePreview;
  307. TImage *ImgEdtPreview;
  308. TPanel *Panel9;
  309. TcxButton *BtnPreview;
  310. TcxCheckBox *ChkAutoPreview;
  311. TcxButton *BtnReApply;
  312. TPanel *Panel2;
  313. TLabel *Label10;
  314. TImage *ImgDesc20;
  315. TcxTextEdit *EdFormName;
  316. TLabel *Label13;
  317. TImage *ImgDesc21;
  318. TcxTextEdit *EdFormDesc;
  319. TLabel *Label14;
  320. TImage *ImgDesc24;
  321. TColorBox *CbFormColor;
  322. TLabel *Label17;
  323. TcxTextEdit *cxTextEdit2;
  324. TLabel *Label18;
  325. TPanel *PnlImage;
  326. TImage *ImgDesc90;
  327. TLabel *Label19;
  328. TcxSpinEdit *SeImgW;
  329. TcxSpinEdit *SeImgH;
  330. TcxButton *BtrnReFormClear;
  331. TcxCheckBox *ChkDrawModule;
  332. TcxButton *BtnRed;
  333. TcxButton *BtnYellow;
  334. TcxButton *BtnLime;
  335. TcxButton *BtnEdit;
  336. TcxButton *BtnInsert;
  337. TcxButton *BtnDelete;
  338. TcxButton *BtnSave;
  339. TcxButton *BtnCopyAdd;
  340. TdxSkinController *dxSkinController1;
  341. TIdDecoderMIME *IdDecoderMIME1;
  342. TIdEncoderMIME *IdEncoderMIME1;
  343. TIdEncoderUUE *IdEncoderUUE1;
  344. void __fastcall FormShow(TObject *Sender);
  345. void __fastcall TmrShowTimer(TObject *Sender);
  346. void __fastcall BtnCloseClick(TObject *Sender);
  347. void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
  348. void __fastcall FormCloseQuery(TObject *Sender, bool &CanClose);
  349. void __fastcall BtnEditClick(TObject *Sender);
  350. void __fastcall BtnInsertClick(TObject *Sender);
  351. void __fastcall BtnDeleteClick(TObject *Sender);
  352. void __fastcall BtnSaveImgFileClick(TObject *Sender);
  353. void __fastcall OpenBmpCanClose(TObject *Sender, bool &CanClose);
  354. void __fastcall TvListCellDblClick(TcxCustomGridTableView *Sender, TcxGridTableDataCellViewInfo *ACellViewInfo,
  355. TMouseButton AButton, TShiftState AShift,
  356. bool &AHandled);
  357. void __fastcall TvListFocusedRecordChanged(TcxCustomGridTableView *Sender, TcxCustomGridRecord *APrevFocusedRecord,
  358. TcxCustomGridRecord *AFocusedRecord, bool ANewItemRecordFocusingChanged);
  359. void __fastcall CbSizeTypePropertiesChange(TObject *Sender);
  360. void __fastcall BtnSearchClick(TObject *Sender);
  361. void __fastcall BtnSortReClick(TObject *Sender);
  362. void __fastcall BtnBoldReClick(TObject *Sender);
  363. void __fastcall SeFontSizeRePropertiesChange(TObject *Sender);
  364. void __fastcall CbFontColorReClick(TObject *Sender);
  365. void __fastcall ReFormChange(TObject *Sender);
  366. void __fastcall ChkAutoPreviewClick(TObject *Sender);
  367. void __fastcall BtnPreviewClick(TObject *Sender);
  368. void __fastcall BtnReApplyClick(TObject *Sender);
  369. void __fastcall FormCreate(TObject *Sender);
  370. void __fastcall CbFormKindPropertiesChange(TObject *Sender);
  371. void __fastcall CbFormColorClick(TObject *Sender);
  372. void __fastcall BtnMoveClick(TObject *Sender);
  373. void __fastcall BtnAlignClick(TObject *Sender);
  374. void __fastcall BtnCenterClick(TObject *Sender);
  375. void __fastcall SePosPropertiesChange(TObject *Sender);
  376. void __fastcall CbBkColorClick(TObject *Sender);
  377. void __fastcall ChkBlinkingClick(TObject *Sender);
  378. void __fastcall EdTextDataKeyPress(TObject *Sender, wchar_t &Key);
  379. void __fastcall EdTextDataPropertiesChange(TObject *Sender);
  380. void __fastcall SeFontSizePropertiesChange(TObject *Sender);
  381. void __fastcall CbFontNamePropertiesChange(TObject *Sender);
  382. void __fastcall CbFontColorClick(TObject *Sender);
  383. void __fastcall CbTextAlignPropertiesChange(TObject *Sender);
  384. void __fastcall EdObjIdPropertiesChange(TObject *Sender);
  385. void __fastcall CbFontNameReClick(TObject *Sender);
  386. void __fastcall ChkFontBoldClick(TObject *Sender);
  387. void __fastcall TvObjListFocusedRecordChanged(TcxCustomGridTableView *Sender,
  388. TcxCustomGridRecord *APrevFocusedRecord, TcxCustomGridRecord *AFocusedRecord,
  389. bool ANewItemRecordFocusingChanged);
  390. void __fastcall BtnAddTextClick(TObject *Sender);
  391. void __fastcall BtnObjDeleteClick(TObject *Sender);
  392. void __fastcall ColXGetDataText(TcxCustomGridTableItem *Sender, int ARecordIndex,
  393. UnicodeString &AText);
  394. void __fastcall ColYGetDataText(TcxCustomGridTableItem *Sender, int ARecordIndex,
  395. UnicodeString &AText);
  396. void __fastcall CbVmsObjTypeClick(TObject *Sender);
  397. void __fastcall EdIfscIdClick(TObject *Sender);
  398. void __fastcall BtnIfscEraseClick(TObject *Sender);
  399. void __fastcall BtnCopyAddClick(TObject *Sender);
  400. void __fastcall BtnUpClick(TObject *Sender);
  401. void __fastcall BtnDownClick(TObject *Sender);
  402. void __fastcall BtnSaveClick(TObject *Sender);
  403. void __fastcall Cb99PropertiesChange(TObject *Sender);
  404. void __fastcall SeImgWHPropertiesChange(TObject *Sender);
  405. void __fastcall PgEditClick(TObject *Sender);
  406. void __fastcall BtrnReFormClearClick(TObject *Sender);
  407. void __fastcall TvListDataControllerFilterChanged(TObject *Sender);
  408. void __fastcall BtnRedClick(TObject *Sender);
  409. private: // User declarations
  410. void __fastcall CommClose();
  411. TcxDataController *m_pGDC;
  412. String FTitle;
  413. bool FUpdate;
  414. bool FNewDb;
  415. bool EditMode;
  416. TList *FListSymb;
  417. DWORD FFileSize;
  418. int FSelIdx;
  419. String FVmsTypeCd;
  420. int FVmsWidth;
  421. int FVmsHeight;
  422. int FVmsCols;
  423. int FVmsRows;
  424. e_selobj_type FSelObjType;
  425. public:
  426. TVmsFormDesigner *m_pEdtDesigner;
  427. bool m_bEdit;
  428. String m_sFormTypeCd;
  429. //TVmsObjUseManager *MyUseManager;
  430. public: // User declarations
  431. __fastcall TFrmVmsFormEdit(TComponent* Owner);
  432. void __fastcall SetColorScheme(String ASkinName);
  433. void __fastcall FormInit();
  434. void __fastcall FormObjectInit();
  435. void __fastcall RefreshData();
  436. bool __fastcall GetNextVmsImgeId(int &ANmbr);
  437. bool __fastcall InsertVmsImage(String ANmbr, String AExpl, String AFileName, String ATypeCd);
  438. String __fastcall BitmapToBase64String(Graphics::TBitmap *ABitmap);
  439. Graphics::TBitmap * __fastcall Base64StringToBitmap(String AImageString);
  440. String __fastcall GetVmsSizeTypeDesc(String AType);
  441. String __fastcall GetVmsFormTypeDesc(String AType);
  442. //VMS크기유형
  443. void __fastcall FillVmsSizeType(TcxComboBox *cboBox);
  444. TVmsSizeType* __fastcall GetVmsSizeTypeObject(TcxComboBox *cboBox);
  445. //폼유형
  446. void __fastcall FillVmsFormType(TcxComboBox *ACombo);
  447. //표출방법
  448. void __fastcall FillVmsFormDispMthd(TcxComboBox *ACombo);
  449. //표출방향
  450. void __fastcall FillVmsFormDispDrct(TcxComboBox *ACombo);
  451. //VMS Font
  452. void __fastcall FillVmsFont(TcxComboBox *ACombo);
  453. void __fastcall ClearSymbloList();
  454. void __fastcall LoadVmsForm();
  455. void __fastcall DisplayInfo();
  456. bool __fastcall SaveVmsForm(String AVALID_YN);
  457. void __fastcall ChangeEditMode(int AEdit);
  458. void __fastcall ChangeEditModeObject(int AEdit);
  459. void __fastcall FormClear();
  460. void __fastcall FormObjectClear();
  461. void __fastcall DisplayFormInfo(int AIdx);
  462. void __fastcall LoadFormObjectInfo(String AFormId, TVmsFormDesigner *ADesigner, String AFormType);
  463. bool __fastcall GetNextVmsFormId(int &AFormId);
  464. void __fastcall SelObjectListData();
  465. void __fastcall AddObjectToList(TVmsFormObject *pObj, bool bSelect=false);
  466. String __fastcall FindObjectTypeName(String AFormType, String ATypeCd);
  467. bool __fastcall AddDefFormObject(String AFontName, int AFontSize, String AFontColor,
  468. int AObjType, String AText, int ASize, int APosX, int APosY, int AAlign=0);
  469. void __fastcall MakeDefTrafficForm(int ARows);
  470. bool __fastcall CheckVideoStreamImage();
  471. void __fastcall MakeDefVideoStreamForm(int AType);
  472. bool __fastcall CheckVmsFormUse(String AFormId);
  473. bool __fastcall DelVmsForm(String AFormId);
  474. void __fastcall UpdateObjectIfscId();
  475. void __fastcall CheckImageSelected();
  476. bool __fastcall CopyFormAdd(String AOrgFormId, String ANewFormId, String AFormName);
  477. bool __fastcall UpdateRegistry();
  478. bool __fastcall UpdatePoliciesRegistry(HKEY AHKey, String AValueKey);
  479. void __fastcall FnFormObjectSelected(TMessage &Msg);
  480. BEGIN_MESSAGE_MAP
  481. MESSAGE_HANDLER(WM_OBJECT_SELECT, TMessage, FnFormObjectSelected)
  482. END_MESSAGE_MAP(TForm)
  483. };
  484. //---------------------------------------------------------------------------
  485. extern PACKAGE TFrmVmsFormEdit *FrmVmsFormEdit;
  486. //---------------------------------------------------------------------------
  487. #endif