From 4c7589c92782b91bff65a5afde924310979ffc9e Mon Sep 17 00:00:00 2001 From: Lutz Date: Sat, 26 Aug 2023 21:49:42 +0200 Subject: [PATCH] removed binary sources (FoxBin2Prg) --- .gitignore | 4 +- CLEAR ALL.exe | Bin 764358 -> 0 bytes Fb2P_Diff/fb2p_diff.dataenvironment.sc2 | 19 + Fb2P_Diff/fb2p_diff.frmdiff.sc2 | 1471 ++ Fb2P_Diff/fb2p_diff.pj2 | 13 +- Fb2P_Diff/fb2p_diff.sc2 | 1479 +- FileName_Caps/Filename_caps.pj2 | 9 +- README.md | 5 +- TESTS/DATOS_READONLY/FB2P_DBC.DC2 | 1234 +- TESTS/DATOS_READONLY/FB2P_DBF.DB2 | 172 +- .../Menu_Comments_Procedure.mn2 | 4 +- TESTS/DATOS_READONLY/Menu_LineBreak.mn2 | 6 +- ...classlib_method_order_bug_test.grdbase.vc2 | 139 + ...sslib_method_order_bug_test.grdgeneral.vc2 | 74 + .../classlib_method_order_bug_test.vc2 | 202 +- .../f_checkbox.dataenvironment.sc2 | 19 + TESTS/DATOS_READONLY/f_checkbox.f_base1.sc2 | 822 + TESTS/DATOS_READONLY/f_checkbox.sc2 | 830 +- .../f_combobox.dataenvironment.sc2 | 19 + TESTS/DATOS_READONLY/f_combobox.f_base1.sc2 | 1236 ++ TESTS/DATOS_READONLY/f_combobox.sc2 | 1244 +- .../f_commandgroup.dataenvironment.sc2 | 19 + .../DATOS_READONLY/f_commandgroup.f_base1.sc2 | 1398 ++ TESTS/DATOS_READONLY/f_commandgroup.sc2 | 1406 +- .../f_containers.dataenvironment.sc2 | 19 + TESTS/DATOS_READONLY/f_containers.f_base1.sc2 | 327 + TESTS/DATOS_READONLY/f_containers.sc2 | 335 +- .../f_form_aa.dataenvironment.sc2 | 17 + TESTS/DATOS_READONLY/f_form_aa.f_form_aa.sc2 | 2834 +++ TESTS/DATOS_READONLY/f_form_aa.sc2 | 2840 +-- .../f_form_aa2.dataenvironment.sc2 | 17 + .../DATOS_READONLY/f_form_aa2.f_form_aa1.sc2 | 1322 ++ TESTS/DATOS_READONLY/f_form_aa2.sc2 | 1328 +- .../f_form_controles.dataenvironment.sc2 | 17 + .../f_form_controles.f_base1.sc2 | 3128 +++ TESTS/DATOS_READONLY/f_form_controles.sc2 | 3134 +-- .../f_formset.dataenvironment.sc2 | 48 + TESTS/DATOS_READONLY/f_formset.formset.sc2 | 931 + TESTS/DATOS_READONLY/f_formset.sc2 | 968 +- .../f_listbox.dataenvironment.sc2 | 19 + .../f_listbox.f_listbox_test.sc2 | 567 + TESTS/DATOS_READONLY/f_listbox.sc2 | 575 +- .../f_nullchars_incode.dataenvironment.sc2 | 19 + .../f_nullchars_incode.form1.sc2 | 28 + TESTS/DATOS_READONLY/f_nullchars_incode.sc2 | 36 +- .../f_optiongroup.dataenvironment.sc2 | 19 + .../f_optiongroup.f_optiongroup_test.sc2 | 1427 ++ TESTS/DATOS_READONLY/f_optiongroup.sc2 | 1435 +- .../f_optiongroup2.dataenvironment.sc2 | 19 + .../f_optiongroup2.f_optiongroup1.sc2 | 204 + TESTS/DATOS_READONLY/f_optiongroup2.sc2 | 212 +- .../DATOS_READONLY/f_test.dataenvironment.sc2 | 17 + .../f_test.f_form_controles1.sc2 | 452 + TESTS/DATOS_READONLY/f_test.sc2 | 458 +- .../f_textbox.dataenvironment.sc2 | 19 + .../f_textbox.f_textbox_test.sc2 | 1447 ++ TESTS/DATOS_READONLY/f_textbox.sc2 | 1455 +- ...fb2p_classperfile_text.cl_commandgroup.vc2 | 38 +- .../fb2p_classperfile_text.cl_form.vc2 | 34 +- .../fb2p_classperfile_text.cl_imagen.vc2 | 10 +- .../fb2p_classperfile_text.cl_olebound.vc2 | 8 +- .../fb2p_classperfile_text.cl_olecontrol.vc2 | 8 +- .../fb2p_classperfile_text.cl_optiongroup.vc2 | 42 +- .../fb2p_classperfile_text.proj_hook.vc2 | 8 +- ...p_dbc.connection.remote_connection_dbf.dc2 | 26 + ...bc.connection.remote_connection_oracle.dc2 | 26 + ...2p_dbc.database.storedproceduressource.dc2 | 461 + TESTS/DATOS_READONLY/fb2p_dbc.dbc | Bin 9463 -> 9463 bytes TESTS/DATOS_READONLY/fb2p_dbc.dct | Bin 29413 -> 29995 bytes .../fb2p_dbc.table.fb2p_depto.dc2 | 64 + .../fb2p_dbc.table.nombrelargodeldbf.dc2 | 139 + .../fb2p_dbc.view.rv_db_debug_setup.dc2 | 193 + .../fb2p_dbc.view.vista_local.dc2 | 127 + .../fb2p_dbc.view.vw_local_encuestas.dc2 | 127 + .../fb2p_dbc.view.vw_ora_convenios.dc2 | 93 + .../fb2p_dbc.view.vw_ora_dual.dc2 | 59 + TESTS/DATOS_READONLY/fb2p_depto.db2 | 49 +- TESTS/DATOS_READONLY/fb2p_free.db2 | 114 +- TESTS/DATOS_READONLY/fb2p_frm_1.cl_form1.sc2 | 511 + .../fb2p_frm_1.dataenvironment.sc2 | 58 + TESTS/DATOS_READONLY/fb2p_frm_1.sc2 | 558 +- .../fb2p_frm_2.dataenvironment.sc2 | 19 + TESTS/DATOS_READONLY/fb2p_frm_2.form1.sc2 | 226 + TESTS/DATOS_READONLY/fb2p_frm_2.sc2 | 234 +- .../fb2p_test.cl_commandgroup.vc2 | 36 + .../fb2p_test.cl_cust_rsv_kwd.vc2 | 23 + TESTS/DATOS_READONLY/fb2p_test.cl_form.vc2 | 123 + TESTS/DATOS_READONLY/fb2p_test.cl_imagen.vc2 | 25 + .../DATOS_READONLY/fb2p_test.cl_olebound.vc2 | 16 + .../fb2p_test.cl_olecontrol.vc2 | 16 + .../fb2p_test.cl_optiongroup.vc2 | 53 + TESTS/DATOS_READONLY/fb2p_test.pj2 | 92 +- TESTS/DATOS_READONLY/fb2p_test.proj_hook.vc2 | 16 + TESTS/DATOS_READONLY/fb2p_test.vc2 | 263 +- .../fb2p_test_bug_estructural.cl_form.vc2 | 46 + .../fb2p_test_bug_estructural.vc2 | 41 +- ...test_bug_metodo_movido.cl_commandgroup.vc2 | 37 + ..._test_bug_metodo_movido.cl_optiongroup.vc2 | 41 + .../fb2p_test_bug_metodo_movido.vc2 | 67 +- .../DATOS_READONLY/form1.dataenvironment.sc2 | 42 + TESTS/DATOS_READONLY/form1.frm_form1.sc2 | 167 + TESTS/DATOS_READONLY/form1.sc2 | 199 +- TESTS/DATOS_READONLY/foxuser_fdbozzo.db2 | Bin 0 -> 43019 bytes .../lib_controles.cl_checkbox.vc2 | 39 + .../lib_controles.cl_collection.vc2 | 36 + .../lib_controles.cl_combobox.vc2 | 116 + .../lib_controles.cl_commandbutton.vc2 | 38 + .../lib_controles.cl_commandgroup.vc2 | 57 + .../lib_controles.cl_container.vc2 | 36 + .../lib_controles.cl_control.vc2 | 36 + .../lib_controles.cl_cursor.vc2 | 28 + .../lib_controles.cl_cursoradapter.vc2 | 80 + .../lib_controles.cl_dataenvironment.vc2 | 15 + .../lib_controles.cl_editbox.vc2 | 36 + .../DATOS_READONLY/lib_controles.cl_grid.vc2 | 108 + .../lib_controles.cl_hyperlink.vc2 | 36 + .../DATOS_READONLY/lib_controles.cl_image.vc2 | 36 + .../DATOS_READONLY/lib_controles.cl_label.vc2 | 37 + .../DATOS_READONLY/lib_controles.cl_line.vc2 | 37 + .../lib_controles.cl_listbox.vc2 | 38 + .../lib_controles.cl_olebound.vc2 | 16 + .../lib_controles.cl_option.vc2 | 89 + .../lib_controles.cl_optiongroup.vc2 | 182 + .../DATOS_READONLY/lib_controles.cl_page.vc2 | 37 + .../lib_controles.cl_pageframe.vc2 | 42 + .../lib_controles.cl_projecthook.vc2 | 20 + .../lib_controles.cl_relation.vc2 | 23 + .../lib_controles.cl_reportlistener.vc2 | 31 + .../lib_controles.cl_separator.vc2 | 21 + .../DATOS_READONLY/lib_controles.cl_shape.vc2 | 38 + .../lib_controles.cl_spinner.vc2 | 37 + .../lib_controles.cl_textbox.vc2 | 109 + .../DATOS_READONLY/lib_controles.cl_timer.vc2 | 36 + .../lib_controles.cl_toolbar.vc2 | 60 + .../lib_controles.cl_xmladapter.vc2 | 56 + .../lib_controles.cl_xmlfield.vc2 | 38 + .../lib_controles.cl_xmltable.vc2 | 40 + TESTS/DATOS_READONLY/lib_controles.f_base.vc2 | 137 + .../lib_controles.f_checkbox.vc2 | 818 + .../lib_controles.f_combobox.vc2 | 1237 ++ .../lib_controles.f_commandgroup.vc2 | 1277 ++ .../lib_controles.f_form_aa.vc2 | 2807 +++ .../lib_controles.f_form_aa_.vc2 | 2666 +++ .../lib_controles.f_form_controles.vc2 | 3043 +++ .../lib_controles.f_listbox.vc2 | 560 + .../lib_controles.f_optiongroup.vc2 | 1232 ++ .../lib_controles.f_textbox.vc2 | 980 + TESTS/DATOS_READONLY/lib_controles.vc2 | 16180 +--------------- .../lib_controles2.f_optiongroup2.vc2 | 113 + TESTS/DATOS_READONLY/lib_controles2.vc2 | 108 +- TESTS/DATOS_READONLY/menu2.mn2 | 6 +- TESTS/DATOS_READONLY/menu3.mn2 | 8 +- .../procedure_in_lparameters.custest.vc2 | 40 + .../procedure_in_lparameters.vc2 | 35 +- .../test_public_protected.cmdbutton1.vc2 | 22 + .../test_public_protected.cmdsubbutton.vc2 | 16 + .../test_public_protected.frmform1.vc2 | 99 + .../test_public_protected.frmform2.vc2 | 46 + .../DATOS_READONLY/test_public_protected.vc2 | 160 +- TESTS/DATOS_READONLY/test_report.fr2 | 4 +- TESTS/DATOS_READONLY/vw_local_encuestas.db2 | 144 + foxbin2prg.pj2 | 10 +- foxbin2prg.pjt | Bin 744968 -> 0 bytes foxbin2prg.pjx | Bin 8603 -> 0 bytes foxbin2prg_keywords.db2 | 10041 ++++++++++ foxbin2prg.cfg.cfg => foxbin2prg_self.cfg | 0 166 files changed, 48386 insertions(+), 37119 deletions(-) delete mode 100644 CLEAR ALL.exe create mode 100644 Fb2P_Diff/fb2p_diff.dataenvironment.sc2 create mode 100644 Fb2P_Diff/fb2p_diff.frmdiff.sc2 create mode 100644 TESTS/DATOS_READONLY/classlib_method_order_bug_test.grdbase.vc2 create mode 100644 TESTS/DATOS_READONLY/classlib_method_order_bug_test.grdgeneral.vc2 create mode 100644 TESTS/DATOS_READONLY/f_checkbox.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_checkbox.f_base1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_combobox.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_combobox.f_base1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_commandgroup.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_commandgroup.f_base1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_containers.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_containers.f_base1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_form_aa.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_form_aa.f_form_aa.sc2 create mode 100644 TESTS/DATOS_READONLY/f_form_aa2.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_form_aa2.f_form_aa1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_form_controles.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_form_controles.f_base1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_formset.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_formset.formset.sc2 create mode 100644 TESTS/DATOS_READONLY/f_listbox.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_listbox.f_listbox_test.sc2 create mode 100644 TESTS/DATOS_READONLY/f_nullchars_incode.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_nullchars_incode.form1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_optiongroup.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_optiongroup.f_optiongroup_test.sc2 create mode 100644 TESTS/DATOS_READONLY/f_optiongroup2.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_optiongroup2.f_optiongroup1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_test.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_test.f_form_controles1.sc2 create mode 100644 TESTS/DATOS_READONLY/f_textbox.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/f_textbox.f_textbox_test.sc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.connection.remote_connection_dbf.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.connection.remote_connection_oracle.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.database.storedproceduressource.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.table.fb2p_depto.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.table.nombrelargodeldbf.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.view.rv_db_debug_setup.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.view.vista_local.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.view.vw_local_encuestas.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.view.vw_ora_convenios.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_dbc.view.vw_ora_dual.dc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_frm_1.cl_form1.sc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_frm_1.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_frm_2.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_frm_2.form1.sc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test.cl_commandgroup.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test.cl_cust_rsv_kwd.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test.cl_form.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test.cl_imagen.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test.cl_olebound.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test.cl_olecontrol.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test.cl_optiongroup.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test.proj_hook.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test_bug_estructural.cl_form.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.cl_commandgroup.vc2 create mode 100644 TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.cl_optiongroup.vc2 create mode 100644 TESTS/DATOS_READONLY/form1.dataenvironment.sc2 create mode 100644 TESTS/DATOS_READONLY/form1.frm_form1.sc2 create mode 100644 TESTS/DATOS_READONLY/foxuser_fdbozzo.db2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_checkbox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_collection.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_combobox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_commandbutton.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_commandgroup.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_container.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_control.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_cursor.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_cursoradapter.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_dataenvironment.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_editbox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_grid.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_hyperlink.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_image.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_label.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_line.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_listbox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_olebound.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_option.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_optiongroup.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_page.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_pageframe.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_projecthook.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_relation.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_reportlistener.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_separator.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_shape.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_spinner.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_textbox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_timer.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_toolbar.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_xmladapter.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_xmlfield.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.cl_xmltable.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_base.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_checkbox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_combobox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_commandgroup.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_form_aa.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_form_aa_.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_form_controles.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_listbox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_optiongroup.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles.f_textbox.vc2 create mode 100644 TESTS/DATOS_READONLY/lib_controles2.f_optiongroup2.vc2 create mode 100644 TESTS/DATOS_READONLY/procedure_in_lparameters.custest.vc2 create mode 100644 TESTS/DATOS_READONLY/test_public_protected.cmdbutton1.vc2 create mode 100644 TESTS/DATOS_READONLY/test_public_protected.cmdsubbutton.vc2 create mode 100644 TESTS/DATOS_READONLY/test_public_protected.frmform1.vc2 create mode 100644 TESTS/DATOS_READONLY/test_public_protected.frmform2.vc2 create mode 100644 TESTS/DATOS_READONLY/vw_local_encuestas.db2 delete mode 100644 foxbin2prg.pjt delete mode 100644 foxbin2prg.pjx create mode 100644 foxbin2prg_keywords.db2 rename foxbin2prg.cfg.cfg => foxbin2prg_self.cfg (100%) diff --git a/.gitignore b/.gitignore index a845094..3ce1222 100644 --- a/.gitignore +++ b/.gitignore @@ -75,8 +75,8 @@ bin2txt.* #exclude general -*special, reinclude duplicate, or the job might not be done elsewehere -!/foxbin2prg.cfg.cfg +*special, settings to create foxbin2prg binary +!/foxbin2prg_self.cfg *re-include !foxbin2prg_keywords.* diff --git a/CLEAR ALL.exe b/CLEAR ALL.exe deleted file mode 100644 index da52d45a1c4e4b6051ec6306de803c89a4b3c424..0000000000000000000000000000000000000000 GIT binary patch literal 0 HcmV?d00001 literal 764358 zcmeFa1z1(vx-dK!i*5v@VF3$4x;v$%yHs)^9gBq$N^As`Qn5k7ZcG%!LP5erMNz>7 z6-1OU5Rvh{V((O z|KHz6pqXE;k)NpJx-H*8a=k6@8xxyGNueh%rH3a{BEyrCk{Of;8ik&oM2StJ*m?L+ z5|g87ntXiR)L*ErFYa$)eRgx}EQmeavXvdmt05(r^*6SvLQ1-~Wh)0WJ-U^RnYR2& zH*Mu+mN)+@Z(ye0v5_$t=RZr}X-^QYBvyi2BkVZa_L2}F@sK#U30|oA#aNm+7fhOmHR9B~K7hIAcu^AEa>Rzjvho9;e@j zQV62`_wqmGH5s%F2Glk3zzy?-W&KkK$iqb;h%ilhR5&A?AkMMPR1oZt{*nW7%*z_M z*PQ7_tiU+50YG?SF2HY>H9<6K($naXP{))NDhO!+tlQr%Yo<1StN1(nf13vUOBhs6 zvpXeM)A}rneH zh*9~Ke8~T>2(bB-$lxyi0VOLr<5=Q|0Q8__B+k0beut;t{gS%_XAnXqeve}&KsjZF z`=$}{gxZ}@TX4x5?gT?8?scGAAW* zq;nJ~34)3Uy(a6>B_SQNdLUrh6(WIEjUZ#e0O4O^pbfk*1f3XMt%VSv5iukhM;>B{ zV;RWA3MgY%dZI@Kh=uN6fXK@X3lI-OFdtn349m>((N##7>;LK($1$+r*RUTj8i_Um z_JS7PA-y>E0hQld9t}|fW(RQ&@crKOYmi_Z5yv(#{&R*4j4lowpaBpr>1bvem6L@a zpc5Etia8z>;DtmFL64YDd~1i>Z*66T6Brp1Jqh&%Eh>MO)uG(ctk+a{-@jxuhbPZm zn_#e6n_XM+#q3&|U>pfMlv-yQul9f@AeiwwCIiy2vSGEy5iy{JJS55rmj0hzguz2jTYN4oyJ}c85GmB7F$FgBOWnBZDU_ z`O^=?0dH&*JDwF~+rnUK<(Uxzg*!0M0db2iTkGI?C%S6}SI`yQJzb=%Z~!wH!^&hz z1saDW)LO00+Lp1Dw8eolb(WRk9s?X$#sO$A>Hbwy1J$640V)>l&)T(6JA*Wi0M>W> zA{V+OT{MpLi&`UQvgGE#8Snt`W7e7Zj2Y5viX&SOXaM3oi)cM-0tC1Q0{8@6z$KrU z4}fmK7f2K~l~`ch46!)E2X%vXf*8E5Y|Jr(FvW;J$LB$TDc&#QNR-0li4joH#A|_# zk?RI?h6Tuw4)(UxUK5go1hOOal$}mZqfPKBDP?!eRq0RXpIAPr_Sw-cA#K+G+AO>6E5_Su{ z9zV~ui>MR;={1X})V(u-Sp-z#I>hhy5A89=FyvR8i42Z&>AW%e zf7O-LQK`VV*|@+eMc^AIg1{#3Kjy1ZiCU-ztZ{I?5Ki3k{B$3 zTa5HSHLt_XEYLEP3<`H}V45n=QemwfRV00$L!1K4KCGsai9!TCCi=%<7ii^xV1U(B zwwyF%G0QWvX?Bk1H89;8Rv`;)vK60T6(S7@wXtE(!2G}{p0YGj;a7pee(<(}6;u%- zoo}ERB3ogTz^a|lrGyVVMQjH~a2fjy`OZKISh8e-=`AzPL~aF>;K*5s_EG^ig9F4D zhw^S*f*=@NVjvC07(oynY#GA}DKfx~;1G{sloMcP=tEEK5?88VVF!aJjwraw?d69$ zhcrkbZD0sG$4p8>&Jl9E)iFBz$7S}9J&}P56w2&7Jn3tQZ}E(d_^vK|#ASpkImh+VozS5|rhOO`92PCW~LD`xdi9mK&ubu;!A(WJitW9q+S=^t_ z0iL`9`XbRhxDWZ6E2Q)2bpU#SO;^{ty%adt1jtrF6GQ|CE2iTxNCy%n_8&?(OSsm$ zb$NOXs9?T>noDQ{CFxxSEBgs1+EOOk^>8n6n}T(DU>=CmjFi^kdL;&~w_w^LogFEK zK`{m!D27=DOZosmbcfAJGpz5d1NVUDx5rXV-yR1!HOKMBcw!f-1iEeZ{q2y?U&&0; z6bfilM2UTW3HEUwa8(Gj)|fNQLxFui>(Il2Y8Zxbgkc>1GdMbDaNy)Wg(Dc_KuQUi zZ2}&l;YK0`!l4!vq1V)W>(;H9L*OV;yP=BkEP;5kHi0Tw2B7xR2R6C(6KiP$o+b9M zjetcLp|$oCW%eUcdvW*X61S14wR|`mgtv!YKt}IMxzsd{6H&6q>mlN~;-@A!JNNAFuSte#N9QqgU5LRKveqElRFINiC{jJUzbS4OOBfr%p zL0tpX8UI#y2AXj)1_EQ47f+E`-K(o(`BX~Z!i zG(0krmX<~wg5DAELL-Jw5bK%w*vP~bf>_JU<7zh_e_L-O9Zl?qH;B;4P+A7K)g&>K zx)7m(ktqy^*aQanlp85DHZ3tCB7qhjMG&{4H?uRbm1QQa#dH&+5|W5(kV{NkI)j8r zB0@u#(in;0q~Y|XX@nKv0p|sji9`*wrO_Da;I@e%6O9g>UVzb2ap`G{(CDbxWd!jD z^hpT~jfANIZ{rAJ^-MW>rnF-QLuhzPN+=^U1=>e3_mQ*|MraI7r34yXk09cq7s!~L z#ALOB6#6UI15zX>G3dz&(V&+j-ZqgF z(irr}luR4&R2J9d@F>^V2zodjmyJn|G=^YRZo{`XyOJ5^X$W*$0jYcA)b@mfLi!c+JfW^8{!em z^0X9aU_{#xem?fzvtv3)-n6B*SP?F?OkxO^ywYj(O#kqNbj-&qT!Uj6G}{n1cK$Y= z&a-3x)r|a~sUraz4DN5OFZ|D7{2R;v8#KVmWRi_}7GMmIWcanOC#3w4!qz5F5YjyO zCl2X0W)?DV&5R>4edgr9sc-)m_1jDd;^n`n$G$i5Z|dQBEf1QR*DPHw$f)2!zpmfw zjsH!()4!SxQxdkYxB4h8R$k-Nn~T}T&BcQxC8Ut>TnWT2 zB#QVYsfbHX8}ZDyLL6G|h|@F-aoMFJF84gd>9ZPf`j;RszcR$>RfM=)vJjVT0^&3d zMqCoKR8~cQ0DV&j%5@L5O4?jaaPW5n&vONEq}&5J|%w z5lU8wMMej)h|WW-f|7_^SR4_ooQQ{)4>>tHB6fBT#LLTz6y)WRoQyOQpDTt~SXcpA z5GN-Wnj<8Pc=-hp8y7EPt&h))Q{uyG#9W9Jt^>^uU9os%2!^6?{f4i3b}$A>6#@=W?t5)wdL z2KZ5gG7Dm3V*~j)!54U-p8yg7`rMFm0uDBAum|Ad5tT*@f})U1d>#@}PecOpkx0oZ z9DFeX5nLjO%r_U2c!d!QCqH80;6?1Yuf$lMXJUo~_$PYFWfVsdAV>q}07x2Ks&Vy_`{ZT}AG17O*Kq_Voq-sWoIY2{m zscMKs=0OCR4Y6`?gCB8&%$$gWgB|n=@`GPtyGu*SFy)t!ltA*}e>3uvnDS#DIY3WX z54^w!4=)em7vM+SU=Mb{$->HxL?mQTWNIc_oR*DTBjZqLQWlb#uZ@(A%#ntzGZK@Z zhse;6%nE#fO*mT#86w6ru+|4K}MU}5&fy2AZ1;4zqIT!#Vk#?&P*KlrB* za$g*U+=FR|2V^4y4eY}L!oo;NS0Bl1>CNzf>&fIlasEzU27FHz;t%#m5&?aHUo7{m zAFx81Ne}eE0k*;Oh8z5d7km`Qk%itN$ipv;ndbrfaB_iufCt<*XD-Y;9`FIkvyfR3 z8F;|D5D*afQ+^x^q+sqVD*W<4pvS>EqkAkn?$5==34Q_bfD`;pba`80}mLdFz9Di|KdPf0_MJgyaHnOgV=-Rou$o8 z*&rrxNg{q;eZ2sxuUg3gGKdm&NQJr{%@ry_RM}#ru2PPq=jMREC_o?d0P70&9qdau{hdCJ z0ZjU!Cl&x!Hdbaorr!eJENs|!gb^nj#6K2E012>#Ea+SiX=pnj4Sjpa!(3w(0v!v2 zz4^eGI6>#&3uF$aJ@A@_@y*0n&R_INNCId}gAY)#{3H?+a6fkNeO$(V!^#Rc*hv3i zTQ-gv`^!-w7E>VCKmXb8!DzJeYq>dv+ePLOUMA z#R2+f#yN#pnn_Q&!A zeX1h1|BOvVW#y5CJQa9_c@Msd=L7cJS^HsMq9|)2LrVuFC9h`A8+ zxgo{t0H!YvcJm5YjEsOb8~8TU*T6;?mooT5Kv)c#2m3ZG8w>Eo!Ub`e57t6H5hSH$ zhPb3P5SN4!(5Ha@Nlg3WJpiVU;}u>n*m#7HjD{hsb$o~n>kTKwBQp4#!hCh)9~O(8 zT)iOv@F5O%h}Bp>05kE5jI{L(k$-qB(lN6G{XvZ8fc+k?C?df=M9R<^u}EtpUPS|- zFAwt+=;QTQW`;iY2R2S#MB)=i;%df7YMvJ278F6Ouy;_?HbTCOqmjO`1;jLn&k#qs zV84iMGrK0?GWI__C*6W0k;TG5Bp|JVgy$I{X=6_$Zsv~&d2__8ZigggD9m+1LP8QL z%2B}osLV2%gCEUNHA1pRE=b)b6q$PjAuVf1W zr0wF7pm7=!wO@u57p+HP_6#I0t-zE8uYWW2m6&C2VQHiskcp%hL?8jR#Yjpo3Yq!G zB25cN#0q;bPCnQd{@Mr3&J8U8%>3YhSPeG7cIOsG5}KCCFk~5$uv>fyVU;BGcZ| z5QjBX)quVVv&n|5WBao)hL02khV2d0;ODdf@(z z2M(Ao9Q<<-m#`S(ggM3m&n$BcJ&=rNCXx&)MS=la5R2zdB;vId=+DTDV~>WKDpH-V z%9Nj5Tn(OKiV)c%6>*v^MI1Wbh$L%>2r*?u2uMLJ5kw?*PKYabU&qGOJN5@WN148X z^)p8Tafnk9r@R5;m~V^N^#c*-f@H+$@(1GftwM8sE0LJwjQ`0&9Mn*ok4%gW5gWu= zE&*92ZZZG{oR#*GN(9t+3!8Nl<7jMq54M;Dx> zuZOtQ?Gd+O0OGceLtM@|@SIkSL>%C`4Sa?T)+2d2IW%8+9C+0V2b58Jl4c z;xVHkeu^>E&sgDEN1h_bocF5Wf7+TF$ivMInVZ8r$8iw&;F%+jc%;-3x0oV42TLIi zh~XSOeDEyA1#2|unho#gXXvxSI>QR<0So99uQ~V`g_Ua#=t}~z10F6BDy%1XZv^{S zXqSSxtD~if=P{SZ-(31ggqHy|O z!%1P%N+D7J7yTF3SRw-Q;Q*Pys{-Ns3$qgRr2v<)z!|25`Na1mVi}X$Son66!o)*? zTsV;kuoQYm0hamy#5)}%OoHCCT>pg?Q_&>2;m000z;e@}UnHbaOsd+Tj|9-O=6|p~ z>+VLYLn#+GKNYL;9~%PSO-f1+l*$Mp%e}L!aFZ!A8kUP&?amE^Z_^K zNSokAe|1=qYU9rz!=EB=aSHChMOd?XfjZ@18FJ50?22<57wJBDHCwa(zSyTX}~Yma|%fF zm!2>c?0qx(oAHzgXpaJ*Lv1Ad%=Dg_O*0;Zdtg~GK0NdOah6d);}k-LNil;^2kem` znL1F8`!h|1aw6cs_0fO_rwK4?a2f?^^sh7${2pr;`#IJR1L#qhTEX*cX6~giC1QY8 zG0!u$z%7{f*-;dj`x<}?U%X7+%;*tq4et2e@;{FCg;C+m7=z;$9nSEuR{#BYV}b{0|Kpte zYj$Bj_kbw1fEj0Wp`SM~^GUrO;3UE9#WZF;{I7_CKe5NrW`-NgYXbEA-RHSk`&rGc zG7=LgaPpoOo1A2!prfg+K%pf?CP%>un}vd(uY-oM0ws+B2Xx{15Yj>+la{7nWy!~F z9-fv)ON>a!qyU1XGz*1vdXi~cWDG4aJWV4pHj@k*+N#Wz>`kf_BZOj%_;&W09h2^nHdb-SV5*#I3D7ej1)BOF* z17-*K9SMA(oJ_ZY!{k^79BQW1VMKJdGBaP6wfIfy&Pp5~miEIFP=SD&ttaj^M6HYbE9Elr2xUJC`)e`@*Pn)!DMDd`ajv5|1n>kFy`e>XHRF^DkK z*U{IHjEvTaivA5R_6|H0`@w(I&|kGoO`2=XY6?bq+Su7SyE_I3{>tEFdJIum)Zo~! zFqMZ8PU0cxa7gtZFE)J}S67b!`#@hf_qK7h@Nnnj_O|!&@bk8{xA1Uq;N$kO^|rTn zpUH>%_}X~;`gvL?0N+mbuAaZDeZ6hmeLOw9eVGlRj`r?>zBUVH3JxBD-u4d6yswR` z%Pb;KdskOmCl_YDo4>7xpS!Pxj<&8oA9v^iZ;t>tPoEjSz|Yy$Znj|S;qGtm4XnzhF>@QeuVb-5#HZNcz++^{e6V@_YvOT zM|iM#{QC&+?<2gwkMRCJ!u$IO@9!hL|M-&S|Dqc77`-F}7dkjQz@aRO2!kI2^}w5C z7Wk+J{{6bhZ1Bwjnas`#pCWO`n00%qCZ8#aQp650t?A+|a4IyUUWUf~=HsUo`h8+LOlE;w~n)cf8DRWE}6 z2N(BTF>wh=rFqIK^Huc?42_IUOl|G#9UPsU7y9_ZFH#2v1xH5FqL;?R#-%aRmo3l8 z%qmz_ShRZ0+Tx0hn>KIRx@~*qp1u3_A2@jE@R8GJ>dv04Z#dt0t-0lTYg>EAjr$L} z9zN=R{N(AY*M0qO-o6_cd_Oui{`t$-Zxi1qv0U&S<&0Q=O7>5334vTJU;|bTEEkDo zIRIIRl}%oUeU6P6M|i5Rf^I&i$bt>KPhI6w)bkz@jiBG-o=eq#r8J5~V@md)6YP)w zmSlel_Lp2w30^V@j7JtCtcagedx}+vzksW07xDRo%tY;|n&;WkRi_?@y2bOY4IGsc zq$W9sulIfV(OV)==3t(+!QgZ4ZsF!75|=M+*y;a#UYIZKOlPEpdupiRv);PFkYzmBg33m6&PNn3E+h*ev*23@JdXMSXA zs}kwr_D0_EojYn8om)-2onPLSemwEcLpbRC9M!{>a}g0lGHFU~e-ygrvh;+1pZ^cq z&r28eoGxrccn6F{j111STXt$Yc-L9O3n| z)7kjlo^{vu-Jc3QFf`BV%nR#bEtSG^7jm0II6m*<)4RW0FXELL-#ClSw5(2BSO2ub z0Si^Do%`)%68ML0`>CR^0cz$2C_{Xq}e!mJ6k)vw7N6A-NvpdP^pCYg1 zM->IWEnCN1DlVPf^-!jEpP~Pdh)x@?SE;H(p`UD%Z{FKHZh?g=ySN8a_4l|gxVI_d z=%v+nEF8G{h6+BYrey55QaScBa#4Nfp7QvkB_V-nMcHdtWrzwR6{$`@w!0FPO$a)dd1FuEBxpVc6%%8Q_d@58)K<&cC?k#v&Qr5KEGEzupy4NeQN8tq+`|_lM&` zV%gEe)YOBwWp=hKOKaCYBfhFSXmICwVndIKG{d0d$rRryv9h$4hvOy-TUJT%xGK(( zTbU=up{ffX0Ni+>9A5=m&Ea0(R?I+uGC%0klw}42cOhGc^AE5 zF5~IF{OOz0A1#dUqhFDL1D# zN>8Zr+t}#m+ZOQ>jtzqW=3KAL%Glp|ZLhuGJ?wqhsVnc0NLZxA)RDdzdYq+lEVZF= zY`D)`kmXSS#;(5VotB&T4f?!|o0J}H@jLx(@kfS9)1j(cM!ZMIPP8{|_(->spX_pp z*R4yS4m7QAJM<|azS@6ana{?G3;rw_M;cevN}s!$G?#Cju+{veA2zjjL%|EnhcVS^ z>b-m(i^sgGZl3zS-=y_j_}ID>67?HLaza<7T1=DDGuZlDsi!A3Q>tF*@T)9VY90t<=n zpIk0%3}{%oHO`@JvsS%%*sH8}>$CbqA5Y2DkFRjnr)QR)x^|yMViP-?Z&=dj$jJal zt*blLZ{1Ed_*rp9Nnw+=&wHbzLaiJ!I>FB+M+|qq@*mfbx6GdJxU+{*&UIILM4I3b zA>9p`a=Y+gD(tDo!_w!en=4-2O822}|1J@@{-7#XpK^Ihh6U~11(DMU8*iPfTJ}OS zOth;0<{c@M_gq7ZmJf3tdM3X%ZXCENqwU=mZhnU@h zQw#6ty$cK5SbcuFjua)mZse11P0KQ!A)UeD%%uAJy!(_!Zs%89xcBZzZ@TLqcX}fI zb60B>k0m@vt_m}qiREXH|2WFU+7uQf9l&OP8=rs8q7U8 z?&$~I9a#}PIw$n!;q-a2O~kbc9Yd2J=gAv-*(|>dhNCt zW-LC%b=&*`>08KWL`V`j^9|RzUy75r`nJWs*NG@agzD7?7n7;gI*s?kB2hc@*XwW5KwS~R3HC+DGD zbF$>(j2Etz@h3E&Iw?JkC<}7$l@`9RL$2u$?UamN`~}_(+vR(bjNB;lE-N2?Gncin zaC&drl_T4^cjRY@y+m{-HFkeQ+NGX~xc-zq0-FQ6epFWEajWdf<94u59al*{w0}>Y zkgvikYxv&7`<^`^;$=^W!|KZ-bwMS0vwzHe`?8i|@s*Ec_}oCzWbqS56L(+PSHFG! z`o+z{{bj4#mfl!)QgNMk=*DiAOO!D+fz~a2>7o}@tkksc(#+^wQ@%M2(%VL(s~4W- zbl|lya>IoBtz$njo;8`Li+_;A=6G65v`bG0?8}I_ zm+)CFJ+vxA_uaFOw8>Mo+(eA{)cmf9^|CRf7+AVhm{4#(k6U&16m{;2uPsF}ALpHt z*rL*-JHIt`ozK&T_A4=$9zwBzwq;>fcRzv+8p zQAvlXuE(zUl;$`z@+3w)dgmTe*LbetVUb;jO3YnjD;ty$x$hvxS$n7Tr|Bv@C1@|u|zYb^_&UP84-99GfmYmF5 zC8}5&Mrx-ot60wNRrdI99PxFbTGQtjWlI!_GNx|!Q9~}L_U}qaH{bEoEa2!0gYIPW zfZbOQyQQ9|@zx4#*){(eY%BR!c6{E&zwPrek2R9FkFR|t^7#p9%XK&JbaoaXmdai~MCN#vo0stUs7uJealWn|mb!wU zp&pF{H6?qpeDhPM>IhM*^dbQnd)iayvu22&XkYsrtEkHyn9)r9b5&KRlgUc5&3|u~uxnNcXL9 z|8}8L9ZEsF%oX7YPmVnvKU~^sdIvSzt>yPMJk1so<^F4a!Hu4tl+Hfv< z(GSLPZkMCkM%ORs(R`B>*As2#4}S_=cXX>XQF_q7!ShYAbKS`{>ArHOUHsE`zm}i< z5$Tw^|E{E#hbnDZS_P+H*mlagB^+-ShZf~14dkeAwy*7qXY^+3uG37qq@6V_aYFaZ zsPgJ`Hv^52wMyqg*MHokel;ZdZc%%}M`<~0cfIS8@i`Lpn;*H%EqmFYr#q_Exs+Pn zuuCB4@_kAd)tOp6uVMAu;>3a#Zhz=<-7&4XHQ6oo^7cZh(6x=5cT{EvKI?5&+9dys zr(?=nlj8=Jko7Qg$cbFEwfRJ8K#t_a5SgILM2pa{S7kFj_9geOvdK zn_Pzwas2hIi*HV9n-IcX-Tnr#H*?z!Kc{xDuvlsNlUTCnXmcj@O4g%{E6?Zu6z^Im zZ?m(uJnaQb9(B*@zR~o3r|aTn_XK6teE9x#I$LM*!Rq2+y>Xt$-&>xfZYq4!FYGuqFDt|PIit$MwjXxHEuHN9MK{9lv9?xvOb%L&$a+lA z+i)@U!0xxNJ${Vh0oIbA{ne(d@B7rY)JzEA8uw(`!MLi6-%}B>WGr`7pLEJTQciBr z#z<qsopoAA4`S_&Tfwgcn*W3@Rs2+P%AJfIcUv9NlycO}=2i3gM_pxBDeKY&$M)xUzPe zw617RD}P2msi3egxok4I@RQ`Dhq-kp6qTZ!dft?lKao&c{mokWglj~eDQwN97LMdc z9(;OC*L2m=-k`?<-p-Sw*Ml2I?o=(GKI3s}fyy@ztuf%JG{UkG`*}+ELq8vaZ?qCmWF+eP*P<`jO&>oVKqHIVTe3SFO9b z?*8GL)w;1coR9Rk&5LhO4(#A|vP+gQ?%kh9l$I9c@7S>;QZ{7Y3b#>%4Y#s(eyF}r znwR@&*Na`ptD0ZbEq+*cA>G9o{st-U$kb^S<>S5Ub856+S&JK4aeUdg?WeQFA7M^kKh3#_Fb|G2Cb6fZU&bgEJC+90o(aCl{eqw0^eB91Ey zOvk&=a~N!^7Jl&ZO3{0sknGGocXcR>-=|$|8mtiL^8aIg9EZfmHHEJz%-TaTAdm|*IlU+3p%h~lh$2Ybi;`l?KuEc&_ zM}1Y^4cZZ0t*`#zoZ9wq*At29I^sRvD*P9Lykz;P-m9H=&euBU#&cHPv8IxWUY$*C zO?}MI9)C}zRfYV{!uIOc;Mh>z=P|A|j7CAZ0VfNKp{~p1=g!KjE}l<(TehOLVm|lu zM_*%UBRZ$m5`MR3746~P&x67mF?tN~|C~fm)7mc0u+r&%xalPHUQo3D1 z_wGB{8+@m48=lF!?{p`4Iq~LHMOx|7`~fzf=QO#C8|RLeCMUmKa?omx=x`{fIazjH zgh6~m+De8?%blyGUhv3aPtA&Y*;fvK$ZCb+$b$FNPl7+)JXLtLDe8r#X+d47X4ZK7 zOHm2q_hK)jtG=e3NX@u^=+(5xoBGekk7Tz7^#%5gi#PD^|KsEm-6pw9G)q(=3ASsW<6!nKen&-Ca)q|LLsrDa=da1TUO1J>ZSr}uMVc-iW~}@q zUpoEi$}>3+0;`&rP)|PGO$$$6%Q15N!By8U%}XV|?c!Urzv`88%L?67XU}f?Vs3C| z2XA%%d}`L|X@ifcPE>nZ*o`K^=83}0gRP<5w_iWe@40RGJpR*JYp+Ue!%gI@sISk? zpY)LKj(y3gRckJDu=$W<|8rZxvImsmo~HgemIETBv-TpMq~d=!S#$>>`?y#G*a*^+4(__eDukW^G zd^TRan&EwJD5-kU+d0}Lr3vD1a!ZuU17y#(#AGRL_icEnIj_ig^qfkQ?xNDvf(>t8 zMx|DyJw3f|X~kgwRz_)y)vcWGZB|>AN8>(NN=_MVY<;@5Cbc2(T5eYVn1|=lR(>1S z>fWqkA~N15J}dol&F+|!PeP6imma59CVc62fAFcj<1U$H@4A+>b%be_@=SU8-L*v(j>!*yj@ zZlka4%8a4wLL(`-?9E6w^BFtV*}m}AM%AV{W?wjDvdgmqwoiFY*d|A^Ru-;`HcPjRy4QbZ{$RtL zv~}SRN_m$O(#d&K%a^~DiNB+zaVyPe(k|}toYAX1rAf-WhpJ5_zutu3>3uq}bIZt* z_o>J3?e~famAU>)dGmT2}bhLI{ z5q;^8Vq$EYdG_nv)!%G?L_ClG5u}~J=t$!^(_{J8VIJR3b)QXnZaAu#(cEGbyr=cv z^^_Z;JVl%$Y{M_gS5BPRlg?+#=iM5Ty(Y3!Vr%@~<9>yyx#A3!#2lHnUM5}ZJWV0Mc#DprkeYgH&olO^0piqmI-_*(0Vyz zVyW@ziNbwb69mq#nfPL*GM)a}wd6b}>)|glhe%saalZ27DQt7=IW^JM)v0ZD*C6=) z9hZ`JYRFo}z_d*qYju75Cr6IyOy9Gx-o>L!$#~+P;$UoSRTFpkpn!aT{(@sEiGh7i z-0JalVdQ%k#u|vQ$bx`4^Wp6|{$>}-UraX=qwCf^HGQ11KdLN%)~`Bor&l|=gUHVF z$lW&CEjzhsxv75ak1KV}^ZXaLWtjJ=I`l5(IFYn@K(4N^)3j)-c<6S8<;jcmRK%xz zySM8lo(ms)dD2+1mdL6u8@04he8pDfcqpXj{T6kNmN~q2`HS*)JKgOi`cs=kYWOWR z5E1Q>%3g19wPMVpZf)<}zzke% zjeIQJy~ksJ$Kg=zpF>WADSMx!RqXANUKw|A&6MMw_phdJ?z*~Ek$#MtP?{}NZ&egS z?hbi5JSvLDGG5b7oR@Dkk`F8Gid-0ScG z?$$Z=Q=Cekt2s|}b0{lwC_dUX;qrocuylm&HK5@D0-RsX&`V_0B5W(YN+uJ-`!MBfG6`NfOXN;C`yuQ5pymez0 zFF)tmt%z8AF!$Pn&hNMTOX`0-x_@Fk_=MH9M8izKEg|ijv-UKejC{X*zE!Qj$U3*& z?-`e68=~O1f!kDA+NLzzMDKq5xWwZ}RJ)ZSk>h)6%H=^cRm~~)(+1cQ`bAGT9z3&j zICxE;IR7?8bjF?-$@bVP(b#2-h&Zchg*ZF7UyadhH`0}RpYA;0 z=K!ZV4<#my4j|(0?QgFm;gLsGWMck-Hr*`^jTzrQGQI~a-_=g6YbquxJxYTU{9B{z zFORj-9k*CdE&ulU$k1rFb7X$9(X1lpEKaUX6Qb@5k4nXM@qRtraaF3q{qNlO=xc00H^@8u+ab;Hm2c}_Hyka(vH z?r*)`R5;xn%lf=aAie7Ki`BcA`5bQB+&^6QSl}>^&BXavZ#MXyrF!2!nN)1g`c7uq zk1xlinyvWj76&xFc)B&Xwq2dv>%zNG5uUxrZk&8obx6+Lh-_4-uf_F#T0TV0r8fA} zvi^*I)%EQnbDI;nANMJqbG$^P506$g#~2wNI&w+3vz;U9$I9!z-Ih9oUzdM1e02Kz zwb85D6%ECl--wot4^MRp9DW(VHR^rWrSt5$GY@KW+B?@PZ_PHUbb3}#eHkV_z4_+K z10rkp7CVjg_Fonl-zDI4GM8(@s?Gm)d@65QD$fTV$`&)*^)5+w9L9INGcUh(zNS1! zub`!I=gxCG^_M$GNc77GvaMflx}jj~bK8~k(#4r!udTG=!ylLLNPYY;eVa$7RHENl z@A2C|ifhuUEjJNALUK*NCCH!YN*&MYldU?p?m+y28`&l8B&xJ@-5cs3WK#LQ&ob83mwvrr-jVC3&jw^B@$a2;;Kdnjvpc=( z9TPrI=5h^Wd6GYBh*sSe58BMFp1)jo{#E12m(t6d_S=44!$0uEukmPp`?sM-aQa%k zRjQds&EekE2ZyDxbiJz`gVhZK>=q-W@lWgOS8;1Pd~vcc1w z+X0WyKTN#)oL24->L8Ur9dUYE!#X*K`rJWkI^#{whJxPIqZD zSx=-0kfle`?i%!lSf3j?qGrY_&bH(H)ZKXvR|*~lPj6&>^mKpevad<5_jJPFs>xi@ zB$*4JKb=C))f|%UB;hUb{{awL{-LFxlP8?aHFBfk%HLhZ#d@X|k`$+Ys#!JXDAbMm zZ`-;oO}(=L5%~_ejgE&9VKNj@A?h3ik$tiv*JJ#B4C!M^*;R9f%wTbY@{ebFQ+C<+ z)NisTe7vz{*Oq8wg8%#16FL+7M~~P?|taOIP`Nd9LBIsAd z%$>}G`eMxwl+_OFv1+ZmQkVDGg7aBJ+VG-F?Q>)fU0Ggh;_>A5vu{2W1(ojs<+-NE zk6-QKE9)XwZEIatP`TrZW| zZ`FYb)Ek<5J z&v@N93n=d-p1Q0!Pn284K9`!X&wS-lwB_!SEhgfe9frG4iIe+D+sgNvNPj&(UMs$f zH{_X^@1;$rhbn@PYaeAhmNC@v{hRdkf(j4O}7DNaYg zLj3KP)l^cQ$}Zlo_caBku4}bTvB*sux$tjJW!+unb7>R#M&mV+AF1M2wV`|R)I8#; zV@EY^bsi}dvEF9+j=u4`WZ%9CwtX&!UmLqlyT2ye=^>&#fWfY^i(hP7gnix9As_OC z6}eOPM$;0X9DFVeXC1QK<15#pc5zRh@%Ttm%j4T|ja%xr)C;_I;XE%T{o_qe&HB$r zMptm$58q-kcicBfA>wMwAt~yYJ9nNx?DeviR)0Z!E?HaYeEh8QyxdEQu2nr2^kx11 z<9E~C5K)wMZ+ViDg(-OsSR`O=g^cK%m{Z`B4A1X93 z_nYUbvZOtHV=uRLNSAMGH_s7$b$jW&?Tp9`-!iw;c_$dBpPhr!V@U(zu{}%skVpPK9jp@T8|4a2^c-t zTCt?pdCxUJjXu&x5$&a0@45G`zgXJO?-)$bQg`Da#ItzP-X>E}rxywBFSy_;I^k_G&Gy9L|CB?*)Rt zgy~qb!C@Qo6boJq{2xWi*(l4l(#5U7?@R^Hnk|9-tfE$~DcN$V?I$EB3P#HNY?oIW zWZ$+@+CsCAS|u%fkvFO1-7-`DC+~V<1<3lO@wOuK*rOSinUZ%#gUyPb-`iQC7J0&T z{mQh0;KqZkF9hSVz1;Tk)r}`ODc4g@DUO|R8I`-{Cf7o*gAWuc+UdgySB+}CwQZ~l zqnv+O#x{g%PX0{M8Rx7jztSs0>VH~(;z<0RJ(H8~`!${Bv5zU}(l6*S(lfa$IB*EO9_EYcO>x4E~ z^YKgVzT4UP=}d!MaJmRdqQPb={`-T1B59-k*e*}9Yw?wqD{FV%I{)M5_Xmfr6Z+ES zS2oMV|kHcJF6Yr$!KO|E0$)InUNhQ zHiII|j)^yHIdLFtg+Ta97nbfDP;LqICbZBNN+7hrZMg+nQj)apO7xXWCAv7Vk(}BR z-~a!d^S z|9JDmZ~5+(f4=ac-}u6pe(m;U&)(UvXWnhoYd<==A-DP8UbpL;yRiFI|Mq(qe|O7& z?ES!%ho67u`A^nozW&`W|E6l{UGvgkH%$C` z$AdrlN5A{K2fnni?qlEkZ2C{0dB^`~n?$MOH!ry_^WLXE`-$8g*Oo8&h3#+rtBUbG z8*Xm<_b)vEH=n-c)YGZ4+YkTk%b)u2&A&1K$jqwueEpfv{J|Fnzf(Kh@Y%nrym)2( zq7(0YX6fg)9J~4KKQB7c()dR=tF!<5q0ipC^v3b2zq;krXAgYl*qUcfGL;A&)>cH8b zfAOu)UjCIWE5Gr9%>Vo7_g=d0gYSFa2jBn87axCX>)E&d!-4VN`pOsI_W09_uJmqu z;S24nf9>~%_PnrcbY=7=_4zZux^?7ZxBS6Nj}N`0`=jr8d*t`;ed5K>y!#(|&c685 zw;ccPpDeq1wY;bEP5ssUz3qqRzF)Rmt%jcM?I&u~P+gs>{_Q&TM|UCELu;M-$)DSo zqeGV~N`0^j0bA6krj&|ImEo@(e--$v#9tNus__@WUk(0h@mGhxdNtFke(6g5mCA|w zOJ!x_5_a&ww4GRPC9b~mVti_zx>Tl`r^nSh0C%QQSN}jQs-t41S~0U;JvG&!?!G)v z#q+Qm@9s@)9?0zc%9YFWmG`p?Nz*fJC^{c_G@^K|O5PJs4&-{%shNc;2RfRr#PN9< zAtvTcOH!F6mAOe}tFOc_*Qibd;&PelM1|_l5y6+*mE-}=X5{YdE&uJqpi?9PJB z6{tB+b@rxUqaKUrdiNv?3M@l`I@Ou&?N4Sh`QDAQXK$J{J6)KKZUYgAE|;s$cuW0D zb&7p}AEWqDZ}Q3%vuY))47!x{7>*m@plYT89oK|jLY-;(!Cu64&_CFJ$ex~wsBQRH zMypx1?HX4JR32A%!n?rCEo$DC_{1p2v+4X|g}NFzq2aqgtEfF+t>W?PKT=lcg72IibA34sMBdtx( z+~qV@-gy2dUt{PZ2TR>WZp(h80YxZeC$V47Ii19Qksp<6*-V}K{J46NJyDNxjmY|^ zX+f+3U*qTIsp0&g6KC%SZYNJ2o=8p4EKrz+SV|wM1At#(#U_=z*r2AGQ32_CRrH{- z`D}rMMuZhssKN?WSfL6lRAGhwQyTzwDy&n5b*ivVJ3H~SPNBKU1!!r$db$He#?}3( zL^#ss#YQ!?5V^x#jF+ob^36k>y>5D@13h7O zh|0#7niOC)9pDERW_hb)_1hI$oha5>!k)BxP#^!6pI@hi7) zAX&$M;jtqX>rd9ITp!$R@F#%86X{frI}uTX_3`!;AqW%*T&ZI)|MKUO)N=vIHCN*_mfy=A{R7L@Z7B9JNY3gY>5p z$tu;Cj;HoitG*P#3{>K0@}3$s5FdzTV*U3tC||`0w(ewnFqgy^;+#rH6aZ%7qoY;< z)p#;7m;vQ|y{RPg63JYww=av)7)YihKbyr^^rmDiY5;T>e0}sem9yF21o|bJ=?9s) zq^Y3Pe?u6AdiTVexfO?rb?8l2sVf+V=?FfnrYqzCoQxEt)u@?jwX-pbIk>a_a)sL0 zpWxRm9ak=uw@ovzD$38UmHf=h_YbX{f#UD&9ape>bxrg8Hu=6G@Q~8GLz&(k{wI&j zMc5s%Wz}C?T@2fe16OZjmFUm@ftxklE{&0FPrByBH!ruiTkxsF`NYWm zXAXDurFUXiH>J5V5?P>ASX%ZUQ+fr-m{@`>jb$6vM5|#R4sgT2z99ECN&np^&Q^a)YGOKc7rIl*CsZ=rD5nSDm|9lVs z&k!>Q>U-#H&$DqupqEkOni&{*JfR!g(c!9f8u$J{Cwpdhh1+tdAOP*(uxt` zZd%FWZe!RbCcZUIT9~v5d00XZN&aG-JUl@3$!oUgRds9hJ|eOJr)QHo z5bXehQG?)C9IQfEHGpl1YL8%6CI+GMfofp4Ryv8OjcSC4RA;pJIATN{A37REpKpzB z+m_vz?by6=)0PdJ*Y4O6y&;-B8JBq)3GmQt;6AV+<7y@LRrKV%D=392fG}H4n1*jfp3GZT1xu04PS4y< zo=lg5cQBMaIC2J`heuBF^VkFYJRzT_AIA6N2TwnVmcCZdQX)A$bA#8?@X13cd+5}V ze2&QHG5I{f+SSC4>&M{Hli?cJY|yqclHkqA&^5D*$xo5icF@|X=igFx!MS#o)t=mr zAMRqDDIKROeg7Na^^M%!a$R_t6t2U$*VmWCogkfJrn_M;N3#pT##rYMSUQ03CJ(Rz z&P2UqmuGf7mWn6)_V(s>CA0C}$$b&k7sq&Sx}_F}-#|LceY_cI)&+_y0Y_tOPpoe+ znQcJkKyN&UO=2LH+lBKwmgvpkh>iEfQaj}!!xq1*7aT%gz7Sd+PGFSFBolpowYa76 zC_rs~#TKtwgLqz!a`StkisMM$nPgrpm&^2aZ1r9B@;!rneZ*?9KN*g{ zdU~b#W@L27;=6Zd;4&=H+Yd&eN$pJL^0Dr0x(`jWb_;7;n?N#?MYjtmoeD2vOvz`G zu|BX5nciFy=r*t+a4)gGWN)e`J>Ou?ZW#oeDwWRnWYdlKN8>Y?iE%hvRgygm{=%26 zR0jLJ+zAl)Na5!66!>@SDCUBS`v9Dz^~G?-?20GuiC-)uUyqIPSVicvq@op-N}=UI5`+D-?YlkY>~7?8 zn_J)CeDa>ifw>OFV6NcYxGLR<=(p{c=LI_JG1jWeS_Iutx8WFVfDadcgHe4=}dpo zgyuxwo5ju`^Szn>xWbq`SA*oF;z~V^0bc6z(S?#Dnex@jTyqgNm)G30oD(;y-?{?6 zZn_jv&$t@ZJSe6fZ@^=dHHr57@9DCbKo zo2~#8&1?KMg<0jyqR7F>kBSOZ=mO=T1uAuciqHbMRS-mFXaV5N0#!}{3KY0LhctUu zsXmVBuwq6oz11KBM@7Bj1(EZD*SOvk?q|F$@`rGR*=#bwAG>03uE^^le`E&-=(jPM z;4zbg1Ibh(nZS{PGXY=p?3$lc_7Zy!o>|2oLe37WhY{jlw+HCzpR%zo#Ifn7`_Q~I8`ZY)&yI94| z_B>YYE9F1@A?0Pwlw*C61?tojS6-=%M08KA&P8VSQXjy_q0;?blhmQhiaj z3iJqswHQ(g25@c8rEo%}GyIZE!wn~9N-Ebokah+bD?HPm2ZI3KqTW6B`;v)fH8_ya zH)oL=V9P*EVStKAhe1vU4(VL8I+1szZn*OG!Eb8(TtvnDWVhe|PNZJkGReW`9YV&w z>B@^+E@E(b0GUKiaGgl%Od?MUomh)R5LPE*5$90u#hk`m#f%()XV86`ATV13nWuKZ z_JxDp%?8^NCu4wroJkB*x$8e2p#S#*_5AM7-xO`rF2 z9C0>|c?(8<@y;j9r-l1lg(r>R_9i8Gfy0(XxdLkQ{)F`;->dX@?i%R8YPe}8f7e>H zlEn>cDT@X>gl6)k35R4BI+-P{&!F7IB#o(cFExSsl86^U1tj z;@O$)Qm>_XZXtG*M%h(>J? z$(?Y%6*RX@Hy2VEsI?i~!27vv=_`gupo`oR-C9sdUsGNKp@^BLf=WtLokC`{(lLGu zsH)R=NcdlL3ocCTlL!h+XyAg<^`^AsJv)<7kM6yK`C*318;gQ!i*&W3Vg%SN0Go@) zGq{bSVSj-uWFCSRI5NcmUb2vrEM_6Y8OYh$$61)iSy)G#arCi`VGOiMFJhmS`g80) zmS8mCH4QRIeK_M&@8p#6wDPuKxq~Xz2oUqYYT$|kLZrEJvw7l*o$rtJrt%bt^FEeL%vxS9(Pit}Yg9emAhmTEGtBL2{f)bx(iDtA%eDHxx2;LT|)=9h~I#% zA;(>*9>d?qHRlbQImIFv!(7Z|ipffoG46+ZavYQ?IaLwQL{GL-j#q_X4hlgtz$eSh zBcIGivAF(;&&hK2EXDJ}Iy+O8f&h`}9^legfr)F?_^xnWY@kB@rCuhoIy6@Ezzc9D zm{Rj38THlCC<;8h}}MI=WLL+*OBOGrEuHIh?HU_gC5E zn~yHEA0n^HP8`fqE}G5a7Q(fE)#2ELPQ+8KT-bqQq8pc!t8ARPGol->W)$1ei;#Wy z;*ne=kGdywX>tNrU4N2Afnd8|BMG)6zWb`fu?09Lx_j~vf5nLAk;cY+Qvia+$S!?A`JzT|f)5AvvpE(4{=}svGnr(y9IFJ;@Xv z&$x=RJ(+ZW9J)AH9jC@l(VqC`tFHHmSN1B!Yv8V{v%h*WS0`S5-B%}GiK`W_t90J? zr>@R%?Ad*F;?e zxCUrvUv)UP%l%n*V0TY!Fqg*Ar*NZ&iriI)>;ke?uw|i5UM!cF%l=h|WG#@~mG0-e z2sGX*eJTyKs&MoV4)J*!N|mqBt`I&W0-5E~}y5{hmBHA<=C zhU94|IjrUvYEx35^l?6aSE_69w*vYJl1EihWc`4ksjLF+lJyy2R))ksWqGQ)2nc*a zvti^_QJ9pA@;+!Se6PSPCsCvijbf(4+~Eh6|Ph@PRlgTLl1XK51)s=rRmg9pl6$? zymK4v0jNttP&%_lceqnkI^3y>KK{g|@~BijU0Ag|T2NK`->F(wiK=ClQuV3As%4c0 zRb@Ebs^zR&E>*{is+Jd2mCpcS`NFCd zZ#PwGFwGv8u{#gl5Oksp*C+TXm4A(uot0y<3u?8J=1rO_wxAWJ2stUu7tu`8ukKS1gWB(|O)9$Orimry` z;(_SVoS!nbFoHEQZ2X<22_ssiV6aL zMl0x0xfoh5bz((DkuI&AYoMQ_jY+g|a+6BzWu9kX(pr>~r>QhdrC`&X3)7wp)3(zZ zHlA6AQhyIav@PmWP_Y8i_=M99e8K`ul&<&**BkhR^9_8${RTeafCHbfI(|ewg)i{K zflqkiz-PUD&XZ4_-XP!M9|O5CmB(k3d^XGH0{L7hpDps)DxZtwbFqB3$>$RJY=^P^ zQmUq7@BXH-p%bu}0u!TJ`A>dhbvIyf|C7D{_NyH7#5~lLDPO>;jvvq#q!m%TsrEb! z$Rq)NAzoepMJM@z=J4PCJ1A*#a46GPIF>Z;83cut77d-<%`|sB%z4dHmkXa(;U?M zypGe&RqN(%cbk)hqUM%Z&DA)~MT(n?6gDRbR&xU~6yiU@3`MQeT#emaqYPvXn|r0= zdlfEvl47-o4GQhhEQlM9ie4(e`EJ^sFjb7$O==TTX^|nyiL^3NZKwtR3;0Gx;z{m- z4kH1hWKqM)h~uj*pE@ZzAt z@B{>$q~$ida9cp(a(Eqb3NNt>F9|A)0dWe`#fIB8?Lmbbbz!TY8_>_qYH|ho8Rs~< zfhO?yrx^+EU@XvuR!Sjy#`)JOnnc4BhBk>tc{9?OSuIS}ZE=2>wrDx+6cfwo+r46( zU#6JYEK9q(1sSqn>l2D(Z<14?ybs)QV9GY#;Rrj}=>Ukq={RXkg%QgAF%u6lOC zDsq5^m9WReX#zhcQU*p=d~?18nneM@!9u`Nk^K}#a7UXi(N^sl+wO7G$ zQWJV4-n}9=l3H7lMSBT zmUxz#5BFuRpBLn?X zO&=b{Uj(j?;3j#ixP9sN#0L9{odo*(TnhWG=T;zzecpf3n@LOhZwqeK= zdp!}iU?k#x7>W3+hHCFE*ChTcM1lB{%s4t2$JTb3 zc;sM|!Q=qywP+ z;E~4F=gBEG8&4ecx|L$WQuoStalV>bsjATiY$^0PO8+0V;-TxEEGwRRz?aoVt+F8J zhH4OKDhd7qsxzo%x3vCJ>r~UkHZQmW@bs&LSqZCQO@56g|9Xdf`c@M1!Fc+~ulLAb z#nKBDTddbDRE_YvctQ^RCS{1ZB&ujTnujP5V+SRTMpB21Mcf< zu-(Bama}8}?fPfg-as81ay=ESqOBCXe_=bpsR)bRd*L{QrsuT5g0ChX=lMW;Jns#R;vyY<9lf2$smIL`|tp#YvlslWz1Jp`>YCtPg@f zWvc*_VtTCf4h;AKOXeJ0sc{6&9-|Ot^pE%t)N1$-v{?8Llt$#Axcmc^2r05#|4MH5 z#0R(pi3gOyfqc4$R>rPzj^%|7&PQ;JwsY}nn;~t7-iYCb5;*P9b2=Tf{Tz%oPaVq- zJv4NDctjg(8)gqh;1~q9My|b3g)x7dN2d_3$#|ur4T-k;H;lzbPA{e4u2K6n!7Oa7 zuQ(6n`CBg7^dCZ5;0O^C<`P*KAx)x#68pF1qlB9p{E%?|gUzf~5CivtAB-opXA3=O z0Y)u_`0naWz~vk!WfBVKO7-t}O&(DH9;ZD{b!?82$@%(ZhqpNTCWN>JM`r|wWdvM* z1SeYro~^{cmg`jx;+Dz9ZY>C0aMnd|*4+&cWiXwGIaUxuKvB$GC6=Lt?Qkf9Q*#bJ zBQmuDMQl&1!qoiZHjIs!9pYY7ngRRYvPuKE77RJKmZ)YYmSf<+PVgQ<39~+9D{-E$ z5_SRx?6N_QO)I(qc|_G@@rZ8G#s2NIn$s zmVzAZ%9IBjQl@9t8kq6Ri`Br$snaLmLF>qyMhM>RIIf2J^+J|2kq@18iAD4r3mg z=fN`~ReMq0qt9MmIsXFn##M$1t>!SMVJ$o3Wz!_8!)0lig6Lx_i{NZ;B?pA01byeh zcWWE2Pa+|x!km@+e%XFz%WB=q#@X|xodgMo4=n*|rS}l!WrFq^jLg{7^~%EF(ckA8-aNl^*;)6WW{+ zmU;0UyKLf{#zt5SC9h>uy5n`Vl}v!=37L$rJH~W+4z)}jeeBW*bcJ+*H~D0&I)Eo9 zy>_~=7Qf(tftM(eeoAA{;}XRgNm&;dBJOj#Z$QH;_-@tCQI@Hxb#jIyHO{lx>KZcX zUm}*$H3Z2HGF|hJ%z&J0Y>FA+%@?YR%hcq0GkEJr8Dbh^8lgE&NE6)YvVHO*_2RU51&QT4p-d7` z*eS9y*(q{v0e9hOX$Hcy_!NrZRYC^y91D=s@)gi4M_vI%T*dxF zcrb1Zt=xW58V)p~Fo~vwg}>mz6K)XyR8P5a^(IP5jOYZ+6&gnicQFyui!DGxf-9H! z>sbi@T?U(nSOT7G{3R$uYXn_o)ktSq-EEJFRy0{@}_Ck{`@53?di&-w`EOWkvZLw#i{fTmK66STq(w}(PC~%aGcWt zYZV?63^L+U=Kx$GdsB-Z{2rDrDpxz;x`ED&}Luqi2SWZmkx?;OAI_C~JBdUPWtF^gdX6!^iA_ z3;2l|_dz0*hP)`V??C%}++1z|SQ)$rh$$b>WWBkkJlz3`FLnC=b(ZWVR05MqNKIGt zI+~t2>_>jHi##Su^^Xo&z2dQiIZOwMv{~`+CT&){yIk3)>)gv2UnJ3$=-3;9klnAk z8=RRW-SJCoc>(MG)2vjp68$M*-oSbI*wk7jXU2OvQN5nkb=%^t6)<;13I8U*ho=bB z{ZSV~=G`oL7~*-nA#!+dlh@;q9e{ko8s7@z8HtAx9tPjIR9-dlH|UnLgf7lR+rZql zx$@Gn$y-ogeA_c)Z1Pt8#I8mD(Ap?k)SZqb5cP;*Iz&c*@B)tH96-{6bcfr*vmyg@PrSj(OaX3^-oH#z3ec;5ya6Wzb z6#Q3jy^|a2H|kLfj?qM#?SoUkVE?a7V>iKZO3_~)z&7HK{^mD7S$7@}bg1J?WC)0hKu6IeE5%N{k%o9tbAE1@GW({RS^HwYmUifA7`b>htNgT2SxW%A~x z&{2>Hr8$CLJQa=O6%%E(7;u4z_I?}5&hEO+p&(W?iLU1gFNE%3&wo3T$4-tu;;e_I z?0U^xEbwG!O9ldE8F2xpde-T>7=3CgW!C} zbOIo2DXcBTzXtf%s9h(HjU`B{!Fis=ACxwiv z1JFU#{#W<=b|2oi72sXI7aKuQP>7Adh(ND(`l z5K<;yBPsvOBBi?oQbKUBNa-$x6tM^iA?5cMy|z*LUDh+B5-)+25F9L0;-!!xwhbYq zJid5#QdS2rh}gw$!ryJ&$==2KhNMIZB!%E&k(4NnBv?U(kd$qkoun|H7fKo~Dan#Z z3B+l@K*rx&Wb7<~ zj1c%189RMsgfP8`c@aN4bow-&0LZNAV}9P!&|#SM7FEM~W+-;qG=$u03xNyr<^yaN zuY{UwrvQ_TW3R~0DhURnPNv)iF#LB{*u940EWjagBoaz8TP-j?D2{w48w7}S-WTJ ztlrU)W4fa>ks(l=&e~SUMJ@#wxm0CF4jws$P#`wexfA_EM~>@WJFz^p*OrAb#1FEL z>9zh6du9v&Uwf@<9&4I&trhCs&>xbg>TF4Z0T9IDMJ#x~l$IUB3 zJIlL12e92;tY_9^njPlcAVQ{CG5A>qKSY#~K6=nzYa(kakA~teqKu#=f@o0gVE2|d z*afgX*_38cQt+GbXA`<`o77GMxQs$5+1s%r}imtZ?u;%-MpeJS+(>NTPBvz?pK?DYI1 zYnyF}dqpXmdHC2C%v918a&#AtuaI(hRVXQPbk9!8Fl!r9cvzG|N+BBd`1lqbN$Dy) zEgCR9@M3#{UfoZR4jnsbB!*qrhSD*gLt><#<#UOA*0CLme8g?@tkO>(5;hgwI{?TM z`AF0)dzQ@y8IZjm9T_?`c>Ks4&y4gY^f@;fPDi6f2OP@d_?KsfU@7j)4joiG#a16G z#r5OhBg4N3ayUfm(x#&YbhIGY=jf4RPzLFKM7DAci>Brq*M*KsE2%M$Ch&OgP=kMG zdo*Et935)T&PG)bMh`^N_ya?yPWPNTag3qgG-W@x zI+U^{q%7!&dOz!!)iO}xY6(Mv#1s({x|xxXd()>5j+|l`01$$=EobHAuMed}HnSi~ z?qeN8$=$Dtk^n4%C^3hNe%W&#=ESu7#Ich@qj`BO&?E6f;=&k+5@`|dc}^vHmNVx@ zhDbWxOo%+RsCj3?2!dq2Gw!19ESxg)FlFFb{KUaW5+e`w9zS$KBlq;0(9UfLn`SxFc==HzSB2`i4%A4xT)S=)0PPw{?V)&=N+% zn_0)qk6elKBLKcjO{p_Id3N~dnS&#sB6eo<#F68}sgbjz4?!70&bnP|Ln#TJ=?T^` zgE3gbV1#1ePNG5IV1(>F1!ADy<3iU#O~;CL!09Gy#yd~om&%ufJjE`Nr&z73fVU>9 zDzvi|^8mC5l*x7)vNXcb;Q;9=w&yiaW%|lcb@4|+)p?7my|0cc7afnPy*{c!77jZH zA=G(D8$pH$plzJSQH&@;ONr6iXij zV4#v=8iC%T(NThw4hsv1$K<`>!L}AXiB|AQRCIvubM$Ng5uuf%om8vxDFbK?(Z_5x z9`5HW^}~Ll<_U28N8;#HD}lBf*hWjOL=uYCO4zRG&&oSK>)>w_1=@?d&?b&so`?Ho zbhSnSL{W$f%zEo}<^jp9gkBD;3ZcTR2Yf=EZAj&5 z)TK3HtJG5fz3v87M=|!wkW?4#1g8N5w~)_8#UWNSaPQY}BQ9Lg_q!gc(DxGy6htx} zS5L4CRV=B>>UeSa7!zInUn;_B)J1pf&zLF7g!Lj2{S*FnOj${wUmI+r%tS{U?4Ubm z5zW)m?{n9u^W{IG@ONt=jQG&-10x4x!^70Sasc38!dUBW%G>N}qr>^$<0sEZU^2T3 zYgc195n~xP9`l@QS;nr5aD4Y4IllQM!tp^yf9S|z-eXK7sLN5kR)I(AaAQXw962;} z=IH3@wO)%m?G|U(UZTp9r@pk+r@rLti&<5L&=Mj4qs3_f{vDq=&cATzMh;Fanr1$DYOh$U>42cDj~WzU+?y&uiETt z8DmqPQiiWuunL4XOfUi7MYkBh!)!OwYKHSaOc zS8etev@tx3IV;>(&3=_Be&rd%n^a&mM`~$T_ntY%rus{$Ca)TrE`Dk{D+3K;WeZkejC7XHx zUKd<#c2VNkR6e-c?6SJCsr!Sg%`O=mn;Mv{T9_DWZ0hddYO@Q6#w^iLk9`JYMus7< z@|X#4BI}+!0BBl^89Xs{@SWqxxBO<8@Qh7)@*Q8b*(EAtQ@LPLXBT0NO?d(gAGCsP z(-Bz+#ay+XgkZL6&L!Nf=3T*ysuf(i-M%HXAMJvG6v^-8lor^ zS35XoHCR0tR~wnL8my#?s~wuN8tkZxs~w)R8jP`vt35DxwV*CJGG{gTnJRj z4SaF62iY?hTIdyV%J68Oie88@Rp)yJ6Z50mxl28}ER%Fb%9}>pYVUac=;hdp-{? z#=aW{KEamVY>v&MNz3)YaRsZ8cmfWN?C6S+O}c5~2q6nYySN?O5N?s;5@?f-5D;Y! zZeQX00P-8UJMf2m!PPh}VRf9qKd|JC2L!O87lnLpYG68Sx>eEO32^up3j20EEa^k(B}1OSieGKg?W7Y+P@ z_&zbXQy|Xt%K*o^gA6MVZW6|H@MF8nYq_sC1$Rw-G5C(9XD7JfLA#kO{$)}Y1^cvh zT@tO(Ne^R1;omgdLT;K(_Qz6)T8a>dNELhsGvfS-<+Lw{KDeRK&H?Dead&cGfDZ=< zbr9~$bopZZ=t*&EOGepR)veLgj5A}GR9e*jft_F zW#E|6G%KDykW!<7L!M*4lr#Y&%sli-f=RJd0-fKFi5TF(0Z+@j;FW`3M0O6wb|wo# z-ND;|8~HB43AN>+I6P2Acw7kP$o;S=xCL|M3K*Cpx4gg{xyS|P2-6XgBi&gLUPCYl zbP&%Rxl|Rk#{Mk`SXvw(v^X4RU_i8hD3h~?`I{|-0?-%3ntY@*3jwl~dKguZpoC59c) z3NMU3*4x1f!{!zRigW$O1Uk7135Q0nG+-F{4;VoH<9B0Y9M|~0*?_@eNiZz63iB=_ zn}yF?%~^P-XjGqq8D|7$c62y2vk}f!9Cv4hhcdj}!hSu#Ux}iZi$yr?#a~2+G@u<8 ziIPPP_#N@kfMZY`Sd3Tw@Q1W()Y8A7f+rf|KWrJLe?aFWb>g+6%=p?6-(pnP&@Giw zik$<$Kt&<=KBsdN7%Er0LhQdsi>_RnMYV&pGPh{NEm}jjWsV4&UKzBH6zz+(to-Ns z0OJVlwMSJ+6wd~g^uk8RBKNWp$G%G_by^e?ZeWH){D;i>@SFUKOI#RjEJ-jJDU^i&NBI}i zyDx=fD$$puD@gNoGuWb3u6H0!)&ffuk!}Z5yR!&0sQphX^>NISdUy7Nyr-}LB9j%y zIgrdTn&5Jd;UTUQ*6ExaAQ%20Xb4%Muxh|EZ>WZSI{y_L^~X8+#P&hI6;>)Vc?fO1 z1)cORW`b~03lr}P+Fw2c+!wghu0Lzzmk>v{Md(bh3|!>=mF~U^oCcRW-4k`E)9}ZXf;ptS@+YeboF;kR$7DH( z86#f&VEhgq3s)0&;h^ zU0QLH1&wKAfk?w=+PH!%DT><}9CV4ZI^z>S(6|KiM!x-dz0=O(V#*6~Pi?JG^ISC) z-|_q#0tPoo-8ekAn;vE7h%TWZ*@|axIA3QJAmj?FE?sG+Qa|^W_1Ud+;^(^ZnR&$oa;Jp%piYeedyuBWL@LoHnMe zaXJ&aS$DR0x3>GbF$CjA`nUEb$sKH?7-3ElKSWECp(jZrgaGy=5&bmjZmrzK>ILF5 z(eG&EI-(W>PiTKHi;jvsv_riJkEfOnKnrWZZ4JlSaoAmB9{BO9?-A6*g24pItS>-G z$kGHg6%fRkA4F7vbX$m`E9qBH)VM{I<7_;TsPE1}Q~^pBQOyBFIZ7Q~r!{lO^=+gi zo_}(*(BB`N##CR0gX7$KdYupt-g?n`3h=c&pwTdvDS zoWS2WfILwHFVC(xLJI@DtFkA@;I&ECa?!P^Mej^ry2P+D5Zvjf}#};n!1a#C4rkE_G#R-UKKCm&RdFDfR@L8LRKjdd|PQ0Hd z+A#v(B$UKu%Lzhig?G9&Oti&xr~m+8E>N?rIFdXGdJo?vxawYurEPlNT=1S3-FXBaADe})8^5i z4ASUNhQiN?2>bMGGmK1wf`f5NsQ3>g9$?}4YqOphA)*!DVoLDkS#$|f>Lkvbl_6Y^ z=83S?3fl*+K>K*E0#jr&CqdpIwQt7iQfGj;Ehf`P-5+=-bo~T#H}67+Rg0VNRhT14 z*pGxV#L@sp7*uvRJ(Bzz=M3*p`hEh>;BaHMkaLJV-iD^fCL>tUqNh{EDMwD9g)!^2 z3Xh(HP^97<>|v2P=3pf^Ys^8%5#pjU$F;PeCUdYJa}Y5WAR4~#l0jMKA=B%0`Z<#> zbCK!wI{lALy39wWi;Mi`3!gCQGAEhN@CRuB{U%-JCDZAf3F(iRbeV@tr>i%l54q`> zv)6+0tAcMWbnHcNsM_;(tvJZj-|H`IGUf4--tscrY1Zv5ao{HVb@~FGUZy&onQrsy z3w^x0ndg+K?uunia8@Iw?=KLuXOl3ufSxBC|T#?MSqTU&h;qk zykhQko_H1OoH3nv)^u3woU2&Rdal~?rVCYNg6=$%%C(8qf7e9JH>q5KNR^dOH}~Fp zLh4s^*##z598NY}cv7dfm{htzMcH4_sf$c1qnRM}9Xhqmq*9p{sSoN@bmYsu&T6OU zV=Q-uA1Ox^m?vvrT2IYO_xJgBUGgPJ&7Fb>(o*?k9UNv>)botv;4C$e7^4P|LRS9r z|Mbe|Ne3a`tJ?s~@ff}jumGfo;oAWVK(5FF!Mg$rK;p;(!E$#Nz+*8B1dHEU00%S+ z1WVxs#BL2DP_Qm7By|gc@lM%x@Rq`=2~8gk3BHaL>^VyPGgfXikW=s^BwLDD1wLAq zz%GbW=Pz(?5Y`drbZM;P=bY_?LX2?6fu4R{#z6=vEF3AxsA=xwXQHB&|p6h|2(8W+%tU4g$P1QWG*P+ zVFMeSO@|^4@(7yCeNwnwaF*3&I-|j`x;kUNy6~?e(&4F(8koL10}-8`Ga1dyz_isF z3)F?DO~yiIV7lsz7IopHCZm-Zn5H^ok-G3+ld)Ku+PzO_w5baxO~w+bk?hwQ?drl_ zli?1-%WL6P5?%T%owGxtyA)dq-0})}OF^DVY@g3aRMG{@*e2$yZgaVI)+o$1?;|?K zN4XN!@{i*@Km>um*7HTbx>qYL2 zF|7GFmpuh;*ymUu{>vkii~Mq8dR?Zh)pfS-x!0!y{fMY+EJwW+M#dh2H|_|W)kol> zJ_4uo5va#U;Cem+-|`XoE-%1$4H9Pe(%*p+?brn}y#stW@1j;^_L0+YEuvk^N1*jT zr%(QMDAI@>qaRWc2-#x@qqQd)bPtS7tw+%sDcT?FO$C?PfHHI4C?ivyDAl0$YSg>3 z4~!f=8ky=cCkDLbmUd#abF?Upmnebf5FzWt=#fK@JTy%uoqJcxrI3EnvG-8EmP2<) zgn*6s$+w>l{2ZI28)W|KlwX_ii?`P`_=Q7=_e#bUkS6$pzQkb?VH~jEh+lBPPUEN5 z_)4LN*h^?|BK$`N-c#7*btoY=DLIge!Z=bMFfT`AlQ*GB9xE4bpz~ndS#PBrmc*@M zSrC^zJv?-B1jO-ZyVjRD(ZRXxif+1f%NBM*Yt)4dG5a!pWVrC2+)?v5B^|=|Bn`oqv7Gj}sY}re zkfrXVg_{vUng(cQXtIPgTS#Fq)~p63%aM5MAQ(+nc#i+6rNVkS<7zgI$0w|@HEL>y zqWe=F1LX@eb%U>Y7EWPaUQW_vD|+JoH^8^j)@bi>7(*X97#*eyude6-OukQ#Y=|Bn zIX;31xsm9R(dffRMjt@JXdb>u;VfYE$nnFcJJ#yn6Flj}5_^j5G-FeD;unt&eX)(u zOFdTl*p#@s1e*NDK3d5{7DhibsgH15WFmJ&?seyUVLU_%ill%r9=xq0Y^N2*;|~kk zal&{AP^LYg?=y{ zyN$_Y`E|rCEk-05{=t0Eq=Wm0nI`*NhKfEEkz>McavxlGsp8<>W0MIdjXO?~mt!lf zpqynJh{8Rxh0!*UZ5-mI16ylt^zsVqbm0bg)OMHUwL*1_h;!m74P5sgIeIjD=JZH3 zq0Q-{_l-^M6bJ{ZwP78hB>hkdEJCceFb!q3qCuI465a@Ovr|LI93#J?M#@WQq#r>f zBl4St(}9iD&5bOrp9)befHJ!k2zQA&hj?r%UIe9JfM>Vbp?dn9P%x2bfK<@&1#oB* z>AGvT2A5yiXSnH?Fkxx?H9MTy&57c;@st9Gc388+nce;>_{Egu6EikT!Z8^$|_KOr`xzQF#G4!u8HL6R!ho#8(()I}_ z0TttZg=th1!-UwbAD*7_ie*qt;`)4hT+T?cCtjHN z_MOuZr#W1aPJJHr5hR=OesHwCF!2JrvP)uHGnQ^Os_1A;1YJ(Gq?2s^H8jKX60TDm zz7Cf_hoc5Wk57eo2fvdSsg4DVzbqo%p6B}n-e zL_=Ncx)8HsyDVpZ%hJPya5>PzT14hYM;1f7+t>zu8%Y~DXd&Y+!|ffvpVlmyFp+O$ zF~nUf0L3mW0^~3a1(!%Y!+r@3jjKhxj53HT09HM~>lE)o5xSS(&3R0wA*Wucy0hsr zVkMtA3oVY#1E&s0dEpxbSvryp3hj{}5~5?Tkh`{eyz2E6An>fdkLoKexW@#bVeoNu z2hGy+OC>Zr>MW`yr=rJFY7~ zeCROdSResJ6D^W}eX1CLLy{0v8Ub;efVkcRevXbpMj$4?7t#z*?eIR|ul>GX2jo|3 zu)jN*iA=rD_bc!F^?K`AeaHq}Y;kB;iuImZOz1#@V@MwXV>G!!#YF*d@!Qno^%HK?wm0!%ZV798E2frE<~ zb`=e$!h$njt@AM(a#gmAX()|^Vi&aF=;jO@Yyi-t)D2Wxa3Y{bxYlWgV72o#fExCh zl(1UX4R}4}c0iTYa)VlD8`WBL>QcJ>`E1`RXF<`$JSZC+{HiS|3)Q;h*}?!f)JQh8 z=&~AC3t<(Nwjk=l9z;kdbdN+Vh>h4Rd`=}LaHm~PLu=yD_)1!kbc5d5xcJsskXj5R zyxdtH#xuT~xze$T?M5*n+3adhi(1QVxYi z3tp{S=Qw$xuV7yZ4W^D@Oc|?n-H6xvCZ}$b)p{GK2@c6Kjfi&!n699KEfJamt5~pg zjR4rqe%QedWwu(dbp;D{a1{%-t`PuxfgiRgL3pb0j=sJHTUW4P2UoFR>ly*D7y4m~ ze#NY?bp;D{a1{%-t`Pvc#SdFlH)e&cD_F3Dt5~pgjR4rKe%PXzF)M6c!GaxJ#e%JC z1i)TY2)oBNeFzwDUBL%CsEP$!*9d^U*biH@VP>UUSFm6QSFvF08Ue7|{IG+42H9&& zSFm6QSFvF08Ue7E_+bY-9+Y#XzsJHjAaRLU%ls*wA&2aOh4Q3%agipjTS#+A<3|82bY6M%H~p z7t}zTdGz~>TCj9U0}D*Idx==?hgIMb$%3T|y0DJt{Y5QUx}-Oz?g*{0Ut=>VA56vHgANwHw+!UZt>#Vwe+v z?eq(4#O1tnNw-&J3fW~XXu7C@1~Dkit28%ttp#lv8RXF5G1D`*_$z6^%QcG}R?Wge zgYqbL*~05A9B|R|;UG^`)aM}+*7qkE%-vXes0|2ZI1#sw;j{;rL0)TuAfX)s8ur3t9 z(ffS>bU_OM@+|;5I{?7?Pyok{`vB;I769a10CaW$fDNGl4*Dt31uX!`w*ctu005og z0Q`fj3)%pDgRHXy0Ca@{IP{>ei*!K?0P-ygbanuM8$tmb8}R|q1uX!`w*csD4}iNr zZ?phle=c-uYVFUuq=tY~Zx}w!eQ}O0Xu7C@CXX2Jg1;%P5Yj<;K7_gB>L2J291&93B22b&~56$T%9-+GqL z|B1Ocx<)%u=m9w;%cbO>=jD~^K1G$2>Q8e^3}{UpEp*Z~J)D8f)|!5I+N9r|Hr`T7 z+wvSX%C;d9)NL0b$-bEb#R|S-eXC>?H)<3&m4sp?+ulmo_K=4NieY^zM}sB;DDQ_3 zpZp`8YY~wM>*y*%`VJv!m)nJ-MeoG#VK(1dII4JWimo$CHlHaCL%yK#T~8*(Yr?Xc zSpE{{-c8gJDxOqfZjbL|9cl*&>aKRsQ6|sbwXX_s(GryP0dEnaT1O!(UTZ+{>lEK1 z4BBQPBKbZpjs5BgJki3eT|YEFCg^h2if-FN;Lf)b6gXlwaQA?X?XToz=u1% zO+bBf0!FD&qSNn0l>%44h7GHUA291(vag^mc=wQI(YJ5qdln>XvRxq2>IOv*7}`>My_!6T z&8SLkd0r@Xm35^bx7O*q2tK$Q7HZmj~;nw#81vTiyW$*twbdR=$JZ$ zMntz4-w$(h|9%(X=$G#_H*3!9?=ejj&=^Dzv%z|*t{`4k9@^tX(VYmW45gz z%lcV*BPxxnUu9MCU9*x?hmiI&iSOgoPo~DQ_neQ>b<4^Y`FKEC)0HSI!z2*upf>qR zWh6qxmI-niiQg9_KC=xFPjHX7VEKol#BqXs@OhYu@OhWh?%QQAK|!ZX-C=&gjtvC< z)JA~QI<33d-KY6mJgak9kKhr0<6MvMZ&22wJN+Ap%D{WskfZs0#Eb%+bZ8C5o)#Oo z7ks$AP^NLa;TAN(eY6FgPpqMmfWvrf>OuaFBYEQaiErvJ&yh~}oyo`g`kr8Ti!Ru# zpxgD#>E+DfF~4FHnygn*=%PHRj9RGH{}hKk8{6lx9crlj1xqf&ilT#N)NVWvOKN!N zWTzd}tzZ`!n>=Pn(_{Dua>muynNLOKv8m$JglR&3ux@>eTO0 zg%Y@kYPeRgqz8Iwqyf2_P(fBt7pnZWvkSC3M+^1nF<LxTseo#;yn>@u%D`R4pql_}jg@b4*txz(7eoa?b zweC7?K#INZGyt(*xhqREZRl-M+bQHuo&cRYfY$oP$g&1QCXM=J3AZTl6AJpFL?}M}KgDNKe zZ|;LnqMy;*gjCQ6U*iab^?_7)b$!rYILmnW_7U(}&%UBbZH*4QQ9iU$1>7)T^jA51 zxGaeuL9f6I0Tx2=%=jaqHLesFUqP?@0}&4E6{%3rD|!lWAoPFSIcSLzgJc16YMaP*cMs+)6@BF&njoiHxV!N@6 zZ&Fil=E^bOu*P;oJE8m40a50T+}Y8!(N364@Eq4G=R0U*Tpc4S(m$Sh`$DE&Bk0XT zBi>LF(MOfR%~G7y4Q{%X4L*v`687!;SqUpuDETd?4RHu`_MO{%*aJ=OMQqt}}iHhBu#t$nWUB{*lr zAp%o{R?!Jm&2{x4V>=ttTsb48VyxJEKax#QclU<@0M{sjDVX2SFfD9;ONGGs?Z&L) z?kWZa#Q3c^WZLBqTc_TnImbn}Rct`8*IRvn@oD8AD}5l7D{LaYEnp&P&yLHy6%@AD z3WpcGf*f{HGt(g}s9~!NbBQYmt7ivRQQ-<&g+^e0MrN~M1r0JSjPURkbXppGhPchm z`FxDU0#}eU@Y+`p0-*h8R?zjN-C~vISV3p)+2dP5Z@V20{qI~sV*oI&R=MNn@eYb< zVJk=~{76@juMd1HNG4ab(CJ|y%O*6mDtS^-To3k;VY40iG%(U@AQ@EW{G$EOT5ch zqMs$6@RxYZSK=T`i2r;K(|7wyh#}X%_}h37O2{2kdd8{gxNBX8yrqbwMa65~jn|?B z$JN*FK*DR`@88Y-zn(_}H&UCwZ=+2Mlep!Qz30aG>RJ5nl?H$uJ^>61cgGvL+(j@Y z4$}6Hws82{jlT^3y79LMe*^ft3x9q1yBB}`_{-t%?33r|CIhxv(h5Htc~g^a67C7! z-CzvNUi0tZkAnwt)zaVV91qgzUu9{^)Tm=mmzSFHI+f6@VGaYq!*IOYWti=2x~9<7e6-(}l#@AW^+V%}aa zE7H5=N+bG~i_PPCbIXMwUf=QoJoGL=QTr=gL(wMNuQ$l$}=}C#>@c z*4YbJoB;7t2Gma}cqH)53$`LS3H$4(u?CvdfoMnao@8{-$SDbx3U{Z*YJ;(dY@2f% z-6jqDdZNs`x-mG%0`%WLwsDvWFkHv9coBxJ2xH>1|9P>IHvvuB97`%cHY6VVCehsm zLX8uE0$?8?FotXKcSn=YIMu*Gz*KFqRSZXhxAOYl2KN_$D3|y}pq|iOY1MZKjFO2L z<5NGw>pzdezhfe%&Zejg7qOO|2~N7k6^!`EcYIN@#Pv&j7g7Qz_NNob(J@B##J-IQ zzKNY@%Bz~#Z(kq^vSqA$=&Vub^_i#JXH)E(moFd#NCaK@HKFT*1oh%c8*=@Jm!a% z*l3ww4O|S?@@^&Vx>&p)SZJu95vadIsIoPm^TJ=3h)3-1*`hjq}D9`k1k=)rp z*oQD{DmcGB2taPTTF8`PyEi(wyPxBkcTIJu(UsRYBXP3Rex4Iq&zDsaXNoi|^bvb>H5hQ^(k3^Dugm^t#L)CWziQqx$5~K3#bDP(=?%hfe6Ka{?}P zzdh6*yS zi|LY<(UKTHAf8SLE{@}?>_9Tkd=`aMV|v_AX5k6T38aL0E(LL(5dR~dPxmDdfrk;N zdiMF8CgVq305A%Z`-82*GjeJ`94pgDG9w@KXA!Ij7&*S{7<4L~Vsp9$0@(l|Vz@^m!r~@55wB^z})Y zrdTST?AzO$+oe&5KQ;Jg!W3cHq&(nk$va;C^8LM83BZ&c*u;1(3@g=}Lj0571Oj29 zE0b{R#Edp%;3X-&H<@r^DFGmJ;5af5cQk{2aCWv%6CLnCo z0<>7TbPEIH1ctvUik1@+4=2PGZeSpzfUrw+RR@QdcqO-^jomevm3frk!d_ut^>j-Z zGW3=+wU+y3stGt@9P7uo6&;8<)u~5!qdcJ(kSe zRH?`otp>`L3W62DEQ_E@aGIv47b9AEyA~J0QY7^E%S31_uz3FKGec+BaA*ej7-@ z%}j3s^VMENdZT~+d{5tCc2}cHq$NeDLb4Bp5g*S(dwTfT);#W_a9J1I!+jDh>siTZ zj39I|YjjX}k?bAP7Yr@uhMr?-gc!`HdmK#Jv}t3|aSVyg5~*~z8tiv^5pwRa#yoHN zqYm~j%eI0Y%Q8o7jNEh2ZY|iAtab#8y)dwj7=IMyz(06Cn;y(yTaWc1)*^xiVLEpA z_VwoW<-w=OVr55Qd}D~whad@LdYtZ&??^Mb=pG&*((&wN7KFsy)*R+k z<3?@;>1tJjsesA4P)`_VdgxgbQCLq|gz0N?{0L@uB{6w3gDC{^)2FIg5fX#Y>x8(R zt$i5S?tP3=Cx;_;3|%M7*nT{C%}-LJR0CX|Y2W%z@URFR6**4y=^1zCG&})BkW>Sg zkF}m_NEn&>{Z1mEz9%Q=du6IvrV$qZuJj__&wx|vKrbdV2vNlKcg_jje z0NF_IvyL1SKbBD<2ptl0Mg0z17+0I=OIC~hmTTpfGF!Q&%qX`svzUne%3S3Zk{nPuv&3$Mi2)KMXAC2y^} zL`M580XCb0C=GQKQPFDU48w0nKUs`C{7KTK*RZ3|S`u}I0I=&&dIKeFpsfxH zVTZ;huU8a!@0t5K>nThvLL3S$0f=iE1{|AUf*`W1kzv%k3N0&{R`4jL zqdfqaR4|WHaPd4z-+vTzGNcq#6GTmc{zpY3XI?Ts$_6`03=s$6y%>Rkjrd6NBg>C_ zHjYiMW%vC$3!83UXS$hF-|Bf0p*67ZH(1z(>8eINhACj=#Z4e`f~DLrc-8dsSZ|^l zH){XN_=gu~+?UrE+?Rcq)xzs;(CrqN>A2aSy}P!)Z1UpCs~!&%xfPO$lk=PGAivnx zRdf^b^;OWiojMmeeaQ>Gj|DLFB{5JT9Ein-xpxNdN^%{J7Q+OQxf8xH3$_v*3wR~Q zsdJ9l;)B=6v3bHk5GFS*hPt({N0o{ai%_1cB#zC;hZ$C{h*?A5>yxs{L>2Y!iVHoq z&`VV6=+%3c-pV=u>dw*|S>?arEDg|k`2XEmN;?o9ncUp5(nRU^8&D2kx2^lkk)sC( zPMvte4!q*5+jfKZd*VFeRnpZ^6l$bAgLrIq$Vv34I`ZeZ+Esxur0oMd+jb!~ZihLJ za2D|mzK+>2#nmU3RxzEYkO{BMQhW^_o7SwIIB%V=E3hT6h6X+kWhkW1)4Km?z&fW^ z!n2t%qDT;e|D3O(&NxoN?}JilVWN?ee)r_Bz)s9JzsKY;#XhZniH((fT9XklX9l$B zq*3Z&6`s~NaGFzfge-v9J=Rfu?OaDS`GSI@`nr&#`e~j-vmMn1SnH$u^{6$jKFhl1 zMb^Bgxgj*q!kyn38 z8)?ap;FSJ#Tw2;pj2P?A$?Gq4WEe(nj_ax%iVWO=3nny7^s!o5>J{~ayfg8|^dflu zDwpT}xI!{D1ZcZ*v0P!_Gh65cbGDcqXpzGk_9WOJ%db3(*QjcE=d8sewwi)@7AR)_5kczV!0uq&APL!`)=rcIP7{hoym7YOdBkgX+hc9<8a`X4fp zYJqZdX^}7%u*dj>N~@wVNMp1-XMtXQZRRJV&f*HW9!fD-LSs5?1{Mm$J#ygC{>DVJ z5H1T-bP2E2d}YU^wOpJpMT^%m?J{0JT*+G02z+6@Ha5v3LDd-ek^CFuc_NUIvGM`U z)B{OS-m#3P3kxWz0kTlTVL7dHqSq;W6B^vt#16Z}If<@>Pq^6{gZj}JObnhpza0OrqTHcb z45zMDwJ+frY7E*-A7KbJwEZHFdd-de2f&Q0zh?r?o5vu_AOcnmlz$U>HHn{&y`@VN z@xrH^-e4w2m7Dj@YX>hT1fh4_{S;wzmRhVPq9n}xmhDW*eSDe3Gr zx7)%yE&%0o!6<7LhZQh0bSDrzc8yJ~!L+GGZ+FPFsg-%NR?+ZOr%- zW(G`yw=?}ePtYe#^95tT)v!>E3b9JfaRia3FZ9{JuqtEJNQg8F(VW%C+7i-23}=zS z))``9J^Kg!vW^=IM0x{v^*5cLhwSxKq`@zdd+uT=4)KF6^;sObC*N?EHzu~-#b(&1 zBPH8}Rjj3C{6;C+2F0KrA7e|R(~G^LmU7VAD5b&c7$_c_OeYMYArR(nrHvg#Ury`| z#}LzohJ4)mOtc2*pv>m`o_LzZ%=W`}WnA4I&zNHXwM`MA=4^I1glu;62!3d6k}-?) zzLG&TsOz?(GTlvMEu(9&O>t|RV3SL9-)!P?$5#BLL}6w|6E;>MdNYU?@$?G1htQUF z(wp2B*u}WHiVkM{a;qB74{J|gCr;%b8a|sJ%7a&-Vr9GZ3(;&nOlPcYKQ0xo^|RuI85`VRtmfgx z{aKG=@N)R$Ff<=vMk(Dl7n;XPLDL&nJYTZ=_CfaV4C}3S_aWw9X?Wc>Yxf;G71DjI z=5?Qk7amWE*Gm>&TWq|3u~fXazBasAEeJ0>!xFDg)uUS|)~LmSuFoH=U1Uyts}0I( zI^vS};GnC0y?o)#fw5e8e3 zW)8fDgYjauAiVG(PQ3on!s`wjuXi(}l>WMNR=kcK51ECm7K9hvMiQ@w8@&FC*?6sB zMk#nfg?EpsklEkZ#0VvF79JlfMgHrKI%!=2sk&xYl)jYgJM5h^1 zVujZ_itWg$^W>6<8atU5)KS8P2;YsGXIM&@1zLz}u0T#iSG@Z3EFtmFqy#uXePlY^ zMA&i1OZgBFJsx)=9`Lp9(Nd6?3#1da?7&t+d}um(5(=F+G=|VwL>11{*`|a>7^h(o z!cs8=;cPq@VK{FA!ut^3!VC zC<(&vClNt2si=o>w9Sn$4yGc6rD6!eJ(*yHw+g~fdkFKi5`?>%RuaNE^IjXmQZWSK zzV2Xz5wH(a;%SEN*sj@3o>LNS{3QsKgv)i-h@5M@I#7>~Y;Rc;jRoehvM9P=&u=Bs zC{2a4rFz=qTq_zBsTe|I&w!6c-x`i5(5YTMcdtTNP>}HWLLjc!Fb_f*FvKS*nV9(8 z19tHK;Q(S#(L>6IaDp2{Xr7NymzX<+m@O?XF+4qmm_H(cC5;Tu;JJyx30g#qR1875 zKNXB{w;=rI9>P3U1>rX`tt5nTIM0nRj@BZCrJ{$h+lvW7YMA#iJtcUi3R2ZfD+wu_ z%yT1!bF~O5spugkMjCQ8EC#!bGOvpZ8M+Xnb7*QMaiyehD`7^lav`8JH|li=x#YUv zSq>GD{{`W?{BOEr4ABfD3^>Rr%4iarLbV`R)UlQ<0m0XyNzt(RzSH8wbHd7^RN1A< zM$1#7t1a`(i%{`Ryo&Y+XDknl%&mZo_lSORb$;&h|6C104j)LFU5V1@`|XE|(!fKP z?=Ma+&m5k3x0WbS;mwgt-soBTv<8uc{5eTFw%8$Q=l>~^DC4BQ5pNnmnSxv`Lijo0 zhG)q(V0Z(ro)Udd1fH5L!Y5WIK5?Ys6X(Q}*z~0MThQcuHi?Fj#q0gch#AOlxeNCy zol0SZPThmlgh?g0u2ZqRFLaqy-XwJ@&d3XGCYAR%or;6#Lb>{3dHZ~EsBO(GAqvP$ zd~5E(c!i`s0^IqmZB35F7e0pXxlYasrP3L_PbWm4Z2#Jyr-mhDVaS`Dm zQZF~FGbaxsSTIyn4xbu1eHwA9V3`(_+-}U@#6YkO4~0-pT%@pXPwoLMaU+O5T%4fY zPY~|QjZqcAq92>uD|GDTjKRZ(C5zO~4bi|okTy^_DL%q@D(uq{3xCKq#Xpb#wewz- zUFG!2eLi7jIn1LW^<)XR`F&`f2?jL3a+Y%ym?R1`UG2ki%=!;=*7IqXZ(w|@-H#H& z<0yz@aUStM2zfW*?3z4)JTWcCIo8k7pu?}n*n%-F7ALsm)!xCx0MlY|dhn~v^qCgl zi-*d95oPnwvarZwInL0}Aw`WwL2@C^!xk;W2LYS|G`I(L?V>lmoXyTgj4;G&Sc^LaW9Q>5r9gF!8LQAOcp1(YXnYjvV?teRZu3K1#}XP1 z-V?J?vg8x6q{Esjl{MCRO!TX4LOm0ua?B9(7pibV=OJeP?WV;aEErR{EbaJUn-WjP za=A=zcNTVhsoq3yYG6=mJ1^U4&6tznRn}PT0i`rpecBf3S8iiw7w`)1d$D$v7rnP? znmx$tHZ5>^(t|J%0lbCO*|7C1sa+Xjm_>^ap+jE7dwVjlBTA?G_8CJg{*#Tvv?fL4 z1F?sL(Huc86Qdk$pJJ!Ob`*AO@)}L+IoFyl&;pD@B5&1fk+2f+&9q7aEExm9!oyU% z1&YZ!RRan#XfyUe#X6q1@Qs{U85+b$r@!}JF>ew)py|pU*ykA8XoDJ}WS)zSVWAiW z0+oCsoy?|ku!8D^i5mKTsY=0O307S93I(wB>CN$%fS~z{ghFy(p&gT%s5_7tDq5#- zK#g&Z#zAa~26JY9!LV^xEVWZ$=otu0LpBd4C&aoY*dmB^z}5uRVK4S%HnRXYoR9*2 z-J4rQLr5lc8d}gh2enNl>zPEy_|woMI`OPrvh&R|tAU?Cv;Q&LsJ-4s<7q<2dJ ziAfV!pg*}8v2@eAGhvLI%;5D8n$4zf^RD$9-kb8K7{}U853zmRf*uPho=+wB!f+>t z5etICX%kvCdG{b}KWD324X9MB4pI@rHUwj+EG)n=%GzYo3`PrbU~Ic9oxsL~`I~~j zhGc@)yqM?%b{b1&k^?AZr-s-^m81mbDtfaY{p(7$V^TszHE7&BU!kT`ps>@9LZZBr zH5(r^)44gYH(j-%K&5WWhD)ix#!WFIx<2N$7(Su-d;z}+WNWE4q7U<;Pr6;ggKpwt znVO_eAs&Tt%9kmqkQv4bURJ5>s2`o-`c+QO_c0L?Ui}h{`Y6vYirkaUZww=`GC6oKEV*4bFyorG$!Afgz-L(!f0poBOiga zXe!?O?bJ2b$j?+dIsh($xwKi2CSeRQn2TkQJ(!JUqOkkME}qIIbv7+=cV>_tkM(!= zrnAv~(O6%9ERHpYv~()E3-dVE--{ZtY&0A1zvh~mcd5&7budcV80C@);D9Y3rNPDs zMmQ^?1d>W16Nh=!H6j;`l2IP$lF^^cz-zqm;a8vv~Am(b=yGTJ;v^1>zW-q9REk#S8dyt%fwPyS`v5UcJ*cvc+uGlwTq;+ zJ9ey!W>1_sH9W!?RjfhB1DTE}4bOYXJ#|Erd-^(}QvLs9?@i$QJg++6SBoXDu^rp- z6370>S?nZ^*X*&~NPqoptI-xow&OIdP;5Cdku6uYOVR}jB)u%dI&1^OgufkU!?AiN;m2Ms+Yd)JfQw;8=4rOD4iRf94&#N9GyHpalV9agwoxmou&S> z<4=}OO-zOae?NBqCg=q+Y3&_0_h#SR+G()OO^KLNk;x?44&X8nv8&maO)%QcAP!qH zL?K3-y3g{8y^55(v*UigsWR*05~%=!*V3j$7sR^-p@54XPo8Kv#wVJ987_* z+7Xb)Sy*lS6y<_!JNmejZB^;$dtH>X#VMzKh~^W;4rz!Z_;!zG0v)|Z{_T-i+F_zQ z-5Z7GGVnd;&2;jjFl~1dV7pcGoQ7L&k4V&6E@VcxWk5?a!p01H9l5yHbYx4-8w(lZ zZxpuL+VwJ7JessJk2CFItDBOoxyt;F$Dgq`X=VPVPG$aeRvGQTDOZ`li9LI>$F3=k zh_7&k@3!lD#9_7qxRy4ki4Or`-P96(y6lcM@=u<#nfIPkzd}y?>A+Q!A2Zko+@G3+ znAD{06|oZ%`7YB=qC6Sn#HOO?Kh;cL6HR`Uj3i{6ywWqxAJ@yU9aV`*558H6+6!jk zVlrjDQ?F*0c zLGnQ5D^;LTeo@^rY0z#|Pqi7X4nu<;1lk1#xja5`9zRf}^A{%d&&jdz(`QZ-t)jFq z?Z1sOMp6gN3Dl{Hi)T;XgBN%lIXSoEn|qTDwF{5=90uErb0225`S|Lg`y+K|wz-KE zL;p7VT)iu9&V$;V%C1dq)?PLo&20~Nyk=?!^WrEgFiUS*xS#1@SuH9t-le12_golMWPL(K7^ZaEIYKy!Gc+&j$O8W6Y` zl&*fj@IB@9p)%C{&;wN|T!LWz%HZbZj)WR;{y_r2cKbhj^be#G+Q|AylD7k=T#|z1 znO&^=ZxzJyUC=j9A3h=PaiF~pF1`v?zX+nq+I5eJ^+4wmE6omGce@R?&HRw)H>tnk zwx?JzI>G)-Cs;f=WG5+g6DA?pCELNK(-KiWa{N#Fq&m@FnVf=eI6Hb~Y~;k~x$`^5 zo)}{Y1ZWl#R$Fum?*;xOfgy_kGYzBU&|hMH=wy?O))Zeeh15_bXgE%bbeT#fQT_iO)#3DIPxwR$Zm-tWO_w8W zH@EvIe8?qP7x<9;0p+HX8?*upl7|NYi>aYH6Ojlr8L;3QN;e&Ebxm2p0BOCux*$3w zX}TL1lv0WoC#wqvm`me=(nV457pe;e^hV=?Qdd#%)71q7ilT8rq&X`1{UUUc6J)74`6^VR9CJQT2qz58Pcl$MRipH?NG0(Y(5Yysjq)iT{s{Qstf14 z+BMgdNjFH{wsi6Z0}!CPZU@`vJl(!QYc4g1oY0db1R@hi2(Ct&UWa`0nldt}GIOf+ zi4FjyghAGr3a{icPht?Uw7MV!e|bo;ah=mKFodhH9OH{uucB<-?i40WN=IZ+UK7v$ST31<{*NkCnZbhVPnQp?mP@T!3lya3i*b9U+!|GE!yp^W(_>HfEF89ee=D2d^}Arj!<7pU zIjtOjZW1=fspe+J&o4_ln6+)=qoSebZ+Zk@r+v#m$0*Rmd&Nlou+ApQTl~sqqu@ta#Ks1; zQs)B3mA}dLunNn6&G#r5H&FiQkn>StXvhO^DARLBhG*`*98&3noxN$jP1I|gPu9s4#u2`lvubn0Bnzob6Q&v6trOhnXp4ZPhzodtt5KhEgCVdM6Rp0iM&}0 z-pqtn%9Yit!6tHDtxcr+(efL1lZ>C`6^n3k&k8-Tk$wf$yUZgCc3kgK6B@6~jw_T9 zDd5Ev4yzbR-mA*I9oHs}g0XqQjtlQqnH`tii@Cvt^7@CjIXf^LZpLuZG%B{F7_$10`Zi=RAyKbn9<)oU97#DW zc$jFeXrc)-lz`C$3Abbk+bv;xmT;>j+?plquml;K3Li%uJ1t>nmaxkb+y>Ng?6!p6 zS&luHuqR6p!4|zuE8S}e0^Q}IWvde!ymT9>1}&p;aC-Qgko}`U%XIPuXjzWVI?#*U zx5H(L@Jb|Tc)2@V*}Gn+aUC4lo#b^K8AE(mfe;5AnR2An-$C_C2u^P%ib7xD)p%Q48dp5*vZTzFRK~;4oxYvfs0aCJp`4M?~0_ z+*VczU^_o3SIAxs<+}HuC6wzjpj*yU*LaTqS^~Ic1wd89D;mOKcfiGU`|EEBy$T@yTm-D(2Ve+MeO$xY@Kj40v6OWsWfc>~7 zdFQjQUXdIc!)4EzGoxou_MARDb`@TH9v_=LJ2t*|5AHX}u{b$2KJm!t_|WOM7v4Tg zIQe&?4;j2L-aGNOvEH#W6O&Koi<{?`iE~f-o9EWGKimE+H~7@qFGRsE6sGzy*os8V z=0HV?Bh*Df>1ZBH0dS!*6qK`~6oVqYl;!4cuEJYj z@`>H+znYif%i!ha#icgliAp1vW^7KjNEJfvEDx7y{v)RpD>0{4N6u16H=#K)209_t zS*!f#nQlhnh$fNK4@p?CLV}CWl8Z#Sr;Cbe?%$+2PUzC4!O6No3eB>3zPft(_iV?yNAi^>F@05LCZpThr!{V-u|N%&}jXGn4k+q zSWrwLgj(j>0=)_TtmGS4kMZO+1zKJzs^3u>x_|&D zNHc37#z;Bk?-fysNnN5yrH(MgPlO;?WO}0n5^tv9A1j?l4rPMMtq{^d0DS=RBxgzU zI{XyR?h(J1B)`tC3y2O)s3SV&p8bMG&2@4=p#7`svbG7UU+9nF-T}m3##tGXLvEG? zA`<{@F>X}IhQelLvR|8_MUpv7xFY$DZA{>F@-wP4m0;$CCPuI&M>5=to&7V+xSQTcm}BW6{TFyaJR5m3U1^wVXk2A(CD~AZFO&0nx|Q= zwKKuzD=ja5;gW==+8C0d(qn%R{k4b9zDpJ$0|aHjp9Aa2sla(AL)9uyhy7Xg4X(J(f)`3RY!Y2GO?=* zCq-WW?u6j8qOGf0-8u= zH;zT5B@ksXzwid&vA~~+mC(X>u^;LWspebNZgnX`3e_#u;-&7XSE}{37Rd)WimKac z^-|~Rl>$QNQpH@U^V+?rnZ;BfGBtK*ds|3oQG(c>G^MpBWkF2}YWB2Ls0ja!i<0|z zp%XK`O}0UZ?~p9iZjYdNbc)*TafeGt?e-`njNKkhGF!Yo`gPGfq%V_uMhsXWn}o@N z6bMnShZLTz2ZE_Mg%do<#0F#aWw-LMH<<3j3`y!Q>V1V~^rF^YiMdZq=M+ z?RJ)lo-^8jeM3YZKR4s8h3ROs=p`D$;M*Ls9+2@#@-0+ogT*$R-(WqVE{J_bdK5P7 zDJ7M()RmM!>!vt|#7^V+(@!eKSbPR!<}20C`rKcR{0nf@&`dwDbcVHNqB z%(S+pP2vBoE`%urEyzZhV+!FjljOT8b$Rn-G*|AIG~(L$1iWN^L@ni{Z&KX|bJkon zXQreq%$c}}{G7Fl9KfFCwq?O2gFgE)uN}JD4xZwfB9JR;EyC9NdSH>tUu>z&b&@_3 zmbE$APGnlU5ft3pDv5FP_m+J@jRRbRj3{FpUyDONuTDNz#0!H@TXvos9Hw?BX}q6Bi4oAQBZER?z?b&* zgTUZlaQ}kvbM;eD9|GVVsU*q&M*D$9)r~u<@;O4vIz@rWM%J(FKiGS1clj+!lnTgz zj^kl{#!_H}o+*IF-mTOvq>^nUl*b+YeLbb?;{QfW8E%^AmPBAf`lW-w7XwimM!LI_ ziObL4e|+0kR{_d z*4?*v5BIC*+L3GUSNk!f8~Rs|>kuZq^AorzJ~n##!oi8jAt0sWWBreOnCLqhOXuoV5S*;zGC)p1Dj-$I4kN7@M;fy+!xIT^^e}gNcDza94kqT9W9)9V1+kd|E3@330WBgms5; zO$Q%@VnXc1T64VssPTD#DLqHRf$pto5M zpm03wQP*O33J=!l_-3vL5sDz}Ga1^;%`1@O-JyXsk7g_Zjc4&c5l6+zzO+JbH1Vd4 z%lQ!iUu6E0c(qqrvsDm+YuNOg__LWmC3j$q3J|6{QK%|Gbfio-J-u1>3y)n=hJ?hI zn*pLPplsVE`C+gt@++;|7L$W?1Q-+N#?IOow1M}pdfi4jT1j8Oo0_jt%`Z3ai{n~; zdGUSmch%t0M)t-VlqZF`hL+}SkdqJ2(W;I}utv9!*t{X#dRwsedlpZtcSK@#BOJ%CmQIX{uehgxL zGMCA6Ew)@Ph*M1FtEZFqsP^pB&*|~{&=^Rn?9+|-&-L-D+N%A4bf>v*)y=eZfA+1L z7zTYST)bX^Bx`-R_||=`*jt=pRKE?j1(a=GR(zX%%P*@B*^qqc1J|%FsHP@i>8z7L zCd;*~FbURO6Lw+Y3F+6-$R!WgN72u!sKZ$v;pcSn zS4uGLc-EI+R9ZIJ&*<^GuyEFw=DlXW}v^u!H?dgHdQ`}CsudP%bZ1?BAdtmG;sE7zyU510> zCyq4u0%{MnDh`|Y|Bh-%uE{fb1$ zRk?phx$lU%(eX`8l+a*ew<^GLNoR6t+r-5SrHNCP6i$QlH{~i?po(5lMe&vequ+5t zJSz5IXHRRtq^-6o^Gy=P-56V4pR$c=G@dt)venP#3NBQ^qbitdrQdsoUpiE#S?1>T z%KVHnzah4=Cm9+Wd%R>3PD$p;kBniXJ65{z*cfDHbkaU`)IK)%kri|kBnSpt>3EUSm-jWP5)Ao)U$-kFa$YZh*$Z&elqT$Tm%2NAwo zbn7DU(Ab5Z33#Bf?z5*Rbfsc5pFSI|fS=H1#rT!(1CnAT?t%Y&SgI!j@L-^4exT@|q8o+$umN7l}&t4ONDvxI+gF zg(w5pmjcCqg^jBO*WU6gP)(&d{j^w0o?n~3@?b`tlH?41taGd0nf#pjbC6;`3nKkH zTsX5>JUhVLO(&0NAxZ9nf(qfHUv1v!3@8s0#lu#cfcW2O(Cez!_-sL8s{?xw*gO?YY+r&o|RZ7h&(z{RFNm^KZdOk>BwiX~x& z(#HNaZA{>8(nDkFTWw=TkL}Y7-?>$TVc$7>V-G2xec3FHMMI=uLbN*57os@qgH7ls zS_6{iejFAdw?yPT(9c>&3@FzLEWgyh0+{JRV*+pqh3Bh23{8jmY0g{V1Mnn+u5hT* zC80I+z~i0cXGGaM&>F%OAi(bJ^5E7;&D{G8$9O0HYC1T;5j+~-0+^z&x8uPPdjJ}5 z|H382e0!GU-tS2gypu!;+H&n2W;OV7F{Hd?5@?S#V^Sr()FN49NSbf|2;J9Qn0KOLx%@KO!o!Irn-g?FN7NyFgH^9UMI=BSPDU`cLz2?!DJ^z zX3QO&Orgarex!si{n`?Tw7PaG`T6w;kS(~4z8w=I2PdBBBtF*wuE2Xn&ps+6BFp|< z*nmc5Lx{63q>1M8f$hH}$x4=Z--ZBoK~g$^tC2Q&w}S?7T`HBf*%NWep!GM|k+R8A z>?SES-3^e2F}Z@W$HjXvbCSCVe_}< zev||u3BHuLvq!a-+nm98%4SBkZv(>jj8ujYpW{)-g1I*^iEB+5x;_PT@9Zewe`rwN z+`4;-8Q-1^bmN;x5@cWh>E@`~dS8v@pSHck7JJ80eG(8s+W;u%F^k^H#(jrpHnnhY7k6;3C#b#@k6B~euo=uDFQ+b{oq z`vomb3qxSL$Apl!vkvQp7!Q$_u(K>|5V84I6OJZ$nz7a5-e$xDJ;wg9J-O4@vILZM zHzAuY+k(DjU@BSuFX3cCrL;R`Y!^~-;}BD|WkM)p9X4^kC-hH1&C(r;hZ&LXzpI5IYm`Ds8zLJ|% zTbKRCmX)VOIepU>y#_ye_Z#jiRj~FC@H05?qxc z({ATKtbqr+SxJ-3{7@2PyHZYPSRlU$7cQI7#QmT#l`XlAEfj!{yWDO{n}jRj{*j>y zzBlE;D#4ODNzxj`hH(IVvYI}$CWpJbP?43YyI@lNFQxgK8k;2>{j%1`Fnwt?zMXya zW#%Bv=R`eby>pUM zMVZX~cabtp$NWjH< z=UkDw%kmQPfkR6;TaNd3>F3=9L~mYa=CKP(%CTd!{vNU4KV-kJDk0Z`vy?e4yjRCS zWoDhB$WGB8WnNRVldV0u6EsjNMKA~iSXrHRIvSBwEO>MIgD|?cdZGyop2sNo#N_F7 z7m&5=IEa8|=*jaJ#?H8|Sx!&H4wyC-1se(~Gngd-mE?YI@g@)yAfO~W_9a?}QA|~a zUoRhB{Sjk7Uhw6SgaH2zBofaO@m1pUV@Z%G6R%Xs8gJ;@WRG1-1*SOBaIk3 zKD7G|&aA$H{vmpE$VL{yX=GL;eRZaagJz_BWYAnl3Mk!R_E#iw4T@LYa(71$H4Y3V zhG16ctIA8kIV?gg8)!eFYbz%Rt~W zU@?yL$=k#)-jBZq9}rF3^MTnUH#W-v9kiW zsO{(Dw6K0z=@P7orowM)Q@KZO02bVgVFc%E3O}9vD^+H~6fpNqiK3zYg?3Uf&XZ^j zRk>hpR~XOeuJ;NPD^ay6**?ouu)uLou{ro$;6^SH99m&>EJWo$oVJ(Z7vH2!AP~58 zB+=yp7A#!(I2lT8)kUR_AXNM=<&_O)J}(W_X4mw)l>DbCGoAc^kEX&*ERjviepZD> z^L5o2w<#m+*n^gb+jLbH?+m}Nj{{}Avivq{kEe;IBM_kJ{}XzmcxF>xt@KV;SR{1n~c2hKL9kQoRxE zd|85|O|mt@JYcBk00GH;KdUTI+1*ZMQ%iwutbL@rkt&&&O6YIB#V^bd?S90?u)5)} zFISqxS_DQ8Sp;{t6OkVsMs>JA^yvp1@JQdVImG~e*Kug1TY2^4pspOfobae=t{2Bcr-J=Q0nvID zyQYqmmu~|)r9KM2&ktSn>xknFpph5K8woJD@;>%=t$1FvL_`CxYSMTO_t*2Q#twL+ ziB7h${>-J#En#QM7vK(-wf<>)KigBM&mTDaU^*GsrVw;UXC;5x7Dk;P1nZP5lqbjk zX$#pskDA!t{JsdL#(6cJ^r}KRMz%vub{_5+S<`PYm6w1yFHY_=^xBf-KI@it;A+8v z!b|N~!GR8_vUoGMsHntQZ~-#elf>Ji zcD5A=r(w%KY=xED78ai5->XQSt?<`M-<;bDwc8+D{yMu@B3DX;Qts>T?Hn}yrLB~H zIkcB1qR%JT{qxCrkn|3?CB_EEi;$<^^Q=flusqZ6GOhx(S5SGUDWE>NTdI+TiB^sF znr{TDXT=;04r*=MKYhX2B!?6=`7Xwl+}3`KA2mIxQWJG-VV?b9PO%|3lM;p=3gfG^W*Q$zpe{2r`V(M9Rx(b_{hN>g$k0 zDHO`-$5C^+^58(+*&SU7q*43oyL}|muTPR6rB@r%1HJH3wwJ^N$)E@!Vq@2awovt1 za4JHIZ`XlhXPP(@iC;P6+9aWt@YUTd@nj~K)gKE(o3eZGQT=A;s%b*wR1~p9E@vKW zjX1x+)}%gy;A)D-y-D(G3`S08D5k@Sl3BB}3#9`zo6Js4ruMo`b$qk%l4SG7^&VFS zu@K5&yrCb~cG5PR({tIY$?+(#9_`+yK}P9b{%ltWD9uZLwW##+!n*LY1=N!-2Ub?W zWQ^4gXaT>^z;*GK+0#9wW1+k6h}r8o{RjI|Ay9+4*~B%svSJ4joN^|~IS#_L>DtJj zcYJ#41c~{LP+2}5KbrUI{M4tLnoT2Oyq7T%lK%gQh=)ZL7oN%dNl97Of@)#^sr0dl zNAWH{sN5Q9S9dxDs%hr$e&Uq0pp2dqTE>q8pzCx7sob}#T#6W^p;NX9ec!n;?!si| zZ$sx~dTTbEi&c!vi4$>et(n%Gjc{gbGkK4) z@!tG6ssP`EKlb6(FRazYqRj5sBO@!8?!f-l2GYM??Z=Zwge})W?<5568pyqiaKX~y1Nc`_jNvi7gwkQ9>2PI1e6X}6xklZ zQjYZxcImRHfA=UsYg@n_CD@sfBx7u`AeIV%f4NcfTWTV1p?Nb?gosaIsT@+JDS3x{ zcY{M0U3*uXKggb2$89^`%GKYH_FDUVQ*&xaVWyn>vUb6tFfh6i@DGFjj@`T71%JD^ z^o%|1)x$E?oUcy4)1B8!l0VJr%K1(YM^tp-=T|24n`e=2Jgi9npeg(6u~gH^FY2q! zr%1dPxR<%aX`XcEQ^9$)S-nTJVoFx4$=PH&! z{s}Vnr%3aiUTDInlWp1wn?x^|YB(0KJdcb`o*ca}DoS9xT|`rx$VRrrVie7TvauM; zn3U{1z;M2w%>P-l(-|^T!pysX_V3H;ELnb*X&aK81v4+$Lb9bLV*%r(KuZ(8u$+7jyFBsQS+TnlAmEzBs-chkH}e7-E?%XBzJq0zySGHSu@=m!*Is|Tsnc$w?0xy``#dIrP07g@`QqOJBS#ym???FywyV#ZpMKFtk>~{Vy&JX%<-4(gt6ASx`l4l|Mpn zsq@88hcpXTYx$18h+A>Xho(5>8+h?UA?;vKPe|)|@tKf@_lA)6(2GA5(tstTY3~kc z7W&rO=zVcKqzykf9P$mn_+UsoIB+aY>$0?_b3 zdt$>r$7>kz%cjj>djy?VKMqwz5YtFm6px@YEFMOs`|#`v?)WH&E7Nd9wz59Tb+jy^nv zMC#mfG0tMQ8{vbJcXxbr=_{=tYM0fjkmm*r<8L!82^kJ~=oF*a`B(Q*wox(Og<=i> z&eizBeT|FpE))~fSkAZh)3X%gT_|Q(>U^>LW+}!yifND}d!*EBub<<=PCbT-`Gb7y z`W2LbJMEz4LTw3cA;oaYX$rFrpP0{c4=FIKxl&4L&r&RGjxQuG(C>H)O{?yA>CBce z&D167^aq#q%iz3!R?FH1oq&d}q{1lk_b?2S`TuKWDGEB%n`y8$Sq+KJc`}fNND5BT zX?eWTfmpGpuNN`PVV$B~9mkb^xc|tY)RmY{5arUmWq~B^@9UDUYpa5)fMy2|3916r z-7s#Qat+{l3D9YkS9^{Q@Mk0oC?k<2Dwixoqd`{`E;LtlJ)!=0@aYYtJkdA&P+e(H z-Y|L&0bwn1GSc@QVx4qaNwtRTPy*>?Nb^N{wlVcw2BK(xVUGBTnQqfv%5O_{d4@%D zHJmZ;h--YSFEGmWMiGuvSnigeKc1A$BH}a#8y8NWda~3zc41VPuo60z($;Qt#-K7*3ecgvVGbjpOqU+l{x4l}68&#-6w^Ia(?Y?(8}EhTy|g zp>@JyWVLT$mA^kwGgc_e`w;6-uIawh$tj(ZEPi=(fx5}Im?#ThqNs%K3*L$@jm~CF z`Iub}sTjQmbyMwA8dIq?j3YL|A|z5C=*&-E=#pIw;i_f1>ZIAb>K8_sXx{D4JkRTl zvG7#{bmxQE{M5$Z3m+z(D)*a&?ABs|;1tKCzGQ2oAxgn#H!VchuPz$34FRK!88l(J zw(Nb{k58i6MoTBSyZ>8$btviHzi(gnfdkvQhlZ(}IIoy@xkm!mZ7*FoA?Jk0PG5K| z&aiUTrjnWHFvdRWZ(REYr3g+_>(dJ9z^iD5$?o5!^u6K2moeJ)5A*CG=fhJkSgR9k z&rMdPc!oqcMRq^j0daE;VU$n|fp#=i;ZU05iV*BP$~~2X!>naln89}()^E|OP+9*F zS4J7M9qk@e#7rdzUVnG^7jrOTB>{?u|Ce1HxL>&n?Cv3rEWtg$JaN^Lyzhkssn71i zMWEQ>5u6W#LOjwp(9x|}jYJ(j0?2;kfg}CUL!k?DZX}$h)z`<2w0=EW9UHMufVra za8Ks{PW*{s6v7M6`bJDDo6y_;9#S?z%ef)6~q3h=4 zA;@aZeV5eeNL-R!4KQ+;ML|WZ%S_(Is1E%Qd(qF}wTXpge5k?|0+fN&CpdY9o0v^M z^7G7H5N=3&o-V?;a^QVStgtB0HPnja1p|~bEw5iE5e*Sql|Ng4GUx`(+8e7kzi-+K zG~RZh!WG4w8bIl8tr7`!BTh16Nr5BgrEd!qhpgOpq^Bn}ZFd!r#BnBH*Qn?{tdNh& zdNiRLwvm7r)o(&~VUBSScZ_^RgR2yhp#{1?W;*)91i%e3s<>VOyr5^C*3NaL9lm>xTb*6q z#GP|>lXT@8?ka>3W87bBDY$UvCV+%IUghLwOYE=rArtHyu;K^ROTW9}433qtSofJ# z)Z8p_moqxJz|_sflk#DITaxR#51Q?C{+(S!(BNE$61&^v`}w!-h0{e)!dMar7qvz{ zhkM-g9L=5sEtTiUab8HDr6Sij6kdAsu2Ij`or@MM0hopIEw-M1tm~P`5n4|#n2ttm z0*$JrZ&Vk@CiADd->cD<)?3E`2c;ma%pP8n^g`Mlvo0{E3ZK3P;G?e|^|d2}qF6_! zDIB6u>=%8qhP4c!(x{yAI%=2&4|OJ~n%Brbv4$ zKFRLVK0xHI87@JKH6xaT&KtDY=H(6Zo0mFunzz8*RN?GYs;GI+i=WJIrwjlW^`T3O zY`eOzc!6NZam*Q)!jLa&Fy?=x)+GYaAoG`fB%o(I?tS`lRpFeL*kqyQVyT5eGpH&| zGkB+ZS2f(W1H*7fnwYqQeHs5-%lal)wfvLq&Qu12R9e zwKn1zZc>bOjMOJpj|m;!SOEpCrsR&0 z&r@;wlnNKFp5^>u-{rwJ^E{3?qOfxi=r}vJbYg}y2Xjh&JurxPbFkaI;0V7QKs>ldx>jCy0Voi4e z4^1U2-8j_g>MrBdrfazW{z@MZr#S)S0d% z`8KxVe!Db0fI1WC2BH^P)8wDrc)zp1zX#x-oNnvH507SZ;Vv=#WWk%r{7)7`wwa$N z^Vjtge5Db0v1YoUIO5|&N-n^R6k}n^T%71cbFw4P@zcqOSm_O-5R42|bwApqoA(Li zVPF8A9IBj`uf6_o$oAgP;jGuPTUg7RS1R2`w0HnS=6 z5~j3Xbo3G^H)U+RoNIXaIRKv5F|f0Nf5R=q3}R;i;yMg1r+{wYY{&SMFA0X$%)zep z5s&C}HH9_g?{#6Uf}wHS3NW+~Gxdvxq19k>tmw}bpci;e! zwjyNhvfyMkgg+Z7O_hWJPB#7A9G6z_A4EnVuGxBKGVV zTu2F$rhGQwuC92dt-1+VP+`v^vOalsGDV~!c34%|c~l4qo<<^(xN zeWVqYGzHJ&Niu@_$K1JL!}+3|Tb7|`Ma*OY+alI?KEes9ND)rR)mNMk2$JrtVg8L3 zP#ld@(cj>Y)9>lz@6`!08w@=x5ky)dH8C5%ugQf8v&j{CgNZ<$d3Bl>KWmm(wg7*t z%uBg4DCD>fEjgm5BzvWA^vsy*TQ9n+{us?}O*-zrTjsuuzKIR3BjyYWSareMXqkf3 z$#1En8>w}Q+b#s+#A9P89)D!w303_qs#-ELLzPT@3Y$=qnXx2Ag<9HYR!UY9$}Ub$ zOpK4?aQyVdS(W~9RcVyewWaedPn>yVBDDNURavySwPj1O<)yT2;p85joVa*SZQm_9 zLayiFHfqaX8_O??|jYD?yu zwvs>y&f)A^75qb0)98_FE4VH;y*v^4VC?MMPESspJp(2|RhWi3*9UHowN+@vS?}AE zv6H7SgpoflVMea#syT|{67tOXF>Cdgs)`cQv$oazm`#jdJY!4cud7O~nWN-mxLfwY z+9EkXuDe&&D|t=)(nZN*Po5i_1cC9mhDrM1d|`}LYCF6>7G98?J~R5L?YSSTD!6Wr zg5#r)jE$?sXR8XXuUAkuK{he1iLfFnw@A1A+-Gj6S1vc9|$u*C& za0NVgY+}Nu_kctoxk1A-dTsICmrst3k4ED4_Nua_dS$o7FTWz096L8Lc|pTIcGg$s zhpKA0wq6anm3e;b-00-!1t%h}R2AM*uW)WepQGpnuuFkxJX2NlhI&PF-MxU9O`~=HUsb^y>lMtMFi)Hr&r! zm!2(%YEsx@FuT50Qa|E$RtC-RGdP~M3#*ILvdgP%v4;ZwKlL5Z$iLuC$h#y~!+g~E zoe`i&imE5x2ee|j|4<(RL4){9I7K-lF>CJ*+yQpD#d+x7E>#p+^cy*}B zhZLwbZK$??i1ljn^$*mJRR2I{O}>G{wf!5c)b?etr*;ewYt__;Z^hcQf!gl?tY4FF zxOZ?(^{hSE3mUegUh=`7u6oJCoj5=*uDSXW*=>-AD)CATfNU3(?-9}4n+jYEf`KW! z$w`8~Cn`7dfPE=?z)o_*^Dw^hA%if<6;8?&R-Dwo$9TWKU^bqe45_Mf_B`PJoaJk4H#Va)gHn~7v3lKu_7(*&kKO;Z z1zL4u>7RJ}+JE6Mt~pPcfXHP+RB2kNi{k%e%1)UbIfLvr_q8L2IM)O77JP#eB}mAe z+*n{Q29ml}&&=Nmo@(atILmlGbo9G)t@=$}FE%EVAIf*X<@cJosFIa|lkE5r^lFSJ zeZ)pS1+Y?cXF2+Q3B=j`@x&qKUy7Rk1x&sHTlH2S*ei1?^+}YpE>Od zr;gn8;X+Bbo^|Un6Z%hmijjdCn)#?SP=EH?>vF^4rLPR7qZqYu6}UyoS8+>P#p+l^Dot%% ziNcM{-j5(uZCnK&bn;bj@P<#hD(y!mTWwqoPS*0(>`1FwTdc;VJB{m+MQrYiqG^8l z`4zDqlb1HGKyCwb71ZfSUf|le9(+6H>)Dll(E8AkD!FUpnq(WD>yg|D_+nWZY6{}l z#x)3pFl!A#3fs7b<;5Ddr+rux`ta!F>60S}@R7(it_ANe`F=F0#ig^2YXL=$Z}r9e@R+qjCg#VTrNGbhe%Tnljv^Bvinj>N_=61iGN{CDHZ zaOj?|thP%z5pUyKfKugasU4dr>1|vEP@a4hJJYXP7rv?}@NHZX?yd6`)h_l_?%TKy zyz1xcs9o$P{%u@-Q?Y#QY70`}#x-o7tA-#9Zd^mDSVQeMm`u2F`D=^iYmduJG~Bq7 zEyYS|7eK0r!aP5nLVcP*w+RlFSX+jhmQ&Ch;74F+#!nDT^W1s4 z+QttSCAsk$4~xa}jV6$BOz75>hwZHu`Q~7p+Y*>Z7tc!nZtR&1z#UN3z{hp9LnB{F>1)o)xBl(nInWZ-Xpr9%g2I4<=riUo_53XryC?*=;B5Nauvy#{ zq?Bn|@p%{!kTwV_X1>+@p|!o(B7>|ua5(|uLx>OuuZ0rLDq$JZVp$2{i&EQhk%Ps_ zZ%ikDq%LURf_T9}5K0(XhZImUzGY#(ElLXR*ONpJit^rJ-l1CTe#A9rzW1YVQXzPn zDX5LUz8Q*@epR8jOXCokkw)nG({+1Z>@3cTz=ye&caq#jiP?ap7TsB<7txk)=Dh(< zlvy-UKOkv3lnZs0BtMO)w@MhF!#YYeXP#DM2t)OPwK%w?b-BPT*CYNR18FOS1O`;C z2N{dJS9spX^`TMPWH(V0LVcH#1<5hoOjgEaa}KHeDe_EPY&4JcYtECpWy*G99E4RB<`-tI9!#nOBn?Ts?OL|m9e6X=DJ5F zFZPA}jSCf1cq-UiIwGX&lQSe?=G4G}aslJKpy1eC>P7>ENzPF#9SQnHj;$2_SK|KKC9; zAIw-aa}zB21G0vZ4#h317q9YmmE==Rqr>L8RdQ-y-EFLLJW$m%DhG~Jm*h?6dK_C| zo@4<95ZWH~&|37W&pl`=%oR6h3a|ow9<%-y%#0c@_ zudTb{+6v36r@J$t_wP9nmsBoItLdk;^K)zB7N0`%yJA3STN1fK94I>v%)Ahs3+Mf* z=dq7&iWDdf&C-P<+52)ZZS9akMOp8KJCP9@A#GsVOMF4#}dqVn(&o4?8 z6saY7k+?{#M=~o;ikzo?tf{FyIW~G>taRgr6T<>)^iP&uT2$ILe!_nWHhB}F983BE zsJpjR+Flw46~^!Kw%xqiUg|!{L*KUDyX;9p_lS3V=3FkV|H!b`Mks!G;>=jr>B;b9 z#rq|39o<^phr;7f$5EgS>D#WcM=m}}W0tjY_Qd3q=Prb&zJAX0{_s%l?IUm~ zLCLKT)-7bR*cR#ec6;u^(1@_Qp%X*Ldpil!5S~0ZPk1Qb&la!`yu%8X2fDlL(d+4_ zodMb@Z@bOgQFzUc;r_uaDa>W89dA>W!K0O~-JyZ_yeIahT$V?d@MJ-a<0s!g_9Q>c z+xG6UwvL=1V-%T_n-!VuI>er`-CnKK|Gce_S1ZY}AieT3TiIY+>uJQ9@01s4eH}qsqLrDY>*c zR$bDM(OBEH7-(EUENLpYs;)|Ao;!tdow?egh|>M+3&mgn%j~nGb(f?NaMTXI%i5E} z7~Bzsi3qb{`z#>vNaqp4bz@9Fczj@3c2>4s2n`r^N}IG6?2vY{+Rm^9np>2_1-d)? z32tu4mnr;(qFc8nL_QpBN$#&4_jLoqKN1}=YVWJh)oW=abaW91Na$%>GGbj_oS^@( zzE*H7j(MNDOJdsJ6*`>;`;V!&<%+hljv;NV!NZk~uK3zh^ctd?c3EK>F*4Zn6{D>` za#^%>pr>P4QIoZ`@A949*Nv5@2n|HGFkDfno6adm`a58y!aw6S1dVVatH=-Ss zQsM2u=p^9h_yA)_D4K4(H>RjzQP$IjFwE6BRj0?k)9Alm~_Aw9kv)xA*Tn^j4HE!jt z>DjO~?r9~3!(nU625ikZ@vTs5F{fL_^*YC>BoS{*+G|J6R-Mc|8>Qb$K!?Hf;V5o+ zEa%MYt${YC#VUPxRqXFe z-*@&uSU%jL{>Q7yR#=Z7PfL@y1~u%k>tpTL7Whr#aK7G}-T ztnxHT?rW{BkY(@)0jn&*?{r%&LBau60CziIDu?hXK_;IKJshRvXp{vPWX z5F@Hl4c|-3!G8Q3q$w4#^PLq~znI5TIu7RYu>ZTW6+U#N7l#+e(^d$>h99dA=E&RV zKX{N2&UcG3r3C)aH3Xse3~f!?a6cZge1y}XvXQVCx$z^h-&R3d9alyt3*kGD40QAy z>o}fvih1fk%33%Ud#Q;VVAyjji=;z?{YO{|Y3n3$^DZCOFsC&a=##j3zO}*q_fH|= zU&;ILUwy@H4VbkDhgW+S&CJ%FykKXE9SO0`KEBHiz8b*x~j6;8!eNpUU`7w zx%?RRU|d=zBeCKtTK%0QA^xhc@UmXr-_5SHWfVKAQk)rmMgb-sJ$+(y+(xPINN@LW zrB?*8IGjC|ql8VgV>H(bzqV~v5lR+%81`ZAJfrQ&CxZxSt8Ubac3;!bQ2B7h4(qB8 z5TluGNfR+WOaqCzA@Bz3%8EYq6}|@H87y9dxU3NUC6$aP$s1|AS`GQ%CGOvx8Ko0_ zxu}i6?TZvisq>7hkbmhuB;dN4T>M$8YA_Edm!WESP9^V?egQ`phh(3Knd8|NvVffCHtA4<~Q?77Owq;mJ;NWVFKErzn8;dd&>CS33 zMB1mWkktv;NvuxL;+UQzWQ_rXfufU)K5gpKa+;94Ht8GPHbghU>Eut;_YRE(fQS{z z3)=}MwL3^wne_K1m~TYDlS2YiCSfZhXAXS_^T$V zLDHqF!TbvCYd=$s&IVMygLL$0v~pdubP zZXPWz+dOxro5!3`UB>3QO(kvdo11&BU_$T~7C#F$y6H<7|B`I+uXD{_YofAYxnqF^ zx;bwORu5E8>KGrGlbOK9YD zmBmHH`l?-5^I1P%6h-_zt9&yb7e$fl98=1Bx`m+jpB_eC z-bGP*%O#-z4+>dN52e%pBQ3nOF`QphA)epu$*Vif1rqnnMf>)NzY6TofdeICCrogb z_-E`G=>u{;IfmaP1@tpKgj9ZwY938qebX#8r$Ga2Ti9Oe7~ZyZ$5tXa)V{o_bW3S> zN#2{(3u%a~C;xVqo}@7gFY^;sdDULFiDyV(QFAEbO^wN4`4c5poV`d-?kz_v#%-9q~yLeI+HA{)9j>)4xOT_IT=7e4bW4?lO{(4 z2$YH|#X{U|uou$Z_zGxnh!A8u&Ek$3opgAiq2>PCl=T))b+$uiZ9{iTPMbwH* zrm?~tKWfBo^-1zs7I5yc5DCev!ChrHZxW)tZ;+k`Y}0PaZ(7%5_dq|Ka&)zu8i?kUjas%i$=E53l(x+}YM0+61cCh2wHpb8%t*8kdDN zbv$YE(Q%0ung6P@houElD#Y~OF7oZ>qQ<_m@Ng{4400F{M&~F*U09NTNt+nI26&sF zAaL5ATd~{laSLogWCWAs59x%*9mqQk&ASjK+_8qB zcxWrAkd|Kg`NhfMO3#4%9_7P+Jvi%4?a)7>uM~d7a3TVVP!LaTZ4ZNqQG_+ek7x%r z3qb>*i-?zQuw{^wSR^0g!8GcOX6dK{_VOOz@%|W)PiU&6J5E8;I)=+h@_xEw=4&U^ zFU_u)d!jkRxqDZz(_fezH1}3@kPKUsm5S7RMKVH2#1TIGNO?zB=fScNFAI{HkIg*W z^4drLqoc*!xPDwzGp)&oIot@9El44ZhuIyXfsW9a)b_9`+8*Ye)U`u0u?$pG!-zLB zYe1*#g@|CeN*#0BJAhW+`S&Ebisl3NwiKUl;+Vq00u_!23laLdfK~P3*khohH%Wdz zD^wMF_Qt>-i-UO+)W*a3AN-TdxLM&sx@L19a+&Ql(E-v}6QsYH(lK3t&xkdm zd#o1zR!FHfX#JZs-*VCIM`gx;l5F7;T8aHRT#imxEzo_(QGye3Tq@XU8UTs?ktExp z=V3fnu@bV{3|Obje#)ip6M~Ry!~?H3x|zrjAOj`_GsZ;F%IIzKmW}q@Q zdErUIOPq^}?k{tWN-YT;KG&0D){TbNwCd4LwHWim)^Z~2z8!%$>nk84p|mynL@L&HrARZ?F_F=55JYT&|6dZ&=Dt zpEJ>Wky>*rs2V9rQ*Q~b5fl+yYo5P&Q6tufhT_$WKIak07C#|qS^N?=fXULF*wN6@ zJ0iIz5*{Uu9K|1YXLnEc@bNHlwiUjc%TE;u+m^hU>|WNAKdoz&d}YckSA%2GPeo~+ zy@Tn9_b~?5Z#eSasAOlR(qy?)T&+=c*3C@+!?bt`2hd;s!q5Nw%+il^cEms{o3bKH z%v-<soMYHN?zAX5^t_?f;1I2b5Sl z7_oNnVeR0%+JSbp|KkS!T+N@2{JDldoA|StKPCQL%bzX$xsE^A^XCSGoPoqR1{2+X zY)C*0>umVJwboN^j6b%^ zvSbLOlVB&N-LK$(fnvJs(Qjl%bN49aN+Iu{!y%KU!4Rh!{iO*oxAY07BI^G!@G*1` z?)?jVhx`x>ym3!`7*JXfx#WKgdv^U}Q2|rgWX^>F!36Qnzc^8U14c~0{bW$kY`bN) zBtX7e^%pMI5P}APYx*;nx;M*kTlVwz?B^ZX&pWf9cR9i^2TwHbW`tw)e}Q@DrK{Op z1X-+qLo3&lp2`CIdk_Cedq}nbcTAEl_Dk+QY>erD5$U78|9$MOis>B@MISFFE2aqYCXEKM%;T)QTKa5fOJw;XHsU1*?fo z3LmR}T9ejIbM&ID3PW4-)?D7`tyCSk(Gyrd!HO68D^Wz z-FS7u>54Z#n~vo+IG8HtEcL%`(jFKZU7(R(W`Ua!7iL#sMzmlAlq7%4K;JTJz`?wS zJFdjU8f#IYyAMt$Z_*?ULZTc`KOcczJNtD$?z}^oXxTk!6^LI$(6*bs0lT~dR;K9% z6bvkC^RC{%V$lmr5-}nsBR6%T+1zR4Ij?8$L=?2CO~QPQNQNpGiNUTb%gcVe!t?{m zt5t1u6t`!WdFwl-@lk{)?R}_Ea6CoiEz_6|>GgWwr5?^g-E%JwfDQ9k;-# zOIId~MG+M9N|tAe#btr5{*_aNb%&>u|H@}gCqJx&gIFPA42u(TSt7hlaLiL&I)i|( zwEA;+JgE2f;E}#^X|=2-cd8bVd@U7g;z~pg$nOb8?}X-)52ywX+1Ft8|H`>V(qe{ zjBdvg}51Cr%f6hT3N6t^Z)vT%2J0GPANUN3-;DXJtA|^$kK)Gq%@KX zNu-e(OBqFF)%1bqypf;@7+o)bDHlWw7IPS1uc>sgPI#hvQH)j--=;#urJ$JTGPN`o ziaBKk3~eKSv~!4fouFfZQW>^5N(dhmXtAr(CGEppaiVs>!KN~{5ip3uierrpG-je< z=Zt^^GvS2-KJB`k{CiYlVZvErJ)4czx8oUNjzF+Ri?OOQT6~`zWrfhNCV|k-ez|!G zdvl2zEcx+bn{%J?eo?ltcc~;4AKO+Fm;|0rR6QSytlE-lE{dj@M2l&7%EW{|INIB5$Dz|kinlsWGy4@l`3ZE5l%v9KK|P4y`nilcRJ3F zjz9T!A$K~*Cr&(G>Nt6_6f{xl%=(~xqJpS;a>me62ShN$I*gt>mIk}9>EyhVw5O0y zL{XJ$!c=TJnb14gzdK1=ri1V^IDlV|$r+z^pXl-9%A*rbUu`7IvR%T&%xJpvZoXUdH!rZ?9b^`@)$%R}c4jK`I#g^qq| zOX6)>DY7-a?A{41mZYPOC}%E6ztPqTfz3)U5xL=dRzh=9+R~=aEk*65eQq0P_LkCp za#IDI#4a%-ZNMwGm$vObe_=-t>G$Bl!ck48HrkSqp((kkZR*l>Vca#ZrF20p{@h|M zIFF>LgZ|z6l9lR_tQ+aWr5i#)<4^pfe2wZQ@+aeKgn_dT@ue2I()gO&L?m*24Ru?l zsY{5fUJusRz-8QS9-_c5e5a`X$gE2(lL2*SEgGm6PlK2wN}ifsneuvFd^o$;M-FLw};w~oIU;4 zi(}ng#d5cL?YAmZSplSFojfG#WbzHiUQAuup?Evjd1mdMGQwg9&5^G==JPcjdb~6A z7@2}om14`=ys}-^GVA#0==jCpOTa(fjXfb@l6mqWJ6(GHGx|3CXL%9~-%?3c0^QnQ z^5i-~X(z_iv&)Dv{TJ68>RxX_ydgGR^>>R}!AmBJo2%-qi@p+h|Cv3>Kkj8-oEGUW z>6%Y-f2z~0sbvtH&Gyp0S``0Ai(;=adAt+tMrGKtaKFbVT@DZ5#4>5+kH-;LFuB{P z{Z7p%_tD#v7q--cD8l+z0TaJpEk$5r@Nc5PrOUP1FWo_%MvQi8*_+-*%BnAaH`c2D zS-X)DagQ)=%;%jjpTDM}9CR<;nf&8jEDQg)jMCq2l}jQn`}ghZK5$^>AF5{9c-Do< zKi+Lr&mCCZqu<7}{*r30!?SW*QHzZ<6|C~6270tzQ5aggd6&EqV5EfPWWts~`* zP6PzqecdDFBNfaWGA?~K1jIT7z|P_!7d4L>-F;*$_y7~pu0sBS z@z3EP4{-qrO1XR@Q6EgGVXQJH)A%eL={hpd;}KUw-^BkeHvZT9y4-%}s?ON<%k>_T zlg7^5eMnwxo0D!gmhc1-uFG?mbFsj=NkyN6Y#tkA6Y%O&ndT95U$WjjnWTDXEt3ef zoegQb)W^jI-8pYJAb+;Z!8CZ)$@A^GkqJw3g)NbN8(Ne49M2y=cnr z5}wy`Ff~8##aoB$XYSEp+BLv}C{i6Cv7e6KtQRkq3 z{$59;eag2f&(^H9(R)_EAg8@)BX3zQ5&MZ)l_Xy*SgLwUsLHDOX1!N0!uzZhKZG+0 zkdzWIBf2Y+nXb{>>P5mmRmD=l`BJgtGR4qM_$6Y(=_+goG2!*r*xdU;e3gFNLENe$ zbq-?uM~Y3Ve-JnJi;^9}u=F~F(P>AqQ9ODZpSv8&^$uG>LjtA<1VVNo>RjAoF3`ax zNZ_s$RmMv>=jZXYAPfx-?d#WN?*^G;dfzPcFtQSE?UN9 znOwY`T_n0{l9(k4j*%dxnT)l08RD3wxH%E7s$@s2?LV#S4~SzjI=xW87+hP%5YF#F z!d{fGR5@8Mx~-{)MVM1-D6qm@QW}Y7beTsqgG>UcKt|7V=q_n>J^GV`0=KdHp)FTa zEC^VZ6+U0FWb+~xQ71$zDzi~#yfBGDj$=0@C_2~i4UDZy_a7{2gil$lhZa$XLtcS| z4587*Wb3I69O;A|NpJZ1L?{gZnTTi0)*#}sjeb}a-dj_lx0_bwkM%0izV7zol4j5! zTMqfQtrorlA$r!!+PWA7FmW0X2`vhl{rg?w!uxA^5B*ICZ41wK0!oHqHCz`{Xa;%| zZvKW$yL3GT{rYATw~mra?fQmDU^=-+giqHuUfxJ8CQGvSpCPE5?%w)hQe8)=4x4wX9&LCX5^Q+OD^*V+?+(lROw22p6M3cM z;doe#I&6xI{PQh%M|yDiq8D&oybc&yY^wHqrY`NW3SWs8uJ#Ids=~EYh;}GnTCzzW zk*Q0&t>j)=Ijh?e2gYu%sP6V2%R3VDO4J(jUR9lUujRE^mevilTeEfJHp~9OShWsI zs#eM3w}*LTM)eJl>#0k(YyMVfZOn82uJc-*pNuO*t{J)iPbYV(Cdn%l!;odL_yyP> zE#Nzo_iBcJMDKI5fn{_&`*C10SW#he*}GhqI*ako3kZ>Hd(^lO^?rq-(RJzL3;UlJHr^lP!mk;GQxl z@CYI~kmJD~NO`a~C`%n4?3a~3(tro6=bx^4+E;5+>K*X(RT{ocE;tcL2A*wjHo*xS zw*Up;d3IGF+%66u`YKqFN}o1_m3TefUX@00ZV^m935v69>roRLlN3c7(lieARKN|d z;Z=$S%aX-)I#M`GTT5CF$)3Gf#f$DfQw?T`+{(R8Gm%BbdA#_}xZ&p z8P;SL;ZKSZ$;2>-X{_JfWrjM6Vp1`O1Svw5Ia5R4Obbh0h>s{mT_#8B=v-t11slv7 zv4u-B>Ig5YHK}vyPB$bSeH}f=A2Pq0orrqw&n(O8zjG|#+S+nHiA3Hp%<{V03}NCn z)xNQhjI+?_eVo9}wdIR5ys-9GS+WA-?>)6*#@ySzD+1SV#w6AC+(u4or<;&axl*^gDS!~F^ zo*2RbWF=SR&fM?2xCVx0g4d%;{kvWpLYq}JcRjnmp<2Jy?{C5FH0Da&-xg(1m-O=X z7s8f{6_V%&9z?elJJyZymJPR`)1-Omy6;s1oxGM3a&hDZNkDibojA;kR3Cbi*0Ipe z`aj9lA=yzbr%rdwebEqu$*fBEsrq?PY>%9!#Dc zq}Wloog|ZVJO_6ThGo~rv3|L!ongk8sM&-VV&PaEUts|lUzE@qIq4sDp^_AB;lsK+ z>N}UDC#`>9FrmlZqgsMd??Z~lC`lr-fjNK}0d^q)jot1Lv)MYiF04NLgx`vv5P%Mn zZM}qy4iTI)QLu^MuRPKP@@)ou_1hxr?qQUh;bO{H+RgOCF*BUcY?(DA`qRkibU>V& zsaeptEcvoB4)sRakCsT^iyIa5E-u{-{CFGa1v5mGl*o?Qwkj}C(<`$Q%CMC;?=y{W zdE(3&T#ZUrU6Uq}%U`Luc5RSQ3!D)4qg^oV7R!)a<}LPLs@lfl>F?9)y5i}D&uKuvvM19$Dm8_OBa?#fn#qJPRwG_qSd;QhsE-a)ADe>0pF}znZ{!;;)8FNu*Kw@IBAhYHiG2L zIfKbLw;9{YZ!R~u6}Y@V+U3dJDHguSk&1O;xmzzR2zWfmB&YDQ@`VArE`w3hhY z5s6><)n!bx%Le6(+dvUjNt)p<|K48$cUVMXacXHv2ST|#*efD8*Q}%_h$auU6DF!5qjH)DN{V2hS&?EMN|T^^jTO`7&33O9U_z`; zzzuSEyaas67N8X|Q)p9=q%!_#QB8d#K7(y%bf1_w%c;y2H)a-Qf*L)#0=IJcwQZPd zdHC2A_fV`WJ%Cr(0nD9KczvtiA!J3gg?AyKEu0L$FWW849d&V^CQ_&iI;rNXQ5Tk6 zM`NP;@+W#&>qf@IiH9hvdY#v!#q(Eo`#Qf|%`7ZgYTk1>s@c?DsAz^1xxSpjwmzSj z@{9$oZIb*V)7Id0(Mir(a$mL^uhecNnongAM&G$q+miLtwJ-m**2G#6l68WZPuB1#D5s~U7CgHwf7J^Q zj*P%v;TU{dNc<&77x&l8?}4KO;W(jPmoLO`;rXmr^v3&PM~y>QY#9e~?Y@t28+xRt zzpn1dF(7&Ag?ya$KX3%6soW@r2Rphh!|~P^x5%%;YkXKGw(cqt037KX=2}#hKJP7% zBoEBFQaiJix~i~JG4JcF4BAqy`$B8AV}5JZ&Jflr=CCTTr)K%pZQx5-e{Za}p3?QF z5FoWnsm{V|xSTMD?$_BWs`S6sg8C2>Sj&7=2f%UhMaq3xESp@KmX2sBTAq6Bhm5l3 z)HmjNlq;M(Nt4diE)q$g*@7C2H5dDl+B`bc*pR9VOf985OSVMcqmJc5G)d?Wn^XM_ zxz#C76?;3oLUHQ^?>I1e;W1xfI>9AO6~{pyV@v9RIX$1^G{NPFhat0b9QAk@w_$u= z{!{auYi8_e_qP0rj^+86_e9TRlZ^pndBD~eM;ue(=DcYiJVS%yKX>dW$^Q=XbajpN zCYr<8)vzsj-I!~xP|PV<7v`8F9S$!94a=VGy;irO?X?iYn!KBZ-d@FLOVPi`d`f6( z_EZ|$;)*q9F(cA(E*X5Rm(WVKg=;2K|3(Y<#*DVQrZLyKEU1_y1dAe*Oh6TLV<#RTx_G8okvL#7nKgvi z`W)Wa>q$A__eD)Jp`qYBuB4;RQd@EPbub5XB~0d|%!4sN{VOJ6HP;s;VAF}=o$k@0 zCrsBWRr8rO>Y#UX^$Uc1F1}g`n=KVwulQ^!u47jV6%;LF-3~$vAWYtJL`ulVxC{y5 zVcT*Ri&WdOxEsz9 z1$IabQ|4Cra`S40d#f`~1SMqWZWCv6z7^WXS~|Mra-MPhrrlXc_z ztQ&3vT5Nxb#M=onhZqE9$ zg1)SXQ&Q;2O}oF%ZhQ!btn;h^9z*k0``mj*ScvJ0EWbnMQ7r2?T#g9~yLb;v86@ z2Jl8m9yEfwWmszb*kP8f@rQDyXbAAoo?K-}ZAt|MG-(q{=o8DnpZ z{NnyXV}71p$%!zXJgsvmMYH^`)l&ko7Ei~O4;kivuc0z5)T-UCWI#lV|B_XN%GtXM9~ zMpV=eYhCCF0!cyn572yALO>$AY&RmzRVb^PBC0yobI2LM?emLAG0zGEmLoKA5Q5?6>i(FkkJ;Vo)P^6x^x9Nb=?c5@wgmz zm&xNUP`@&Oz!l~@Y0B-G0rsuJ3Ert-YGMRzC7Yp1Wfb{Ad)2RItU6xIXd7mgElahV z%Q=vth>##jihak)MM*COrjx%^v0Y-DJcrcz&fBd?6vABwmI6UevE^i=YyryySXZ#z z75woQ1jhvTNN*ff8Ce7YC>KzEt$JzA`35%+9JaxyQVQ~tB~D#hANFd*R|ZzyalliT z1bmO098+7i^CgB6kK6g`oZ51uew*6Tv^;gT^HUnsB|wO^omcpF7HU}MQ1$XyM%oqp zS*{DH(0=Cg=o-%B9FmWROb|X#zCxSZ#p^}19^}C{1ICX%nNQOU*(L;?Zf-CYS)%ZE z5mpB{G<%_1vXIzWx*&H^M(!Gx?44ZL=?O=09fRFCtTR)~f(sHEi-r&Y$B6mYgm;)C{|!`cp7NpQ?zlO5@Mv~6|Hiv!}0tsPm9GFfb) zxha#5bZ3wxJ)Tbfn>rF~1|khI8uC+W*O2K8BQjltp_&TGe}_8!eC($9I=X2km(E^t zy_H<39$5AzvuEF6*-f^k@dz@9+|cZWz#_U@`~tv1H;1q8t!U=drK_!?cdK19DOgMq znG{?Z;Yq=yU^dD-g*y>_w~e3rAZ|B^^wXJ&P!hkJr8M*w@imc#UX!Dtn^GEjowC%S zq3_7EM9|QC8{GFUkFIY1I$gaCy1EiWI=osMF$8)lyyZrVB!t`X2;U6poHfK1%n0#Z zsNy;p+w3f=gWoM4C3Q+?XHXqnaX8NEya{JoeY(AwHJG~>%Z+#y2Y#b*f%CDk6Muz` zo%C8xl}^G$O($mEx?R^V#3nMU3{IY8vRRT<*C<-NGV$1_RV9@GE3Io1Cwi>VCO98CtKJWhJP4K0KMO zrqPLqyKBeDS7282t^7mE-9>J@mzmYa3Vi#RG^o0Iml4H09|t*LqNABl&OEE`KVu#} zRwiimN^feTLgjyR8<8z^GC2H!p4;WP#kgEMG@b?zl?`We0dSLu!n7(!fdZj9SQEh6Qs=M&wK2T|N+C}aEZ*W9>e|@|va!t3=n=ueh19x(zhbE< zLXeS2WsKsjxSA;jj39*>edMO zH8`Qk%=>2ED`5vNIX}3B)$!wy8kERHA+s&rB8_||9pGAl(_MQb_iYPaYiS3a7jxp< zpWR>2ncG}<(RMc0T;y#fJtLY1A}8Wff=_WB4L8I3_g4(Y>fL&AXrs?u$+b!JYnwin zPqYL9cef#`(HEo_tFU8aG6`W7yC;wS^0coQh2erd#JLcJZ6-OB7kIcnXaqoQeg~(G zkX#;M(~RWubAyxId*mg^T!fKkmq3ZACbV1SCqQoLxLI#ZWux{2*@;q<8|3GC0RFjWV)Ue{EKi&qvzq9pMWdOzq?$x1WAF8)P3rycs`pZ0x#_ZX|GAmxRB3S1 z@1OL^nU9ghT;5f&P=euW66T+apj=U9vCxv73V3z8i-^Z#5;`R-|Ot$TN< zX3!%hkx;e%8Itu$eQd7zOf>L*pKueeGURB0+mh!KRWq|Dh&k*)m6+oOX)U%O<`Bn9 zX@E~v;Y_C0tXNfR0FP-)RTF#a{bXNdZaF@qEGslQpH*v1lbPjatw?R5Qc46{51ovg z@ubb3Ec>~>VJT2ND~WT{j}fWU(Bi6zQmlCUuW4q5f37Y*>MQSLENwuoYx9dSole3* z2t63}k#^$5zRx@tr}9}pj?zh#VA`Oz$Y{d#aW^zqU*F_53s*DO=*O2Qq0 z&4l^2g!o{o509yZdZn_Anq;1Qw~$Z4e?&3)D{nGj{rITi`gDDi^YXwx<_W1y^`Cmh zPP(nBk1OSCN{Thu`eQByZ3LubAX4zlEs!UE2+j!{onTz8DJf1ik z)J)Yi>{1QZz_s?7;7)J8xkUX(dI&AlRWhe8Q==Ooe&0v4t~MIQr=?g8j3|czcdbWVN^|; z!8iDMh09F~Fax`=SmNxnVqqjC5de$phy$U>P6l4@=PXYT{-kX5ed7by29|02JBJSW$Nte{Z z9b80FibOI5FF+D92tWX+#gdFbBq-A%2@VL#R+8FTY{!$hP1-bVGOp8cGpXHa?Y3zX zr?umxNt(=)-L+#!ZB|Z_3F*eAY*}&&QJLTWeb4!pd%uf?mhC+AjI9gad%m-O=e+xZ z;^{s*P)Cw!hob$tBH?&5{G#rkkXFD*tNjCd<0_>Z^HCA8(CUZcmS<6&i1@HiK(p9mPyt_uA>ij?LzCt9J#@SH0 zZ$-rBOizd8l$M^RZQDsYwNEw?!O#hkxB1R;rnxXv9T&-&uoPb_Iwe zUgFhP9=5(h$bdQAg}+vRb_&`Qc>&xPVtyaecf*4(sY;1Vs}~Lc=w=z>5YKlUC3$>z zuM)&XWx?_UGoXV;`g$g-0)-E)kk>1*m#MMDzwuV$x6lIgc6X-3p@Qrg z=;~)`E^tyLDH7GB3V_Hlim&YK8ya+lfRY^_JG!rb;5Z6}&aUN2A3oDhu&Y+o)6si; z8A2>Gco-b)>J0OprC4iO5be`qD04s_+jV6O4Zv5O^!7;Q;6>ClGI8+Z&y z(>M%D^(vcnO-C+V?#e8Ad6nGdzT+%0z5;sz8fs>q> zH`}VK9sS*kLh)u};xUxSsdm<+dzQwh@NHX>K1h`}@{1pih{JFJhsUG5D{kfSE|$y? zEP(UTG4P}omdXKA6?P^Nz^ak8^(#?`{%zoUKR+SENJsTer~0!ijiPg)3+!bZ1qZs+ zUyBc`Ehv{aJ`X~xNd;p3|Hp-2Kji#B_`JaR0MlX1z;F)CjFs*gNsE-Y~{(q;%N%SRl2S#3|kV}K^ zRB{W9x5N!f333&P9I_~01*tTos)(zT1%-SXi6qH6C6_ca7kF*dA1MXXXB3P*zFQQ` zhNSPxL}L;rHHO0?=UTE_thB_0l6GqUjU_gx1Glpja+aaU{$$rmMRby#dPr)f5Y|Au zp<`TyfA`aEH@I;S#z$UWsJQlI1hS;1W-qhfv8LJJAwRyB{G}LCCoQPG#z>1NG!>;+ zvJ%j4F1?Zh&kOISP1acxQ&U4qsEIioxU{n!(J5Rba`)qUZ|efqIK{2)A3D#K*u4~0;=KWS^8$*bI)f0e=BKoqz#Hg(XC(Iz80`-&NW03ES^wO7=H zIO(e76?Z3Nt2iW)PJk|~zIqfQqv`4AuD^cslXH;@h!T|4yi>1_18Cm6*7eisVX4R) z&%)Rh&OlM4N@tArjHV$;cs#~#pHDERYl($FifTWsuO#y+IpEK*2$RZ)R=cqw(J9%K zAfY-_6AWtMf|s_qX$WI4yRp7;%>^Q;*Gi-i+5PnV`jIzr!|aay+tpp8Bj1`Fd$p>p z&AO}Dg|P%~;tgyLIJanEfJ5+e`(fzb9x|{Yz_tL)T zPTCjUNBg3?XkT;>?F*s1{L7o-m!A0LWc<<_zi{80A^17N&b`LFv*8=MkHPGgd2<r?REVII2T??R!IJ*Ojy&xJiT;_|yJQ0F@MwS{X~BRM1olYL9yW<7 z$CQ%sVMGy=4pL)--XZ(NeDxoarM<#6YHXYo`p2OhCv__2q}Hjo5>D!@%1c*KLpsO> z&lL&INqJH;HX#I$2w`#_%dt;I#tGV^z?S5Kzvp=>*K+YNR_0+xOspA=51}`u0+Z{` zu|d3^JsFZSG9{b~`7fzfPh%G;<5w|n)#mi*`CDjEYpTVJyll>vn zC*-lww=!mo89%**bz*PNO6@^j3x?C0<^P1*u1^G7ptBcbejjuI{auqGl$C@4Rv}lY zyp23#Xow7u<@(%95Aove&5DUmoEGO3isp**$whO;`?F5&&lTsBj^>IFWVIj26+e&_ zKbR{HiAh63(dMM1r)PQ0CdhYp*+p#`4_8JYAj=_j>xLTMgC$nUN$4zRjTTgFk-ej# z$GfXt!(K;hQL0<@2e2?IU0tkhEmh9!?Ykm14H)4oopO*J+OK4+H7)AwnXb;{Gs zOb!#OC}g6d_$@gSz;9t^Je}fHiXutmr`>0#%95Dt{smpABslG7GOZr0N z5vR}>u21!a8*=(W%UQ-ggZ}k5uP?kQKDJIVw#1ToK_tlPC({>7pIxUfq^{@HLbcVP z9n>x8KBq4`;X4iGMGI(Uk*H|PM5qGQEuM4DEUpaK22 zO;(Hj-ICaYSV=~dfMhM7b$sygO(n&*^Ig*7 zJNZaryorw_#&_|N)c77gk{oa0BkA!rK5{eMULqZ~$sn)PtYGo{i%WGW0f%`BjG}*W zIWLbe6Y>%l_)>yhj+eOPmy&(4#6`fA?2jeV$Jn3;;uk4ptORQi|02zdm0;81UlzwN z=xI{vu!62gI(*RfQbNx6y#9JJ{>hyBqzPgE*Kt2*DXO9ZC+xV4wcG?qm0%9egvzBoHVvIDau`u+vS9( zdGTtt*1Q-sE6s~bv(g9VCit8UMCmf?G}$6z#!PsfijNB-V>T|86KCRKPlOR@dOB&NOFla#k zYso567pX`AI>B&l#?Yk_$mOX7Qrf60riGZuy3}B=R8q26%{gYsiz07Ni_EIYSUm|o zgZPm*z|s_gK>h}qSB5aY6I+U+c`a$zZbWvuEk|rQyZl8hVHWIip$B7^ZGb7+WhX2m zy9~Q}E%{E(YS!$sM622E8sSHH72bxneur&jBX*hn%eJu03RAWzfm>FTh8k|!BQxZ< z<^7@u4bz}nGz;3mEoV^~cB)DVrg@vnOEFDU5*AIX@~GwZ1Sr}EbWz%pGS--D-oU1E z=GKuljIARg)H@-JL%ktmEfX~z(kj)P)Nstx@wPLvyQ?uKOwI5z^TdobV|+uLVRL85 zon7Ys)pBRQD1zovfjg_=$`r#E@uFEHJ~BKw@R+H*%J?j2>0;2PM@VzhAQ-5rYp}|i zC9wRYo9B3l5W!wN-H@@1RWi}Pe}TK(0-^Z9o3C&8XBLs4oD0hOtFWg)C;r-xzi$4) zrbjU}39KRfT_dLhH17+!Y7VXX4O)fl7VbAo^r#y1ID32xtRc`EI6VZ^4KbBcK5>cj ziPr=MH-#G2>R-?OqgJgP`$^w`>%aBPkvu2GGa~E*$TkX)$@a%eip-a6|1#!_3PcN~ zNspSW^(JOK&j$6%3_;Lc_0!3%^vV6Q8oZ^Ji;&HZ>~k`1qWM2J8IOyu(%uS;3SB?W zKO=mqwiJTzeD16`7^br>)|0tLZdf@HFwcX6Q{UETSeXi~F(xkEt@T7lP4`PWs%P@^ zI9Hg*dYgw2ydwD-P}pi*CVz=!hB}bWu9DE$H~D)s6K%4UOtr~W@J;@=YNAcH5}MR* z@}D+ZnD%ocA91!?WFzj@7q9-wh8g#p^;^O9&*n)3xikA22j>lIXMeUF%cPtY{4=!zQkx5{ zuw6WmY-Z$Q|MFa8tQ&D!YHauqPTC~I0srkuIjzm=tpxv_R(UD@i#9U>4k^`A_?p_u zC;%Pq-sA|)@L-Y0%3H(my{dQ+!1UwJUXdlb52_y9c^MfV->?MK%ov!xnF)ki8ZQBVAma#G{*c>jeiEkxC)RgTagcClsP=bv zHeuDCK(Sp z`{TEGEb4|HODThCEGqsxSA8~7jZO(P>;^q&tcI-B^Byg=9_r4Da4BbrT_4p@87qSH z0GrQgBB7mB8~m1_?gh4x7(1E30gwZE(Qejbq;;!FNcyBWrDb8!b{T%>+N;!%x09b3v8CbnEUbxW857Pv^SRI?4PezuuPlsv_2xWii7 zVNgq{yBRY^r4uob;)OfG3;$3<7_i5eu96e0ZAyXt`&Fd`*#D`@s{nEZF3fTRdJz3t zT)>=oZS&V2JE$ul0>CLJ?9o%*J#sTrB=L|cRzd0l?8*uii!MVlSvgq{ zdITyXILw|jih-xZuK|p@&sf$(6B;5Ah&s&WgT0;Nz{2oP5SwMK9Meq~zV2&^np6_q zDC|&4xTI{G8a@;nF3EP9zKoLSdHGE)Nzz)_(UPvyZQWcSn6GYcqu91gPBsoPI|XVo zUEUw-hV<2=BX}co%DMArl*dfD3X25_t^40J z0fB*#kHWG>n0)J3^hCJ^#W$hnvXD$IiUWbU^0nj_^;m3`6k*aML>%OK%;jC7)FpDH zavo2by=%!Q)oi~2Hvqvi((NuxQ3>gCC7R=i;J&g07H0yO+QguAi_OWFEnDD>qgCT=#z31FnYKSN`8txq-%1jJXNH+3hMu<2+m`D$2;FbS zPr}O4OCBi!=|toOcXD)ML_RDJG3@Tc9)lc)RedS)Ocf96EO(KDluHm8Dwv9o3ZlIj zt6RN$g?qgRiys5CJ#_BE=;eu#3zv$u>Pc*`{LQLVoPBw^Osg6 z6yI8yTS5*h$zXh;%B?F}YWuR$j2|{X#RnB>EA_!SQ zDtYE;Mp5L898_5(cxkQz+LFBps+SJnavy<4drm#p(bG3D^Nb<2OxIx7(6B}PAMNXWGT^q1hrv|7vy-2Jmz)Yednsk?3FxwZ+hL4fs^AM{#sOmzk4E$^(2WOj5y z2Z91JJ;})0sW0(DF7Yp`KfA;TS}ZSYxWtNNvUrb275yF9-lb{`xae|~ga z(Z+OKh23){dgHnV`4byKA^ftWQKCyEuhhY^!`#qVsi96#sp+OT%s;2crH47QUAm7t z*OGs)nz>Vm02_&}3Uvw(=y=+?l@e}uZka5+wn!`gakXqf*VvJ^@v=0u5(Fxq?f2l@klRBK1uK(XG)`TfQ)An$YuB@9QUPf$Z;=9=1{0- ztijiC6C~xE$xZm*r@0Bcv=zg%z6na|ReNj1&y=ZpN^eakBwz8?Sc%TgHh()QoR8Ae zV5gG5Ib0Y(atO_a4B6nKT_w)%Eb)Rx>Tiq}Zt6srUL_q|=L06FLjW7q%v~ky_pT*> zSA`9)QrwN)RZ6$xzpCX_S1F8VYGb$4(oRS$wU9*T9T?J`gIEoB+!^&0Gc z;XCW0irj8`d3wLjs7lHG`eBvVytXLx4kksGFDTrz6<>#YmfboX%fhW&skA?S3H8h! z{$_g>muE;RUPI6L=p9dmoW8*BG(b-CJrxF6pQxno&@MiZUd@pD0 zb6mec52lrdaV7zh>#Jo9^NK_ffIrVbgeQ*(humw*U-zkQ_hN4M$F-$)yRq{yj2Q^R zrRnYd*Q!!-yZ>7}DB*M{&0{9rg4^4MfZPZhZuj&G>Y8Y&m*A%Oecuj){rSzWu_Sf;E z{s(R8)ED*Ns!GX4{X>=KPRBR;qDBe-tzOhj)jHKZ{e4zBlY2U<-MGbjT9i8vjlRPo zaM~S}+&L@Ic^!${{)XMpN7Q5E`*}={r@5c5CKX>?cRy2ELyhb@TUFq0cV{J9=ii_1 zUfO5_jqha(_foRmSzgL-I_~^Gw2M<;$$z3MC0FwQQu#OQN(zU{gyB~2V~{vbbs3e! zrom-2n)dJd`lI0G^`ogkrHy+eUC!v~3I4e>IzDmEkzn})9l-xJZf0H}2u(Cg#&2BR zG`?LI^|>{q(h22Zru@hNWG`p`Ah z;~~^2+YhS2e^vwC6^WUg&a`Lz*?kzTj2R9~;WPY{_*Y{eTTHkp@;l_jRZM{e=!_O5 z?FivyRbzUi{aWe6p>HH#?ZYQW&Rt|l&s7dpe5?;xo6!k9*vcr|;w?Xd$g^%ZlL^`W zp|uDzhAx_Bk~1ZE7eSi*rlxF{7Q-%+dIo~mL`N1@_E%J;cxh`TpiAB`V%9~NLnpck zH8WF9!7WHaWiNPZ9u4R>ro8wLhP2!b1ds;90F(Xur& z#t(6zW!n^kt=N6S)d8&@{tpCOX)_CbY!6Ni4E7DU-f!=0+#i(W@lG|!+#c}uXD?;) zWQI(D6-719x!WnKu}htlNiv9QqCdpyoQ1LbL+te9KjRSMg&xcw!sJ0y`a`%IL-dEh z@!(ow)a$JMA>^o#y#j+w3(X%w?`MYo5Zco+e+YRz1b+x=l56}Sq+Lx-gk(DUy*iCL zaZ=FBbX55=42&#FFs03;&RNE_?@*H>7%{2yhg4o_ADTj$W;#dDa;G`k5v;jypwt;6 zZwl(z`0M5#@l9}wz_!3FO?~|(?*DJNi$sY}goQWm?JJKX{N@tph#!%z`#Hd6tq)}o zjSx9Bn!Plw@HoQJGPA~s;x=F{u}XV}61L)YLbk0i697YX?}9O&E-Ne zcSd|?H%6&irw-{WXCsFw|BsO~+XWg8qLha8wZ}8{S&%7wQ#6HtL|f&i@D}Jw&I4l_ zOco1P0>P3CudAypYlwS9EUE&Drj_f~zkUGXV$U+gGL>VP3{kzDKID9$C?aZncQE&X z48hPx`?MxuN?hRU&(e02=9F?4UtkkMHZ}6#(j-RjpSv`T-k&DaHcQN91S_q|N@Hzu z{VO4bn(}Ozv8z;kkXsyqToxlQY)%Uet$5*FD^$Q9^G6}^)A_N1(dXK;DYYPS@OSki z0CpVwG<_pI8IcV+`cc;Ox?uie$()WevXT->{leCY^|Z5cendr=w_a%P-nNtU4VNc) zbmg&;^Q4sMxLmpS{OM!oM$exSd)8jrdj6vQ>K`9Hy{*Fk7v63Zrww(C;d=QzsUg2h zFmB`x9I|KhB9ryuJLBlvve6%B>lZ3I@V>BV zr{37f`u0S^bbZkoW7Q)VU)c*V9xzyJQPx!C%3J`_36gQBx}-kIFJ&heGN1gS%&u7k>qXLHZx!RzZa zm$~7=p@CD?p;H50iW7OuzR*)*yZ-@LZNSslrEdQzfneqFEauMRoJO~0{P3ohQa5A_ zOb%>*1{NQi_XC~NuQ={KZjd5vj;alWgc5kwMeS--{Vn{Z8Aqi z_NAmUdghtKoToWd_-`CpGVukqA%*!ayrwKbEk2-FSnR>(8%m4}mm*P`i)>9>wQ4LS z`%BG>%Sj^$FE^2XMNVyX6a0DA+!h8Ao%PkG#qzXmTF76GNdRkG(DfTgiq^0`B{N?r z`_=oErRXQsUN*}<$@H;vP_i)ED z<#WM=7?AB!DbIVQv&A7hbcC02iHvDy$Hp%l+N?YE8|p~lS0p%hN~Ztv{Ssm@4ZO}Y z*RkSfL!5+epW_X25|I6hcjcVKucn*HW#+Q>gF*W|Fr^>j7?!vignR#XF+G_^cUM;gfxX7Le(FbkOf zv>e)Dt8`;+5>TiWz1=qD%b?+h779cCb1h2zjP<1JNH|yvPa)*vWHw>T(_W|`GTSjz z?ivX@nN^-0d4ivoW2cq|NB&JJzi)~opMl%RT+6p4JO06veB~`3|FR=b@@1vc>hBwb zbksll(o3L#6VRmb!lVQpMhv}#bRVL!qq>!No~9|Ao;cZ4xI$$PI1fQUG@!{$&+-Y; z>^th{utE;wCP^Vey#5CQI+BEOVD!@1_yo!qp(H~`xxyB}vmv67YXn`IoR(9EGnxxQ zFU?Z$`$Ot+Ve*#w8y?~OPJwHFP!)AabzhlJ1OFU}Mx0`E5vm>b%rYSkNyRb0f zTQr@egdRP7Ts_=hUezf?qDr(T zm(HD@xH3K(Tz(AW@13Smb22gVTxf7rm&6y|&evlT61peFR)o21DZud>I>bY9=zOd{8G5ni!j>EK}7g*{6J`a9Wnt@)I2-tcp z)3NFiqTGTG7^pG@c>P;UUrkGLY4qZ_l3W@Q{$6z`7u=FJpSGEoT%LI0e0-S}igEg7 zjlSd3co^gh8f5x2bNR}pT%(GP`t*%XyG>vi>698xKesFRIE5B=qcSd})D0o1`WBgH zF-r1`q*}$%{GS@raDn+@W#o^fZqBKENmWY79}DUr02H9k1|yrJm1Le0$iROvI9)qi z@LvY^bCzgdtLIRVYt-7HmhdPs;Yf*Zs4)p75tL%lV$F%}YDQ#nd@a~T5e$Y0iDb~- z(WCE!!+VGC+slX@$M>0I&s1E`F(PN*niA2HXMY$xbc;$v^A1f3x!Ujr)5ytN0c))& z?pnF!k3#jq{dXQcHe5YcE>*A7Ihve;BU_Hg=&DROAF_0((l--VE90KKqmvLq5@}ou z?c6FC!dme=^mhGs*D}!&q}Rxt6M||3K{%%PlR#nfKWgOMSA>Yn9~KtvTJn;9x&#|3;D#u{{xIOQLANy8 zp>ahL%1tv4F@G7d@71)D3|>>1FAk|kRdrQW)tJ_-Leo+zyhjzX`FxLlmd(e+wzgnF zov8TTXo}zKY7`W|>lz1VVt0v7el0O9nJRwoV8fkQjfsng2>lAFt=Chc_`TBX{$ zNwdlPe2;Bn+`ydLR=ZnB{kxW+4p(2fm*TA;Y>veZc$O9&Urwx{3c?E6FDA1>a%PDZ z#O26e${yja@GjG_DN zJU{(@psecl@OXQ!>h|P-{O`8fQtt?dYdN2@~%S&>qONkn0HviTx_DB zP@}wpc_%dtBa;4jmtA6ayJ**UlimFzH7UV}2bAETRKX1V!+N0lGF<{fJ}27&DHo~$ zNSk>@E$1ame~IZ+1{PBB1o|J z1@1x2Ruu5pi{rlzify{gk}S`+xPtsXj)nkFV11K;KLIMLjx8)9@gSLAhX+sfOP;BU z9fYVDuw_Jjfye>c^>-evQlY0Cox{M8{7ZPy7toF)_Is&+I=cw!)YZABuJi8R z&aNlAkVs9b4*3&IbIOtk|DNv9`%+Rz5eEw*-(18)P0(iB)jKuR-7{ET zFSE6ZK{O(PkT;Cqg)Ec2pK<+BU zRwTTDU-`0Q{SM~xWz|lHb8fc)iopm0nE$M(jzP9Z(r8>^-E^g5prNu^W3&+KVsqu# zKv!2q@o)P_o*O;XA~d#|M$?a=7JMajxv zdX1;dzjx|6EMg9`7+#nQ$4X68;V-lfnJ!p7Llv%7NW&#MEt10sF`FF5k&1+dY>n~T zck@^>L;fH^ty}BPN)Waaup?J*bBh83uCoo=OzJ6qte4bO)Pe;AT(90N_96eu0>O0u zl1~_iEuEhx#UGw+wGK8!xxP8wc$Yks>B6y(-XO#VgKSjwJSiXQX3j<^zUu-#NP0&OKk>ep{#~Z`ZJ&bV1<*S%K}$ z?K;%$L+#7Hge*z2+*3V0U$%&&6|&RY&jU15Qe;iwj#!;xU(v9#zl|?!Amx0%AIWBMCo^hEYR7ag;f_>a zU}WCUvH__!iS5%;^v0YR#2|}W{)U_U4Ug&SNC~Fx!GPK~q5w6TxUnrf4;$~nQ`urt zCF_j*mU@7C!tx8)@VIEkwU%CXGtl7Euc5$DBu-si{flH07;#&2{JRNqq(=alW3SPc zZ@!{HlFoxC`C+A+5=klzx|DC?5E__|D6`n3019f|qov%2)1%o6b&j4rggSz7BifA3 zMIg6Su94%TBNL-TBhQ{6Md^|1#5S{DBY(-(bZ?IQ718hH@B1{p67u(VRUW;LT_ zbJSq(Sj1vaU+-}@Qo*s2>YZK3q&P4lBu7jxg<2IEIoLHQBD9+bEIqx0kT4b}+Z1R$ z+!834#Yv%Fy^TtdUM#Ur8CC~MSYR%aon8GM$1$!Mwkb;|M5q{>>L3yc{SFQxXgDA5 z?i@NnD;Cs!vZKc;0C*^g0AyJ*9PaaQxXqaxJ-AONyKs);Afw*6cqby_Qy5;6#TRB-X6K?Pfq7iG`#x z-w7dscL)ee#w98d8J7YKtQIFM9KGYK&1W8c8JbQOrp6B|6V9?E78z&}@K@zsUu}B! z(U$l~B*(mDwMdTJL~=Z?ahxptRU-@EDglYaRAS&4B%ellAVwc>1ZykJrG*Je2VId4 zYMJ|d(57Tp<*QA5vr$E6#{L#a2tao$%~I!4r^r~Crx=Pur4wG6HDz#f1GAA-eO2gc zd6HJIo5jP~EMx^_i;9D^Exb{j&HvPFrr5o7R-P5L(q};&IfhT3F*3sM94M6VtNElTk zi~ES@kc>5*>lP>Kr|($B zyAi?YC$%}LR4CMRX%%m&X0|w)gVAvJ#WSPtXkRFk*4qo$|8EGdvUp*k#c~%)U4`n- zL{fB#87fQrgyt;X$IN^nk-qaS`}XX;Z};B4yZ7w>JD5M)yS}Pg(UPYMk@=l(5v;hw zUhv5Ub!1^0R`bd2t=7MH|sZ>Jt7(UL$vj zHc~(c+aM7}gd~ZF(8wKvtlXU=ckW5aosVh65_0E{YT)`x^k2eSviuSAJwHd*1nJwo zjmVmYgp6IwJRuXsUC6jPWx{Z(Uq@65FsrH%4KC$MX&G#t>`@m)LACEx?@)=fE6ZC! zm~pSZk4vp|Lsii|y~jfu^mLG7y=Vp7fzyP{V38AXdkEjx+f`dJmaF30!eEMh%lu3r zMp7eUjx%*GiS%fE3n0X3AW8qAdPw_jLB6RZa;QjON$OPX>FO8&Gv{{-w~n}ND_jJH z$f}B{s!9;_-ZzPe3RGArS(6ey)6zFbzzz*;MC$Bz|C6LEYwGPqK&d%`A=>WFo(M6c zKeOEx+?3Yqwldq@|Db6|Q50-K;CT;A zD)U`)2z*!%W@^4mgfKwW6*bYU1*%YQ?EeDr~R-2c%R~JDY>r zNrXTc+lm@rqdhS2 zgm}NhG`^B{s+LJRm9jt@ZA4y*9gTO_wd5(?H94wH67Xzygye_KGIB-2dz6j#eX11g zttBBjkur>poH<7-ZV8F4C$=Zo(;8+eFoko!ZP4eg^M8r*U0N7Q z$&Ev;7O3X-?fk#R>wX6EQDQ}l#>{S_g~XiOLSkKCB~j$NVb;=Zw6qOh6qVn@HoC2= ztVHKy_w&wd5^h+YvPnNG~R+G@8 zKBdl1G+fkd_Ncg~vbXUGcGiPZ60(yG+#;(CB5fRi?fKATnM;?$51`R|JscCoY1xdXGq_!zAwzZqGNDnzs*`{Plsl0-Ulu+8N z#mT|x_R6^Dbg#~;|LTnUX9K3#Lb}ej@E6qc(HZxQy-4GorQ_nx+MeAredoGFqTB=+ z?s)xpIKp=)NNmhc`5vTEH}2(olKjcNvd_260&Nw_AC~hd+b*_QYOp@GF?I5YAP=BQ>Dyeu062?atSOJF3TE^DCLmub{f$;*@pVjZ1k!l8?|(M|ES z{*`*3`D^`iRd4uOXGSu9o#-|l+gSyfnE^dWcKLuXKF`)&OP*ZJ@}qI$-a6yNb$UDt z0__o=+p&M(zt27%v$2@ZRG zkqbdEHv@~iV2qBS&+y?DEX(Q z4Lj+{(rYdB$j{{u7+iCxp6IH+sSSCir9)JHEVCEX=A(JVfTC*vTRD5!MZ~ek2QYH% z={vrg7Ja99IP5QDxU&z}01QP)=r~k8fhe{&eKshOX-(!~E%)(`f!-jYU2OtYC2dqe z=#p0Ty695b=7uD7g0nSs^mh;O-rj6WDN0voWMRl_A2wUQ%rbGdp?)sFs@E!sf7a!F zQAup%gzPxDw=vib`VkzT8c_|XLS<;+wD~y;w)3y#wjIseT63V*&D-qpOwHTUJiGIQ zv5Dp@by`Sb3#}=)zILh8UemZ@&K2KET>Ju=mi?9#CG%4g8|AmkV3$2|y2%Zqnv*^B z^q?wtJje`+(Gg6xn1c0~bX7p+h7#wG%(U5_cVsjf=> z1#<{jyfk$tA7oMmo>@2Q#i6(qFah?UV=(;=l>n`l^Yvsu70JYmvV=%X-sND2iFyUOH@E}d+c z7M10ewYrwr*^qsOn^a&}WGWBKW5(6OYV$K^br6td7{@2i?l!H(gp(XONs^!g5Ki)A zl_?2s*GadVv`^opE(l3DMFEy&OkFoatQQZI=+_Nre-0a ziE1vU4t_`>;6klN#64TRN9i^YFtDbpuXsAsKa5ii8W9VH5;Bc8YPrsqYqN0fphgMO z${e549PNIRu+u%9+&N-HN;D0sO3D5Fmnx5DFv}FZv|Jw|i)S6H+Ee6~Vmd*Pk*R)U z>>ken_*QZgO6ea2GLob5qSf(41(j-{AlkEA4?16eA&2q?gmX&XyJQ4^I zXX|>Km3&RsP#hr@|DoE|Nywp&qur2qeUVZG+xFR&a?n#AzGZgQ)XYPpmSoukHgQw; z^$#4c)Hw>I6j4}kxrNvs&dhA!k}340MRmB8KSXvRMIdbDp~IJkp;3Xhg2K zTy}buOIiX_{)MWQL56?e55SshIo~n5QBZvbU;yaiqWwLuY3fncOcPM9)q@lmNXa=x zI$l?E4yZ{^%_(1Y6aWivpzw(E$Uum^xTGRoZs5S?p|&zfHWjI>M+3Jd?|KDiLUs`3 zIDz9@$r>yMj{yrr#{se~O#ZYAVC6*^hhZ0v3%lrX?>o2N70(ogqTag^ZW4 z5r}|S2`bdc1!fn2s(bnd-Mo4&>Y9Wc_3%5jH*m_ZOFGdxD*OOfEHlt_lNZ@rPH9JJ zYD3vHqBc|%oSl-<26dU^Tz)J_7MR4AuXr&?N&nAudN(4b5?Kr7jF3viu~DINz%5e$ zswjhntRl4OwPb-R?iB@YD!#cKz&WC87bi!^yTWJz*F0{wYvAU&sOR?w^1g($s{ z1k-2;i(V-r-ZCS0Qd_Y&AgY-?4v3!Gkbkx z%=3bbIgsU~Z}(}-q#v_#R60_l*~N5pjq&vIDJWQuYp>kvKy9$@k{}qy2U4v*1>v?xxmM7h0Co)m?E9wgq?Rj z7R`u~%!heG$})?`LX>DH<(; z4PbaI)+F<7>>l(Ln zG!jNT-N?l8->B&{CXVY27Fjs#nh2$4;%F%nQW}1m2&Hb~cqvXeF!V;li~2VjzBWjy z#fMAH9Bm#s`oEOBmx&{2VmcGYFRMz)trn-&kYJCo5Wj9FjuB4G-ojC2yIVNwoqv-_ z^C+t;3ph8z#^)$-3o`fXk{v6HH$L7H{MN|80n_suqkhD;Qc}4DYSfs{kEp*W14n$G zB2Slr+vAzaz=Mi!u7#Zvxt|*PD+qfU($ff!R5nZiPsN}%cL7*LSYiE#UBh0;WsAvf z>?8{-PocfD!Ra&^c#Oee+u{xnwX)yEDaI)Zg7R|TdhqUup$O#bB)toRBv;3*6a&PU zKc%2{KW}K()GRDPvjyBb+1Gihr>_i|CMIyWYs$d77Kp(39$5}rRLt+!elOwxy0DJJ z6h*Jjqni*!R*TM#iDw~-s~Y*S`z||n?^1!RyPOqUpo1yb{vXqE6qu|OpV8R>pz1B+ z(_~DZ`JWiCW$pExv-3gegW&qU;5T7A6Ro%Rkra5Y`q5aTdu7lnMwLJGv$I95p9ohiNWOX~Vyz8autbjD5nuWx^3cCP z+a!4prE%F0NzBv>Yr-*l}To00eN$RjRWi#YCDJOe6priTWq<=|$-;Qu$ znfks>@`Dzc%P`8d=CF2zqUocg|Y&!pL=s;m~Ui<&oqpZm#V1 zYBh?HHr|B^3k*3CM%v_?!8>HNodXH7_BLRMEM3t94YVQkq*DwTo5s}*A>-GCn2N`V z_$-wMK96Q?uz>4(vTNu>U*{lSk&@U~D5egDA>_LBdXWK*GHB2kb`(HN2?#18QMWlhg5z^Wun7C_UI^mh!PY_-6OYQNAtR(oZ`0!C{bF#b90w5L!Z zv?<~D9KcQ{&UBdcCwg0V0+Z^c&C%}z>{di~@zuC=FvXI8pssEarv1L!N|hj23Y|h= z4&i;SC7;y;WvH>RKz6v5MS9LFkWDG>+s<<{&HDn-uTY1Yz$g7Dqt~DlwP@FZS>^_& z>sj7d1Ek2Vya&@82#-o{03n&)%-}a_j$*=w_Iz35=%$jZCPZv%*Z*7aOe?jjE7g_b zqT1TB5;hl!F9^=hNw%{$=``nj)l&zlBg5?$52xbd*|>9De7TO$i@^R3h&W^}`q2cy z@Ic&uE->e|93ThL!3{dsadbnq z)mq4*Jq`MpliVxg<9jvjbY4u_g>`p;paKrkf|@uAVPendusjajYzlBQJ~tl>O*Cg~ z?vOIppvhI-~7yAOYiGBGkK1^mcwP zgTP?qRMM?p!g2+LKWyKPn-Bwgr<^h(6fXDCTcau^4D8b?Zxq>l3K)>nJhde?(6j{J z7C>ehv@OC+VvPjgU4)(rN|N3K3E_F%8_2hTzQ<*Gr>lfsT3-VgRg`pWOdQk#Q&(VE z2Qg(#Z^zJZ4`wJmGX<+Z32okLWS=phbCTDGlCf2ob;xM|y>u@@3^@eNXMXzTqkQ?* z*IsT`MCKO}uk@XS2O3&-qb*U{yyV3N2|D!tE6<)kce-uC&0jV!_sO|{IhcZX1Dqq^ z`>P6f%$R~ZI7Nw_4HUZQKm5qTA|}ZPbUbu4jw+5!O9EQzz@F~p(Sfc(FykOYvGf#; zWD}mB#Mr(Ih!>z730lKqX z$V?X-j-eiMmkyPIgvJDz7&W!(>Qo=8ku3*2WJGYv$ZtHRBl73(SA$_p&2Z=?#Z{TC zX(znV6f{%e+<(x0xjyzvORD}ZMQnhPW`=qAL)sf%IL$!h4zD`gKJ&2i+t=c^Z--8kD!RL5 z?)J%#LX?fBLxx zZvw|W0ZZd*x_4&gith0+oi1jsf2KDDvvzbq4#1F zW}^9?SJ3l6Qp3FZ{aEOPumlIsKD+PI@bgOTb2#52{TGQAJmz-i>N1Rhrj6R+_VWJJ zhdk|S+6ihX4~32kvoPdBWwX?|Wu zsqwovxt!j#!R`O5HK7IJW^qu`ofW8b3D=uAb24#UncO&la9~l={^q`MJedbaC)znz z?KC7LP1-O$LweTobApTlt`BKWI-DBDfPL(Lrn>`=QMNmc4lquJ#p*evU~hq^fz!{O z{g$UY(!JEHtC{h8%+5pj)Zd&v7rSLE3SqN3fZ$Izv6RBJ?!Fsx{VqWpc|r=k)7xBU zx(us*WigX$!T6XA?aplJ>fmryp6WfoCbk@^)v6LC8TLc>}G zQdab9NA=W6o+#5#*P}@0O%^GUfCBUJ97!pUt0pkbQNL>`lhX^PnZdSF$WZMZJ<4@O zgP9y;b>;}6T5_VX{@nBAWZz?5Z?@PoB#u8eKzBl`D-x~TzNT{7sU#CJCY*+{ly1i& z#`#&W1DPinG5u&rFcRoecXXnTU^H-IlKULNgw0W_$3#*6sR^bEAYO(}A}F^S#{0F` zL{>4{^FnL{jS06D>8Pl4!I60q&)$4}kC2`C!>kY_5s5O%BCM{25YXw4Ep!dyRkCgh za6N$Wan&{#R`qV3Twf~nmXpfNm2rq!ABn}tm9mCrD^&WD^7t$~Hf91XKz7WHS}SmK z0)#+~g=xwyIF*oKni!yJOZm2OJ6u$6sj zWd)XjgfMg-UchjvPFD3r>?_93pZD+t()wpxzQMK?7B$;ew&$PdsMTzue%j078nLJD zm%|mL`cG;%g>!^r*tc+Ce_6$Pr&dgWUZGYV8<>xY4d_AET&BOYG;!jpi*G`ZWwgHJWvOqEi3u4nRNUQr|Q@* z-n;11&cH&%)$t4nN{6?vLO%|52Sdh*;^4C*k-q1j?_g`MK->h>rP zSm2F4kx;YeCL?9|$_MpFe8{0p7-&UHh0Lz12hU4m(MZxv?~ykU-I-EN?2%oj_ZU9` zN|4#F32GnG6eEoa{cg`d4nhi;a8eSG!cw0tL%&%~v?u=h=J;(9w`1EtfFhz!OUgnb z70xy-Od1T0@3@lKdpT}L_uMd`tv<|BF}$@k7$`IuE}pA%s*oLKR;=dq0lVrFWo|Y^ zF42B?T)>Fwq+kg#W=xsSG&o0rSu}b z6qw6#2LPj|x9`|7kjfPH&0H#vb|}XhbHF7)^dQP~@{Y)JS-!VUGS%y_PeT5^1}a0R964?M2>8YDYjHw@o?dyDnYCk;x=|Cu? zrc~dqx!YSMlxewr)M-^Id8P3sBZqWU>|+aXLlava3#MV1Ge*vv+ZkAfy91m`iB zE_vD8y@pcaIt~z|y!*{vIv%-WBHtRgGgTev?jsRQh#DZ8kSh&MNd1oK&yXSzx7isg zO5T;MIH&BD8G&9N=K9$}QKChyuBtli7%P~ClMvumV6T+ME|&yf%u+7-Qxct!L|Y~p z67BiF#iO~!aOeieINW`&f>k)bI27{tvFZ~a)h*quUQFo+g&MRx&ysKRl(6_pz0?SB zI1r8phHA&0T$*%^kB^O4h+#LP2wjzy$vYAv&`t5b0=kj75M=*iB*J_GNa3pxL#{Lx zU7ok9;(@!t_?+Sj0u7k1fR%V$z+j9eah$g>>q5XI7YxD$>8%j4F6UJQCA9>JsZ^Db zU6|UXS^!HU21HsIy6lLSkVnDu*OEUJw%;tXGaA*CVC?P>tA<2uhMT?GqNmY5sZ8{q zW&-SPf)?Q3Y+{C?w>b+Ap%6cIs@KAtRb<6x!_{=QaH`It39s`R=!WQIiEy!`1KKUQ zVx1qkeEFdYKiM=R>mO1LZG_dBpPU?>c#wW6YnrQ4bBk*FlRyuwximpAKxmkpxC*2h0V8yd+3E=RiI@rGk3?S(B?eR_yfVX4 z)o~$1E2>@7R3t5uQ^1&BAgpUR_4|p z#Yr9tQm8X-&kG2ph83nv$qXw#qlb5JrgeRc zpjQPM;YfM&I}v^beFsmtDclm93kHs@xS zqkKyYKg8!qKHSv_O3qup%}(Px1Bqi_=64SeX-c~H0ag&K1rtEB*?9iFqD6@yh}S`` zo;_0hqCCB&pz5KkY1PQB%VupF+z^Ni5jqzW6EhKx03-)GM5TFXk$leKH0&}pL%?Ms zBo~3pw}^J(WQz^E0TXCnvD-QXMHS3J^B4>R73_TlaD=Wc>an+IS{N)5YLwUgnz$*i z@e7B1B*H2=_S$HNedo@Q5! z*q$u^Te&CSlG~HJ z;-0jzCk-?z+Lu38EaW$AUsla-Un0?+0VYm_DUgEI{7q$|${&~VmCWeGJeb=Zh$p{B zE7_gAnSSxmyrwwFZ`kIv{Vm>{?YYe%GN>@joYtIP%V^1Kig5gh@TJTRTUXrJ&o-(q zMAyBBCxGG7iOF)PQu*Ln%7cPzek4#U*3rOILrs z^nVUHm0$Y1^gAwq3&HB73}I7^s8_>Gz4(zpX8eH~eVum4vIZDIwCp7_yIZ&jII&s# zU~Z*GOU;rtiZZ|&s*a>kC;^5`37=4I}p3Ztw~vIWTo# z4394d8jhmb5OivQx?3zUOOYt5C1Bi*4m;l32S)PHyJRuJZt)9vjHZG4c<*okX!8|syzcxotM}YtpCeDW@?W?44n}858JYq3AMPxiq>Y7t_ZzX_#tD*sDau9;ter zMTM0?qVkMaPjn0n${-bA8Xgt-XI_eDvbP&PvD7)-CN@c2;U0 zY}>JS+u_6Q2M?y@W6!>=cjUt8;lo=h9fOsF2YdP+?;6_pl;f8 zm+CC3zkSK%PVet1xv{Kup+A+LmR7FNp~W6%!nY|W&=_`zV;3jJ$IeT*aah-)F!^k- z=aR{hFnN61IGh+TYBWD#6^<>CYoMb#l$|m<-?y`}C9RGnI%l|gVqoju`?l?{fA?(L zS=q~fJN9j>a2z)iwQO>C80IngSZE0PCil=|g^qX9MPXTW`{Z{{`?NB_sUlptExQl% z{*W^vct~%dT>zmwlldW=>POjOob;4O`R+TFrOk-Re2j^GT*19H^zI zeozl1LvbQ>#yQMOD^m`}TS}}c|8M&v+(g##eD$c<`mmAFvH?MhN|(qMb#)qr$Ic8@ zJf=!es^;HDpt%6Y9OYE+^UVzXklm@ADoTWwhoFd>C!@chyK-u9ze5YnwZfN@_fSrf zw*%g{%t%T7x`mxdt?CIoWBzJ;pk*E><&LQRzwq2W*d#`sM#F@Xi(k$hWHk?2pQLfu(z zkgZDAb!OG~FVv}GVQi$+%=;vE!uV9wUk?#sAs|AUQV#*4A5C0nw`Te&b+;!!M`h&m z*-3Pfg=mQF!kyN=mdeU7dTSjiN}Se(0oA7Dj5i60a2bg3F3~fF2#LUdyRFb8@EiYU zy!i%IDM5tiRsOBh@O;@}taaLzaYi0#-f3ZmW0;wGL%=e{c0qlOW~vl#HuiT$;E;tq zh(UwP(X~|A`50E_CYHsp3UT!N2LpU0QbH$?C+|*HVEE)2R%4x*SBuXQ$!{*u1c4DV z#*Gvo9(v%u%+KY%HCgpYIrvH}u8M!X-KhWt_U`XEIqXXpjp2`%$4uwsQR>C2nL2Ai zQC2k&7VE=-H>l4l+PF6V{~Gx^_F7>TXAS zGP%`mhp}nK1ayv`#Rlz6|M=LYj`8u47u=rB=t*%nFG#B&alA~1-Lg-D%vg<{4&8(#&P?gK@7vqHWYOF%e0g;UxcHV(GV*1MLvv~U z5}5@ePcrG-B~kWo6G0(3C!I5hWWKl~}2ACSdoQ!q>K9qqCF$OY|Nz7xh=IqP%-=}1UT*ndAdsA{|4!>ce zBvE8Fvk%XqA)zifVP|J~PT&A}g1uLVG}^L~gSGEiWwQsIZ%ICIM3`rDC19Hd_vpuy z$sf^%bAteS0E3D#49-Ls1QW)LUf+5*NBMF9Aw7)@yasG7Qv0*DXf9_d$_wMdv zThE{GJ3s1tsxzVer;he?SK&anY@v7F&z${ zjt$6UC3c47%0S}ox*=0p(j!_~$>hb6XI#EbUVYuWWd|P8rBG4}=xJ;=pnjySDvn_`RCCFm6;Bw%{TfBg7Lday)UgZ)8aUN)yD z1{>;?>$e?}Y*I<0mtAvV^PZcZNas=yx4t`>{0tJ;G#P=7P&ub}dhYBCmC<)h zjE-L%IbXRjdf{2}#M>TLE^?hNS9UjOb?)>CrudgD7soC0L-BpVRd0P}GcM0yEv|R5<1D7FngHCMixTsj8`xmb<7Y2yb#Xw|D@G5|sST z53}JX*AWBnOeWt^zxxPF$amRz`|CEo*r06Zc@Y=R@$$y`;(I@q z?Y$vN*fA^zc$uVJ5h-0909{@q2o=Z19&do&VnY>FK4W1r3Uwb{{<{ePQ9m(W9s(9++x&P(L=(#gBvx~)XpKD*@zY#50 zvNgg5sbE=qSm`w|r0#{o$@VhzWPbjx5ZShK%a)xvEa9a)P?1P*pL+m^3C9@1k4otNo<(u9*L6*&t=NP=A|^o z-N{x{FQG7%Oj)xzncV1G6bZGUyh`ECoe5q~Y$B(;e`MmVdg13!`{mOsh=9Q_c6Vob zAgJG-zwO79$qx0C0v6Sr1{A4}w7vr(y~2{U=#ZAa?)0q!z3UVy(v*7$#;CJMDf1+$ zK{u{&3@qnVxF)@iMzID9i%esC`oy_2kYSPy?A({J7b$jZ5_ZfVd&52pQt=78!>C6-&3q=f*etdtu$^;~gHXu>qnF0UCq^&J|5BWytZmGzxrs1mHO~+8+z!FqIs)vDWRgsy zw$$^dhle_jBe?39d&_Wl9`V*U{GMd;JF`8ybbe&w?AZ8)Lz_d`n#$(Nm0FY*&Ubew z7ojqdN3n)k?C2U|)pPK{L?o1?wHN=IQA&;HCd~IlGC5##qZ2tCrk6~eR4LE^A|my` z(E3H@K63utcZ@!9vd8d(yw!f|$=lDJaoFJx?B`6TaU_|1$XBi?aM?V@^iv)9OUWMi@0oOcCYgMT zbv=6V`E%nrRMs8})XB4B?>PO|k=($cK+n#eJAc0TFqX_@_;)9h@3i4Bjb40id~`HJ zrR}jq-SGX{pxySZ3k7ikKV(IhQ z9;^8InM~-rlF8?7LTX{C+s}~wR0n6zkLBNx{Z#qoiSf~i)43L*Aopxy%$N!9Fg&Jg zCe!){$>jTOT7^DB<7dYvCdPof!Q7?Yf7`%UE)^l@WiJTNkV)hY8_!grXTZYIOQZR9 z#*&##_6L&5cl%34^ffVlDK`cKSc$s1H1gaiVv&(=&t{$$>G|og^EHoSiJn?ds-Lw^ zi)J#(?@cDZ%U|^9#nJJR^I12~d4W2)d}-wLxr@(b&q9Hoof#v{b#8S3ZLQuua_Oz3 zBL(PtIW3#XALTo@UDA)7%cP$wg2&VW`&a`!iu=;_$mvz&;mq5sws4mW*1m!DW# zG?U4tr;zJV+fiEN15J#aFJ6<0u~4MvcC4%65V@k`vC!ec9$$pm|o$rFAOuUvX= zeC$ddf`yVW2=N_GzqN2zu3QRbg@F!3r3UxAJU96w;^2dq&YhmPGCq3v;HIalVyB+6 zEHXs0c(FNo<{8njaz`}gj#x)c>%Q8w{-dzR=6EsIpkI>i9h?|>F4rg4J>v6%MFNvZ z<8YzR`QV4XWF{3~Ug3&7f9&;J4rCLN(LkeRFx$5|q!UtYyhWeb|>h z_*c3I-`1c5j5D>;+|b0mP#1~|HSeo)6pQVnUs|9vZrI3tnJj1ijc8=oKb2dWm|y&g zN+*dW(m|*akxbc3vVIm3J0zVVUTme!$wYq835u+>CV{tT+P3r+kITQJt3j_?_~<(> zjn_^|VX0w_^j5R(?L~ZC-90?>?leat)}(XP7EN`Kxq&qkQV&>!r9Dj5`gBk;759iZ z&S~qZrhWx|Q*I|TFiAhsrX}2qL;;Ptz+-{aG6T+L>{hOePc^$00_4fnDaIVLG#zHQ za#dA|b}Km>&6P=z4`YB?EpnW7CCA)0gI76x?C3tvanae;n)G*9hY0Ux(g%sXn~7d^ z+)d2Z;!GuLwBf=2u4;D&N=0n`hxZQOx0mM~$M+$*=;|Hl>YSGh4n5gJOoXl{`UhH* z!BhSIB^YtcO-PbWd0ANfLx>In>%JJ9N*rZmnb7PkcD)K`Q8GEtpy+m!B@!m4xkjQ- zq`MBJWi`u8lD|Q^Tcg&pNGxBK)c07bk&Xsttub_(Y%}M{kY5=qfOI{>JsrKJ$<~6f z5rajtv`g6d0}_kK)m)+mg`M*h4A(#HVzDheF|&Qi)-2fM=jMEAzQWf%vG>bZMey&Q z12>Vx0jL$yiE4cm_V49S*B<^1?zKRr#BH+B1t+9p@my#eRgTvKDu{WXv81j^U1^VJ zn!3_6RWg*)YU|QUL#Z^|o?6?2sKp2bGAvaXcp`sd%xXG*i;*NpCPiyE9Y3KM@MI!T z)ha1Dxi``;^XLXy%~kxHm?oQJoW-}?D&sk`CJQEIP04mFKLF_5o9ka`k!!weS`8*$ z)ho3qm1aI?N!TpJz^)M>nE$7tl{Q+g{;Sow?Qm1FYe1!h&tzy|8A=wo3dcEts*wxxXPb*_qKL(A;Au`C_xKQ(l$ zyNCF~L%9ekGWg;G;||l+iOE=xYIHr(JvgM`bG=8O9O|-QC|PqEuy%G2s2+wNeYzkH zK)8jWR$otN*Fb%mP)rGjNk)FE2Ok`Z)l`}Wv^Jac@}zG#3+Q4Oa=zPV_4FObA$iyb z9oB?~y9X_DCEh>-me!fjm3`GLu`^-hPB34rK6<)3hVVc+dTOW(BW7zXrJ$7t%6iXi1lziZ#(EyPJu9U5(fg4I+yiFPf1bDDKn2H+tNGG@eUB97x^MW{Lv82Cdi-VISQ}|6y z!K_yOF-AIM?}$h5T{>iF8aY15c^~0K_$k2B`3-Qc_EmA=l0JjCSbc&wHQ3$R z73y;i2k=8>gH<6(lnXVd+K}Op=cKc3GyQ~b!S&x`+vGH&pIDCZcTRHnko}{*JEe)s zGgmu+XRg7Cx8(~*d=-lb#7Zly-?f;z!mpaKtj5C}CAg=A)v(Z>F#jYuMrQ$$9VGk5 zoaEC6@@saQu8C|}Qy7-;*%rKR8MG-5>f4kgf4=G#65JYc`!8)Q`;QtUx8_#DWIM*K z5Ad7@C8O5jSPOU`ZNM$65CAl`U+Le3Fy{(kMz6=!v{=JuE#7hKvO2hmw!XTa@(p}8 z^0}SQ9enQOQ{l6T&*o{7?%p)ek4(xmJ9%Yhk&QfjmB#VDad3*^g7P_e6mM-MA0|np z9-q`*{JT+@~=S&#BAU1srT6+9OYDbS$|t^W<~PoFMW#8fA=QM zH$U0*>K0kCIab{&VsP0@3*aokvD=al$u;_bp#CnU6kC`;?2%KfZ=n15%UhCPYkjTS zM^3Tr$tQn4mu~Fye$4+;%|0?^vtNDf)txdIiVBCe8=YX`UCAe3Bt)~Ev)XO|%3p0y zj`(!i7QD1c?&*yED#nV?FA9LBf3JV>1F_Dc<^?ZR67M)rf|a^{7TqjN*tspDH$zq%vY%JV(EbTi&p$e;V@G5nMR=6-%^!k&wgAFatT zngJz`Z{4aG6PBWL7~{LCU+(wFBMTzIZWBGeWy2!?>gBKA@9~wYgsbPff%CtUdcfUP zr-P~{lZT8zHZ_#YX?nVkhTRWNf#;`zuSgH~SN zp|^TAmjK`fJibcvCuRXx=Jw?E1H@*UMVo8MQ6i+V{usWiMeDD+z zpdo)Mzze_AaE1c-A~yf*COhjJN@qjb$^#VJo*qzYf>8KCEPNnW_+Tu2Fjv?f3%L>s zD(JWNTZAKjLAhm6gKLzBsK!Nh)DmkwtXhAbt96iCP^AGY%~fonFd;p$SswHpej@Hd zILEFy~`@xuFo~6W7E$<&?pVo=c;vuN-Ef!9_;FwdV3! z%RTy5ii1B)EILwO)IpIk%uLW=$f`I3p$_G+%DW-0CEoq8TUo51gqEqV} z>(I)|K0UN}kn1=QBEt`@eL3QXmhXOO?MqhZhn7M+w9;o+>?l#PJ2_$?uc{t7zIJtB zy=;8BDlSo^9yQsdCSL$8(wMoiV_^2+4`lqvCJM}%XrY=sXNN(I*~^=gS38{t+T5aH z9^{9R1Rb@&32m+%v3RoL;CQ+nffvrNJ1blFUY@`nPLXC|juIvy7o(MWJSW-Ka`lyJ zc!_$Ey6=!2%-ileB!`{%T#?7sfN-_!JGlpT5qxC7B)MmH7u0EOZw$c6ukavVWV`Mk z)6#X_SxDpS{@Glu;&uPBo`m=7*PV{i>z+Fd$|SQ8{J?<)|Ao-5@_uVdL%Sx|mjyR3 z4|UGVT(0mo-^O)7^gkB^_55a^O!%;@;UxzWpw;MVR8uH42%7xR%n z-zq+<`K;lymXGLy<4h*^lA4PzscxEYo^qP^W<};S>ealJzdpT2y|On^B_rj~_v?p(1sTq) z+lqlHx8nBvRye19xiZa`ybW%+*(V?D)T{9-7SHokwUg z!*_n4&u;ozIb1x+%rY$Cq8NA&f7r{zGMW#dB!KxY_@f+qDO`U=#I|7UMxlp|1@z!B z)& z7H2`MazGlQJ%^?wb|VTCnfl79gk5fV^)6Y>`Whb78vaacFrn11OEBP@{x=j}OMX=a zcZV%=xd6`1Db2e;$?1N21$AlwJ$%r$3h}BH-Ak{I}X3Vpu1f z(jt4uU)!s*@OyUd%J%JSQ^G=4hMWQ;!RGxH9#qI zPx8tW93kWK?nz#KlH(KAqHorBQ;V)wo1$8DVe&~*o2z`4i;S=kmW+%b6cQLUkR#Oy z_byKp2_P>rY#be<5O2Lq4r(GsmwmDypWZoVjQDKy)k|Y*QXk3(|K2pX zPmm-HT6DPRJt(cvKo{2RlKiK!RgjW<@=8T|Lj`m4DDDds4IBat#5Fs ztKXV3Tl+zrf32y%12gAdX)UaG?IGy_qT;JY@m!*+a-|4r&f)IfpnuEDbC;thN2z3e z6MR7GBQjRHGw)EJVoVY0s0Ck;_O&D>B@#tA#AR9k~9!$X@EXSze|acmJ!j`uU{2WYXk@QgEk$4MD5 z+8^e>-&v>}|SVzCD@n}z1 zoh}!+Fl^hADQ8R7yVy?!jjawlM`8G}>b?~*zQ^$ah3-JN+BLu(8%Fs|CT-K?<{B-w z2w^fav0!86wkDqkacxZFA{9JBEN$5;$3fyGJ%rZv4~f_&D$=hArT_nWG}qUCWA$hx zcbiI&_KSKm^?J0av}9XrwPX!QgL-AscIc9*Oxhu3($0c1X=kQP+LbAj+EZoHwt8jK zZhFiqlcd9v&|xnWw@ErOaRg7KS=v^rSxWUrIgQ8iRE4w;J?4EPi%^eCYI2{ek-j7K zg{)U29Ze<=1~rm<%glssR zz0qA?OV)ftG+_IUtK&GZ>{J7Ge=NK|S6Hem+ZAi>Qq3sNc|c6(3pw4E6cKikC9;pT zOmO~BbG0Nm&op44(vzS8(-S+i50z@bcD>OWFsXB+Y1_l50ekoj*MJ>ljKCk}HDHHq zXk&w-228rL8X>pzWKoQB#CRii982qz<;*L+q%NC@((C_a?@i$Ay6QXe<0n~*H+kO| z#ZJ7%mSblH925EJ$(EzddQV=mR4B3%Tx82gc7o}jtu3En{_Vf((0u_q1*RQfy3rOg zz=W3W3~iysl$KVVPLcahn}F*I6ua~N{(k4&d(M6LK0P@O&}mv?y?gHOoO|xM=lu3X zPDfzSRoj&u5Qy&-Hfh-}GkVRo>(|*OGb~!tp7i6Yi;-Z_McRF?X7nPenuXDe7PxP^(Tj6V=&i)w*gTWbizYiNugaG5<`}&=ubW}? z>WB;&Ga9{U#+$+Dbp#+Wm-!7gdT~j7qt`w3!6;{_W*|mywkEG~VswAZBfa(t5D+TZbvW7)X&Sr012wF^AsSUIk}0pl3Wq{Pc*$K>W3 z$GA6UX&j^3F4H(h%UM;%v52cWQl)WhK#XI5LuhB(LbP8LZK1}ock}ivjAOwFVjPnP zR5Xq$r{IiZJ>}g8-Y8?Bl7{`8t4bIZU4=0wUAIPvO!PJ(d3}R9G-lUbR&soXvqoS1z_sdKz zr80|1iZO^&A+7P}E*7N$zEMVp1XYu{KTLSva#U&VGg*#a^y`S_NIpv1Tz{H#oxSBq z*DA$ww49cxz;Z<6qq7{H@GM7SMH0)=0`^I<9Q`5N|IJ#C9(vhw)Q`|aG1vUNwH%cj zg=R48#5N;mABu8N-2{sdOpCA(!pspHf9{Ka{#&*KrI_emHVvss<|Q``6<-q5(8U`L zu{ue*@$=;&R`4;?VkC9=+ZYyDXJw6}hz&t7F@wrrZvEs7(~C?T(%6FV>}!l97lCjFe*F5=%=UESEvN%WPN^-5471-+WuBY*BeEQ}2=w{ z#E@Ouh~O>Uf_s@4aDbl@#(4VdA~g+KJvoEk8K6B64?(RLnQ8uOsTm8u=#c?_?1 z(Hn|aGX4?&rWNYagqmo}%K~dQnCVs4BGSp4aWIJ%`ijlxhuTh$Vc@VzMVy7Yabzfe zVeHiDF@#wbPZqb|jha&ZeFz@hzT^5`X1c`=nQv>}-ds4=iG|RLIinwgp#J3|I zJW|3B44fT)>YVQPmdE!!hLq>mUuWpXFaLM2zoWCQ*6?ap>0qH2^D8c>gtE`jx>Zh?~sr!ThG7Vaq2ZrmZy za0p_ZLlFN+t4J_#oblD$B{m-@@dOj<+dtT}3|Zvvgsc1@O|g=AdW)IfVBZ#5Tx}{# zoefi#AT3gy5}AvVKc`uwI=V~Su{2D1neXjr)9QU5+D)W{^}r*)BkkiM^u|WbH0uGo zky~6j7R~|w-+jZ9InRRxp6Dwa(=ok+j-1uVHN(VGu8g2gnhq^4cXE^mnS-|tKiL6# zSKgzoaIB-dy~lO(DoqMbj&l(UxqZBB7rgwj;w|$cK34X+lMK?$$Di;{+f;7<}otJrG@Z7FQwR}rAFT-;;2ydLlUoS zKt_e7X4{UIw&C%ivD4?o)gNU%@P?t0 z3#W!pv3GUr1B-}dr?EU6$xi_kA8T1qXmS`LpM#Gidn`HLmj!^7Hf zzY;1&RKFIhY1W`Zk3mXUjt$VaJ`Qh$!%!)=_a0}?x<-O@-T2}xN~U}d(IX17t& zk7)RcQGpggz+n1FuUSnYxm+Ge$A+^|F=3C&8vy;s%W0WV{IQ{n(GiT8{!MzqUQIht zK$v4x^MFfr?8a^>4xjHr^2+W0VGDS4-o;a&h&TZrujrZ0`pgehc;+k3^j(go%lou2 zsXsnK<|BC@j}yM50ypnbVI8+^_^}I5VBlc>(ul7RGTG5tRf^*9&ML#Es0-DwDJ)DB_H@TAj91Jc2DD{^ZfyJ# zqn@NfC`z#RcbCx0&?wD!iGUy{x+BD=N5L3Q-~x6sBXp8sB{oKdfmf|<5~NjFV#*>- zki9j2Mj{v}Ev8{D;~by|>O%6l0?M}?>&O=1F<9qeg4X{ABL+1Rj_T0`l*9*H_7%%sr_bhRQ134tqxT3hgl0u-gh3x=@f#91!icgcrej4IP(w8b!)ek(J-!HZf2S3vg<{XP(urZkIn|14~rS$}>8{eLT$%*9|V)?8*w=uMl* zRQ5Yzs;`W&ixxr9t4!zU;3=DxBh>FB5shMKs_>all=}UAU{1N*txj!%tLIr9ONV3X z!-%`#$HJdX?l6IWU4E#B*p9J+NdJW9*(?#Ct^{nEC;KWwz1f3etaJo*t3G87+90!R zQxRqzGEJ;Ck^+>%#xjLr{JmoBsEH}i*t7}LvrtUp!=_u}CZ?ie6KEx%K-+k6o59;% zB@K)?aw})wM-<9SZ=P{ zc0fWRV`e&enFo~EHAycNC!1rAFZa5B((8JAc~?6qX_*YVJ8RI>{-8*e7|lo0ah1=f zS#yse!H|fIm=*q>{s43H-p@Vj>0$Otv`hmMuI&Jg+KK=6;J-WY-(LL36o$+U$VeJy z1-vb>Pu|LmY}9#R?X&mEdp)RNpCBCA>2`s88mF;^Bcjg`l{?4Tj8)>z)9i3y}) z-sKe$@A534kmAd8k>L=t@#V?Dhxg8!tr0Zpu{N*#rm!|KqeGf8BcqcUiX2B5&&24= zCU7@r7`*FvmS&0bl&DSGox1xwJ7HMu>gZ`lN9#hxT!G6vcT2m8Uo$R7k# zBW-!#NrpFr)6t(`Z^%h#D)J^~Wh@qAW~&}OMQ?8JD0fA!tHC%1$>Wuji$WYXY!Apz z=2?aiCfC>6hm0hCqeR`t^WAG%t%wWr*)y6c>WpfhYYglzfMU3RcTa*vx>3#uC;tXH zqc5$)sd8q1B*>jK$Jv4;BS^3mKJLwFgc5iRFsh-RCJE+NLP1ms@x-WSNo z&Aecfh;_n8+GR=;u>NCgd=KQ>vkH6BSKTi;;Z)Vm^v|~umh?$r>x^j1l0d-W6Ubs= zff|fejwQiRm3=}CkjnocdHdW)^B<|Z{J961z=Zq{9Ec|*JB`HuZRHhtA$c}B_AWNcbfyNH?0@WzZUg|5+6VY+v=cz z9Y)Wb8$5e46>M7!)_Up`>g9|l!N7!0D8t4jfLwO^eA!U)$%XwOOr1gH!1Ke&fwpj< zo$h(H=AqN)k{~j3;qW*PXMW-Ad6Y9syr6s)VfXZ_IP*~w?sh&=0!;}AiBT7Vjtfc9 zJp>gtkf4hVO$?qnC<)#|@ICHbkXvH-iNTTl=(&sVk3bc{#C&CN;lOlofi8`qFcs<{ zy{>GHycbWLG< zKApA&+xX@ZJ}I+X#639L0iE|Sqn*Q1>9=2MS^SlH^3Qv}TFXByNkOI7VPs|^2M7Fx zjE;Gfb70{H`AiQZ1Bf1+@kfF7yvxGbQ;%ML4p~Gme*xsZ=mZMEum=E5L zQ_z-%xTRfN8l(3XQGpUR-EZP!vk4+Xpwo?>h#4__$biU!-bx9Z}04+ zz4+FYy~B-Tlab2?;$s{2u?RSopLt|8m!jQN6Wq=*(2Tgi> zA$#)EJ(1|?lzX_%_2=DnZd@;e4ql13R=Zn{&9v>B#SGG5hlrEA=^7G}L=yk+cY=J}i{k%by1=y7bvG%;r{F_!5Md2)Iz-`I2xXKREWfcdL=Di#s zXol!NX+GnP+wF}jQ71B+j3-c(6p42sC0SZ@Z`%_jaJ55)utU z>EEkfqDLby(cUsI(e-9}rP`;;okW|+fY5nI%(q~(rZ?%Ov(vx=mUIz~{W+@k5KTOW zHYK`xMsI*c?@PLRs+I^}>lU@!_R--W=!HX!KrW$+)+<9#G`UiHqNNf7baF?hsjAgP zRZvDl4ct{JgG+H8p5@%gO2qxd^J`dFOsv)Ai~JJ%nLc{skLF@Wmg(||C#{K|Rrh5- zQ!07IsTC_|>#Ucr;5T)}UiLH1_A>?U=m#o@{7f6+XSxV9VxER#!ll0aV|so?>d{ic z&on>`v zoX??r-!h-WA0`NW4sUR~WcwV>yfW$M@>|L05DWXD9;@G5iFFE4_eb69?QU-mf^Uqtme^eCcpR*ZcPJx4({!m01ypPym*{z;;-Z;+p1`9wU{iHVN_~YAug#N;6^lhBdhdHIl-;fDeM3eXzY*y_~ zuc@Jp={4eUNE_0C%x5D^DzNP{v-8k1NRjkb5>h_Nc2O@N&=53z^X z>}w+piL^npPx!}dzsJm#CFWm-BAdOkL7vSX6FWsE+7i?%_?!H{4D+|--}n!FLW<4) zt8CA(spS)P_!-QN&_vS?uhk%}SnJo3Nj_13O;F<-yo#EWKn8%j+8h8Z4{EUR$sH)q8A8M6O zv2CZ?z+o>hwjM*K@wP%>xaUPre_viI?lSSY%l3^YBei)E>B8}>*8bAro<1}|xrs`| zC-Do$aAxy{^*rBEI*GX>M|g>2Bl|j1w(~&(4-e43lX$vQi!O);p>B4uk=nf|WS;Nq z=w)*9CNt1kIK%;ZPokdY;gV}8^&#nWS8Lyc7y&l^w*GvHBZwowk)A$GmOnd?PhEc^ zvaf^FUnJA-K`QUQ0+Wd&%RNT0t^pijAy&2 zTc|EsD5;kMtp)fp=#A$dE_5PiJ;pv!>S&Al+F`wS#>5FqCrUhB2NE|0OiljU*}>pGW6z67J^!uY0DGg}9j$Q{VwgC^S6zyXL-Xv!$k4LzF^-6UzE8({PZ(-`8VjBk>P`KH7IL*waNLWpp?AWHBq2= z33@NZf2<9Rg2wREaCcT#lu6^UVg?t?xXIF4klzrRW8WgCEJc@tO&8pu2w)Kfwjk)L5SDMw2 zc~EJys*h&1(amawcn5RK<<`>V^h#n7E|Lw+)yDC%zcT}iD zRTo(!Ts_b+a69%VfltU}D)tX}vm}<>o{Odb-YyP&FPSvNL`0-1FNjb%E1S)EDDQ( z=J@OCT!&U3rNfEDQv5hQuY_3zx0z&C+YYu@@^E-3``$O_gJemg61U}QFygVnMj)(4U6kV`kyoYL*Gk-@2XQ`nI$Q6c zZ`Aaf*i#$J*o>*dd-KBBu;ZX>gfM{{xPE}_7^gzNndcT7{RtPeoy+GnKDQDq^#pjN z%b(SD{Cjn?L0a)ivyrUUNqHLTMKoKmy6HWp`Rr)(@c8+^X&yey655ZS9yvcY+RV?H zA3Y0SWcqX>W0xisY2IF^L(`jj2Y*Y@mkWH}?WT7drw6YbZ#oDOlj(3a|An(TRz90u zX6C6llboH(ZJ^<4Q@M?!b1_zfHfa%FsD&X~t%hiIWsL@*QLga}d!V;qy|KgIPfAsPSIuP-tK2MGipZUrL8?WX-uF)G_o#B}V z@KS>z(K?8j`b&+b?O?v}BphMK(e3IEJbsBh42knF-5htPAfV5rjOL^fC(>S8_%y0QsTmBx)cJ8|((I z9KWN%J`ilY+FWH^nX1*%lR;-{PnZXeY|?x$`7*~WBbP^lS?=WRSuo4N2*NDO11d7h z_hL#hvwR=7!X-X-*32^FHQmvT>(qoo^kYb#q%<`)^jl0O4M$B>xMiOTE zPW47!eHexhKunrFY
mCzuXVSLfwR*t!~a>_aMlz{*O;OV4m9$&H;UQ_wm-N zg;8$=+Lbx7=>f&A@;<7%z!O@X>OwP!tLq20@jn$v4`wQr6w|S87VXxLY!n?DgAUTUX7DKo1@8PkN<^?`n za=^p5(gsO%Ay1LC;v~}ILRV}3E6df+<%So~{sRGLi zek6xcI9cKpRXD8o6b}E90|)1k$9p4OxjQgbU|$;!FpszzVW|WcLi7(n-{RxnVZiqQ z5Ic`=LRt$ERa?NInF&q)_jX83d=K$fSZ)dD%*^YF-gb z-_XP|y^bsuS@AZy&?M&&x8nQzY#t0K;GsH)PM`7vwf&Lh3E*D!TTBl*BMK)RDDr1? zO25Oc#eCZd+>S203SB+utk)eykVni6l}!)k2WVBm6J=&a7-nGkU|=Uxadg5O!AiWy zbITw~R1oeYVLisms#Xla)KF*_3@YFYSyUn;D?67d^?ec{;qN+8poptT)4K$nm6PlVh?p}3xPW+xtWytS`eg{=YDd0UGEvdh{E zCk6^9dTFxcw#!IW0^6W5Ll8yhM}=vDOTkjkG0y=z0RPzZ*(A1)P-N9;Qj^8E4qh>8 z(V-?2Sk>{VV%M3AkBq$pmb&abdi&9sH{6JLEpqZN5`$+Mb@1p)a`OAw_m?!B7&5rf z63Df&r9%U4J!1}K-x|uk%znPaijh3*-9SKC^)!jHULudJkesh1Br_lx=zzjBN)mSz zj;9R=DxtYlNLZ+PTS)TiEIss8;QZ$?oZ^UB9JY&v%2}r<_EYDF$YBaPv~rLMn=68j zlLD52yLdVW_BgV7Ak1RYEFhOjL6&JwLP3`KO~6D`V3+`F?HFim4F(!-BHxbND-FCe z^8Cfb;M`#k(L}-uEmXwBzDPn2y*i!6X~FM#9+;ZujohU_vIYQg~U8Y{(1DO1}LDaAH408JHn@ zk}Y2N6O6aate|lYjo<-guifwf)SHBpo9HcgP-y2={n0dSg3E%j5m0g^5l)b0ivR^-vBrH z28nmqH<)YA4?Z?Bd;^nTq?5k|lV7ER`_i1)BD+E4Ue{*0yj>k{&G?8a$DZjr6;HL!g3IB^$}b5G#} z)H6MCbsUwZXDKaP>65|%Op193MB;zPNrG^6Y^neu_&1&DZ|QDp-5RY zW-KG=l@cpiLrSrIh0a!Toe3c=AyHE3Z9UilFF~pPlZSjDQjtoCO^|0=+l1rPslnL} zypW2{aJ_WD*@be?Vo9IWda&5j32BHGV^XAGC)+KC@CWfn9@ksw!&vK80ED2T%P|0X z|6rj{>I@YS1?=(CbiCvf;hd?GB7abTFTyX7O8_+mTrw%GLcYxx+WH~-pc>;AtG__VxJUU_&>8fRTrL-n{-uzf~h+WCKW(yrGpWq0!prUW%(KSJ`+z@dpqPo7l$mg-VDi7=`4dcDU+yQ;{@}?< z`meuaU-IB{fr)8Rjn5yD@}wCeqN6_qwM4+wjoA1xrmiv9%MmP|7$R7($b#OO>lHGO z;Kc<*Z^(LP^+*r^JCPPT-`7LLD7upgpirl0VeLR-)@TGENWrW;s)``rAPDm7oUTKV z2yjav$dB;$ED&Tcf*?qFKt%+pWdmKP7qa%DX8R2xNX4`XKSm(j2tmpR`caOZh9FT` zuv|#ur-%_GulDVi33v*T?!UUaMo#|At9QQ zsp1d>Nb{w@S?v$rT%7f~Zw$_AGIv8x(*mGy2agrkUZdc(I_?C)YuL6)|2GH?mGD}Q zebez8wm9leB=8zJhZ*o1o*3dahn47a5b%3c6{~(6;x+JEq3c*{pNH6hv7k<%0y&NI zTN-kHKP`xD6OW@qY|F|J+m~jE*n$xRvB?7}A~vF)SQiBL4Vm#ct66h?Wb(>5KjIa~ z`NhN7Y6h>hPOMr^=7lSW8egxDg^?|O{bg!5Zx5gVPp%MjZ!Zljp3B}RHp0dIyq{*vRnuENd5cl|JJ;yX1pBLd^leC(-{U2XjNitR5<WeDkj`bKjh=$^{Zt!suCRWGwvv>BSIp{LQYeoE+pg3%9m8WRP9PQ{ZyS7rBApyT)-Te)W=~;J~AXpF* z{)L5X?Eka+X3)?WToQK#k6Lp)t+zm@jSxf7)}U1|HHYu8^bN;qQ<;H8&52LmV# z#;u5+xF23pk37=U_#BMpt_?7cV8*X(qM`5od;~3yZYp^CNA)3oC}7S&^_GXvL~p-1 z6X5OOVS*gp)HE400F6hBEEm0a;bDL%QTogHS2M4%tMT1!JQU9_wzc;*lZc{;Tn zc#LFS)-mSD7-EybBsQ1b5nG<#0a5Y$h#gE)Um;t+-pIv+vHYMnnBI}W^iDLG-boou z-_FhKVQ(2w5Z}2GWv-FA%9*INU=i;WG;f_ zFAFI@uZb)|F@U<>1Ekp{s9)^!=yxhAb2&B(c`VT%fbPRK^1$-L{yD$o259o>`ink* ztb-331Pt8#Q{LqHfHxQiksfbm;|@GPDt|-|;H>a~=(+~i?rAipO5X{RoEG#I3pf77 z6EP0{ZQz5s2Typ{N3q(%gTIl_OxdaOLgKNZ80dM#h1GDlh4V4}t?WhmDq}p!t9E$D z!eO2Tp=szIKR?Dlr-nyPpE-RVmD%=3^OsddvhD-$2|wTbIC3eUdSx@uhBcxnh1@7E zzFc>l^m=;DF(K`oM<7Mw<&#VIKRJa;-$n<0yO7_k*CkANINNzR2`(6m7)K6nuI>@w zM__6+$oy>koQC`HIU*c-%u###1t1Pt&pfOKz{-mx7@61wu(6K*^c@XHcUJxI?>_-qgNOX!FNl#5uB>l^E5EP$CoH@^Ybkel3 z3t15H%z;eeMO=eb6`w8SoG?O|UM7t%lg5`xD=fVU}mmzJHUKLpmM z*3j1#GKZ7A2k@I2jMRM|nP}{F(U@=QG^tSKYS@X|{5u8YS79kj*x2PJX8ArWiYG== zkb-n7>nizEAo6!cxqH&r^+&m`Yr$!gOT&_a%btLN1AOWa^Uh`wL&-tTF%y3`ml3fK zkcD}Gx!1p+5cDY~dxL5yPH99J6|T8Rjrc5F{Ca9r^4&dM2m1h@4~5DJ;U*zbV7p-VKw4yrNM{h6=zJ44 zij;+y7JtF;mWWxhI(&WRdlQG1xdwtyo&qtp7wyzw5_Q)hFIKD9uAh|Ip}a^uRsJ= z+l6x@r-xALkursxq0;Q=An_n@$u%(b=)R(SozJ(4~(2XJIvTE zJO+**2;E||v`Pf&2ev*suxaNvx@*rbgoxl!>x6W{v9%g-21+dGstzW)&dBK%wdf)v zZxu7G<@q^~cFk_8vH*4{HahYhJ%En-<9mD&tF*fct%lQhAkQE6rX0eVzS`%ay~zxG zTvf$vvNz%KF2~V%8q41F8{@rMc1!jq5v=ZLzn5@LJUX&zv4(Z@u*&0&;R94U2?Ugv zI%}SMrOT?z(yJ?qZ_OT9p7VHzS#Q@f(Tfv*+#pH^R_UQHQHjcqn1xJhbli(lPz+L!=9%IERDuOFcsTG_e zL^uVfH1XjN&xBKQKp)FIoYFG-m{fHoYT>;qP)mr-1(yi&z`?6g*1#cm%Nj&?ebf@c zKuDLBiH=1oYKd^i3^=Ar)bgwND4P-+GE|r%7Qzv_8Nd4nqWu}J&1@-M84--JiDjqe zrlX9Ccw!G`*T{Ww`Q0?r$VL?PP)hwi8svbPa&V#J!3O5hoP_j&G-f|WvKWV2zetw^ zzwz(bd&isLuRgE&{c>?9FBUexKTK#hCrW6SJ(dh&2YkN_Vh5}+)~0w~;wE8$fDNVx z?T;kY!yDBY7(R(>k1!B2#sfD;_ToMVr5$9iA&gA zc;da04?2Ji29}i}4Eh(l%!fyDormiKJ)(K^bgGO}<20={^x% zOIwQ_hq_zAHFS&DaDN|yT;UF^G*lD2>Ly0EPFuLtix)KJQ&{1IiD`c1Yebnw+hY0p)obhs@N6%E7=DLoF3z6qgq#XK^`D@Q-1et_;2%1+mHKhLfz&=aY2*` zX=wMs`JFix8IHPKY^NZgnH05dXk4Ia&~^WLeWyZi$9f z7iSF%vu5R#{C4Q*eeLS4)Y(hTOCj4~kC^w0K>~XkV-Ot2yB<$(+JYU#t1cTzE^Y1A6O=HQ_Bf zOz42Me^DFWVr?gT>kD(kTZ`jcmyoTk)|(+qq}pD8mAJJuzV)|>Tg&2GU#^?VE%OFs z5F_e>^TldkK({%MtRGOKEf`=0Fu)MMw|D~J$gJd{u$};`!%S8JuOZ z-_7N`RcH)Dl!0aPO{l=euLNVXSxn>C5uzJn5hd8fU0&lpwY*nbcCY4paBnW}q1<3%%$j%MULEh%mEU_W z?!f}ef6Ds(67DtdUPJl4FX3Jz?=|usQ}4L<4`gWv>JoWoOyBdm)bF=tjyv%gBpWU+DhsIwGBVnarW_1DUcKw02{VVwPBkg5>|pF=0>~Ctc0l%$Kyf9)0hU#E5d6*Cx0va5I?Vy8sO;{`1p#h1 z)3;fG-qG>%$^kp5xFsAU%?xWZ26c-wE z%fU*;9wduTvx&fW8|0|dF`4MkE3xc4B%0YNE(kLa7Fu?F!q&7dQMKiuOVpZp53k~~ zgZG*U?5&N|Tt>le2kEYpV63|AgW2l@n5(<&MswE$^FDXy;MpfG3_da3(dGc-7J}|I z)3@7o4hl3o=%A4u;>x31D$73;DJ4N8beRLX{0E*_haRowN6L1nd_nftXNt!UZ7$-9bPcK4Qa0Em<-Lkpl$7bKlBGGcyDykAKiNav@UdjZn@7 z*b09@P}vF)A=TkZ1BMqxl=71V$=C|k0EAp9aD$XMQy4=a3_{j}HOr=iVmp53t#qs` zHv)eM5;(5L5_GNUC>6T2oEiU~8(#5H>p~&Cp0%t>w zG^)qPnKXu7q-s$OOGtNeB9CyFijqW%d9&#iY~uIhvBhzg$DLp!g%nk3L4K?;HUDdE zlL{%UZcX1}jM|O=4t@Z`e6)Pzce07tfrAKkkg;CG-?xgi@j z&u~A+YU2ni2+nP19}F;k-91$8@IKT%dW5C&3N}|f#KDsse?Du(xW+A-EiD3)2lEjJ zPdX58?7zjUE)zw0oPQ5~!@I1+nMX9)e#_JxIB>szMMdWqxllajAQ$}LTpHM{?{S|( zFr>J0`#nKV_V00nVn1WwUw-bIo*tlZFBw$!>G?dLOn1;=FdTz9M8qHA-AypS^K1dV zTT~2ZSE!{>^NY6y^H5hKm`8vnMD?aSz8Nr+=9dY%0h_bzF&IWDP2RpMmO!-GRCvyV z-8O#pe9$*;r!lDEejyO_Tis`$c5B9fBsQ{?(t|lR)p>NSn1m=7DetMIidcj@k~$U3*ru}Q& zG)p9!AI*|dY&r9isi6RQcRJ3V8h!)*wx1pzIYm_WyX^5jO!Gs!>|%cR9fe%|**{6P ztzy=XD=Q4b6CdKAHSiYa-?ioe{8+^rG7pJG0=asy4@p@r|LFtF$Wyl%$*Bnew`gtu zGigU`;tL!BK}yKbgN)vS1rHM2pL=O0g*n+7C7#Uv%8;mMoAH(Cwf-)Cxz$`d@|E}> z_6u`FpXcnHa|}Nq9prJF8k5zxOU!ND;lM)l_$iLWkI6lNe*lc5#LQzkWF7-zAfH$V z8z(jQqD}T5iQ%DsedJP&xvQ^u`4g(OQos9XT7W@6*b%5)5iM~Z8mFn;ToQKl+^0QB zL)4+3cO|LbBkMU4&7uHqXdcK4W3JdFDrIfjfF{nLn%}8h9Ug)CGcTQzJutOPC+COod?KpFdc*POu-62qp^0z*$9%&s##YV8-4Z-S}yHCLu znXwBa!^3Yl$E1I-Y7?4byfn!HT?MC zg^}}54vt(HChU=G@>IlzRw08aX{K13wi4BS0~pz|doq`jh2P~XQ{Av)!;^`t%3X}DKx02$< zz^E`5Pxtirg|nw$uWQg9!Yv^^)HRsTHGq0l@>p`R7emmcB&!PA7=g+Xye9-)Mk=p> z^US%i(`N?9F1~K~qP%|yx!m6>wyX!iz8Zod@^ym7O27YBzMzxbKKH;fGrjgFlfC#1xt z#rp%Xn49gAHkt9);={)YSP6b19C*7wu&(C$i|1sjKN~{sAk(8Czs8KeUNFrwA;?Y= zMg^(Utf?}?FNaXK`=4ff`0OcNa{*mO(iXqWE~d-U0T&qo8${|%U8Lv1@c`{L#_h{# zmF*8l00R^+oIc3C-&;b+7Jph7#)tW7-B**kAMv#I_@DQw*A9;jyD|SX9P^FG}=A00b0D5vXfA=JJ8p&c4L$DF+!?EN9wef~=gj$b@G^xCn}v!fT}1AaDy1;L6@ ziyZJXaDw8X*FwNn9|zhUtFfa5-pNFu@%kV1DU1a^fBMYu=mmML6CrfopMxyy=o6>q z#oiVIw)rncz^4Ys&LVnMUQ8R709y=`~zBz4!hY7z!^y))+s_&-CyPJck+YIjD!7yHxe@=xfw!J*d;pLfUZ7Uu4Z7Y9z1 zG3n!oOpVJYcZ6^~J{(vNQa^d+*N1Su{x<|aLpX=fe<}opQ%6jq1@jM%pB)}PrQ`ly z2;AqNqtVA7XGj63`CJHA^dGMXJ)(Q-m~k|I^Ad|XDQ;L}5GOr4bbvCa z%I5~|yPMB|KcC;R-~U>t9vd2#;!gy8QwWF{<(LvXKvd@%cBJqFAw1MKJM4^Bn!%Bg z(Wk~wp8-oYcowH{Tvmur`P;D9iEEJZ^*xpn$Jw(xHaar$7`{AvtRPPtzxhc@F3`~l zt1IadpckGruO<`=F@3FeRV+-2{^U4sF&z&nr=}UB97;8^AH)-Ru10!d^r7zeFmjt9 zFu4cmL49?xLEesZ2Aze5wt%UfH23n+%k%{)tYM;u$nBDe=WHyGP7Q-B0;O-jyeUq4jNEV&Jh}%g<$}I1F#*S;dvJ?5s2DE1K?5G$ z18ySlmlHFvtbsE09`IrUuOQdzjU4dk9`F(Z-%ns~y&RA3!7U}+YY9i|iL7hDqkEvs z2>OErrN&7>Js#ZyTu#7`63`j9p#P3}bPsYhAtg_Qw^b~U?t!f**iy2qRL97Z%XxGU zegon66W*IZ%%gjd&4he{klyQCR6um&fo>t_4<-iHZ6CFAdW}(pmq@|N5<6qG#-!cf$k>g9R&4INywvn z&@F_1h|u05#r(JjxrdN%PfWq%$30NVCiX#sdY>}l$34J(9Pl~& z?!g`*tP~pXKECqf9@K+`dRyYjjvx2nME(B@g!5K2;>SI}E)Mu7i2)ry?!k%HUrO_N zCp6~AJ;)x8cq^G%Z*d$y?!omEt}_AW_;C;JDB+$Woc9eqe%u4?Bj|r7sJA@>e%u2t z68H}Y?42Xak9%Mxg2A64c)Z7td!YRU-9w%ho=%EHEAZo9$7Aexf*rlD<=E_T5AZkv z-$6i+>N-Hjk9+VZ2>&s{BLq!nl*NyGy-uxaGZtt&Mr_^~&W&yf-bK z17cxVhqJ(&j(r!iPCD}q6GLQFpsRk!dLw;mH_$(}U7M`n=Xk97x{%I%oSAw~NgQ@OUOTnA0Xk{^Ilg$w|5 z-nHwku0w9gRPNTP+}5ew_Nm-1gt|=S9+=9tPUQ+yx!$SV(WzYDRIWIcJ2sU&F_k;X z;r@y&xHlYx<@=)HR!`;DPvvf#%59rs><&B|+NW}drg9HXJRIZ<++{$@- zqd-7@lN&`sTxxG`leN(wRr*ij9zc~-Oy!P$ zfNHl7C8h$Ui^y%Vv|6iFLa{FYGj>WOi_ymiZW42uhR@p$G!;dTGcK`iN($Z0u-ZFA zjudZ@^xw2F9qR6QsL;l$bjFN>DNMM?iC4rFndKAMOmP5WYBe_4^Rm1lVt7;$fGQF- z6AQhpk)du9NUL0xn*>V8Xn7tndRos2T9@Sj?VuH&x=xM1%)xVpwcP7rtzItnK`j60 zID*!4t`j@`*SW!*onGpb($!3RYN0I_bXg5!_G+JN(h#(#G#!gtjWi7(@jtnd86e=ac^S*$#b)I=L`2FLq?nb5*tMcrd2V1e3IDPnU#H$tZza-A!j`{A=A&AA*q0&xwsn%EN+?|nH60Td!0XAXrpsqK0l)| zxf2C?)TF!wHBE_bkXEC;2jw*}vlVg0(*ano2T*o&0EXzQjKS$qCWF`lDgIo7vHmwt z3o#b5_PYv_*2_A^L=C`JEV+m}k`*!6i^5nFoC*D}WTRS)MPIBejMW4@v)IR2a>Ny5 zH3`PLo`JF0lbA|z9_R-h8o&U=*$C2yhAS`_+rXff5ow8 zKAX4k)Vs5}#ygvm&0btS1cRlV&7d;; zk#|Sgsm${2C_@c6zMb%lRL6>!uws1r-vIA@n z#F0J2kGBgser++>l%t%&RKW4MDyBk8<&bidV};wHI#J$<293g;!(gg5YeiZ76^X5K zmtRGiS@Ocio`&VnX|K_e6Ti#d7{j@$2V0f*^)~(({66 z6tpPz-&_p;%@;7bxNo9pVI}v?=Xtz-AjMO1L5ln4B5~hDsnRC6Z{iPX^+{RNCE~t` z8k$QhyKe%538=-b({ta%NbmxPS10}uIC?5+Zm$qD#^D6R8YXA!|Ct@Lh5tn&rO1Mx#Q(xo5LNpbj z9%5La9@Gk{z!vbHlKzsCejnjjQcbo1Zuy-j{X?(islaqe)| z#r3v}-RKo7->MB^TuZi@gwbVeGdg-=n=J}5 z`nYX{gdWb(5Oec=6HBpgA|sld3t}jjmXRrJ#m;ubb)m#x%qAv11UuR^P9%Lp9mbLI zLY#y!h!E3+&65KUr_yQk^#zYcUyULm^1)n1{08teH5$jkMopT3<|2ytRU0`UGdYvE z6uT(=<`_Fq)izv1q^xc*Mg&=p>yOi!+xk#{9QkG7ifc1;$AgO|@;3cyp0i?5t3U;= zkKddJil$ORAGr?hZSV-lUBM&Z2RN&D5{-o{oid6>7}NLh)!hCiW69G52Xc~v15DU~ zT}-mdvsuN`i9fS!{Pob?pzK>czSn(3oU-X9$xpoLC5^mn`a3G%RvVW%kGQo!1|{6L zf$J@>D7UxoT&sLjRYFT857s7Zumu|7hm9h~&}F;|!}=BgkhXZ)%Q&pKM8_L%TZ^Tk zzbw`;k%+Z&EZ{sYsUDjnc>JWPV*`C$nRf#vAMzsu(7n5`tfLQOTUt>>h8|mrSdsd$k>5DR++Bfpi{CjqD6)arQX!ZJ$9-tc9gB~E9;VN!Z zqE~s2mYlwZyixXLP{B^&PcsSzueJR7)ka22+#r7hZ3vQXYZxWL%jG>=b?A(JXnp=pGP}AB&~8$KG#Bcf$-Qxnnh9*KX4nVJ)uxw z44&?DgyO>4yto?5!~X6EyL*mzYhGE^Ad1S68)F74&!kpL+m+ydo%594S1p5%N-L^u z69ye82B^f9OTm?(m!6*#>8N#7_r)MWUp_z(s_-00sKSe(g*eDVxDP#Or<7YShlFd6 z<->e|iUU4{!FyI(w!Fjw$@i9kD<}-*ltX{fcL23cCyj)I+Kt({sgvq zn!TczM_?VkcDlV{cF3nwj~uc9Fb+2kK^N?y;zXo>mroT3qv^+qj_br#23_$|@W=$J zW$LBG@=ZwHxi^`yr$G+f9?3zJu7|)~4>7X-UzX#)75Hx@{#%9rR-2mN&b zZ168+REXI40}r}mq<3F|^#c)@Uj>Qg-v{m?l*AHZyYV*|V*Cr4vqrX%Fj{MIUcR62 zEsPenu~dk(;Z;&vR~W7TK#+3j!lpvlP+cm7k!Q{fl$W0k3iV!c@_|7Hc1p1EtI$?JKCI1iXbdk8$SUx#R?_&h=sg} zpRtaYeTDXdlqGLPFmb7HsIQ}Rk`lLcbdQ}&$d0x+>ZzItDW@RQa_4oXuY=>(8V+jD zRVD6`;z^WGbvLub;=HiZmP*Iz*&HNA>>h?ToB0wztj_o#%!7Yqbg4c0~nsA&Qi`&S!Y+Y<)HpA5> zL-i+-*>fyXzMVcv>*jnATl?sA+LY5?n_7mW(_lAs+VKmf1J?sM@s8<$4FHT@R2Cy0 zuF;2+1xbgS2e?SNLAZ3V(7YOINtT!+A|-5xCZHagHux(XK}M79ST9mGwRF_sFRdOZ z-QFV6-o{AqKM^){D$JmO+y~Jmx#ewKc+!0aYeGLE8xELjrVY1+{jyUWY~t4c0RUD5GL_s3tpc)-H^ z|Ae7S0GT#sq@&0nSl*IgNoPQ2j%owM@sqAIqbwuq!M1UdzlQy_5(B_XmZLSZKPD85 zH7(4;3q>9c&{XYw7-R`EYB2lt2)W6er^b+zA!V3goO|YEP{-Fz1~toq$uwXxl#$PI zv~@C>I*l%Bxq@nB!8|Ctp&Z|S*_Cb@Uw6}B;P?b+O!hPy<7tSJ(_52ymECDKDvHWu zU-ChljB~GQ89zUYXa;!v4-KEXz_7~E3u8mW`Xv}@<7fP^Px-})Pht6FQGCdbjAH1~ z7aZAs{Kx8xP)IOW2swZ84X}3^3r~nT)MMPgC%TF|#GD-M%TA`MNIA>?@x z7WdOU6{~QFuR!0v4jEBDHkaDOA7^t1HY!@z<0Im69rx#DDrQP1drRJXAr7M{ly=09KbNkkF+Es zLjkS@@ z0E5sn%d^CCo3a~No0+!6?>KT!xr`b3t_eNm)?!*+y;4$7nVhtiDh~?g#Olp9%fvDo zKZ&zzOk4iM<38xx%bZHh<_NDiuxhRl!(wGlZ8$%-Qm#4U+_@%wlJv9Cc%7rnDZ z=2-hPvy`i{t(VuZl0^Fza1nl<{~>Y}e-Er=vww2cS+NT{9m)#+E5=mcl`D{jDDBJ! zOHux+O7NRs6*{96>`^UlLbFO=p|e$3fK=4C%HlkVZ4~h6jRyHlNFj84GvU1fF4dYy z_@f;(E_@xSBJ=snKXUoc=E;-waX)#;1N--n4B-_IfO5+9^-eS0?nC7@`3V5q4nk8xZe+W3*|pgXy?NJW z3$=L%2XbA?#zM|rrbd}zEDNP$xh~iH%yg$eFHE{15xz5w7QyLw(dB{bPnhY!v=N#1 zm=SkX4(!0g@m=cyAec=;tW+W+ouIZ}3=LEkL&q#?M3NHb>|)+^1rde5fXs_QD8s9) z%TYuPDIoI|_wfCMYA$4YzSxK!`%(S`K~kvZgf5Nh zmJ&E?6X+u`wxf}ub1kM}twq)d4^>DYuOUOQ*dL*|RR^X#E=AY_wS+b}5~V;!^O5Y9 z7p_vNOM3_N%(~*!_OkVjr+}yL22HYx5}!22d~TRj4J)g5-K)2#m_sT0VxJFz{1U*$EMCf9 z8`A(jHbq_+|EMlXMO|Q|;0N#V1qo(}>g+0&=U6$&(!HC16Xi@2% zpQj=h{(VT6s>a3)P3E0^@l1Uw*$7c&ND2l9nYrq{q%D!J)n_?~P)7(?O_7fAXW0yQ zu`6h0{ijgJ*a#it`Jql^a=9N20|Fk!gUjj>p( zV2;1V7K})W4W)rlT#eRbmWsVlbEqdW*0hu>_G+kkvxdBE{ap1LIc_0eJQCAvArg-g zr@3Ypr&*31)~U8pMTWwk%a|jaRtxHplSMTHWfzITSt{V62}3HFipQrEBayOmdYO+ zS8V~eMouv};$_^K*>PFT#9c7tg|Qix0(}1|^{_Y)xS(Rs%YRFm722McA^D_ZKQ@ zAPX;C4I|Wk`NydGfrGY|Kf#bvRCkTd)lS`m%hG;^uS3i(qE;FOC1w}Hj!UYJ3c9GD zNOk0T9u&q)<@2-=&eu={buV$5)1!?>3*&F_X|mDajFs-~{oe?Zve7=zcJK9JGL=sN zjcbHJ8TJkKV^LzWDY64+4wT76>(-i~*=@mYgFSa`#k36x?zz}{tN?5%RXwtIrjIkz zx8ZMr6lC!^*ZGDllUjk#Dd$)AMf^%gxxuc44dhmYj(gn7edJceK`e!&r)hd%5aleh znU$~bb}F;N4WrD;0>Dg~ej0w3f!kPjPFjgJ?pvd?sV^tK(ZM=&~KmPbK6)l0ymB)O7o zzT-yig3K4{lYu&F0#>JUA;{5y(*c}PwP0bBDK#ltWVIMB*GlRuNw@=DQLKUyvfb!& z-LU3OZ?P&6()7kiQ`s^gD#}Pzxz9}R3IUzwkyYZ{Z(kw#Dl>g|*n=h)wRS+=*D~N; zqMvu=l}pnpH}2y^OthT9$tjA}cke*?S%vM~xEC_OMOus4| zqt#19DnkSf7$LaEmz>@g4sej^hr6I~liu+ay2cl%qA}eX_OnwhY5q@t_O2w}}@~_d|zeF*x`uZL-y(3(&ek5h>&`H~$=wyGTyybCZ zXXSk5SnOD%^pHR81oSGMRrQ*ta|xWDb>dv;;wYL=f&L zNCrW$41R;Cd}2l_WbhTSXERPzR9cN?_W(Rg`VYa{2lZH~3w|cXv_Ly#BYr5TNyrP` zs|7&||6VowvXKVUU3L(RWR;4bCmu%eHG84TkeWs4`5f}_0dEfmrEYP7@z0j0tqjMc zb`fewcYOUZ!-+z3f-(K=<-_g^p5F-Ar5tofy<{Dl@q4rcJs?0pLlojSA3B^1JUuZN z|E&11;ab3V0uF^99`Hf82a|vS6Sf<-vwgUo0URa@t3!+)vLO-g1jv|-`H)+KF&6`} z&gen(p~4wrr(uQ;^<=|AqV${>d^l*GWDD!=TLw71wSFZfcs}s90C+ioQx)4u{WA*6 zRqu6`AwXeIQ`w%?c<+8KqP)9dz zp^{a1u~l8hmdP!P82Wlp@v1fdU{mB(R_f>~^z_4fY~W~rq3@)9@5{rFjYf&Sjy6E|BH-&d>X6_k0q7MB<+GhbvDAkt z#~O8G=vQQ!!W+OSC1MmtkWz6@!<+bIz|WTE3e}ANV)PPCmU(8%0Yd~F0WZw}_9+K}fm>LNJZ)r$ z2cwxTPX&unH331J)Py7%05*d0kdTQL3D!WFfmo>`k(lv$3{G{06P&3HZRfwU5c&qqiOeHrt?3JRdFQh9N>vI2;)51u!oSdh~cHNL%}%*M4d z(iz20{LmN07t|F=DDHfaA8XmVE3#}=;bny4XMCA#J<;FucB-BzHfr4o7$k2dq^~Cu z$5rZyoY`oP+R>ek=(X%Xg{cbmw#Wpe354h(Bi1`jCf@%~6XzmA#mz#2htNuEr6!_Mc&U_2#Ih zFNvy$&J42TNu5t+OH}ptCRzo3O^^6%Kaj5Jp|?j>hf2Ln1LzwQE~<*_sFE@PpWNciQDiJwSNi6 zPZA1$krUdF4Ufz)Fvr4VC1xtC#uTf9?El7$ z{lDAa|M)5yCaZ-BD?%vICiZW(Xgh87)}tgxV6pyMM!W5>(C?2D}@wV8L32 zY*<()HD19vjPecQSe<9G#i}uP^`cEypMXPA6sdbBH=ac5&b&t^&2OSBBp(Iu&mpd9bdZjej$i<&7*Ys6P^J&^1@q55^ zvR@b^8~rA?_ddR`$L-07hW)A8XSq&U&uA7mWRP&Q72Hr?aYL!!bfo}b>p|`2?B4U zE;xIIi`SHM7R7>=v+l&^ioA)foy+pgH|x@dkxZ*6i~e6?rpI%uNVw@RWkS`cnc{bZ znsqrq!qQN);`|6Udi^w5=(|8zA^KK_Z-3C=P>S^>^-mZ><6PL0r_?h^(#b8S_mtWehwvnZZXqg(Tu4ZNXemQFBH;5$n&Me55D}<3~m-;yQ}nGwKN3 z$Br3M0*P>+IB3C|z?96rl$P{zBYiJQxmjZ*e!xU04Jjt@HYxjC()wf4BWyv}upwoP z4k=3Pj}f+DjIbePjDD$A?2i$)V2rRK&48csIMMhaslG26k~cH%0(BVa?#Q~ z(S#uqEh!dKLX=QPIvPMOY*+b>O@s|=eKSXfloLfHioa_{hAiWW_E_d+cud4*;!Z4o zJ5#IOXpxnbdS%Eso|Ux@j7=j=sCPr&g`XUi$@({tcjuY&Ln7~rq$_U6$KZD?!Ul3q zh<}b1az)`IBxg>!X;y@dyV>qYj)x)WdmJaJjY*9SXF;YW`1QyuK?L&h5IE_VVJi{U zK=NMU%$adAI?O7Gcr+y@G%3_2TX1%6ouE2u8=g^A{s_d4M11%P=ZZrl#$02U-%Z;B zaIN_DR3pUv3WXT5j~X07j~?sEuBcHmn7OR1DR+SX7_pyn2RM~?teU*By6{`omw}uP zX!fCwwumfyfvV|**O))TDx_J`Wl2P#P|cG3cQWO-Vo7L;$3KkTW`30X2s|=iy=1yU z3CrkCbQU$cQ}Szl-ZM4Amu!}>xKV1FMtY3N-r8$)lFWfvZUy{)Cg zv~%=zbhY-KL{1ObQ2P2i3kB2$C=?l+1j7d#7*`e>YhYIGV1$uhAFkJK5KTH?x(rwd^_upvmt3`MO`e<&T5rPp@|ioh-YGTAi6Oldsk#v zb@vnBBmxv}2s`6a3>a*S2rx3K#(=?=ARrtPJaei8^v?sK#ONBCQXN$CED#ds&$FUB z$oL!(Cc|onut-M<6y?M!rG&xG?jC&l;8V}EHLBii#yke$G)q$>!gNoWrbg{#UX3Q@ z#^DX3Y1D*-iW)8!~uoQ zn8Box_@r!&N|6sp)u@oYSB=X3I3JUyhmgKTrH{uZFrV3pV-r&oFsAoo^O@Xs3I`jj zW_kHbW$RhVf@T?djj7T6?s%T~q+6>R&}yC;N1I$Efd+Y@P>Te?vFM$gw~4=A%&2kU ziRgb#FYMZ;%S%XROH4f?$sldWB1jZ{&uK6d9fquk(=Mz9?eSCr-mP<*{xygxl~u4BN+1rzl=>~i9+J;E zi9IByv|8-(Cw#eV>>=@9sn{bnzUMK-r1^agzhF>2V{{qzI46gOH&RT*EUZM+7KA@QM|aB)mbyB(XxK z91)2f^*)_{L{dUCn{M(Enc-|SAktn>g1`IIJY?y@mQ;Yfjmy#>D!^RvAw;V&I4z)$ zRD)Hw*M*!(*if|_@=ctJTW92`4y}R6s6o>>HBJ(Mxy+Z^CM48MiH61|;)q=2c%m7q zDGS7GHq&c;6FH(M{5_f)61l(}dd>D{FoQXtCMJDNGbKJ{ooKYge18puU?r4hljc8i zcds}9-!z;o8Je+wWK~<6w#A=dn4)##j0iX{r(v>P>O>q}Tx~l6yfGl(#6j`2aCeMbGc|J_{a}-MS z&;AM6aq6&I5j}hqn;hxzn6-70d5C|2#Pe5>GiEVLfI(>?XIIkAEq)IE)x3j1Rw?}@ zJRazWc1NqN`i19h=fw)Y0N+8> zX^YtJxpF*d)U*6CG!uEA+hvaZq+!lQ+KM1YDbx2^;Bjo@XB7GfXB#ads}UY6IBlVi z`w5alAHR$3O`2LRXG#Z|R1V1jSHhxSgUfxqCa1!;vMvq$M*b0^!VE#V$oKB#Nlet! zEGk2Y=-g@#P%MbbLF2UM8C8Zc*+~59Wrpb~ZsJ_$*$2_*KGUOle+8?P#b3$?pLH~E zV5t}MVJ-Fgo7~|fcap~)-b2|^h;dcKd(!-!ZpH5wg{EZH6@JV`go~R>Dsvb|@EQy; zY5tM}`OM)8HU!3cowj8Q@6y|u!MkU8Khp*s1@FpZUwRuf1?fzdQv`fxgN}oD&+@of z8}v6RcvocC@FYjn%pS#mtHHZ}nZo3@l7KUSSG~#tmR6WbYVC!olyia=sFKM=HXRNf zv7#)$qd7q`43fUhNSHIrb{;@f!1Qg(KUua7{F}`@=y*n#dhjkY-I4^&51wPiC9!U~ z-!N{upKu0D=@X?aOpgN2o9X+L&uJTeeDK1^c}b!z4+|Rb#NhgR>JSKG8yUPPb^sm1 zZ{QIAHHsTg_m$1UgXlc{*x2Bh+7D!azwvUdT8B`OY{fXZ8*Y#JL z>AR90I?kTEaK3AB{B`mo@fEto7f4e+olo`*Z4%Nw(S$J)E#S_k_ofXrgJCn43EbYY zLWCz1P?wGKL3C!B^crCAKjQZ80yhqqT9R-5JF`U+j+RW0By5wlRHBwoWT}KZZi8?` z%3{P7?S7lj%Ro%l`Uuw;$0P8E5D&**D;KTILN?8=-dOl~5Suhhn4k%H&L3pT>%(vU5GdGj$Jlv98c=bmk)bqFfMIf%Os%G!P=AIcL`@~ z&0dOWe6TP?l4h?uqo>A)3Ikec?`ni`%$^?~Ff`%O)|E6{_|TyV50=T$gcmJq(kQlY zHb$}7n3ZK7Ltsx^p}n=gvn2Jgd5PG^&eoGsS#EiF+1YWh4;D0z+S<#ExiruA^mVl| zbsy?V_m{d_iwuCww5}PGs1hn$QUtdux1=b`)l^m^A&H{q5>uImAkHxeNkooAYX_sR z!7-#jX+g3x6ppTgElbWG?Pj_qXebhRv5QrLSHeShcstmz!%X;a_eY(?R92~zMvZu`fgDQPR%sv>5h$0#EtCy8`$rksvt+rCrdp$J-v9PWLVZBC1jeOeplot z-Dvh(-xkVW-W4UVdQQocz$9o`^z&7E5l)&K4w0>(|5wtKR2eK*(C-J#Boh~fGME&P zrVO@$KEo)4w8y=OmBPyGdvf2|_e6ogcjFnfS;piz#wrW9yp>FSHs#}t!E!SFOeyP! zxJpjSii71IWixGPH!)c5|K*q=cOrgNA7;B#Tw~A7U?6zug5_k@XEvUNN{d2YUr%3m z&y1c^ufba;b%sB~ot00QtXKivlcU^@NHvVf>5zITRiBQZ;G^B5TjM|^$3+sEmNKLV zl^O>mUkS4`{s_BgNNKkjlvfIM*~ro@FHk5R*oHecLAB`rx$~nkS+%xImKe})#S!6@ z@DK5`(19zGJ+TgdV6yO4>gCDm)29&~Rm{UqBhamrZNG~fQg!RKo^D+*2IwHUcqT~K zzX3PTcsg-$^yBGd%4FW7cv4gcOV7-=E8~dt`bPv`i#l}tiL?%ux%UWBr~nK(d#3UM_bm5R+dXb=gP`*VXsqY#XEQqzJbbeT@z7)!`-%3F8xSAY4~@eEtj{o z+H(C}rM6svGuXv%thQXIZTYm9wdKhi+&3Pvm6_`D|6*-9!{7bD@wXGRW~I8M`$d$Q zK=cjbA0O!(DxZn7`XWIK3mx(bTFvC)hqJIM(jWHlXXj5W9L{CdQ zvuajF%PPiOk=a6e6fs{kk;D3m2oNY#Wtl^E>*gs`zY}p1RVq{~@1`-08c!-z8;tuH zzKSrZ`kOl&)gN5iJBt0?9Y{TvrTa7HcjUdKphk*rxbmxfg0JHHtUt{L@r9G{I*JaL z|1?MsCcZgvOORaw_Ajqp?{%Up0p0P}HB>bgmX#yL$6wa|!Uw@P8OC}{xLnDy} zqM?bxTQci7+RR7U${ERQG=p+x57uJRNRlJpK;FhB3Jl~rXG`*j^!6=K{Xln9r-hB3 zW=723o@R#GTvRg?Ea%P8%E-JkwK8uen_I4x5ytr@Yh|9~qe9FkTABB--6;sZSy~w& zQmL@}QYmF<1@H;D6rZ3%CN3x#n7dUe6KsZ5g^U~qQOHzt7`}^p(k->s#YCKft(1|X zgQ=9mD2}?c8HMx^;9%H9wW(^C+c}XSg^}nk%C#-!Oh+8FX&<=9J~1nUk>F2TD?Tuq zu6KK%HE(0jMmaFAQtb;>{nWl-ai?+%k+TRgb8{Wkrz4{*nKq;HCEbB}dB#bQI`ZD< zNh)6~{cp-hW@KxWsc|*j&^N4kaT4c@TE~rv4gMj1;gq1T3aI)Q+2!VDHgbzuma_;> zZJtWzGo<8D5{jo^=(>1+=#oea&OGyzP!S$O$)o?Zwn@qnE-;TH7?Q8H_!<(!qa=rx z7R1(*AtT?ysD{T+@?FysA^oU38DcKF6kq_7gJkuNh2|>5R;+R!8KkT`qz!3d=8}p& zh0KE_6%<5Gf=V9g<&ge2r`BLtr>%v??vKVw%#ERe zem{hRhV4Q~pV@pL&mWmhmj_d*o?|C}TkqZiZ7O)pL==+cN0;)X633Aszlh99!|ud$ z9Gv*7hpdo9={Mb&Oe$i>eDV2|n%t*kcv#imv|%rP_FTBFoT^8H?Vx7LcOmEO#} zGLE&6Q!90_`J01Hhqy}l z>`VWYmm;yXomsWT{)Eoc{z?{0#|(={JH?xoe*wrp*9Xk>$v`ixI zJUcvkVZ419wRWUq#x0DMaR&~n(}%+0rTB(sPRNg5IIAwbWsMlJtSzN>4SY1u4UP?W z4WAj63HsL#P%9dRVgLm;9C=v5%d^l4JRqN1N7mBOe{vCpmgVM{=CBLCEs4qehmDB&SKC<<$Z+ zFau1P!cgExFHk}+^wQn|hDQs(-a8CX=U1-+Jz~zV*Gol%zib;71=lxw`TytDaA~BlYCT)su&mU{5_G&kj^Z zk#lESmMeHf&EN@ka>>M0eHSl|BcZC)bH7o^{Y+V){*fu)Y*!Vhe71i1&+bie;e<5E>;Qz};`F6i#oB@Ul4?C|mS!)CrKemKfcVX}7LIiG=K z8Cyw!rF?142sZfK75!qtBkNCIof@sk%ap1%tcj}{JfdpwlyahweT7@r@67O-m4nwQ zyZW)GDpNWtVzlT9HKPX+GbtmFP@r?>Vk0nkhPBW=X8tZ+VDE9u@I|tRl|MD+>^v07LMR9wtac=n}-o+e1hU4-!$W1o4se z-~cHg850gKrB@XvEt2uMIB9ylc^MyrU&Ngf8o|W;U%XE5Q`0_Xrch_cm>{hQDl*=L zDH^g>S?-O0$YxWhM{wq;)FZ9@R@#8NVL(o6%Ctqo0B}O-mQ0HWNsGzdq5x?@)U;*A zN`u92Uw3z@*vm9HV!B;+;nVO+bW{Z<>G46@mhLCP7|u%xswPyED27{DBxaJy5oobZRlIbs$!Y9x1C#aCe5FaW4~mD|neW>L7%RH%V_4 zz((|A2nsb=FhxjMAz+cUaO7SH9A9B(HnR)ITQCHSe>B);z`Q%6xkAXe*AAF3$g7mB z51|-N$!)D!2yyfCbp|wj2omoSwyx+hy8J^(c!vayG5cAI=E>7-CD&jGANN0E7Bp-b zHQflo4#k>f{ryR;Zk4k2iWDP~{V0Z<=o(PN6&2g?allKlKOb9LgvtIaGB&rLJ2QF7jDU_F573;hFq%-a4q)36N` z@`x9mWoUuwHgX`UOktqFrtrJFz_fFPp1v0JaYh<)3A?u`W`Mw_hWQ&MWC*Yms-a?_P(B*ow`Q>^#&*`ws zyfJO2g<%|$^)?xvwr?YTuwhzHEacsV4$(K_6bu#yO2sndGN>i9VekSxA&VUc#sNgv zI?8n%(vyw2hk&LKEm{@vvTmE}Dl3k1*8MFD#6e8#QgD)Cl(LsDNa`?#_=c*iiic9% zLkOWQQNuwvR6{Q&$TNc+b+!q?GTz5Y0%8Q!v#>iW;4}oe>1=b=c!r=rfk7xm3mQY% z9?FMO450k+CKS+$b@~d%nZW3T!wIymUIAQi3wjt))K$X};S=U=w&PRI*-?eKoO-|Ao{m?;4EBp2NFcG)%m<~79@#@eOo@KoNvnoUL}Zp z8J|zig2ZlTLP?NI#_^|(l-pWWgaRRDwYDT6!)wX|ZLI=|XdXYZ)&$ThrUZ3NDWT*m zZ%aT0L=j=+<7_7k?X=wR6(7&u*a3Q1R&-|)VwDMyy8>p|a^2y1ka{zCrU-g}xZHWR z&;{I}QBWK*N+7OGgqecT;;1r?sj?6!aaSf1jSyNA4F(8$A?%4U1X#WLI*46Du`2~N z1I!v;FczBzCU1ZZu&ps;z>ZnEPA2qQrhlR^Xv66uaBpgpX8E?H*rOkGiZNnt*#C(; zOKSAM^byRN53q%7mE;qAovM7MhAPQkr;>D8NHpMC*(oI@*Hf6fPnOEP zExDOlH6q_jwb2#cr zKVnInwKP9shrQD*WjqE+`UA`TCg!Y5Q!>vPxxf~8BNhamAt!$oF-B_>F-CcVffd&n zqt3_pB2Uh;V~ke&8GlV;jOvJOj8Qk@9o)jak)2nx#2C#m(XAfnvSN(V4;s!hda=bV zaete|i~B(b0b4be=ra7E|CU{(+;c7AJ-3h_G#KQ3w(=nLzRI>he6?=SKaJTWkL(uC z@YO{QPQMcTA&y1$Wau_~swsVtXl-(;Q$q}=w>)RWSWWeMpmyiX-#Q%w>0qXwCxx^} z=r6ET+3`bHCF6&#mH461Ev-ZRQ2c}NdHEOD(&{xeekk6ou8tpydMI5qerPRMK4Iev z?Z}+DtygJA{Lr(Hk>HKT53P0aLup}_h#$Ji5w>a#_HMT-DltjM4;|v5#MT$IuEY$r zE@+YkPh8MQ;-sC4A7c5^U80lWcc~bH_u5v^>&EqMFa&nqY)cIunq-#$IfN*_w)nNB zg%Hg;YyTWVbcJbvLI24Huwl5ouU)rR_9z>MKom*78lar}=MbW%R614agMVeA7gFxQ zfzB=nhe~;>1t_J0;eK9Xs_CVd*T~F>w-53Uux#weIZ7C&Rii;*A{4!7l?Qo*T^&C=}P19gHfCd42-DjH$KwD%L>RCnu&>FEJnhD@1vKGq5g>pyK@>JJ*9T3TlR}#*WgLuV( zTV;GFDQg5C(FsXMyPHRWJW_3FIoFNJUM*KqyjosHy!#j1#M-&#VwXUA~fJ zh+e2taLiaqBEO3MKC@Eld1GCP{7NV9>kzW^%^HGsyfi9lwJ5VNw1=&h^c(Q1TDioY6@ z*IJbVI~k5PIPS0HDAP8!DiU*mHx^PnXW|rNZsI!3(hiGYe|gbsosI5-Lhv;0@DcB) zy2>1Pt&|xXCH72@)dzWlufheAtt0jgq>Tf5MYfQw+BwSCi|B~o1d-O9IY`J*M?6SL z7u{BO(=l~50@(VYI7RT=6l9N&aqA!)z@2V>*_vWkWeJ+%X7d|1VsAn}yvB*q==HVJ z{AN1>>Hn$NtTR~c+Lbio-OZtpwv*hGGFzwg<>jbG|56i<#DsOq+9=-b53<-QYkAC< zkuws?TFDh|1$N@7F9N&YVw-USR5VeaXZg~VwO^Zfw-6EZx$l#d2~_8cjQij(RViDK zi3V4*eB&SHzDf!I>Bdq{KMVhg)u`c05e3jMGKiGxT1sokFZ+sx)8VB=TalD>8FGeQ zX1+D)nNlcqGBkadI4-8tS%FZuwK$w_mZOCkjkHgd=r^KVnO<2^i!%ioUsSnbVzJ2twk zZL~vKaZ55kGDBBPVx@7pe7L_QZByJqYjA~-O%|06A9&x3GV>05x#X{H!>Ydk`or$I zYd@CEnYNeX-OiMcUjXRMn!1;3|M4Hu2t=#bTC8J;zNyK4Q=j>!HvT3p<}BmTAfGAH z6&j?&V!V|ateH}U7kOQ7CxEv$ijrjdIk_M!t(bteL2oUnp@8*qcZ4a9!Gz|S{1@5e z5Dn%dvp1-iirpPdC#83X=;3&G@Ro2PS^PPndCwR}=FUla1oHu z7-p!;qP{*#RIuzEY==A@h3NTi8YH8_M{bK>S4`uns1!AdtDc7M=ghCLfovk`!+f1e zL~&YziroiG{cB<6M#@sXsOov$vuRcaP=lZlj=TU9# z%~uZ}Q`IE{m5W7q_gtD9o6%fqu>uSr_6(Ha2*yZy?lwa*t5}r){U^9D+=Y}b`~Hyy zPLr2?gE@_^5Ku^I)L1qJ=G|M3PHy@Q3*1I59| zjrkN{mnb!Ni@`iXh$r}l&>)+G{Z&dE7xC^vt@P-^y z-q)!Q-l!DQ)mfo$GUQ>+Sd-XRN3f+7e-5|)@s*V)_ez%8e*$@`+Rg9ACiKzh+K8Fq z&^0W2lj#?rLnt8*ez)}?$LT7!7t0#qNC0MPo-IY5w= z?z}ab&aN&^-ir$YTCv@Rp_UtQE*rsuHsTY9;f3_dT1)L2MTUrh&Dy$;>ZNr;ti!GMR>w zneWFDL(oT6N353Nz8~ZIRi3<9JYyX*W>bUL|3zQ#LFZPKCtIj{49Z^%0zOY$xDy~S z(rdmB`M^qZTogI#7t(~5%Dgie`GTHvvoF!4ZMUN0gJcaMG$dR4h{91Ekvu)l6h`q}-zuo}%_*_DqAlqKc zMdQ$y)V3SCZQJ?D*gfV}?VW6M9rg{)8f~UpXWYoHC?%YIX$!`AIDM74gsqVN8ZxY4 z;a^;*t0qE9`OIVn1jAt-P;4K^pOcZX6I2cogoOK+Zvm?IP@v9_ANEgC1&Kil$YH)S zs5^UOD~9Jpp`y~F=bd~35eMA zvn+RE=z_z(H3%d^0Tf>W2YBwG5o-W!sLp(h-@(fu-`7>(?=qNcJi~IzKF1kw$mJ9b zL!Fw3SM>0y&T`>_`+PAWIfO|Vjk3Uh6=k8*uP=*m%{t-afW>@jnaK7cW zsMu(hD))UFpCwWn%EAHGm$kCA&IO}WZf&x zH-EAQv6E}-ZvCI~H_$BZ4$79vxd2@tmY_bh*^9Le#ouh^pYT9U$LZQDH`4Lr#bS4R zZe|?x(0Jv{$TZ({d+>;C!akvHgT+f z>e8X{;rw`IWC|@tfE-RouB1T;!j5!|5#ULX5c3Cv&ZxdWKQhfxVxC>6^21_Eg^Bq$ zQJ^&83y*Uhtot10z4;|5Ix}uX=%?x){rbnm7uILCHI19PF z?%6{Dhwhd=L{ID&cbk`T*h7d%fU^pl7;sgsK;f;}c sUfgDG>|vxF_+?`+iOPS4 zLAVpF-nBn&#c>*8^02*VLg}4@z~>OF5v$+L>zy8tH7(a6Ab)YIdFf6()!(dH`AfXt zpCk~e4SLXn+Sn7ouQCqYtS9U{3CnQ2c?P!f&EU34-ro#}93kGotABo<$>mPwhNj0RF6Ab`5>3xcT^*gdIyEw$8=JUL zc{Xth-aVV5C`Ap2ftPae~b`Y0HJXiFUI@4UeBH9|_8CIrpPgkCMLoWCa zBaE#G2Tj6?gKqbOUZ;cpHym_z`_bSqh=~hheE=LO_uT>Wr(a&_e?O20 z+F@UJ1fU(}ffrl(iEqVmF~^;Ok9`z4CV4unya7>g98dEkSIvsrB#-XbQn$VdC-OR1 zM8r#2je`M+cF2=xpC?EPiS}m3fZHLbq#57rIwU37VMll@@3!IL_Oye)%#o$RV)73Vo%x8*Bg}GVFP-+clb=<9O)Pus$pU!5J9EF zna*;)>l|MDN5)P7ji=AWGO#f4N?x(C1c$+cq!4HIb$sO-?JAV>aq7^iU1)AE_cW~I zpqJ6#tOn8zlxA;t@wB(XM^yd178M5zJzMdlC#1M_*audh$3=N2~ zywxDQKk-ep8s(vWPHPRX5hY$Z-<9Suhz<*-zS9v&yGcNTslcvwAP$WMmT z4lLkgBP&pV3>-^}cp)Y>yn(GX(|ydc0LFMpB<-BpLFPYOJhGLqQ^g~6?@@ALSi~b6 z2^nhPW}I-tvGIv;7eC_UBQ8R}EU07hnZQp73!*{9qTgvTV*UlcumZn`1ru$PL4PtZy6i=B<2;0EC&F&Vw03{OtZ4WrGvaKyY}+142`X}QeJO3U>(rR8GG5ZnhMEf@FJ#m~c> z`33H-?Cap?_&W7Eh>S9Bfiaphl$pn_11iAqkq&_hg*Y5SZrv>o-yhZ2)*?e{{}Wqe zT;g7H=s&W^IL6|CT8oTf4k3OzlDq%wW04V)L@r$lSpkEdq6-zN;}$aSG_6qeR}8HS zj%I`n!O>exPdlK#`I9jrSR4aG6lPJdVBn)>{y-%5fuKypJP`Vfs1mUK@}XkKQ4vhZ z8#osvDp-+Etimy=pz+}2f+h6u*w_ULnI5Zguhh_235gl1bX7*jE{}{e0)DL4eNxN6 ztsY$O)$#FUrTcX@d{f<1?_|DzaB5^CS?K|-#I{fTiwO-GOnK+o#O@@z|`26Vtckw?-J67}9*Kh}&s3^Tz){`0F_6f%NWZFxh4kWfioE_83v^B0+K4vv88}ixu2{nEN=t7%>qi6Idhfuvx${&;p}@ zFu=jq51zR5|DN4)=X1M5RVVutduXZH_8RMF@6*rmb?QFl&QNT7H(=(>EFr^v`UVzo zpWZ>%5RL|i6T9%u3b4l~^OW~)kN!8l<;1c@g#u5Bidg;mt&FXU?*$2h!DYsKmX0eF zY{o=}Yp}a1N0i+ygHPSv^hgoUPbb<~8(iBAS*u1g`!ja81Q83qYKBJ&6qQhYEGpW= zazx4wYE`1GohJ2*1Rt_ei|>As>p@OG*m+t*8KucT=Ac>HntB*+$HaMWrv{4RJSWyn z_0L+~p`bXA8$CswSJMD--rZFf%1ZNSBwLncfb#Z3ff!Kg?M6N3X^bu+Cfs#Tkkt;t z*skTPfAt^?WNtx`3w324m&t*fbr&8*Vsw!`OY}_!(_3p?(N@$`!`Xe;K84g3hoBsT z_^p*k8@sg0TsuotiDO)$^&7#dAeOtwskChjJoJ`hmj`dwo`1B#bEy{A=vuuZLDe2Ve)*8qMhk;{ za&PV=mbI$sb~C>>-kWsV<_!wbG};E1*e#QfWT?72e?vhk*7^&0q%<_)ESI7^@F-yi zqEFK{8kKIfQ%)*k*1zO2Wvpv%B3U3W9$kSekB9;?78Q_Yu3_e^Jc5%I!v#BkXL9z! z9r%?!semaf=R8R7wp*p1>RnJC7<0Y3_5wCSUZ})Bpk{atHgtAS`6&<*Cr z^}1q8l9DxXV{*Lwn zq`YLyzg++SG~$?|Dx7QKcvx$${g-Qh^rV=r%P!B`Bk+f47`7*GxrOX^)<6Q4n$17f z)SG|Ae=T1U_u7aW`|>K9M9}~OxiT+2!0ZLI3aP^>u*ZNCYS5nDiCAk+?~#4bL`8VY z37q5Tc>=|jMg;lN!ZmC{F$JhTOx_qvP7eR#>AC$aX8!5uySrk(#Kxz63W?E057mLT zy*Oz+c1pX(j~&Y_L|_yaA4i9QrHn6%#-RgIyF~85@C3TaZ_*FP$;&qQ0!$T_b^fU2 zh|V7t6-e$0E-_UTJbm~JXK$125WS-P$;(*o1?Q7Edk4*YTiV=H&tJxObZ2lkEH$td z7zaU(O&Bj!vYFk@y)V=e@%|RO+1-{)t5-M0018jW>TONbYjOR}nV%w{P#&!`5sv8U z?ffkm;JpM%;S)d3a#|b0*aM>nMTvyyyo>dL6nDM(Rs7i{Iofy_8`SRSabDaahvk-! z$zks^^M|5kmAfLgtEUyC>HQ$Gu`v6u--7Y4U@OTjz~KmU?XTB=L>7ZJ&HiQ+Sqh1= zU*{+nUYZXRBxPyf_(9UrhbE`Ki9||@tMCrEmLM2Y=jmc^cOS@rUi;IloC52WxB?2M zRSBb!Dp`%!xWnra*yJU57> zP<{DAxeRuC7#7A(qXkB&Q!YnxMP<-YeceZWd+`RK3LAim4Pb0w9gI$5lcu$cE%3?# zq#FxH&a&Lxjs!6L1hSJxt!uWF1w2CFBBr~n<7hM zwQc&FOx0gF-or9gqHPoFi^a*+IrCpx8^(S%zY-2sJ?#p&uNDJg&8CDx#CKnS@%l41 zlFE3|&OsTk1Av(`|Cx{>DSa$}31HZo{F;Q1c&F8NxH z3P&&uq2m7tANPkKqJ>?tGD5ZH2fWi^4R|x2!5<)ia{!{jg4{^-ua4bFd(Au&_u)Tf zTr8DE;>M9SK47PVXgWSPa>;94@Vhv1aWYU6y0^DKXy$)5*0$6XjtAE3dAO#umkQmm zq8|wxIkvy!-u)-qXbj)MzdHvWZ|mqEDE8n7dO5ehqs>0Gb>tzLD#C=YU|;y>wvM6R zB4P~Na(zI11BKH=2t?7g-|DI^$!Ma~8J*1N+c$)s-zkq z`w}7a=lc?CA|}eHMtgo5Z6ZY>E*~9vt}QBo8Gjq>L-n;<&}&r~8PDIBXf!`LK0Y!d zw)?TwRb7yK3j$#Nj#y14EyC|lGES%l218}^LZup3&_^sHsKl>Z2&zVcWSn{H%MFK& zh$_If4rgv>n;MGK(}jr@2&I11^fLW=*h_;T9tJKfI9DI?s}cd!A_Pa z?;wK)mhJ_pIIdp2Seb&MKm3%heV@8O(q9s`gAB(bNe3e*UmcSg555aH%KF~nW@>;C z0Eh`=onlw17i;7i`a!u^CkPo{tiSCpRxi-DVR^ThBADQ*89GA1UN=X-mP3aQiI2Ek zk~QWq>=o;HWfK7uf<3Zw!BO63;Zo5mxT4V-0B&&M!Lns@rx)zhFETg_#>$&phi!C@-1sL446Bt zc=VKswbO51not=Ab!q@wjx#Xc=@NI?Yv_wf%lyt#v9qk0k|yuE!Dt|_zi3nMd85Up z*6WQrhk;%?Jpj(TNRb+$a+CTJuS~{a#|kjcA06f+{O<)`0Qlh9C#0GG0i4 zsStXxnKE8B4`d*I;&xJEg{igcE(o&yB4S&ENI3a&gUPL5g^n1Q%OfmUNM)d2%VH4q ziYK;5y--L!ktPehN20e6x_4s#>{NFJ3_N0#8eiTGZ2zkZxKCC$Jl_ z=GEyWa&q&2WJp{^pLTn9J=qXOskiaxH)Q2%{1f(&>`+*#XOx`q-T`_p4h%g=2N ztZOi_(83r-*Hzv_-o543AkR4Q2!ayqAL7r!aS2{TaSR!``T$?%`$}Eb7k)JaMA5sz z!^R1KQm|xz92XMB>;os3u-o5+!^S}E!nGkQ6A=+S!|F0`9Akb4^2h}ct!NNFMgeiZ zN3c$yzpOz)6ftqPv{L*%wo29iI2!;CM*aS~-w- z;Q+BN3Be7}9Ree29>H>0^u0zW-xQLd#-9+-1qNJ7PBGkNxdWTA-Lz_t6{_jNb{Nz+(fy>y0RmTw66FHs#&exoW z=(teb4sH-D@#|Us2(Go8$*V4_}wbwotcK9g49$6IZEW!R)f>Eo5 z<$)Wh+?$-vzs#sEnSXyi_EH6P46vd)0XOd+wqK(L+*R#gi#5TUS7#yZ-y%iJYZbWm zIz+@|8~409Px9`~0R0bSXgJ6tgd<9krQkRY&fefaq?MQXHnx%*P3r+1g_WwVV1y;H zmVpNF$tPtue-T@wYCG|m{8Uv>2s@@zraW{9EXfGL&l2Yzv(G8_FX;~a72a0Zz@kTH zkkdP4MdPd5#Z|qBtD4wNU9zF0%`!;9ath#J0`PGHep?FQ;|ahb0e>z9u$TZmMZiy{ z0G>(!b`ubkTGeE_6M(%0%<&*5X5A}*f_dberflUQR!ccB^4X^O(r+Q|jkE5<@(b(~ z9haVCIi5dAc&Yh8{#tKNeigWSd5^k@au*IRl#vR;xpNj|XN(4pHm zNo5(b-t!+2Po>^I_&^|n2k3A26GT>tcpgyvr@?gLhU`MVwxx#I`8ZHRf)0wYhtrCP zT+DP0lipRl`=c%x|)YlC}%#iEgN#f)yK#d?KU=msg? z#2ZL%YB~B6WL;*-h$v#)rMj;MFq4+-qA};3`5j(vPm%yYZ5*k`9zC1ysksg=u8|78 zO-*0i!OIHgylb!q);TEtd#t(qx2b8>7ooGq+ZE>V;;HUlTMu_0Ug7KXkw6eMFGCZW z;2D+?#p!?`ldfIkX#xQgn&2lF1rwS;NDx7!O_nC8HN0+xhDqr~*5u__+nkbmR{Psa zhLNWw{5NrVQrbW6XoAEnr2QxOl89Pf=J5{@HDwj?4tm&utba-eKeB0wdqs9X*^_uxJqDqLANo0oGat9oe#;-PdoE<+tepS7Z@Do8mQa~^rmjWQu z)z&lKR(GXGqcDMpzV2Y~>Jf&TP6Hp|b`^^U5V`4Qs2?Oq9Qk_$Z(RjiviaK#RGwzH zpm^M)?id;l@h|n5&`k~?d@2kUN>u*fm*VmU!wj0lz-eZt3@{(4AsMf>mZueGSxosv zfjDVu#zzrAi~{fzxi(K-@{6E&23~OO(T^Dm3O!T=iHCjTGjDWssl>km8A)Z;lTYru zH1o!`{rv7MYL*==7SqRK9lNfA4)&n|{@1o| zfqO_xjiex0XotKHi1_x~Qx_%L6ZjBt7@Hayok5tijQzoH&#-8*eS+s`6Y;IxE%FQS z!Dfk;66O^;Wto0rDcwq8Nt<)2@9ur0EO+wj@T1|&@GGUg!uRC2#jC@qixKR>eY!C) zhrO7=;^5qP+_gZHO9AJ`7I3c5;;qZc0ess&fWML*vJX2TL9x98$<=YR(kKS+FzK~& zFR_KGH{W{n$UF3N;k$n8(R=x@hTl&1GHDV>#cG74rf|-fthS^PY2(N{o|i^!gA25^ zI~teuYyipx--&E7H~cX|ET;UK0>Tr)evOp1qTcnUTo^=L>vF-rFe0B1&Jzu*A~TOF zY8KoR(tzwCp}36{C$O@WNF5@RcZr9OM5YM)SDKkgjR6TT@Wp~izn>roRjnXR9^{b1 z@Pm`kBQZ=&17#(4_=#(OPa>2Z)|>O#*LmthC4P3FZAyV_6nK7*Igz8)*`dnBD8d#F zm#@GPdt{s;3a5wj1H+~6c9A&y=4l3kzm3HY@g%rC zF(iO^TmGGIF(LfI^6Yx^QQ^Pp%_;5^@$2kU%{*`(JU#T2QPA62F2W@v4=#cjFh4Ya zcvIA*1(~J;X)eBHv^ON%4zA2cF*ZckgqG~#;qt&)#P90tN)wpE1Ct*H1mdiG8UC&M zlyzqF?2S5uFud4abtJNaM@T@p-$}7xF7*gTKiF3;3?RxD@wRR|MDo@mE7-PAWn(U* z%fv}th5e_IvW1+ZZ-DHv`UZ55@8dRCUb5QgtG8Twy}qCg63=K<1NP-|D6I(x6Pgdo zm9heSZGRsmEQ7tJLN7(}95AAG@sYv1joFF7`uW825r`TtOcoI4evq9ONod$Y2x=L& z@DRySIV%5|l=Wduss?($_@`i7X`dpQDQOAc?i1{VJfye6attNDp+>n=v+R0WA6o7z zFB&qMA28d`?2Sglb;LDqQ(mfTRrJ=r6J9IhooECz-cdza)uU}wD#M-0!9l1wF zUgQK}SdXGQ1?!8Wj@h?Y|ZV&76}mHk%4(A9&nb;XW8 z^R0-gGvCtCAiH12m(6~=b-}lkN~P3Yr>amUGTA0a_}y}h1=Vc_3_pm(p4)lMkQK=L0I}Q(QX-Me_rXa?n89)+m;4qTv|uyI9;EJpzMlThA}~9c4Lrj(a$qPwI5Yrf(BV??)Bx=8Z020%#27$aW_<66YCY_P$MX+4!LrmxKB2eedWA?=aqt*S)5E7mpNJj+1BG0&wUs-JINCJa4VLpBnGD4dN_J9x#p0Gx{-0> z?Mpu4_DMjjj6q0{tpr3<3_=nPCLo$)5b)-!>Sa|70#5%`5UXPls|m3k=#iLH(IY2{ zwUu~Bl#&Q_MKK!vVX1dyp_{tu=+H)0qBeSdy@TIJ&;m#wNyBMvoi^|bie^Wm>ZPCs zTK9WlGu|3>gvs-gNf)?-2UN=IJ$~>&oFyB|K6ocM0+EQBDv6l445G)_ zJ;%$HDMTecQyIA+VV5EotKrhv`Kghq=cvRGG0gEpVbRHxZJ>MR_p5LX0morwJTWpJ zLWgAp586hu1ICUIp@X6XFs-367)IE30||-ylL1r z;^6EffkGi3*646zkthb_0n{Xtq)(X92M18n74xhKRibk2S)^!896+#g4Lrob6{=^^ z$_42O^&R|#?s}%}lZz_T)=1W7rEKf&@~GX>Xkc=mvca0Bx)OFL$`2ID6!Iu?>u zNfT5f=YqXM(ab`J;|pLZ<#7B2dCPVFa4>gHe7CP-WEnB){V{?vC^wKbU1hPr5{Q(C zLoWa`WQrg3Ir_0f?Gm9TcVf$q3;pWYhE6`2K(+WxahL) zU~ZT$j}|Yc_`dV9qVInkzemLDIPo_3Hy5rKo7K)~$X;h@7Zf(Q5-VayPbXVl61 zG2EzxppmLk$z$InX=MUL4*7ZsT^t$p^N|~f1q4h->i+wvZpUI^=9Dh-Q_D#JQ%NwFcuwikxc_hob}7UFcWx@{;DXOgX6o|6WwFWT)Bx8eq4qOh8 z6LqQMwzL%i(=?cvu0?E&4)7-VOUJ`fqX=0-lQ|>Av})Q90OCDt&iShGs`ilIwBuns zL~=|T!LAkwZDiv|Bnho7ds#~xKel+CEwUvFYv57C#w81fOkw?Xn3%wnS*E>)I$g=D z-Hd@THMEiota(st9$>TVx&`}@ULU^%Z8hhN3>Q)=#QFqxab_D^(1vTGmNM5}Zds^_ z$Fe~30d+S744R)O*i{shQCg>(e5?n>a*VY>lfGb*{PY|(SrqIgvCpRSD8C88d`Hj$ zHX!#IA|uNjFejP7c8hH$)f9Pj_(#!Io49j{2Rg7NC!P9JZRjyG+PO#S5s>08ej z?4o@9(ul3uF9 zATNAR-`N5w1uqlEG;5d@6Z4bA6MX~5^k7XFNeu}LAqZmy+aNiYU0&`$(y=0H;e)7H zh#+ayq3RMr6ZAMIiy@~H5lwK^5uF_ITef2(pcE2;^{{uuS)xHo8&QsHPVg-StK803 zunM=LIddnWPLR^Z7~X$ z;m0dR_1<^0rtvNBQ^chk?A@v_y3N`uT(46apEd&OTZZuh3!Gs3qrM#VPcTV0lH7+Y zB^m;K2eHsT{-HA*5aG4!=qXYh)zRk-V!(W%3-ZDorWkWU5XGFR>gazC@ghNU`x;;Y zv@h2{Xqq{PJ}(j#F80CPnQ{M0gdcoD#P@;An0&W&{3t8Tsybr!Q#^TzuZUPW_=@gZ z$vzOn2=SE>Z1oH z`FR=m$o3fDS8K7a!mpMXfZIb>fk-xeFps=615_V!Z}RB5-!!!mQG4GIvcK^O8>p8- z1Q6dt)7%UqkB#hUyR~6{Uy@vL{zw27ck+R%WcUjL72}5nLjj^T<`9g4GlIhj-}Hl= z?vH^gje^2Cyq4+Zp=o9l83|$M9+I!wL}?>#$`CS}0QJ`xlN)XzE{q&ULNetL#SX}) z`Y4=8pim{DlSU2CneXRhSD9~Gx#QtkcqNdU6&i>SRk1%HP;f5F-^+Tbjv+KvSD%I} zz;AF!BV_2J{BEK>7j)68dK%5a5lV8AoOI4uFONgmb2#1WKtI~>fR7r|gV}Pi}#DTV%YuBkr#I=Of6Np~~(p{=5Img6fAZ;Jw zK-Oa*2kk)C*@2WMM5sR4m_8_VwWzD~zzwFezaIyNuq|vT1`D~9U?%B8 z;$3JTyd7~lo+{vcNjKu?5vy8j?Ia{NVC;=GPzO!TLG9$sU8}XUk06R6L21+X9p(zJ z#tI`Gk7^ym?83ZsW^W*h0>=Ldj-NHDhQ+s$nrj!Xxl3xU(7moX@LbI`3)h5n6@9+R z)ufWb)ofX~W=?88=W5bL2sLG)f9CvHc!|Ooh#wlCHU>PY?fl-Kx@NI19W=s9vDM*`W6ziUyCpShrrWw~;suxr( z+y;Aqlt9kH-cl|Di6vt%1N}|(uO#eFP|k?$j94SkWeg5MYuQy8X0qDi6P;asyP~%s z!8?1C?~ymn)g~T{S5CYnF&(uW^y_bz=Q}+KrZno;Cf!Q*%fR;w-M2r>`+$~Q@%uLBNr?-@U39vi5l)8my~cZ|-e=}2 zgpe2HR#*+>92F4f{WQBE&ak2ixgI3~@gmow$oI2D4^Oh))LSqLJ=_48IrFqm5>bZN zV04G0;b982Bc~Ik@J6Juz^OQUCNkQBGo%61aFkHsuaGzv3Q$~Jg-#}0PBK;rHrLon zag3Oy=Z_e$pbfAiFgYUsPAW~1&`ON;GaQQ`A$V+y%*rZFMSw1143VqHkx&w8EHM$x zqDaFD90RPOSV2!xbcU2=UO}_Lq5kx(_%dd;&{kwnmE~{62mDrCi*L*Hz!TACOcrrF z3W4)Vw&VZ8@nvsENlUQEc5Fryb4Dx!>8&eN%i(a$c0=abRdNr>_OcsNn)v!`NQp$h z@P_;=4)+^!LlVQtt(3kce-wcp7uu4m83^)SRoKzR@n8s~7^Zaj(L;V>AU<>&-0NdFUeOID z42PQyZ>Xq%(^*Xlp2+@)uN9ke!0bpPtaF@o?y~SVYgaSVNmrp8ghY;axyYD6K`FH_ z;#hD7wOd37s(SU z$0GwJEEkHd{XGO%$L*DcLU1iROjz2q z=UhY-X1{L5H*7_#)F;3jdxtQd+(7WU#_~Mv7#$3h{0A;P%dLEXZ(P!Hg44q=5Imu6 z*tCQBw;$Y8?5_JfXJ{L0SdFBe%T3s!F_D!MAOf& z&ewjN>`(Z~{MY^wzIjDo`y22}b4Yh# zS?%WI&-@FK>M~Letr3~di+53hh6DbAuj)^ni@UfHL~EIo?*mR&>`Qm!8G`4x94|kGkV2zZXT+Cv776N64iiy#h$;LLt=L@#n_YG%{BiM9aG$obJ*Y z1_KK|kf+_{3Q5vZpvNOE8bz*w=?X;wkMPAPV|T<;Cor_ zL;?1`zH?Dg0EQ4}`wzTEZ2w|Ren8n<3Bgj>{@0MZ7LJ-s@=DP}kjbt$h=uw{lQI)5 zXi_px8F0Gw_YU>YbJTI=Q0EVKpOVPeZ0R0hq9LC^0(S~H3e4jUo9ezE@b!=ii2kP7 zQ-lnpuPM@hAXd;Ye4bFMcG$i4iA}DC3_#z-qyW_kfS4ZlD}-oZH$DA> zSU9ItTxl>1P6i4|Q7@*`sJ{b}W+58YvI0pCUac~M=mOPT{C%F_BU?<>PvyeZsme6v zsfiL&JeNsZ@q~qZyjX86!pEOw#RQ2M1l%0p>r}=mN;bY4FmtAtkhF4uMjkX=Fk;I$ zbrB$W)0f4xf(Ss3NU|!62-KW}^2z535=R8d!@Tx2Jj}GR z3=S=i0XHJ`79cjA8Eqye+oQKwVgkG`a*l4sy#)4X56+&S)%Ap%+{u8 ze69#Gn@_?QRkI;VPFLYiGkF5XQgGO?5EsrzLT@dy8-IxNCFeuM?=0@INKuL+C8Wgx z3AFa?XMz45gqr9ALKQ4$@Y%tj@Z*aqiMR{lqM#|s6iewzO3iwtE#SQiwSa|`3=!`m zBsZZzI#od&P)srYkbra)woR&HAjihm)7CU>SHj1>Ipn)du6(9%U@$*4m>Vb{c|`GSAxAH*Tn{`Z+V^+#!04x4U2Zi{)2w8h5htKV zG8h|>Z)g?r4XrUBpEGqVp%IB&HCmIY)n$W5P_C6grJH$dT#6GKP*k0I{X$34-kf+lc_e zVE;P^})EtLvNgAI*)(N$A;8ugaMS;UgkbPxuL4E?6|=Ya(!J;w?R zHPG7&v|U0rAja_VTFLTa{3q$xNOM~1E1cU%O={B0Gt%KkJeBI8RP&_K-jYgKuaB~( zn%<6cuusWoKhEW_jEg80z8hAZ+dMrTCy%{gK#6U{$-i?y?8RvXj!#BvP0SG?>%j_G zK`pI~C8H#*GkKSN`ZG{BGE9M!GT6o#wAlW{*Q%%A4DDD`*HhvP@a}+ZRtd)a&7R5IhcFHHrME1)5M_nlq zzMVKVvbZM=M6NW8P)A_j=5Mgg>^3O9!h*nxHMFlq{GiTLrA`E|*L~#Kq$qFJCL1_j z)(H{rh9FNk+h@$1L6_Yj&K2>m+h|W0NIw^vqB<;!^QNn_VIL%*ns6@=nl7rh`3ltz zG|v_Pg+@*F*hhlwk~KpDrK27YOm{98-SEDmEw69|E6GOC>x|bd?|9fdG8%jnB09i^ z5+z4IEW{%$!BGsR7l3HJp7ki6k5FM{p*Lf=J==l^I*w;u`6xOizzo za-FVs#mJKrjAa9h**1zxBj+pQwv~+z90@5eS0-HJn_O}E>9H%_lT#LYGm1eZO6FlM zuaIs(&t=m+@0aptSSDm-w3K0hP)OR;EGOlZdjVuj zHs|gnC%9`gJxCqVc^Vc#@Bm<^EBONmq)-AHREw%cQ+}k_4~sq6Ob%lL@V6Q!=?8a2e+p)Koj=w5Iq8B!i967%xp@ z?Y|lF0o~yxFwV#=ARWZBOA`D<0-kJ9kPTq&EMeEHe1@I{vtSTa83=0_MpS{7wSN|! z2^FMNq2j$nO#!CKi4cb+PLHDMjX-vpkVXayYYF!oDXfDzrHUvcgWF#KhJLMVGakauN=uV}Grn7l%6iuq5ULEZ9 zp%aID-u<|;BxDe@$=SSEOovGeYEgzYgK}7fKdbR)rzosx&dSSCI;KiEkC$klZ0_B5 zL96GTse+?-t&UlCmecCbYhl)yHia)6u1@fvv0N!_Wz8`#DaY?blIsqY5i~ zCDd~iu^yvyqOH`6?$C`OW)_eW`a#Bavu4GB8_r(d5Lf;lVoG%69^S8*Cjjbt|5mg>G6A-Fn@5)EcvJ ziAOA081e0cs0!1^*uIm?7VW-c7RzC(AP^#h$tsVXypjHfsq4i_zT zvJ|%0X)jf6lg`(AIwq+d^>j^SgSnU;v!j4Om{6q|kULIa`C92wovyT6a~jvNW~fgs zSrjQqJ=GSYiQa-Uv(fvwGyF#*sYuak{RuH9E%)kCSgpm%^d$=EplpJLMtC9Q0=g^5 zqpy+enXuf8vNjTz3r|L&I9-LQJrY@|XOt{A2hk|KwB=+<$Uw*AF~XAE7EPoL1nXcq z=E1H|2v?jKV_3_vw~t(y1k%6u6tT_)(jI$wOJ+chY;U$^TPxV8NXr_k;s8Bp=I^!A zF^a!N2S?7IJbBN-MgI$QMby;TiVmNP@s!ihs8eFKo&e`u<7f+`B*6_c2Kjn3f6R;U zmNCYPnIBHpTWE+dT|hGMNRd%K12>7sauBoh4dm1;04{r0?=<>Ug<&`REIhl0T_91i z$gZ`K;v&1Y2JG5evTJv;geneakIu_PxHcnP8}An;iA3(N{PT}^M7ZsE z$!Ym5XX8iPz9#%>W*mDeCa^8Vqgz!I&7ztR_0(IUQBY)`P6mLn_uKYMVy+2J^~((g zF1Ii}dw>yDp)WvGv{2}4H{S1anA&ZVbbCJwPM}*d2ozr|)b#tl_mH08=f z3X8}D$s!(_AURwZr9uxqlA&OBhhs?V_HB&95sW*z~APh*m(;v;cK}w2U3~vgqgUq zmEjeVec5>82l;j*m(vCVp6CN~+k?BDEx9QAwvW2F~<(m-O`fH4c0*wvH)bPasbQX zmuW?X4ZbWB?-pKpTf5YqrMmH4YG(iBi{C|5#QS%EVZ}KhrKPv3jYb}M|Q<&pv7UFs!sob{udg$LH6P(_&#ZZWL5(ry$LA~pr& zGoS=>ecd7#((8fIX6DStiMDqT#YzAfP@+s}xtGW4yZOpDWnb4S9O5k2u7r0b1;fA^ z6buW19}5M;H*0~E7{f&CdTCPph1ZMq4%-%($xhsIwDtIFiyjmG# zQYNqKI0=M4XP%|}g~_DY4qB$y>rR#>1mS^MZYy7>-rym{O`y^e^?I|kI^RNNY~V#zn}=dcd7OsR>rgIrt@oz$4&v#5*RW)PRp62*GNXn-zi;q#UTU;z&4P5P@9y*$0ha*s+6OIH;Hw*7R*Jgo2l^xRR8c^;7YS*8DG%V%=>Dv1Q4bcw8@P}e?Zm=y7YfwO;q7a9It$!SqOH?ea!JoUF zHzcL=x=??Qfx?S`&2Nx#tWn|1_oz9kY+%ai^JpL`Bv?(8NRMdm7DRiF^*I z!Ehd}+~m8eAp1QeUBP5i65GoCCL>&|U2fcrMV1JX*vvO;H)g0B`Pu$~WAa3{Y@f8l za3A+oMn`%-Xab5PNa(ylt;2iSju6<;k+cT{ws>@j*5O|hBu-!_H3#>+MnrQU5uyGc zgfo*>P>FzDNPU8nkpy~$(7VI^CIzZQ_F7uq6;3mcL?;}N2M~OV&uVxOlGvV7c7l#- z6+oQyb;NR{T<|syJ0#p;xd6EkZr?73PJvgI;RQ z%xYJ!B%3)_&cop>cPqY5= z=y7%((Bne5R*~Q04Yq9ZTcq^=f|Pq2ExpUp(qgwk%nxE_L0WpV(9)o&NlQyGad(H> zi(2yCNJ{}N-Ds>hUPu;8OA92?J!P#*OK(lk(o8slcvQUP614PZc&}&E(x2w*)GL)@ z50B!v35x$TMKB3k8ro*WQ|AkN&s$gj<ZS42zS!5v{~X-}3fPD?+*YL=GvBzSE6 z3((U4o|WwpjVdojOOxu3XldEWY2?FSuyKb6GHL171T78wew;Bm+{-&-3(?a5g4j3n z;46vv142s=5i+Eu-|uMYYAV>>4Sz$Bkk6=nWmK?hPrTlPYC)Gy8EQw-E%);PAs#-)%GIw!ud7t!9%PwOpl-k3NInz-EnL#cuKm-dV zEgv#%TfUn;BuQ4wqd2NI`C2I2AVL_a+P`5t3sbe9CPRNtfShdE+|3K)m?%r4u@E|(0mMiSC(b=!!SEMfBO^ZKORx9+NRWs;Ro03~F<_e}$ZFHh8w$?BO zEoB&?sQIyEji3S2&vNV20BN-|K>BHxFbZhqK8m(Zy=?8bvc_U2ORH&Qgey@N{3kMN zsB4NCIk_5ofhN3E7|G`gY{i+;YzbsQVp1bR`wT%+Zp#CtBU5n7D=?*L{l+w<@v&?u zQwnZ_OV?v0shCbXH2F=I;B7TwJ4$v&Z znhs5^Ht(a)n$t1vZD8RVA<{Vx^>#+lS`|3|K8MsDb%K->xi`j+zjV98G*NpbjUj3c z#6TT6Z5knE?G$;|eDf{Z{C3`M^q04D$Y{RVG|sknl1Tf$C8)yL(pq-Pd)T#vX(z}E`*ld>xb2krO~hQN0h4)# z?aEEIB`eGJ1VK`6viGt)K#KGfr%^ma(w>K-A2#e9?{LYMXw<2w)*F6CcAkMQgVvo% z>rK8UpN6mi^6xRHcd)VB0=CLAQVZ(~5^91#f#5watxBWbXlgw6rfJEy72;UAj{>`#w3}+bm|0-+uEO5BzFsdU`r3*e z%&?Fza!K(@B4J1*CA)SNuLs3g5Gv^114}z;%AU2?^GbLidTHySmUx8&bTz!fp_P27 zl)KaYH!QJWcqa-Sstw{w<31+u!%Z*z)zi@lh+k-wHu3m^`i!B7HE9Hu!ZhHea@b!k14vDf35IK|~%=e)wA z>wJS<*hKU8GRyPwc?H*b=4}Q((i*{Hy@84KI{$?w-4R<@Ofi%BCt2-S#mKoEp5nKUan9Y_SBdk(%_h4IVm?93TxlX0M_3Fg^VQD z#S>*mcwk(365BN-GMqB*UV5yEF)_?dg2AQ@bI$xamjn{mS@FIQfhtF&5#;1X{Ws#{ zuAc(tW{qYiE`W!Q41dxghVMl0bLR6LgJdgQhqK(d2E+Pw7Ts;0hZXR;TaA>~V*PUM z%vfEjOkA3IDtA2h!2OIlC|XQ@Zb}p(q#K%edSdcz6P%m0yDn^mxPPaPnMTK`B}T}> znCmcRU{o99TLw*PZYP!!H`0+0WY@@vnGgMek|`q8G_d>d^_X`7BJ= zs4HtUFVva)2FlldCka^V0LA)20govlA|lRejsY4gV;~J6i6rt6W_7df$j!Q=H|vhk zeh+Id$aGdbH^jF2<+}Eom3233bEKn$@!rjw8Ud~XpqsUOJPfbl_{a4_)5L8u2RpPF zU~LQL5G$#vK?w-FSxLu+wG4O0&AOUvzktoW9){=wqiXpCOl=%S_45gsdJj|Gdn@*- znj(jN^P~8P6f_uQ3V~hNBC^S;dlyeEd7@Sv?~_yGs%%HvRl3>Wn;<117Ze|12M-Ga zJBb1E3u(xJPB;(p1WI6*G>G(b_zxrwVsorrg<*i@n3Zq{x>rHHsL(ohHaTd151AB| zyx3&P_kO!F_WVNIl?_1yz@P>SxHH+5hft$RV1!Hv)gz}s_~Fn@a!JE!&l=83448gG z8}z%knAsQin;Z9F1!&U6PX)IrnkdAUS2l3!QTuLwWh#js5`4L?ky9q=CQ?qkz-N$8 zfzKd|egM7TrIMwHc{2M_hYVK`wqkJklm}VLmpt|>>tIMQ0i58#z)(M|4|9w;R!B5ST;lZON4Ol;t?DR$3(Ndt>?4J8 z`V7lgi9dXU`C)z}^{~QCNuhtzZ1Coi ztPfMJ%FQnk3AV>nC%sK2`q9A9gekRGP@^xzo~ZGF;? z(lQ`({5&>-uF)B=+CZ_Nxnb8JK7KGaT9Yyf_fS8^RalRgh`@EKFwobHFnWChU1e~} z!x(N~cXx51JjlW83p!e&@D#Z|K_Zkly>81vp@O8wrOcsu`J0y5x--w*sJ4i)>n@ey9Up!v0#OK zv8S_Cwy(NNou|ti;kR;b5T9g-c|ALa2K$P=`Lzi2RbbRG`|JouaV*=2l|0p%e*|{6 zkAS+<9l)XUBXEs2<9A|l2MV2~CNoqn3`kFnrZ6zTBd4{8`LT(S zspmR!lT*1<18I&yCt1JRz?C*Q>?l5_W!cKY3H zVSu!2(1P9Y+&i*@McuUNWB7iy@GiCx92vj#X`}wvtnr(y0RmOG&{jWDou~g|!LIoO zR{Ois#So!g>D_1I0xpMJb?!putqOnb- za=B+P`H8;520oH#z#@fXhn~%~V^dc~rpCu$zmocm|A7sB`BgM9&j#9v<|xLI6T8V_ zs9d|B^qcmRlYuRwU_=V*1=KTyq?C3dmhUO$`a}?ryz=S7;Vw^Okiy2Si-`q5$9)Kq zeZiFO08@&93%BaTiV1i}ib3$RxaL+}%U55n`xSVVVTXioYWW7buh0dIY_$u0qg`w?r>82Fr)|5r_WSOA-D#{l1eqbMZT_u6^Yvl#1K{lrx+?lc zo8M%Lbj+WSwBf+sRV$>xwtWoJuh5FH{Xw+vS4iKu6)KDXiA_!93RkBluOJs`br%Y6 zy8zbrT{MJUJdQ5lSgf7eDtu;nMwGCXCqWqqS9x0vE+ zWqf4f!q{ka+X`sgz7({*GHiPUZSQk!>lh$zj+CnRsZMhP)T-zMB{8qG#2$ZrM_Kmg-`unMovD{;06Bj1mHXZFj3uN2lcEEk75u z+!D6@t7y68CZun)<$KNG)X0UgnX$}?|xX%o}7 zZ1>Lw-LDV2ub-_C_Jh9B?psY2&ZwTER<1XA<1+}eXbp9)D3tQiU*8RrQH*T@*eV)>^!r7*OENFUr z*z{I34M!mzxW3V**ZV!4Hg1KqjYBKp$E}2wQcx=nqH({g^^G>Z8l;Y0j9j4*tcRz| zNJ9On+S}6PA^!!0+!HlP4K*Ji-EP*bytba?In*KbB838(xr>=Om}`i%W1dm_fcY>t z)vVAi*A~`Fp-9e8u?~bqQU?;OC|{Y_S*Qa06m54_7=ZOc4CBNakQ#Y;PZK3bDzE_= z+UY>78?rH9foSo5@c-%$vJ7<+hi1sv)0$E=Jdzt?DH@*7Qk*H)l|5073-Y6lPTDFm_}v@!uO@=Kb(cd9a%zp7ukd!w!%}@~^7v<7WN=8TYA?(Wl49 zCZ1NQO*95}jSj0`qvI(vKQ498RG#I4m}4zAaMm3h0H%essHgqV#Bc!Ek!ySCNE^nV zJIEf$%Cmk~WqNdK>9R^w$HGk#RKs zCNuw_G~Pcs-FLBjY-)O@Yh-3byI>EtcG_!H_Y>+KtBhaBPhN#+Cib7L9=%4THyTK@ znDQ;^$*K=+Ra+_fI^N%S<;=)5M8L7`bhzWP^7+bduC+(DvtQ; z%=}RYd>?>MiI_1rYCE_H$xQwXtkXe0O-_tIxBvFjX1?O8J%DQM?CSvjx)0Rz zQHaX^@PfEOug3Ay8`5M(AFjek=M+Y2$Q zsPl#u-%s(kGpr!A>i?K9ff_+-poK7j)_O(EE&_qO5KM^vxBs0@#H-RgL8y)b#m}c* zv!X<=HDib{EmjKP$_6gwZ0Q+1N$Dk6HB#GNYwiw;I2Ia+)FCwg3XHB!w38osk18b9 zctp}XpzHWxsO*Nq(%PV`pcR9)08r&9sHe~l;g>mNYC@?Tr3s2RLa=kPxi}cYk%4w~ zP#7t?@lRq-;GbkEvz}OQgKMQWhi<7kjzgyo^xtx$P(!JUQiG8;GC!utedIk(T$OrHab$w)WW*F7xCV7^eLWxBd+5W8fRm%0Lr!XP4@U|na%$IcH!{xddOnLc!7 z>Jq+77xx&|WC%3R^XiiVYhJ?|H42>J!Lo5mX*k5YO81=Bm=%5eMzi^bF<(U+!tm7J zssrEkF4^srhqTL^Ir9*^+>T-983wEYCIpS<2Hb|`%yGVf?w+m4tB7%$#l8^}jrcp^ zZf3E8Qr-!(Gz-g;ly?{#on8@a81tY%x&~kpX}8@JYYf~2Iz?Msj_JMiW5gBHYpINd zty)iEu#+lXs(m9xuY`}*mK678L7^zikM=mGNM{H{38bo*hJt_$%1h53It zdZryw_)H6=x&WS$BV}FNvOtrmp^5|rM}a28Mgdb%5rW~eq!)=1jsnJ_l>&(njsoUo zk^)9}VimeDNC6E!S+LU;(5jOK%mpS845Y*Ynq*3WWOhQqZdX97OhV*b!5&+%#}&}T zkq~=b!JW3?PFHZ3Ex5}S&{UCC?sf&VOk}}6S3pBV7PPqn8XU5q-4*P&1^ZpWJ+^?h zhB6nL0kX;gS3oO37Ie4*8UV83peqmyKNK8t1&1xfVOMa(794Q}M{U7TS8&W09CHQt z+Jbvs!F{&iK38zREw~>A#2L6LA0Wlqr>Q7#NEJhD2Km?BcMg};vHpS6!`hx{63wY(sK0hG40)_w*19;)aW2#dfN%>+!C_Sz3tExD1); z9~1MbGOgJ7geVQC;doGnb0iJSX#dsIkBbu|?r<++62rZBu(PMXj8w?O`BI^CV5qnF z=un~9waFEL@QG+-+HWyyLl11ZPCd?XO7-n1h9I{z)KvhuwG6YyV>_i=%meu)^JuBu zUl?G;!M+~EfrO121{J(j(>0E?r|&FM{+3E)+soYpeLa){ZIqop6$Wts@)f4p zFLQ<+S=dPn!23#FGEnpjVNwe^1W-_-P3jO>tZ+KK^{7whOfAcwDdZpF!eEl5d^j>m zNBqEjt`vo`3b0Is#U}#GV^yO$O9PxTSo48STFMRemkP*4T}EJn;j{T;{HLt{^gk?5 z-2?JZ>6HA_W&cr-o?ZocME>b19BW0>{STjmbztvVtPM;Zhs#6#{e1(2d~-IR^`@Np zrh6c(PU%$Eo1WgRH#7-M9~)OR{Z02Hk7vAr7$@b;HY{PHHTO|cUb$ThZ&l&WP7m}A z^>)D&@^pa~oII*LF`a|M@|~JccBZd~8x~F&!^lsrwumB9c@fVrwV+j^M5q!qkhOwY zp~f-Q8I}{tlzG0>Z}sbJoz~Qp@=1_L6~t(e7$Y*0_k*wnU5z`4m$ZmxL_YHCiE^0J zki(<+L0V&TVCn0g+P?ZCF>vddIrCZ6L52?YDlzQ=0&?`;d+}HI06i%_f;2PK=+8>P zi5GT&Af2W(u5xusMOss1({m`Ao}8Gub^H4XNW$QScbI!}g_+!&atH)enV5#Ce>yi& z5wP5qkyzEyk*VC+c&;)%le;i70a07!DvYcsejA%Y%U3E_pP^CWwHXKlVW4}P=Z?WZ=NN}VlH`TEO!4xSNtk3%?uhr7D>H2BFLQ65 zygHRTZ*?M~Q6sO38mkPz#z)iwQ8cS$H1PsN90$c#rbjTWOHfksY5EPhTXark-Wq`2 zV@e~r%VRJ|fNXJe1Sz$0SJ)T&pPGXi+W*Jiy8uUaUiY1s50Mfn@nKT$*B!~y02HQY z1{zT&G#D8JG-jZ|G(bE!e3*tBKm%wF&<&xx=M~wqW7)D}ZyeiYd%bpc?d-;m<7Bf= zDqG2BH?hmEja?NdwUymeF_n~UmNx70I;kXbiE^4~@9%%U@80|MMdLLTANJ0$h6CLD z-S2t6^PO|PbN&ZkODb8a*H)^l+mdx(Lg3-MXQHR-Et@BbU#Z-%nOePBySatyTC0|f zHGYmOm-7>|T-i*unwzbrOz&sTJWo^UOw#arWvSVsokpd#jS6)iIeDN*O zNNcH8^TAgVFkdW2PqvKm7<)3l<$Bcx=IS=QLYC+>Fp56?s9KN>s!Iu1eHat;WV5(ynHUHr=kq zU*$SxeN6@w0#i`Y)mC+Vod%nbHc!f%?A1B zn-J1+3)h}6v~K$OmF&#?l98P`fpU_U->cqAj()L`?xyBeww*T0TVH7TF#uK;KUXY` zIb56P)mL_X(x>cJvsoWqXJZr~V^S8@b)h*iW|W=0DAhM`voPZRKh*)r?JxfCJv*RA z(@to2louw(7Vwg$TaCW;+Voa+qp~$IHV_Zme)~eJ8gs+Kg>m|orvK(5bH3;2C;MaV z*I<@|5tV&|#cNCJE!#(Z&07B1Kzy>FKKS*J>cM)9(|C%0T+W-bfR@tWa}S%pRn_UIJFRUIbm08gVS59aOQ4~ zhbyuR5qmLqyM9N%b^N)uJ%5xA27hFr8YOPz8gDYn+R?K0`eyTH`W3#yFQK6E)gzIh z&@cX$C4oQ+EzXpRv)i4j3P^E#@i{!^${U-aA1EHax5;=n3KNcEm>jobtO?_eY>P&7 ztK|-qfK4NVv3vWD%4Rl#u&m2|&sC%l!c~&Pg-R>es<@)6(jkTY(HZH8FMfhDoQ(7( zH*H!aO^cSN(b~j~ugUJWVM>=|m`UY032E6BFkpTwFQHRX;NGNwr%~yb0gW2nNyUWj zW}m^t`7|D5W3kO0g8j^FES1X~YhSY1vOm4!&gdQY=~NIsu`EJ6T#lPpF~=9~ac{AI z+36s~)R)IdSzX*B9%3lwtwpv;OZ9KTzEo}YPFJ@ty?iqI{6GHy`Ick#Lt#VxhAUN0{X#cR#xW@G61@l`?~T8o9H z`o{5<<;D7q8};KW^=rs>gIr!5zgoRqjqweM$F)oGYK_MV@mZCM`vy;({AA(e$->~L z`t$8S_B#I|z?0lPy3}>^-}#qO`*(uhGu6IOe7YE)UNX;>&B{^%{&OaNZpoZx_=nwV zoQuz@lkJlIjYP228&?sz(9`DVpe_nBIYz}x&@-VZ;d@I zSAx|_ts?0YhugWQ2Rq*%wZC+*E}&2jiW$E8E^Og?kamJ9J3kh+fA|2MsFBxqbYyxW z?t5x>wx229VCt)jh}zBT@do}g12Ix1BgP2>23C&|KA3e)QXqPIrfZXtt(ZK(()sJW z5Ve>0>rfoii&(n=Hn%*CfnXpWjbeQRSNK07>FUaYJS#21H^8+ss~8J?+# z;}cFcYz(rq9JRkQXvr4MQCUI=6Z;OE<>u}b&oB;p##)tT;|Y=86*}J)wXX(kBo*iX zHA+k8AU^uoQBm*F$BrE}-;hw@(Il5+>@~QJuos{(6Iez3yx>SrX)g0c^V=!q7isgu zreau!wW$j66#gx?Jo_wnp>r*2Zv`V;_Z%pgz`|T%n5QCnx~9el;=*`=b?`LEQ>igq z*ALTf>SpB!)y?nJ{Lzy~Z3tK@;|82i`>kT!5OlNlWYB5H8-p%q9|zmSPiQJKK@9C^@JP2GHsJ0yrTDrjEuc9LOowISmlJn zHg&{!J+kwcqV|`=4yPwaI-e8i-k@%Os`Rls{Z=)Hw)$7c(+e|9LK4e`_!&BB?pnrd zuZ!AY^K_Y0yb7c7lV@aKuT}cF4Q;o=o`mO?>rB>@DrZGEw(|=OE6SF2}shW>_bJDneU= zKs6}jzjAAxgA2<{D%50$Oy^5c`+C?|cnZ4)=cuJ_XEQbEaMnU!-KrubH|qr*XU3&# zN1GYPbragqnd-kmJXUuan3z}_&(sS$j`Uo2jv;uxj{oiGPU-^cc4AJ5dT!~9qhCZm zV$QTnN(}e;=Q|@&`!m6ef?=8a?9#;C`S`hGOJ6)T`o&{>J`i_TkeB2RB>w-0D&PA**%atV`zT2wj_tc0=3FQyM>Yb*^(g zYBz#zBm;E+LcYOBM3~w?t3=<*<1*7C3JXgst9}OD#=eTd$hNdi)N)+L!s9oa>q%bp zWUc#}J;tBTuLYAI+iyBf&q;+8Lp@ViUR){Aul~-DN9`ZEl`%R$QEx@o=n22n!1Ik9 zWb{53-gv~$ot>v@`IKIieyyv{7e5<4CVQ_e@Zw>9DNWl>&ww*$24L!CX4;nf^l4n6 zin=)LGlkyirJsDW>7|QN`#XY_33!1xw_9v)K1zsr2#4Mk=+Ju*Z z;K=;s+-!dqjNq8mQ_kirm-dBO+vu1q#?RViFRI^ye~*uOPGx_cHP**=aNF@PR|EFT zQoYI1+&x8NJ`Gp^dk-R6uU|z5fvK&LHyi^$CJy4_+OeB(?Qq#5;**6qChdbAgx*X0 zLewtiN(~mkf-oZF?9QzdGEv4}f_F?P;gRj}TveakyQ-}^JO(~>wN6Yj2X(6Rb)Jjb z^SQcC?Om5-4T;xwGPgE$IEy@XR^5o&8@Z}K6;?ef(TI^ZxO$>fy42c=%lw4=hZ=OW zfvbG2S-u8g!GS7R%WGXsNOGgG0BvFQCZx=CDITZEOiN$lVA2G1&*)C(k!_;1qFHCv zN%Z~RHN|yihYKbNo-ns`XnmDyOO?%LLKOJKzuEReP9?#%F`KN57$n9-GaB1E3wZ+H7%?+*r1VMS-u#!9P8MG?)DO_{ZaVBHG#3M!7bi&6^q@hhuqSTpXF3 z7>%FvjO+Q%m8iWL^il?GDLnD|gIqN$&qINT=uXv4X z$Ftnmwl*i(npmK^#zB2&({FimcI1LiUD!0j7JAAh!Lb;vO0AN{vQb8|+E9>5p;Vx_ z;ni?ORq2$Y_H#kYW|JF=a|1|+L(6XVMwXh@E3^g;Emyga79P)OvDGt$$@*$Iv>%Du zKM*vaQLSRat}Rb&7&SQ~;u+tBhL)D7s)VgVqLQ*A8_k4NqPV2)rtquEU_@}axz7NIoJ zZSxzzynfR13$yM{WGGhL6n`|O!)PboY^QCU*mE#o&bi&&H&$I)>F08>`<+-3_QkmG zVuj1${(Q^kRrH3mY+g%mNXzCG^@g-;URQ5O%jVVfhO}&6W3Nxke-yRrl|=Yp}CpWUsEHOE2nHJhK_H>c(|8`DnXu$>aRjg%rERwL!@#C>Mzaer0J;X3NIXAh#c*Pvc6q zx@IO$m|=ewxa_(^#daGlmBP$NiP@%azEQDP)0Hiq|42*yWRPh8#eg1m6zLXmp#3pj z`E3YZCzb>#_ZYj&HW)Ms9>PFdUys+IZdtQy_>(MSgrUteiKLPI+vpMlZWbmoVI9Fse49g25Z=|Hjz;)%Zg6V-ykQQ3_b~IpV=R0 z3)&Jw`d*1}_R-v?Ideins|*7o^1Vj(qfz^Z4mGklyE?Mf##YlJLY;dKFs|VHY%wzo zCkr(+WFr|Ga<9cd()YVeblxVk_uBdyv6}|DX4xJ2#!%;{qxO#-YEUQA<=SJeQW_Nh z)4^F@UIv17t0MPbEOl_4I$grOZ;Gt$|@Rnw&tMMHZl=dcf6=am-Ind}@W$ALas>{mTQ+x)v2@vanwD9Bt zFTv6M20Y7N$i|VK5Rjnlh{T$ooDH|mq41<$y6jrA%H+7%`Oc{Q^r5Eqq#KUa(_llx6*^P z4dyQ+U&ot2-7@Y_gg+Fu-xCZG@dyPVk%>A(QTtT**4Zy4;RK~(2{_{-M@X0FCg0@z zgr?S)yGn#C9(D(1pBx5!jjIvyH5E0}Y}iU2gWCybF;N-JuW{}Gh%3#d)c#q(Upg@c zA5emTV*LFKre9<%+b=>caRMPk)IAK*5$0BoxWx(^ta7ANkJ{B>zV>G18g;C@<=(ZP zz#|l~!rWC9JYW`U*C!62^?IY(S&Q0>L38xbwR{ag{DjC)X>uQ>2bgHC$Glr-^R(bjePa08j~Dk z+N=UrlR{@5RC0=wgDydSRE6rQyD!jhcm{05eFluPd`#v)uC8=tiKkAX9|zy|Qm`)j zk0rKypdsjN$y=Um-k`XIhm6y_+g?sI744nOyTa{O*dHU%TVh^@MRkjqtc|E3sUbOE zO(5?fG8Qxejz&6PjM`U%(N6Hj^|Z$k=8a>{N}HV`L3K`Z5zAM9tO`dxS&Lbb{FTOQ zYen2y`wn&*C&)}*Cp;EA%b#@)dYJX2KSKS^r-IoDSjShS{(`2qUb}QV&_a-ye zo0f;3NL&$+ZSp*F*8|I#8y!AWBkx^jZOqpQ>ZnYNb=&eqx<)n^DwWMRDP!`6e41=i z*g9D^-Fsp(3S!MTnp$UM=(HVWwvqfbzF4lhdiJ_V+?-}ZsfWf-4ku--JvK?=WQN1f za)rzMWoa_<{-K6!t_ql56vn1FBb>c>m0TDa6GD6DZl}^Xl0W8WfJVDgDd8q7Y^lch zR((UjWy!=?kH%mx4x&m?JlqCSC~^E*qHyPjqW1R%3+?KBc8V~yE$kMmb6Vd1-8<6+ zRzmA&K2FOftc)uKHR3dPw^t8Pkf^pUW!GXX%?owG?ry@lPS$#ocsjvrog8Kr;ENh@FY;-;`NB1^Zs8Sb)@-l%LVpG(MzJI2L(9Z`A!=U^$ksRm?U!LRzj+a_4huAWm*EogXr8 z-JxA;qujX6F28#9>cGn4;O4>#UTJb^+NTe`_e5~GKQNuwpbt4^SVP3ISX>Vb(njU+ zQ~A|4Qw*;SaL=yB;JEU48`cp!?ns)eU$!Tw#@fs<$4$hj(w3e;hgk-LzydJSc>!2^yQ<2 zM-h1|7=5s+pn)yco6Y)0Ke>k6-`?Hf;x$5FIB&5|Wr2gnE@#a*cDB4?Cr1_wF+>ia z_UWLOU_6^I3=VI;P)^699~e(ID-1*T-n-X;9e?=B(%v=5IJA2WTmcL>_NjqOfjw$i z*%};P+1k4g+;r|y!}{Xj@cQE3HE?6OM-3ab!QqYC-ZgOZxJL~z*Wu-T`T!f*s|IFr zd7qg?!y*{9{gHqk*ajoZDHMN79gRI&TDi=OU%s{{-Ea@LM-3a5{cGU9ZHE>hzfb3? zdFsvPs+mHtrV5H2?Y)Z(E0^E15}W&+Ic&&yko@6NpWK9V$PR+p#>L$dQ7DJqKR-U3 ze-gF77LejDl0ba=RPt zn!uThC^9fh(hj&*E&-zsc(tS3HZeUqp(E67}-|BwwGRhLhm1r+}$L4fT&{=93KDqko(*r2C(|U z`!DMA&*=SH6o^ElL3rrR81RG&LaX2rh%kF70!VN?+GCyLaYNrTyXQwhTAAJ&vH=~NYWJ< zmAC@^4|q+QoGTw}ye5CouM?h>q{^Ban;3rv0QAy)e6&|<ZGGQpy>Kg{6v{c^2@t>k1GYpyMUg zcuqCWCkQXJ-mHW6QZP3fHO~Se=woWvmc&G~epEIp*dhU|IO0Gp4la6P@Nn%%to$G-6}CG?RWzZB zKApo=5-^fE_DO5?5w5?`j#&z^~)FBMqj0- zi>hfWH_ikE1*1p<&xERBd8{X(1DtDqwQk}n<(BFu*9{HBY~n5-^RK{*v{f0v#vek3 z?vZ$;V~iE%`AcfQr1rm%YoB60yU-IOOO(^V^Mobq+W*HVQwyjI_;>zaylTzyzS z3UR^6X#T%a^HXa6ORuK+5V$4nMu6L840P+}l8D-R5R5JB4C#kndU;x%`9L(Xx!Jl7 zR+uoMij5_AIvFUIkgC3*l25ASQY7o?O|zbA5`-yqQ#$xot@;PBPzQS?Kppr$p4kcN z6!=I0FOC*Ov+LzaJi*G1zLStGG5VFIT7BsBX;2?aQ;HOWl0T{jXVf5I&q4|Fh+rwS zmp`RuRpeW&Pl#}EHRC~lAZQrdnsa*p8NKId6U+_Ghg(@M;Cug>zU-#gcV%YMvw;g044>&y)~=ZGnvQKdnm6 zLJq}!dR?2st`xEtc;fEF024YA;ckJ<){7{%JO4_<_zn%@ zw+=RpaueIya*Hcm8_6LDU}s{5VDWTVh1X(K$26+vHL4FgxFYlP)G=8}Hb-(UZ?vT>M!XFn_@NE3l6#2bN#Te;ra$=ST(<8I-d?_B8oZyGCVr-D`F@<3tvvKk1 zX`$^R=?NiftoSspy}vzs*QZfstC&Fdm9bu9Ix$b_61lNwQ0N`*0-QDKIu|8Ee_A8_RnAo+u7Y zSb<{b_ix2DVd|zL%LvVu^~Gbjt?2ECs3V>*m2$am5@Hi-ZQ|f&-UpO5%)?cceK3kG zzCGxS;fJp2<@>2lqdqD->7uF;N$O4<( z=(fASOiux3TAUS_=}W&1n5m(Dz13AQSvN3Kd}z$Y0^Pa_hN4hPw>wQyv0<66L<*|G z{=6*Z8z_;)8qQab#dSbVIVE&hTP?7Tt$G9O3%=NF$@w(igs*}$Dgcct)gxXKY7Do$ zQjf3U$b6-|^zZA9euRwUYSTbVkN7q>Tij@%`w&T1y+I`v;^Ox~EG>Jr#1Km#jn0>s z5Rs`x5o83h>PC5+++wt3V5LW+Q6ZFalo%9~Gn_9~zecyYa7p85t7N;sq>l`#bRz8@ z1N6`&*12R{30KHNlx8zEL%8`AUOL;IpH#JmO!^fsTHT<}U&9T$xSmdwE^u@Z?}1Eu z9furNVbeB4dAZKzki6n-WXzj?z9EI7&NO6o+acKtu}@(09A5Jct0Ng3BW4M+i9%#K zsUZl7KENhr21gY(y$-IWC`4=5YP3WH9{$d-Ny%PocYqF?ROE+`RWfYT!yGi}bw%6x zeJ@0N_I>u@XnAWBR4%^{g>TP3l+}R7*wDJO;M+Vfsb2X)9yZT_N$-tHY~EIl>c%uK zgC>1E`X^7e02{2rsN4jgdNxERtjlr**RVAla~UN218)jM66+CIq~EGK1eXsQ;20U$ za8)-`mL^ek)Da{Ma@BB19pq|NYJ@1#&-r$zrdkYz^z%X?WjZBL2rzVr3qWGMsdN-|WBuPF&%&j10HnrU4S@9FXvA+-!x&wHt~}o~ z1k#60KZTyggh1-v{*1b65Trlsx5-+W<`^#5kBkXA0LoKkZ4kSlkot~gGB3VSUV?Ej zq_N}?+oM#7PEbmWn-N=47Q+mnr+GuGM8wJ5u5* z?*m&Zj?TO!oXqGXyM4{!Z(7QF4_o?SPcXivuO+qyH)PNo{o!S(rODxy7N$wqE(oR& zzm1P2$-$NWI*FHNH17siI+cSfbvrz)&xuS7z~h%1e5r`Z?Q3|D3#@ajCK)imCTGX< zaHXcQ8eHi+wNOb}xP?P3Wi5xbmWEb(JS;-r85^tMkoGdNpk9}5;Z+NF&jT4&DKxpZ2;4J z)Z6s$3q})xK-*~(t|i!j^k7Qv6T$Jl4P;6R-ap$wru|X-qrqJw_xVIL;s|cm2u{!6 z2h$XJeJFn;*aOVeoum>c(D69(14z?Qnndcgp?;hF+zn98`~6tq-loX)%u<UglXJ2^kQ zM6C%*CHy{_y?l5>k4}Db08Q7U_DV1rJpfG)I2BSn8PJ@U&65F19x;)#TsTOC$gwyh zHUXMCJX4S;0x)y6By~h^rU4l?wO;f9+BP*M-&_WLoKEI&?6*_6b>ubi`!W;^W9hg$3jZt9dF2W@)J;7$`As1WbjZb*DtI(O&Kl7n%U`=n4P zjWkPB&@e?8QH_g&4H18Il~y)Er0L4PNv_4voo#tuel6UN1l2~q#*ohOXELUQox){(4 z7Q(@rLb2W`15s-tZcxTC%Vo%LuDr2Wy=e-r(=8o`uv8!haoV?8sJuW96qs;8{QY_K zpe|r;*D2qlMm5!*%VaT0xR(d<_DH7AJ_L}dWJ?EQnnOrf;xfaazS9vWLuRk~8D(`7 zzM!iQTR7^2ff~z%ee@4ET+eoIjkxYH=qT5KOrk>dU@TFbGDdmG6#o9)|3riue{#$Ld=ZzGv{VZaNE79lP71Yq1OUO|XMw~Sb*N?b}GEg#;kK4D-u@P@0 znYx)gz{C(!avRBX^fr>|nO<;O0lGFa*Eb(QD?=N-jbv&G7l^mIjbwV}i~{Xy0>B#r zC;B#$spjD}lId+E(~rK&KY1oAfY>BJJckQlp<5o})coxwC-i~RL8k92Ve8%>|Nm#G zrYlkV^Fe5dj?6%GNbt>fLp246(BTUJz6K&Dx0V?WL%i|(0#4YfE|&ADP;#y82O;W! zMFnm^+=E3L7vjnbpom%!i{Xe?2uBi-=w{S@VfW!MvOR%Bvxe5cCP-1&jOxCPBYG%2 z_k2vF790>uA@z?XDDJN#j_4DL(KZ~>Pei|v1%N1gu93#J^@0!u9Q37^4MOz3=od!j zKqMfv`-lfdGWgK<10T9UN_dMoN`;7dV5ZX%Y{9TdDCclXEmX{5Xda8l%j+PL5YPm8 z=@CHk0FEQbDM2j-DuiTq1m`N}l_Bk9prr;XVW6cCM&}7t1DcbIDT2iXG-{wP23-2l zXjYjm4K-&%PPc|uYJC{4Bkx(-mtHpH(sx8IYA(f{ zu&FZO(ue%3F%U~f=cZ;Rru?ECZt25O4*-G?wX_JbfTggL|XIG_%89&`H@HEKYi*ALiePoPkyiAhW1L9JC3Dv2MOj>ZOfZPg@D)4;zJ z1)2t2Z+CuJ-7vt=?|MzTL1<^z0ZBe!@c}5-t1BNpCf(9CbZFy#8XrYfpBUc2dMN8?!>BU2(8mofv})oL+a!ZdYStJL8#aRr z?b@^3olk4B`!ON^3Ov1 zJ)Wk)g8o*9`&F*NEx~ln|B7%7CG_9EQKLE>a_FrO^@N6M(4ikO=+JC?B#5C{w|xCu>ZM_Z zhR?h3LVq5-(Bip&4NE8rYYDVq?dam{+^@&;vm@dddC1Tap@&TZA?grA0Sq;E5>JA2 z^*g1piP54%4MnpAT7Y~F$jyfZ40WOw=l2x@4KQh@7x&c%cZ(TkGZ4A{_n_X9=ertF}!_4M@j;LccE>1N^+Wb+rOc=vIp) zkTn28TVyZ)td)%c#9M2!CRWP;@P#}U{Kd*w*S6r)YpztE!(>DryZrSUG7We*fN={c zbiJZfn&g*kRydmDR~AuwmexRWU*xx|6|y|mfVMYmPeTzs8VU4sy;{2*UoO`WRjvK< zWrGu?X|S!`S3W(%{er{0Ke__p%mKLpN>VqLXmRUCr3E&+hZ3cnIQoDlz_3I=WLTm? zejPQ#OuX{SR*Y_Tqe8F9#GWMc_b(46>Z9X9P&NFn5A^>e0SSE`Gv zaE`TCnm3yG{51V}Y)GPC_A-|(!%%#V)mYBj+5<#%c4>{#qtceQ7PX8`HQ9*&jiy?F zVOmp0s_0j@RFObMz0Ueh(ak#|J<%I0;*%N} zqUb#!ibDCU|B?o2fTHu!rOG<}kLNe8B4Mm+px8#%ZC^3ma%% zyXTd)l#sz2HEGxIM&F$bi3z(}-4ae>6Es$h+Wx&9G-?|j zo#g{+&+tYch{o!hn-xui?~B>VmC>$%AT7)%;J48DZ~$6XhJH4W{y+sSAcG`j2<-!X6l)4o38<5rY6x zYXW{|L6hF^@u`Ck4JJ1m(;=`!V|d7Vweq`6r&&e}L=Z!G$V_Q^-Vg>SJ7gA|40AzjBt z4n9=J%1G@-c}*#&6w^)CvkR!~4JHc|d)5z0y0s1pe6bgNXiUZv(Y_d%4j^|7s8Ri8 z1Hl}rsdtT|W*Wdo54@Tx8gO(uB&wj{-sqteOqk!dYRn&u+{W>}_f4fuZ+AW^A~NvM zk40__kZ-lg_5vj3YKxQ2_d4mV-@+eP?GKZCXRbH{f;*^}BLInNRTfp_QN5mv#>o|` z{^qel-9$h?nul2sLpd3@NV1b0OFiI1gFYLuvEhaSY%C`3%n)|0TFp7&P*;X--keFLsgHV1}l`w0#5Ev|&8P(uvODAY1B7-T3ZmYxwtD6;BU zHe1lE;fN}Gkw?ZYQ0brEacA_7`+!<^ltEGu<4nxfWw5F=&cZ#e3~=?fb&h9Wy`7U{ zalIo;!Hk7oc{ z$FEi|SB0_|kIUXB{hHk6XH_ch8$5CHlZBHf3xl8P&$s{B>-=Yj@6*4G+P@R5M|QJe z&{i&s-Jfy5&<{rKcLzh{eiu_cDH+(8L!G}EwZ9m=>;V$`6e3Kc`Bkp{NC6)!>xwZK zxA*%b$WO17m-`WuHsVamlVnSV6c{qHW+>w1i*H^2tJVVns;dB90S`L^JL4m7my$Pw4UBCJSSfMbvn@0P{q_#H7=vTWzCMD4$H z!0se4qTj6Un3S3C&;9_TOwYtd9D+Hr4ypO6`PC+--Q^Z}^NcG?>SV39;*mwN=(5|j zNb@O^HtAeXG8xw7CO1RqH`3m0?VHy((@CpF?WKJt?VE!zdOd14f`)n^j2>hv+)S)N zJsBx$IGPGeh;+I? zUm1%=!n*cnyXx~jLwpvhD1B3X=t1;DYKoj8n^NSf&1Pc-XEj)C=NF>(&xV!kL>}cf zcO5?u{u=QuJIPCGnFAO7Dwl7LARUu3@*Qvn5TiDBsENDvO*Bl1F6C?Xn~BKkqVevO z7QLaQK!ULLPlX-a2{)=yN@ADYqqQmyAXa7ltAPy5<8J;=pL6;QzwHI$fWwwiKY&p^#6|9zZ=fcPJB}92kjv~K}pC! z%I@i{My)M=^M;YQk8k^}$8Px8beqafW*anf#mEvo{c!Xvefg3X@Uaw^Rm z2-=xKZ__M;nrfy#UMD3ML%Y8uJq@Rz8)Z`W7LMLkuD8Yl@?E1vDHvxj&99> z)n&l5DK21P%zNP+vZ^kLtG!lQRj>Q*_avI~NF1E#4&X{e~ zUOQW~1yg)qok8#S>*3b^@PnUC6v8 z$q#-5C*mI|#$C1LX|8Ju+%I;>2jfm`&>2mWE6YSJn+rtZ%r4?gqd`7~!U752O+Jv6 zQRsYc)cyUvs(eCp7yF$LFlaABzr8G zlA*ZIXkRSfJxfTxwc>5oBq-w`77xFqs~DE#Y^B=Rta23V;aFv*+*)t;cb`?TqfvV}7)U&VWWhn}PWJA3 z%!x}^>`-RQe{0nKkgGzwLHOG7$wHjW6~a}s5(xZhnL(tdy0J7IhPv6S=A9|?S5(|P z2xosIEX1UOwl9IG*?B5zPv_eIj_03+FWBX9tgX4&6@6K@gJ0ns1Gr9gfPXE%g*iBq(WvjK~PN850 zS)84?(aoq`%T>sDB-Lki(xDNn(kVsRrq*)X)oQcS(xsz2{$oxL$!%ENHPh+!l-s0@ zH=nKUV^RCVZVoIg%KTDUysmZa{BqR(?}I{<@ctH}3e1b-<@N5f)Z*V~H*tI9)=mWB zmCBl(VUzV$yl;x7;bIM|eS=G}@tNUqvM>HWBxu4i6Ha?#*pzZtN;kb6JtB!#wc zvrV7z^UlPaH+1AxIR=njX4wc@>Qy4-o7FEQhO#rE6goc}wSO{bDqG5)Khe}AT5`%R zZIW}1qwdKTCQ-rW+)E0{Jx^kbq!u)i+H!eoc`fU`oE4x=(svYauV_CVbWQNKIG}eE zMb=BYhOwRvhyrf(;LF1!;Q8#o@(NOk@jn^WIvY`YHK;wSsOL}Ae!}b^VQonZCh>-Vv+|igd64sfQXLHv}w-`Eq%b#^V5w$-SOel8^2th2T zcl>C0!4b#Fyr#u+^bDICbW@_aAI8w2ZR`wq%J3eVy86bdD=S>)4yNyA20Lb~JYx%S z-^I$-D#ng4MeXZBPeJK=Bbz@6l!F9;C5|3y0K@K*+VMdXP1jL zbhqQT{c6-MA8Hh*4l;_w7Y|X|xKO7NwKopc%(rzlvx95x7*EimAK9g-{bbPO_=RVB zQdMqQ_v5E|$j^(#i{F%L-{^xXe{haP?K8pb#qJ2~QZ0<2u%tOuVP}h!@+4Hp%@?lq zcM4IvFQ|jVFEO3CPjQ@{wc|*xDfyggxx!9rl4R&zRr=-|6?rZtaI}a({Uq#UFL87Y z#aEUFLG#tl(r=BW!T$V}<&N*W#dh}8S#D9P8ym>|h;0(x68|amWIB?0zxbPdN+{Uu zG8bnmkx7~jF4EQz>u~z>%5{O!m!l7zA z8DGrlIZo7e)=xi9S+NUDq;ts63*bFFnmrUx+Ov_f1Euft~nRfN`GPi@^ZWHf!8O&YZ#I$jeaMq^GIT$BaJAW-||6DK)J<5kWpP3XXrTa{ZG#guf zJvokX=0tLTs5K0!YM&v?{||N8kGWPj{6f(qoRf_w(mw?e@Q*Ic?UANk@YF*?!M++A zswy!j*TS+3sBEy~_vx_v(yTY`a=U<=cl-HZQhU*4@XSxDCh~^GP8iw8t5qhUFWIZm zmFpZFE$$!6rzj1o>-D4U0OYbm49m2~U=|F(S%h!?CVuXmZLo{mCl~ycR&uw|`3F(^ z?;dJ8PU@EURrGa_6=NQqy*)Uf4E<9RY-6sj)(F=_3+?<5QTx9=RKEvbWxpLrwr=5V zl65G`0GmuUsRD@r7H33B#>Y;5%!x+fp+CA-S;F@;w}0n2x48_!{lWXPm1XgV_Qb$+ zaO>o;cl?T3l13c+!7K+4Tddru%OY+ZiQPFIwLg8RIXYoM1h9}sGw)B>i*kc!5b;U- zuHyPnpKV7Uf>81U$X{g#t@Zkm9>nGyr87%&7VM8bXil8mT@Q4gi`w&tny%Q{#?)XB z-aJScctWi?8^s�P)eN{lQ?QdHEJSwsSsepACz2OTcbz&D?o*)Zbo_n1gdhP6U!{ zsY8No=O?4~j|TNjtuJ?#2sZ%hCo&oyWAWr{&XrHILKKm1|EVtPfoEfQ1Yn?L4-8;Y z(nq;tj*xGkan66>oo@=AABfuD6LhKvSeVb#v5~oCvf#q29%&Ka*)~~!z zOt0pGXST39yl=D`Uv1v7V9Q{<;x4*T#itNoxbBwXzH^ybnhQh)0}+u|;W$XVLI&ce zs+Fr)TMLE$!(R`?$vyZHS+E1iEueTD0WFGbnH`vV69&hT-wFwb)b@A$!QofC-LRXi zn=kE;Oy(@{zT}{(Uv6zEQ@q@QC@`E;CqnA9Lm{P}CEvI3DS?$6j$qkCp@jd#QTzK3 zMNeG)`zhHn8-q3L;irjQq6Zuv&x7C+qKsPU1g{efWYBkSv{m5pq_ zRBD}HjoQBwlql8b5;T>U%ti#1E@j9n^yP}GQ zG%=9?XZ#;3iq8!MIG?#<1JXK9@4KH))jA_>8wTV#h{xrm5ut9N~yKJKDt)kYK(8yH%3tylj%#knaxIN zesU6D#q%?LC;I!<0j3C5R020_);w32sGySr1$6B^YcPEzDN{SJUE->oET6PvJg3%N zQ9xvzmJUx1bM5ekidrYPqvbEci6y*jY6IJmj6f*+*(a)T`3HaFIr z-T%iXe{7iJjpJH!#6@cy2a6T7&h_ObJT1_;9vk?q#ZTL5P|Gu`-78OK!eo?8zAz{b zGd)YUOT2EqQsKu}$a`kxX3{S?^X>jHj#oY3955VVii8)BKJbJe`mRFmFkXDL^Hb+R z(r)MPMD1VBks0!?j++GxGnL0r<+qlGt@v)H(vB{F#$f8@;2C&o;37^ACgYXrqtkPk zd=b%1Dm*dl{7>+psx?-y(GHk2p)ENMd;@Z}wHMnrdT*ky9bSDHhMa3|mUI4q)aGa* zjK()-Q{n^SQzxEyT++p8YpYS;nyWv3ak8)fb)vRb)UM~I-EZj>J~hx(?P#1@M<6x>ei8E1BxETO6&=WLwjA_F)F0jB_N&m1Q^Bc~IQuQh-8Khvu@|zv<1MOLzH7VJ!5!c5m8Ehzm->PERA0S$Rdrw; z-=hw0kcYv_+oulQ#qQpZm94>HVvP5x1K*=P>evh6KAR65i1w&sqc%9aQQNN{cmeHE z2NJ{ZG5~zxpPh5cnYLFQ%qb^uSVfO@kr8TV!iQ&5D~}PZ+fsW>{bi>9^0j@M!bfC} z?ru~LQU?wpI~c;<(T9EH%c(b8Oo+v7Hq`9KDJ_fFz6qlx*WQ z9&clFYqdZK!JnTvm>ebMWV=*KK7DdvaNyLywabMD68(>2}fXKEF`M zVZ6-_=Wfx}HZ9$%>se06>8f_0UugB#{Lpfu!amJ(y{64q@06AU_sG%3epw5g`Laxa z#Z0A&on@tt)h-nUoX}O!1?}=yYw5DNolF2u^>jQ{D#TTER(S?kasxc(mD}Lys6BJ* zB&OJKrA$C@hARYJ%B#=0Vd68kXU>Fdm|a7eElz@mPT1Cr8w_LEEr-J4yc6=v?8fDE z#&YX-B?j$CHqc93hI3Y~O>!wkh?D`xEa;bTZ@ZSDB$<)ue-q;-S9Gz;Ip_vE!@2E= z!voGL2G%5fIXdQDB__t6#*kn}80kle8>xaV#K}S3^ngpDpBaP z0*ozpMj^`L{6PA}PE7=6>J;58ea5@=t)Zv8qcxQA@81A~y z_P!IVTVMZOP)-du*V1O(Z$+Gk-gW=2<*0aPgt^KaD$K0!yi&RoRRFcR-f9TT0=?JJ z>$W?8LCssDiq*(W-p6u)L&rex(}wi9D|{A>r(BpX8{05eq;|Rd6JJMJ{25uKBtCgr({_4*gG; zp>*Mf>?uIE3jEL@-YkE`Bhh?q^%a2N!-z@`V`&L29*E#s-sO*2?+O30Ww3Z8c^5xb zoO!l5F?zlJMz6<|vrHD`=NOrvo*S8; z9sf7yXIS^`&QGYY z`tL$rLbXL*!R@tqgMSURaEXZ2h0&4eS)s@$L1EjSSyg7aG>W%cnVaIQN`q&$3>x#6 zK?C$4Ce5J23n^STx4>&(#RtHBteCm_Ol8&kgT{U93PdC_JHXaT0ckr;n1St)NJILJUoT6f@!3fB;jikvPdvS2_6BG=ej0d-O&$9k{Kc2> zm}^?bGL@ZEuPvv>6VVv6<|`}WR>72pCP7~%U3JxAoNNFLd7Rd!e1Q*H>l)+TfnpFdr!ip?4KTs8v|J)|q&t+}uy8=HI2 z#lBt99U_|?hX6kp_N!g;X<6rm{;Yi&w*CpVZh1967>x;Qiv^pdFliI)0%K&6v?aRn z+>u?wJV??gPaP_Cfw_`jLyko@1&C;3!Ma~1w+g2DG@C(#bEx3pOeb+qEI0augDa_j zsa794eVV*LrKvt10l{jZo0eVUL3W$p18xI&@MlY{@t*Xh#)z>y!Q}$N)KbA%ehpH= z1c9OArZXd@S%qix?aZ*@um0Sg-o{Omxv~r!$D^mbg>oD}iOqHJoXn1l2L=Y^OLjDC zvBB0jCY%t?j-S%UmS^J!BbQ|30K6QW?!9>VE=)S)@%!Z37*nq-*T&-!hqSDzP;WOM zH`bo=o32zF#uH4~v1}WKXqIFfiHp1oX$sC?pL9cP2`a-P>7lou(P8)wCs(+26(svH zbAg~GzyhHEkigQ^8s6%xm**#DyP{b*@6*pEJd z+;K0lJEPcRV#H{k!iF22IPpo08@o#sGQr7hHBh)oFa;{-aN_RfV9#`?2Yh}Chn3k-n@*kkQI{`ev ztt+yu16f?hYJOoy&7AUxwAAm74r%%OqQRTdA1#n%!;(N*l8tYPu&mUtg8GdELkpf# z-axXSM*z3fgj-F% zv$90P7-y!ftAd|ov{wOawj>+Sd-J*rYC~K-s+KL8#(N_$&;g22LoM_2h!=f!4NvWs zKI5%XeI;&|303eA=#cIwtU zmKU0i*gXLpgg? z+Kt`=K-z~0AckIUi7{f9K%pOkzw)We)}fTe>oF+fF)PlgXxT_C83x%%9GZgY!Y!yy zq_Tt0TmoR-(k@u`iwDxO<8}EG_;;4`;(-X0Sb2*^>UJyW-&xX&2O_&CMXkAgQAf`2z4r4Ce zBE5xWg0%D&4<&u(@NF6VxZnAf*W$tCt>#sAZG$pJM=YzwlPDl0M>5PN91uR<6Xp$@i#f4~Gp}S6LV}&*weNLc#KI?#Z zlMY}~(4t1LlG-@zGHmjFN0ECbM?f7sidyH_(K1gwO2w2)=g|^jvOZ?u>(~19xe_q* z+|=km(C8bjO-oxyDl6lMmT=+$_f;@E#@8&>#NGDJ6PRV1ND0iy#}ZAvFG(~p5+<5J zWFymrpXwmR#G{rPPF}$ZxLb~!SF1~vAi0Dwy&$>7+oH+pB1pW~EqR1>JIE|?udD5L zVu{;{CALUHyktOR`Zoti&Z8v2MZ2h^J^tKMidxFgVORsdVv<;}{lAvBm7tTl>)&8#FnhCXH=O6q%R)Rzla16Z0m#}L}+*6CGjGDa=A8Wcq5|sC?Ne-Yl zUTBp_GWYZ#QfT{22kSzbJmOV%A<5|5R43r5oga(ZKYV~rpd624gP(}|o|>KQXNt3& z5!YiZDR>a07ScV$P#BnH;+4$EB!%*xW41OK*@^*6kj>u#Jv-<{EIb2(B9@2of=@FaE_ya6r_bNkW4J~-@bXGE(FTi^mI)Z5<~482!=h<%66axa^t z*RZixYnv@jR2@p>hya%SyQ22hppBh0=AIa(rNl)d2r@#X`5>6jr3FL#x827iBgB7> zICcs4P?%&$YtyNMDb3|kn9|e_Suci7q_>ZC#usAgN47lsEO&v7$zAuf>s&2L8Ax2R zX`?V#7`6*X1mT7?g(&8pc(Tx@7`wbY`OV zWUw5LHwImH=_7J`)laB$K;S*yXx2BS1^5~#qV{N4jX5ss(mv$7BjQi0rGF$)%7>Kg z;LSsBYl*$AA#J0?OXTL)t7{mW`2oty=tFj^xP(*}7M!O`V<$bmwpXJk4DG7|YoAm2EE z*=opUSTv!ExG;x6H7M^mF6s($JEVt99)_^%6m|{HQA^#14?lkIT-qdZFQQl6N;at?z8;v;drbxMPATcM`(-Klinq&)e zgc7`%)kC))z;g-Xe215LSJH)1j8WpTWlI9Xosylpq!Ku0WZjjufGg@Mmy4NiiD2CO zJ70;~-y7_q?j#FY{Z11;aJ9~^xYUBVz;x;cL2gzZPibtxuFiFGIh(SRNLpQ=Nmc5=v^Id6?X3IUXDrTykVIS zaNclUh_cIJhj2_|XU+pzNMrd&u*gBqgEw)igIqjQ_a2cTn`P%nh#9PK$g);X4E9Ei z#!@+>IX;Y&dK~ZBKS#+7#-sMPheTY$Iy#V>A~7GXMYZ=J67Dr1U<4KLNvZ%jW8xqI za}o`tU69Xb;ODe+A!-+0TWP61GaBglw8Ia|3)T=nqRwR09?w;^PXdFjIy{DouGY6M z>!8k#;|$Cv?bbeN3nXhuytdA@HYJ7Wpxs$@=8TwD-IcOnR(dE>OA0@uSjsZpgE626 zaqqKVJ_5u@v5~~I9#Ur7WOo*VB@QM{K=+L9WFFZjN-LTLi968ud)H+5QCR;Z;KJO} zq4ia+Emby&Mtalc8px?6*ft2;mxk>aq=A)_Guze~EP3e3%l;JU{9@Gp`CudMpMxMN zVbUw=4Z&*MHsLVM`Oo;GSM14FO$BjE|%sn4g=vI5Iae z8YCddML`@S0Ri?ViJA0Jp0^|G>sQOySyuaS7F#`20QNr|+K)u-9|*{3 z{|o?GiK@Kq;YwQxS?cEvXvkd!^V~EayS;T;1q$)FOdO(QcWHsu$IRCX3ohX5*B%M_ zvOf;LN)VJO4YUq}M5$HK;>D<_Oj^nq99VAG&0Mc1MgoD!%~^f}@Xi;_pbbjT3tg z2Fy9Pdow8gu6JTZ*cVd>{Tx&l0i_{;LK^fHBKW^HEfa?N2DN+;;QZHS%m=~De{EVm z2weVa(=tZk*K3{sC~E(^U=u2gDBFb#DQ$;n>bs2DAu;c{xq>3yd+fN`ZWZNZcc@1| zemK>=U(Lw}r_vFRJU^hIy=w-1tEwg(2Cge$KuyQf+TxGPE3Vw%c{Xa#1!Fx3a{Ml1 z&2f-?%?AOGKVZ#oHm3clsC_(`LoY1a35<^EAmhz$ffs;Divo<#O}se0VZ>|YfKZgU>R2yyUULI=%EA;Aho423KL#tj+&wSc)ti00=nLp z#2Q~W4;u21<-kPuKi^Mq*HK9t7b3I`7GJaWg~t9hv>o;u zSuSFF|B=nv)sd|>wi@|!!UP8Slt)!|JZ&~fjnmOe9hnC>_va%QQk@f{PC_9k}~ z6mp=^o-pM06rTa-=hc9;aMNCv<|lgCz?5Y}m5n1iAw1i6=Yt5>pAEOpp$JbB7681% zRVLTkd>Xm^r}kuQ!`WkN1hpRy*@1aQ-SNVT>$IH9`vIltzlV7ZzXfY zgn-3a5uLTk_6k_rVE!`ljlTW+P}F`;z%>w$PyiB{s58`^?3{QdEx9C|pj1zA@tmK~ z)B(W7=dfYA8`Pey)G@f7(3PqygE2VH9RP8qxs=*J3y04S1;zNAHauXEu}q#aQ=18d z5K;FqBrRfY#pJPAVZAFy4hb`0M9M8l?^;j9x-e6Cw!$#HSvTFocn&x7K&woLW-i5e z56@Ay1I-cUkMM@?by+8VER=BV0t@l)5}rITxV>%UJ%0Az*(dx#Ex&Ipm1V0(NaOS$ z%J5 zeDxznX%qZ9`r;*hQ_Y}ylIgx_irme9!mmm!42=n)J#)8HX&lKP^ZVmf14s;ei4CWkXjj~YR{)z%9DfX(`iG+S_XUJ- z5Nzr(C$MfATy}s=?O7QYplZZv?ryINS9_m=ot(0JIQVK-u?xJK$a1rBOsCk@_@@bn z;7zv?cgi&w?Va;hc|Gs7avh-$w<*5DL!6FVu*ovT!0^gTNT%kh4bLS+39?64NwJcVGZO_kg-K>f zT5uBuiavfSPT`X?*x%08sQrc9s`#bY6;0Taf>&rc4A!y4Ehl?1t6K!&>&h2;({0eB zQTs?R4Tuo(4|iu9KR7_&M&6A$eKQmzvh{-cHQ$$&>tO^m_C?l&bJF|tWv+l>Db82Z zmkrmqQNiegA2im6#d?zrDg8iwbh$Lq;o>z?QE=X3oeDg^#4ZE4-mX}Pq0ZT;eL5I+ zFrK~Odfka%w|np1YuF2{H>p9!q1|iP3#vD%K|sB`*RU5*Z&HI`dUvm3FPPq>27&bM zUc+7>y-5v%=-s`By&!s%8ek)P)vyOZZ&t%7F{SN~1oQw^jVwEaM-;M@IvRVlw6X_2 zZ_<*`d3PV}Ug*3@4S&Y4c`rxpO82zN(f&$xxn+88Z){#?4jVEaWbrPfOc1tif5JIr z2f;VGevRW}@XsCa?w>^MuLX0qizE;WUNH~7Yc`i%u3Li}Y18(5c!UH+q(EhkA+OJ+ zbq?}0H}L(CWnJ)c+C*Dbq< zVtWZ-y}af>tsr=V^X!i@$60gUPh1}lg5*iYC6GKVv zA5IF$qQHU>3FaXx49)Yw$VriUyChB6BWnyPX8xhzr2_!i?tF*FVJM#G^_J|>iWYMa zV+oqaF;G7p?1@9_yoQr9w3Q%ra)0RU!1$*qJx>DDX~-D{)2VKmcevf?VkPicUWV2A zVO}DwBeDx%H1igmb$7r5EHs!6gXnyi!st@fzZ#bNf&d*Iu z@$UOn*3dXxk>XKzM{u)k&h=LwzHJ)I6nY1uDD!Ore6EDqfcA&w+$L!{T`=^`Pk|y- zBHl|#K%2PYuU8%Xjf~BL8wWk!fZ~c1%uiA3;;ig7o@r%^Tuk8-9n(@l(t}kwW)I{!P>;G zFA%1}cIR`d$gnm~=a7O@xSt(RKu*PBMEe44o>A=vunBk+nh2qL$qjS{YT>{^q^KAi zX5vDy-TAD(Hbl*n!Pg$LBb~nd=k7fl-cY3sNpn3nv?PL1rbdRb14+{ZhlKc132=@J z0#|1(pwLGW8ZL*kZC04nuc+e&p?Q7pmV4t?`sPzV7LKp1c|srTkWvysvDwNOBoKm9 z<8GEMOjZSwZWw&#Yu^o}tijOGs~g7E4M+2lXj-SgA!wq~0!*}2S>MLU$87xUF{)qQ|4&uV!L2=f#`m@^O@z@B!nb~9I&M)PQ_&X6s{ zf(;4m3DsaQn4fSkn0EZBteBE>ZE=3_m>$^A!vEr@ZVXIkk+3F&u4d@0hJpD(kAXQ` zUa8<69s)NAd3(F_57fLNVE)ah7S<@`)Ber9Su9^qeUDD$)0u_MB&oGiu;sdB31kSam3dg(66VFeJj!W5e50@gZzpn&q;b1IRGLiW02(~oGKk8DBk`*Q zo6j^F4+CruYLj}@Jp-uxklvaew&MV|sNEbo zr3DsixBJfYYt{{&^8Hlg&?!-olHHi-VSZH&mhuq_&Js?!TwVtZ!B3@!GBY&F_k}gd zSZSNqjc&X1fLgql!{r-yMBAOaqYv=+m-zdSJ9kC%m!tclIoym(=jKPw74MBEM`xdz zJ^48JQ>E#tSzvI_@gppnjIiTV{Afi<5PNqtIaPf6?ntZmo~X2t)Zns|6vr+W=gv=! zy(b!77@3@$x>OunaNKVTARcfzK}hF17$+rA2xFLEfJo8NDz$QMv#$ zd}(fBep+D33uhBa+eITC75?kk!r5mQXnRIq zeXIM5GB!olx!Hw@(!z*p{~U^pN&zvZx~$*^G+#q$s$|Qh<;Ye3Bxkh^moMLyy{6gu(&W^LjrX0|bIpG;=uh%kF$fC=+vk>d zdSr%Kn=eg|h}O<6j7`nMT^634pPDPqs?VxxY<_xjVw43MOY0IP1dpfACi4N7=0bXI zEnFO#xj@%MWrhf-8sFzi^n9mz<7*L-UqO9wzn%(eF#TM=%=#)>kz|A)RzV>1O17%# znnro^(3V!2nm+9d%#=nZ9Vs!t^N`@!6vI_FiO(E8?`t+%bJK8i=Z8ujuyAR_eU^@{ zFD!`Z_pFBBv!vEtowdHO4iw@Sn{>4{K2e+;3ucZ1*f8M&^P_Vd4jPY^!JexB45Rq; z#H^8;mcd?F+w3EaZI&}&YDUY*rHU78pzE}Um;X8R*}F*$Ko#f_e|zg=-Fpy%3&K_|jS0BOEB4Z%`s z;6SB(Cr)Xd_OEjR0r`OS!V6XU{oVEIyj{Sau<(SssQnx?s#G#;!*nu55eYB!TWxmY z*>s`(D{a$^duV@7ltw4#CC_`3_EVWX_H@Yeeph^IMur%5?1_bh2`*fmKzN`Mj7;jR zs~Mc^i8(!$exS!6vl^h(k8Yk!iByc}d1=E`D9?!P4K2OsdscHlF-I5u z38HhCZO9SRD zLLIr+3}@F*OT|lceXmbNz$Otd6lX_u4!dJsqKO?YV`8FO!O_VnNeY^=33u>HV(JofW2Z5VW-e_-0 zD9jN^*XE#@IH>7K5C)XU4%1}WLcN1mVz_=iAM?L@8P?P(QGfyeYZzXYQnwyfSvIpf z{;W0$F;;YtXv>5!eAV6WIO1nU)NT7tWR!hZno1Tx=V#Rl?|E{g+U9vvx zDmvc%9rcyQMkc*%skwG7>N~A?!u6u4KZ>HaML+Y(=pX)q=~aImMK9lhDl_`xebML? zf-w-yc|VOw(lYHf<()Esi9Me{>PW^ zjP8B;F8_`K=TUdvWi} zZ{x|^fJz=M+DY2EFZy3@M*sQFD3T6Fa}T}pCwKnopDNqIFTMii{`QmYx28??YU5_~ zACixiJK&|4??-_Hr`W0*Wl(5ze`UM#X!NmHc%-@?+P)b*dIt@@lTvqUq9Tg@@g33E z-_ED^MStTJp57%b@IzMQE*0ThD*DD9cm9+xkE!df=o@!F{0^#GR#o51SMB$ww=MV~ z#23p;TXm-zyKAZYqW9m7zNFF*M?a9&7*V5|GN^7P0&s2J`Qy4u`4|IYFMQ*!Kjoh2 zuIuqV57Oel+Ox$*b+uL&e6*`JZR^elzH!GL)_YW4r4h*5;YNss<%wRj?}`RzX8-Wl zWLHbZ`Hef@OM$!Z(Rk-H-3J-32KC{-N$EtOP}2x9kI#!u;@LahEWQ<{76(*xo?U7_^r{`A7&Bn_qBgj zbMXDTqTYzyKxG%_~!XoTG3 z_dFIXIx}^lIQzCJ{rO(|5uN2;j2&aev-8+RU}H0LI+LR4-@vB^VJQ(TA7S{a;)|q7F(~Q=wHytw|JI&Z!}SwE1oOPbnazxV7tZ< ze^cFfTs+W*yJM5|W`)0|uZ)p6rUm!A^HCUyJu+5DXW0VDqqi6vNFIp|*un7<3@~E@ zc3*7lfsZM`_jgl4Vj%N`eQ)&EXwFmb0}!dv%>wj$ZtlFBhx;&HP*o{HQP8in6yDOiR+X<@mAxx!Ka`F9xF5Q5!sb`;u5=YK$s(I!fk~G0Z?o$6 z+x{{^=KfTWaa-!{LlDqk6#fa<1F`lG>VS*5ayn2r+nsK`lVmbPEAb~M@pT~FgrU%Jjrg7*6u|JyBDGA-k0Cb z-*@o$0scP7--jZO_s`j!^l=hr^5NZ1v{I@j&5mOk-(goQRH}z>3)qWfHOHFX25Y%v z*hz1Wf7z3n?aqUgQKF(zI{E?kt5ODy@*%%!b(Ecnd(PjC&QR0M=(|5eeeaLn{z`5FY3go? zHP9tW0Ndc6Xj)eP*bP!=hFfF?DWQ7D%9|u8%`oaHLuD7zD%Wwb29dF@a`v2H_?>Nbh>R$YA&N(XYt|XMD)hG*TQBQZz zPD?#O-8~zWTD>zpyDiO357RRn1VRENlF48sG6;;Z0UKju1GXQ*2HV)?J#3P|7@nR3 z(!*E=8&(LR-}ie?-MV$}t)3vs_V16Uk7oPas#B-(sZ*y;ow_Mw+PR2YXjji;bIn`( zZ>t0SHqE!f2AGbB0!){#KoO-yw25jc&!fRzVG}XmCl-Am^Vo0jU-rfuS>Uib7%`b* zi2jhEKP2d%^`IAe@nTGb{(eD!zo7ps(b>4t0ZWB?|L)$Li~l~sf1lv* zSO|PP{jB&av@|&5DD~}ile|}wyjPOk$RvphKvm$Pzgy7XE$FW#I!Bh2Xtm@}D(vot z#FxnAos#OElIo9`>clYBDoIt$ccl}(T@t-r68(^gQk5U*cZ>F*;6Et%r!4}0qVfY! zY$nR}fFyZ9lJqf2B8%?69vH?&{qb7Cf34uZg!qZZ>bkhYMgJ8+{}n<1m>2zG7yYGz z{!&5zHqpr$rEM2UEA4cV?-k^G1$oKhH1bt0@;!olk04*_LB7&Oeu*HzM38G9ZU_23Hy`Gtb~9wMj4N30LW1$|u5|BC1ieY*L$#!{vgJ2=<6z-{-@Qb>y9beWzf5!iOE}$vXu5 z4#EDu4?EVC4Z&^*_UdJxTE_bFkYFDY>}!13vCixe><+HK^}0CHwp44LH-vHGECDW${PiFqadHSD%~0t7kPsqZxH0&9%O7fBFgIp zdA%S{dXQs6!a6}-C&=&jAjc}WR*=^U@>e{_H@d}GDab1Y`AHA*SuXNhw^K5G>vl?} z=dDI-II>N)QYxN@^9mRLErS0R!N1vupAco=EckC0{9p0mCuG?-3I3Y||FgtDA(U=# z2Fmi}(!%NMB+ct2%};!3JTl#DB+Y9i&FO1A^-c(BuNM4Q3x3&;A6pjg6a4!G|32b# ziy~4Q_BX6Y|L(Y4dPEW&kp!RgB}ht{hb6&bN$^j;1pT{nvGrt15==>g&1*eXP6+Xn zf?pkL=jkI6-Yf<7qdO)q*(FghUU2L$~+Ui6q` zR1@@?p#QZOJti96F6g%l`Y*ibG1;gp=v6^KZ@sT&V#3jFf_|Hz-{eJ)O@nRNH9xUv zo9HjzKy+tIC*4%;&t&tRnHV2EO%k0ZiN3%@&K6A)b?@)*<{hGl^`0t8PL(A8&LmV) z%XGuBBFAbL#*#74eu|_xMN*uz!BetQC#+#^h$lK(5}hoGs!Ws|+qAPRI#CjRfr%WcUuqN+rA`p+69oHlA9idB+$z{x1^d*E9@;UPZi`@V z5$vK5JEkevEZCa``z{}LOcLEB*qa3V!#?cTGPqH&HwyMQeAuxb-XPc;1bg8oPc36Y z(t5#OFW4PE?AQ=pC)n!*`*t68Y(-ux*lPv*^*-#FP_;&|*9i6>`LJVB)oQ_BE!dCw zuw(ONm0+(D?5&$UZ4%qAtQ72(g5BlAj!Eb%1bc;GPx`Q9BKmT{UM|=lB6f1d=5gE= zYjZcn*L?J2QvEWazf9=Q-{PrhOx#>5*h>X_rw=nL`9fY^?BRPHWxL8}p0lD$$AyiyW;txba1%5$qExK$D? zI>DbqOrp3&65JvQE@J{m5;jGODOzq8{F?>8?#GYG6gLU}O@jZce*BnFv0w1_3;q}V z_%W$spWyEk{QvOd$Ha=gg1=Yr&pgpv-vJi_^}Rt#XJt7SIpxO`abbtzM)J0f*>(??ibYi1$D(qNmNih!K&WN^PX5#UiUH3 zyflF*8=DBR1jLdc-kLy^9ZiIIBM@&C#8(oL$2}sLEDTgYk1+dz*)N#CM@&bewVR#@ zxev&Fg8bb?{vyUlh&@2;5yVv|gQ~-3UHLu2zXA9+2>vz1cP6GIxJT#(pce#vnCP+U zafcIOb_26pFyBH35w-O^>BO%T?d&_*6W@w6l-NdJdOu_1ujZE>=Kv-lL? z@Q_eCV1B?of<@^Rlyj0On8Ow&BPhir3Z|_^xlT};NfgXfi}C_Nd2tt1MjphdYxP@YVpVAffb=L^cIJgsuu1yjPJtPzwhqBvbfL041*7B3LI zapEP$Oiv#U0eM{4VGhRh;?&6)EIb}v6uckP?H{%wp&p@q5Hv8S8E~0Q%(XbW%N$>D z(?|XdN&p-vA74;AzTmEptgxRiKEB{3ALBvXzcG6r^s?5j3jJomidDOjWNfQ`ww zGdaw+?wZx$}wmqgf!z3cZ<)>n?D18)gZfM1t24 z0Bt~32^`Bo9DMl46~ZA3RqY8jF4Ba+i*GI}h^Qlfl}C{8_PH^q{f!6QS0J;Xz5 z^w6o{RGt?cl@s14=LgsAtRA1Yuq5ZZyquDU~|2QXlqy$n4~-!?BORT3NJ;XK;}^X2!pxOFc`KGFGAE}{N8Oc zUnlv1C`i2BLjsIK$`fVu=fvXBkc?n<0fURhq-t{fG2^$nIWCqQ70Jn(yhn_@mY}dO zsaY2@se!!=Mtj<-MyxCQa{Phq0WWXjhZjO%i%Afsi@fkz$-}~(=9vh>H5r4)dw2}Y z_R_==R&PaGW*76g&Vuu7egi!V<3|~ItDdyD< z!7afc_}u(9R^7wa7%FYmjUfoDZXxkpm~|IWhJ;!7PHWZ;b!nKF-ZD~98(VTGOW&d!PfJz zRLu__TK+h0yZ`_?5Zl{D=8D{RbnFj1d9@yNT2DNNdFX? zU9NKT7GcKh{GG)#lwNHXQBJ&npjp}}t`^5{(~S0E)h#sHGxj|tZym^AGS8oGK0h@c*Ys@>&OnvH;tf;b@K-p z@+_^JZ5yfqV$^DpeKVG8kA3qN)O;T71mkx~)ZY1Vj)W`79B@bAMwoymhrF+09u0oT zWMJ%id0(!3%wO?lWALoDhO};;hajDz{94EfXK+GOHN_E1G$quFBbto%ao<9_JsR|J zer@9thno^hgJI02EdFl9Uy(b@^^B(&Lm?IRc$B@sH12s)=buip0E^!sRWh!V;$ndS@hE&Bcl%viKvM?T-e($^5vJqcJ57A;m6H z%9h?EDN^n;Szran?Ew(3=PS-oT~w+ zYeydICd8vpB3b1sPHWQjPgTES^_5s_`>)9qh3$qfU8)89hb+Hb8grUk;(ikuh^5`&_Yaxidh^wqqz zxEOab34s|XGC5!mr|37BV24S7z#Tvl`9}E#w+TBS)o+cZzL6=HvUof|WL8)^b{^8C z^VdA~Kae6;wj9fLH52fNPRe$C{&K-b$}4ek?bbw!3R8^4Qn=`k;6_g(#eSxECsXi% z($@dUg~65k^=e$KNS#FgvKPHm(S?CXCy+Hp1hv4*-0k%STCro~EwVQ?i~D5m#AlKn zFPyt;gX;&11$cnzqyHD)*bahIP@r}8CV;vMf#~L2g2QW_wD}jM0Gancp*!V2XB`9E zh1!e@h}>_G8H}Zh_ShnDqX%Ae8*WT3M;&j~ec@NAankMUqf76-aUL)AEz~e&xQl}) z7Oq{r5_H)%W+P7hA3_&`I9RUi4Y^l6KK~jba#V(hSdr#mL%cH)D2onn1vL0iH~%>k zq>vu?kGzgo9zTS#|*I$ z*u|gGteTn|l{27A8P?90c6{WgxPB|kr}VALFpfw=sbmur23d6WF0}6|%z_g*3n&oC z7{|W||AemdM)U_4=(W>JZqhEKOu-#elZmN~q4<==b=tGxb#ZJ@ZK7Bo+qLU_^O36$ z?%H+EWB+0F0}n7!s4vRm4stA!;8DupU#Q5UW)fo*<%-HA;@IC%7GMoUq!O7)KIQ7k zBe;jEEw0-me4N7CKk~En_BM+wW>A}vj^}0CPs|h zKrymk15~bpaHV3Tbml5{Cj0kwysyxv4Qj!YH=8z)3vTAp*|u${G_F6LJwBEnsq-D0 z^Dkr7lTE{Rf{Vz(20cXY+9lB}{+`;%RGp0#wH0o|wk^dwf+ydaD22&Cn};uj-rZ3- zE*c+W+ngiiL1VFy`8~z6w?SnSVVxghZ3}^CQGDC_pPi-(*9TALW;2*(*J9y3u`7|e z*t*ePw4>h32&o3->SLr@$d{3P3$Zr~uMF7&ojU=y7qOIVxOsH0>cv(ukCbZn*r5n& z1o|oj=XBAQm{+PwF{xmX-sZ`1wA+i?v>`?>v5ua>~2`vF<@7UaDqcy%yV&D9S~ z9js=ubjb-I$+q9mlb^+`K}aLO5q zupJb_C-aDJgS0Ui ztcGI<-tA3n^(-ZEx>IPkbz;SS+902ZCJ1XN$Xsj;!QVPt32qaDe2lDjYGj1Z2erE3 zgggr`sRpxhj$&$i5%VT_JpfO*6BB(r9`=85uA-g@qHgKrB|t;&V+Lol;9zD9j5Xjs z7QU#ogUjbB4Yp|d2`hv29|q}U)G&NtuJf4mHJuPK_7q zhwCF@k#iR)&Pp`KEyroqA0Yh6o!7n2`zSpq1W$>aC0{F z5jWK4cGtxbZclGWVSPsw+I2%1`kPK@Pd*IoyhL$NLo4A0HS!JPx4vqgz%teSwu6Yb zblM}{e`!P!Pv*2o+<94qh?jBNBYww0!~;0(5npk6L=i7(wnx193Ky}fJ>uUvhn~`j3~m{OMAqQt0F`wLfRvK*C1}gs3Y5Odd4t^A=5Rlx>`wkFvEAo4CbZJSIn)T z$$@@wf=*8hqgaa!#`g`zc8mv;7@23LCYz11!Ct(}gB8V~-gk`>JAp%|g!M#xC|70b z7?g{zRg|?r>28kJ@j8Kt`G$$X(kDwI=VfMca-sqM$@Pg{nk-x|8ChwJ*58)Za3n%r z2*ist;4S)&!=|D}E)9m7I*E7pgyHO zYC`-6pEVFhvm{uYMKEY(ChB=QR{!uj!sua?attmRx}>4UP!m+|L+=iwxs036jb74v z`Fk{ajV#9CN*!dP`2EbUX~g>AP^}eCPd>@hKXLHY(Cu?cj>RFo1M#hog!v8H>1~pe z-T&@yYxI(!ezZP__HX{42CNIh%2&I<`N<&uaq&FKCLPsr@oJ4)gAUj`f#*|X-NzFy z-`u1TOVDldO2e63LrkfEV*=|0U4ysQU851}RSYo>{nYVf{#uP&!8ndYxQxBw8`o*z zNs^#kM^{kXDZ=M_W^4!}lADGbJ3}PA-95@@9poM5Y|Ib&^}7{GB_xhGS>)_{8kt^= zUmkF@z(e@dNWBd0g|;~#kS>gkPffyEVL!?++G^Yu;^R?P4ggU6*zFp&DbTRW=s1Hr zDn~o``{4r`y)=Lq>MHB->w_AyIDpsYzNyJ4?RRT(2;Ysm#&3vZPD*n+8oxQLk*k6u zZg2cnBTN$uu6B(~wGKUghej^dH0Zns@6?dhHbgNWgaVCqUxh(4SeJLTJIa$2{i7PZ z4AY8hcD0au&zJ_S4UV)1CmQ3EtwVJTrirPs95(o*5uL7~@Zd$ieOE{uU0rPA1)zFi zY`A&;-5TtXu;1|#M$JQMpdP@cuL_|MZm+)oQVmuSf9hrW1!-20It5hBf8m1kFL+zgWoNE?meW9W~@P~N`s)Pxd; zd0UQAeozC>3ulnIebE?HJ@MrK4>~^37xc%*lz7`MH6!65k%brIt}hvsO+c|MC2F4a?}_rT z(UgJt^n;ANm%UdpHn;@#^%Ny?%R^yuyyomJ;!8dl7SV?xMf|BjNleeqU(=K;gJCcn zGJjTl>xaTn%r_2kjP=p+FaElQUMRe^h?lU~bFIC2;a$op{1Mv^HhvX-T*I!nR;e8v z_^76vmM1?A2TSbX6XJ}Utpvs`^pAg1QML(+1aTeY9;8yAz!TW)R0)3QQ;NAhXrMzT zF`ihf&XMNeovrtMTI06ZI1y{8DN=-0pHYOBWMq7CR#uO%eO^OP4Mt?7@l71FoS=NY z&9J@~d_nQtWugC1HEcs*dp{Z+Z#R*fqsZ9MSn?%Jye^6l2gZy4T%%S76U`&Gn_l!6 z8oEkW4eW>~q)k5hWeq+%Xf-D$nMEsX*j5$mEk1VFCn2CSN;>wdCdGPBis5f6wY3sw z=8O=1|MxW}S~0%&!>~ZH1?K0 zo^|Tt`BH{8x>l=POv&QUxvNjr;rc8n=a=s{4CnM#g7m&yh`vAc`tM(Bvk1e6vQM!t{I?mt%nrv#YEJ z1dJ)Xk~UGleT$;41p~zrQy+qt>K-ZFty{wwXz?23)g0K_7-xIy%_e4ZaHuf^K7kp4 z>Q2gIY)n3Sf~Eu`IILs2F0=Kf0SW&0XV(iEh@s+G!gY(o_|e`Vw{@B5dXktHkNu31%!MATzywlS3;6+hg@eAQw;MSHSblWtD*nGoj=Hh*ANvbpOFz>xLDWa#g@R|ni zmR)Dvsu-R|wGOM7<0Oa$^W(s%6wa3)99Eo@>^QW;1rIqlAbesp-*8Zod`sQ~cWT^5 zyW}bB()I3mQ)9On(F@*^-KNWzKR%@hmQnxm7y}kVf)s`xv6XGF(FlwA;s+S8B#rs8 z4`_tN%zTsqOVgM)zyy#HzKVV2QyS-Kz0Rq|2&eNMjn68Mr=N25!`w!^`iqL;nQrC! z1msb+*0MjJ0VxMzX9H}7SXR$$Beyavt@R-s&=Jiu4UCFKwFf;oZX}+kdcp}ovh^Qd zSDYQ`k|w>VjlSW#3|N+K^h1wmgs;)}JgRY?N@nFflExTCqys-x zv=h<=8y~4n@`bK1|7%+mUDN8V$9}9Rw#fUQV8C+7iHWgieP!qC^A`xpmK2IO$j+B9 zT&W1Y+O6KCaW=!dwlZKvx{b=`YJ`7Qed+>@_2tpup>gRMr#z_q@MVf%3-OjK8L-kj z34VI5#-(QC%^8ibRBBlUtite=B^+WgmxyY&tbSFD6J7iM(4eX2BU*7__s!>s%0I~~ znROzksbhB&^_J^3N>=+S_+bCk0c@OgA*4|GSf3*7khC0{ltROaA!|E4wdYHF^0`a? zwqJ3#$8bfM)vX4&C>`||^5s7(yZH)Pp#==(p%>h&2%7_F0h$w-iW3u4xo^pZL?GTGp? zU<&S-@PL+P9Zk>Na7c(Ltl<8tLt&m2+*LUG>ro9`i9ETN?#N6`)Q+v5(9mr<@T*bR zm8;A%%IeE6SIn&;X0aH)YhilwL$6kh%?3leIco8V*J}Ja6Yt0z3*M|z>tj(WXgvK^ zjXTK`N3Zo1#>*dknExC6RZpR29E-}h21ksd=2d*UstbKzL4(&0|aq5#ljEUMh9flr^v1xx#0yahgkL@SMrYPWLRR(O10xln7 zz!qpJsPTJVgI`-|51{%mD-S?nAkb}ygQW2w91jcGe`-|?bn-{R?Cwa z=hq3I^8B%hiOTcm7B^X*lV7M*rY+CU4ASCYvPntg@xz*E2~8u&_Meo16CqkKKz4Nx z9U;z%7z^^sZJomv??o2#-ABU+;?i~jQCusoJjRHVF$yFi+#>C`OM_R2!LpnD#EUd^ zxfVfGi(h@QhAovaZmnK?H$zTIlDyz03_cYLtjS48uDVx4wRxYAuWe{xpQ2E7Y}uDG z0a4nj;oe|SHgQ$J!2neAoM9A0S-$U>=yg$a74v`B0n0ni$2ib02%HlbYP4g*P4L_-fOeGzPkT zv2ej;yXP$o+K#zfH5+4lNPo^-H7ef7w@T;^%%kKi;`t$!%a=dEbUV;JC?j^&5f9}O zuUu~o!{y$$E1rlgD2l;5R>-LqsqlV(Jcn8*upaxU#-Gl7ob)1aP&3+jEFyXEQ;NJS z$aU^UPlB&M^qD9K`ZNah!!(OUUk5BMomg1#k{XPjdizd-%^agPkwCs8v3M&|9`}JI z)W3d7qqnj!*kFY@bC;por|bSgF%}V{kX!Lr`YESjpIYos%L@BY39g^cZ_f7I{xZFT++6+@X6>Vf7wP@j0{Uo<$qIPCioW6r?#S$XHx zKi2Q9+7jq%wo;`Tb;qawT`|(MuKO8d&a|{X_jCPjU);mcH84f{+`hh0G19qZmNDje zHn-ngso(8sO{`H2?WUis6v$*szL3m_Br@;Ci(Wo>D-|h z>8c$*gE41gHkxrF)=G9k|E;q%IxOFV=jnI*tUhp&Vx+TLeFD=~Q$Cz_%Zr{x6cl(n6WtU>4XD+=6(_UzE8^L`Cezz}q&pyS_(bjP@zb^8Ow&k~IOxT-0uIaZk+J1be2DPu+ z#?cU?UDe*uQjB!fetMKKJKK%6%kI|buzaW8tKaQw{x>gIjC58vzLGH)+gAMCYxKK) z#s26GAx683UGx^kNawck0mgLL+`jw{{cd0K{qI(cG_5zkk1>~6T7U2X{hoGF`qGCK zseSc+Y%$tZ@0t%Q4IM_G`wf0w>KR72{ieo*-SmZzx5NDGA2Q}LTb0IV^*deZonK(g zf9rRe=J-D_<|>Q%%SZJ)+IDRJR}D$0Jt#3(+qCB#Cnmr1a_0TOQ{i_`j_E)B zw0=jlzcX*Kq?krN-#(ux&!0{{A2leBd`{6N6v97kqCN8YvIR<9Hz2Aw{`x`<6Ac!b zw#ZpE7`@@b3csuN0PFrmin@W~oTes%3Rb5r)<`4SYc$K$WgF~lwZ^AYzHuF6u2Iu)Ps;N*YWzl)v>Mi`0+medKx6Ean;E+c`+F7EpwJn(>0}K% zH^@K=Yur_vC^yu$0|yuR7UcZe*if?%5)Tf+8lw$Jo6Tb;O?s&GY$vrB__X2>yQjvv zYX9-sisLyPqkZt0Vs)RVSRNHMPftncI~TOg3?h3r&qqh^xl(b$x%7>z_1oV-JG(U2 zZJ?)3*v4Q$Hd4%;N4`@Nt;XTz`fg2;Zi@ShjJeLvnz!SbAb!Va->hNj)XQ&SOvcxc zs`Z3();$Mi!0FHAzB8&gVf_~!({I%e8&bHngi)8fCmq#a8-!IqL?_e^NW>oPhdmjm&i?mkL|E#7 z{;+;qttGZ3G#kaX{LXbB*EqcmVdw1s{9O&!ib5{qB&c_d)DE_O|C4T1@6>1%b=B{O zQP|;7nv0_DiABXyo%sivDlG2HF<~rTQ7B>b*?AHIL-WU8h{3 zv9dp{;_)x``Iaj+Q2Y0LH}k8YU1b>y6t&xK(TFgoPgeCCPB+5x)kkqJ?%lUD{CW(K z1}tx(5I2{^J~gD_OIUl}m;0d`z-c6UyADRfsXNsgH>23SIy-F zH+i+IlMl@D5%KDtI#_6POla-&(gKqmYD~n^XQw8h@|H9m-ZYaKyD-3wCE|F7fwQE# z-kWN;c@ztzlzbRAYva&##wfsMDU7FeH8r6^t#>ABXfPOyvoG7xgDoU5C^rhl%e@pE zv{z115i4e!@=|Zg5p#bnmVJ03Npj42(={g=2Vu51!b~~BW9j=$B=hEc6FOJ=>Bz}O zs_4;yhon8b7G{KZfm^wypeQ$CuPiYdLhFBbEXekEX*OOkiiH!ycZ9W8(tUG_*$& zCBen0X|PAf;*+wXN$G)XB2^%^u5gMVkFNuy-ut6*w;B>W#V=fVm z1rx-=0r7&dT)})?d#HIpZsj@2!#h5b#<$Lxt1M2EFoe1IR$FWJM{ZpmzvHNzHna!~ z@4-mEv!UYloXx>d(O%r;nUO`k+c;JNArQ+WGXj>MJM)Lb%UV>_1Y2qa)he{Y9yCl_?8hKz1H?Ekf1)$CwR}Qr> zzKii0b0bTrwIAia6-|bJY*q916okPl1PaLZa)Ze!2V)>tV3VpbY}=xzZHYHh9UMMb z9h4i{HMx}k{5 zt?-^0Ep(uZz=+|=W1>`TZj%XR-yAU|RB<{%%L>Pm+Q+wP9wGI^6)3n2puL6{ITTe#gS?aS5l|nmEfK#aH#)Dcvg_Q`oo-!Bg*#R@*)B*5pM+yl#PgLT%2R!ud89g8YmCXlLH1CO_i7L0xMmbJj&ssCzd=Q> z=fT*pid7oZJ3&aI%Z$#OXwvePXs}8-O)r%OAOoUZ>ww01s%?CGI$U_QySGS- z!@=e5>Gri5rI0XS+U;_KNodgltUV5A(rkuxS~(b86%6}3^yPmECU_Z6;1H>V~K;bdZ@0c~+J);?vq zGu<6Uavb}#1S61mTCO-S0x<^x?Z*9Bb*e=lJ(g8F*`}P-2o+!Z=~Ra4V_cloS)9>e zmcS=NjzKww3!3#od#8PnYB0AE^MVjvdKU!J^XUx7LY-S$-!>NN+gx3nzdoFDkfMiT z5(CmBxLbqU*9QX7U|lvrjbR?$HgN$nRv#Qy4c7P4(zP&5y)bWRO56HYQt%YA`0C+C z{YZ7VQ6Cv{hbTCT#O`6N+Qtecf6HK$`n9QWgAqnWJjKu9;xq=aFLH-ll2BIS*;YP@ z)?PAYb4LS!w}jjVqqU#k^?}sY$FrJM>>fD+n(l6`8M-1tD9hyQ`(|}`VzgR2Oo_=U zL=#s#N2?hPX4-Q-{0?bb?!-l+a-Zbn$3D_>^{UP4-g38K`{W?0QRHbOR- z6{88iJ#wqv8K7+)3eBEscvpTps^R4}q3T<;xML>M5@}vVoMuc(NCaV}Jn)1r1u_s3 z$T@uLKi3I4)i^vn4iyo+usFqIWZXrI(D9vcsCO2YES8=sES5&n`S`k~n;acy(vHca z9bOU%uP;K)wQinaijpPNVni?Au8Kh)B-BLSku!PG#F+AV#l_QqAI!s4DPB~&U z)VYt8!#5@cH-5Y%L1FI8gKI7dkF?>adqc44r}F~5ATaN#CHQyoQwtFEes~vN0?*9h zYctk+^UoK~U;fPxj9rwWDZ-dznI`p+4tKAR!_O&s5Hb6e;6j>e(cw*r{FM&gGQs=`1 z7L!j7*pH3w$0qlKPX$=CE$#l3FU2#;uy)@cBrnE&+C`dk|QDx3GuwgH5vUd>~>`>`YZASqbgGX=pj6l6=B2~cXq z@aIJ+F#hJV7eqN5Ajg4xoFgB|jQHm&62bE#@can8AObH0XtIZ?Z%BJ5KwI{U!w(Yd zh>$LE!(reV(zz@GFIQ|Pyh1}+@+$#a>g}_-Dx!0Bl=%5!ViLUuAEr631!!ArmxdGN z1rf@103~0BXCjo&2+RUB&5?^j>8#uIY964pI>&DpJ|0~jyl)7Pzp`R<@@*@&+x_Tv zKML|;dhU8R=7#WtB`o3t?*r2P;wG$ASPy zw@-i1s##-X!*@6&G_E9>`u{l>wue&3|uP(JJT&E`9#cZ+`G zz*ggLHR<#CX31~Ew>*`^kE;7|yZcddKMuGbgYL(W`%#w<(-Fh&$3gew5I$_%HQbLo z+>blMG|PjB9)%qh{9+3<-$HQMZNlJj+CYmewAe!MoNQv3T4s&3IMg)|eBl}h z4s8ttr?m!x6Iuho@vMR1R@Ojp8fzdpiZu}2z#0f1T@3`6tp0IxdP*nSJ$XrYpY;6c<-fwNEp!7r$R_E>1Ih4xu! zzlCnH(9IUQ#X`4Q=r#*gEp)quY6_tq2W;4&g@!Ctx6m*lJS#E+XBT|p56*CM@UgQt z$nYqYUcU3Wu0k=72YY(uAR&{j3}lMy0zA@}fj=fWTj;}CYi>=@hr9f}U4`8PrA!6x z-PZ$0j;k}-?tD&tHm?O0W2m<$U!oIuJa?A}!BxpjaXEsEncm$4ncaB7D1vdB5^vU3 z%Y~kSB3|Igmr8vlk|_3N!ve!af0aev91qr`VN_@%!d+uQryPCz;A2Y62)hP~#r{mC zdkc}HV67mj!vwdQ9Vq1rCA_y*t>k<90j>a8=+3D81 zk8_pE`HEB)cY5*G6_c69UXP-Q?_;(^rCQAI$rn#VSbm>)l)!N)3kd%by{I#qZ7mY_ z6?I-=BtT!pd4WfhrIZ??nPW`B8x(^zw9>~}$JvKA=+Q9DuIvpP5rll`BaL-{SKM;` z@=L=|z?du1n!cF=CK7t;|A%6msN)EKPT&H^+8EDLFQ(dkXozh{zXnk~BULS($i97VS}4 zp)8Y}u&=ZdA6=!MYGw~d=puYUh0P!6y&1>(f(J(O8C<|bU~hI~fF`VFx-g5f2*v|X zY>N%aP+CwdLN`EG<_|<<{y;M34+LWVKn~^)#9#iH1UZ9pgU01Mwz3xV4lmq{%)441 z=g0P!RP3$g_Y7_fGwTa!JQf-3l_!KmiCJ!$Uq7$H}e)*O8sy=!0xxez@I}|$7 z7>XI&@0D+=jeSbfL-oeNL$1=aTLXyiQ^t+a0tN@Zsbf2uzLe{O(Q%#cXbfH?2V1pC zXe#4}Mo8GoOhQ44VCL*KoS_+N%ox~svX&G+^M^4_VLV+sTEEZ*c1FB9OL|}1X!=w- z!S}X}!OgJ;fqPhS$<=pI8Kra0ZO3dvH6-(;3{Ae0RxfJn z#ZZeVYL-5s~QP+2T{>e`*`56^`$LFsEBr|&cDnL4&Z-SyBojA~l-r+#^unVvA~Opnh$BbKM+wB+f} z4@WsY{qTGFp{0R_Hk`Q3Q_pBkt|!KFy$+ajtSYmap{j5IVyX&7$`RJ}q*>?sjO)5W zGS#{w+bXj?8QGp<`?V5QcEK+IX}@j)#C|2eTq4TVhaq%}aUi~_VZ8vq(t*n&m-0{j zvY+I)#cCA|n{7y<QtI!4uz3px2T{=g4sJ_tK(S~04 z9O+$R=$+n%-Ys*acd4OwhM(So@j24F%+Nct4ZZv3Nbhn(?|E(LJvc{tR~UL{wW0UX zInu)`nbN;!x1smBInu*%%#9q+=d_{swOP|!tmAp7A$V>Zf-;dyNcMiY9b z8D~m}DNMS(AmvlLlKiiC|=Np;u&+Mh-o4eFKk2c$~jZSL=lP?wV_y? zGet}lp}4aR#oOmh5tBtIUfhP_GsSSuT-}D^*>k2C&Y9=8p?J-lDTZ_Anl=>s=S&fE=2mjtYe8`rWHO$Pa>r?; zF8GJCJ+lr_B$bL#F0!^GfE$SnZ~0U!xHpDP^KB%4-7_LS|9oVaBn~g9A#n`+SA+VK zD`Rg5d8=_+AiKV8G+?=UTeW(T{9mmCyjuQmQ%R{$oIWshKeEr1?)ZX_KlRJ|S&-E% zNPeU?4j+^>h4B_;b6_yG5ru_mQ-UWJe4q17ijbu2Da5PzI5UnJ58C60Ll$aS=nf0r zX`vB9IHt(J>q&RMu)7;?a_=qVD&5Nis)_f)$9Lb}r9rMwHDN1)OtILvS9LDS15ppd z$8a7B`c75lR`wV3IAiGRt(5wToqhY31yugwVc5RX@}RdTv#%;IeXnrf4ygY4%6A58 zxJ;=6EjP852oYW0;-FVjKnpIv9n=tKMcE7mC3J_->c@^)mZIeSqNiO1DAS)`5LEj5 z7Y4As#26V)0r=7pO7=y#;IpIVBR}`$#t97T~GgTiEb5HU)sJ}+X%{?D^vddBU zjEK!A84&p5=(u^jRk1wUn6HzG$FwoBLdaqukTg4-;2*lPJz?-H>SrE4BdBy2$~bN6 zxp10d0GnEq8h%wS;Oay5&GGqX0}`${bA~kXIzFEpVO>YgCr72R7drSJR*D*sldFj!s>W3`QMqNZ?o2i&N9u^wB2oRLMWRMZ^I8i?^BQ7avCz~xj*ue zF$|c~$FOCt1OUm|c{JnlVsm!FW18dh@Np7wcu?~&p1QQ$f7>-jcPXFd!HprxNn}8? zF3@a~>%tQYwi&jbSQ-qvSsIAWr9sj8#U{p@m2JXT&m?FxLD2{7I36V2pA*1X6kKMKaVdSjj zGvt{MqtTmF6OH=Bw%+;?1PV`?w+xV0@(1K^%5uoKOmV{^AcP!})MyCHGA|J;SXI1B z(HHy!+Ns5&i~3dHyi}#GlwDNxA@7r3!PzI@#RMri6q`@J#v(ki;9V@gl)<58vV3B} zFPJ;?JU+i-B;1yr@RJsrGE@IF3?@fBjm=J1R&_+uQ0^01Wro=vNx>n9aVJ8%=?_kz z>}V;Of(V;Bvt0q($lREbxk3f=cX5Cj(%pyiOmYt?9GspPgaPHSdcr;e^0b}67;c!@ z6oeHj<7i(e_0k};=0J8?NaRHre3WIXCnjq&E9b-TZ{r$|4>h0XEaTuA_ZILH481%w zhpUq{_wKpD(1S2y=<}v>@Z-CyYOVS`cU7%Tzm227;yakDRdKI>5MI`C6)<++98N+t z0yhH?!Sud*@nO~Q=C-_kaNrp4r#NC%o2OTWqVFyRZY|-7Ae_G884&vtt3yxYaS-Re z)GE|`N0llpx~HmP2y1kQ=VqOG*_Bsb;N;G{?8+}Bv@g3l2hOdhy88FCB~B|3if-7j$x9335*hFtiPsg%yQ$!N4Nto6CxNj}%>R5SUKZ`&H0 z$2g|zS>Jmd)Ap>7X0m5}M5CVd9hT4DtCG)npn|F+TMchN12ez!|$zv(0 zZ(RsqK$Z)d^o4mqosUVK<%%{o!4rM={w!`gj%X3m z{LnXAEV_pq+PD}m^l=AX_Jm)FiR92=_yEFXcu1@IZfeq_2dmQx$G>|QmXWMV^dz*< z@o{9LwvkjAm6BCn;u%5dvS9L0qF|U-xTVfw3M1OFjr{D|9V*v2BP(5A%wNwF)>4aS za&OVs{;^w=PGMsAB_&5+YTOlvnOHsL&SOx#Hq{+}9=`G-^|XF!ee&C26|NS|t=uYo z7>>`@(qTPx=$-L@9^~YU=;{x~NLigh$_hV=H!K^RFhfxojtI!PPRcM4V zhf70jeq0uQ5b1J!nA^Bl0F+V_>BHVO=F$+)Ci>E~Rtb zUCMg!x>I4@#T!y#1y9XzBAmj*(R4bjoGvq7I8EX8^`~2}ufH>e*WaBkUn!q1OR1P{ zmvX*8MGxix>9GEEJ@C+Q3a`>rN{4mg#$}>Eu#L&&GQQxhV$K&_=`7m&g7$(Sj{fB? zAa63-Yn1Uzj?M+e^bIYBcy5}jhj-08}##P#Z) zQ1`ifO_jVpHl&50j@s<3j2(=Hyn-_Gh?aZOxEt<_X`fm#)j~E0eNkw-I@m1K1HkNS zp?qXE&D7U7I^C`vq420k^UOcb;G?7&cP z_ns1Gwx1n%!&o<;K9`w-i4u*syfjc2#8?WxqfYf4FLc1WoEFlEEFI@Eg7xt6)_8jH zqdYN`dIKO%O#CWO4Cy=6LfNN!)-(xU`x*%MvZIpD$2p^P)0c)s(k1b#3t^8uSw}P9 zfnk(tA~dpuvxR))T+3rpPhTWMDqSky5tGtYg-WVW>Kb~6w#9k+R4Qc;16dcJ!o(3J zk^?S`>d*8@PIqYR~3Y#SecfWBO&kxuHg6o7b{O**m7DNNf@98yC$<&d{MJ(N)} zT#93!wGI^Z`mP!yzzJ}3)N{<}3<#!>gN)8&y*P`6f8ge*=X_D>;5)iekp)KysDyIh zM2{%~PNGl;gAn$ek7qV;JsVoa+Q^75a4z>XahZ`3eWq27GkmkzV5Vek6RydnPCiwr zCTqjEH8RDyeTN7foK2hTUAqX z^?|9z2pP>C&WuV)kDWvUv$;d&*sLVoq55IGisg!DDXO{pVZLH3G-tI-lJkE&3c~fz zoy952Vg>+2E{Dp|X0tWmcg)tI-kKhfLcXJQj>vddRberrLr74niS*xCS?-?@bOoAmb-QCYMg|RL(cr zF^7IMW#W9rPMrT~q5ox}uUhDDEcCY)`kIBlZlP~j=$jV$79ntf`Ef1~P3yaH8gk)0 z&-|R#m>guc8vCW`dN)f)cOf3z$7e{C?uU`uWMZq3noM|`S8--dRfX&6J5?oZGdtV& zrT93NzI@oW__rhq*-8x z@~jr4i8?q@LV!;-EzXwYCeIvN1Gd;O$exih?(y_O)rCu@?dMBsERcKC*U@y7ker(y z4%@PdvDx8hQIT#E<2LA6_sNchl`!6S8_3IOtV9naV` z$2w+uG1te{s1}J%>%u4coQXk%OfFYd<$8E*D81-YYY<)P(T0?4z++T=+?!OOl^>rv zFwz)QMMUDx2{E9Q?-vYJb5O0*cD529Z9cA+=f2h_23mW(Ma>XhX*w!&pZIJkLMIgN zPpF21R#Y|>Lzg64QHVo76mC)^pHjY@FYU?aE|HQS@QgP%AFBauLWn1-#QKnSKuhZ2;|Y`{#wHUd z0~%-*`o6Kv6pgXwSUsU#Vt8S!Z>(-rOg`1BDz-Xm6B9M}MK=?ikzmfM=g#JP+|z&5 zgpE#(OyZ%yu{sORTM(FX+O`~%sm&IX^n^*+Kzs@|Gh~{XW%DT|OdfdoTwB1yC=Bf)To}udUW{M(dP@@s z-$AvL=cyW-K1B8LLx+;^i&Wn@#Ka%4Gp~GVPDSU7Ua4~=jiN_c=OyXuJtHWh;TMV` zLP=?8`Vyr?;)u`;vT#%)p^<**FhR+9EpE%5ll0o`J>WJNMm4;94%?k*kJR>H1}~Hi z%1ewc2aAdp$>-Czy8kW5I32f!?Z;JE9;gJon=7dxixsP1`w>riJ^?%`TU_#G~X< z`{_#U+m$L^YpYak4A;iTA%rDfV^=h5tyC=xXCgGNO6^-Cep=IR(8W(|-0?R}sl#(1 ztg;9225TFRYf0;V%%$y z?QIu3k10(1c^kb&=ST~hP4o(#@b2~_5i&w}DjJC=$tJQwb+VP(&*aIYli+ZC_tf33 zYvEu`YTWPZEVn zNA({ZT@1p;BVmoiSn2_DPAmlm-||FtM(seWIWh%{wfG%VMrBM?Kcm_S9YlQg4gk*g zY|AFG;vIEO=q8&ybd{3$CcG?KxV_n&h+q7a@YvI;3ARLaC_Mv-29zJ_L@88T;Uk^J9P4uDVJf|jjIs`DrHLh;TK2+)6nnF zDtH(x_S2abq^bgZP|~$z=&uV;HbI7!^h<*Nf*d~~m(1=p!QO7VxP${dCNJb-UMrm& z5%&H@5S)(L`B%PU!MRTsUuRZZwZk!^+G<$>+6~RQP86R!{M-!9=VIbK6ZYY2#p$Mm zXHe5Lz+QHw!XK9%WgzdcL-lkEonfIfE%ZDKoka*kdO=+OZwJugpjysA&l&`u#WCW^ zKFb{6KoZq>OnzVpc2qLUecYY#qKI-?C&FZ3C#ihuiuzIbNRhqVWD}b@C#}YC12@?W z^YxWfGL0SA>ivJ+>iPJQNr4^d)R@c0OggyQWO%y?V6E&t2_97`jW_ z-8VvJPIb9wwW+q?%x(}mg4pP&mL+uhn&BLhCYEl^_Lv~{Zen7d6+NZB*%US-=@dU2%Cypts%dKpNj$%a?GeMHZlZd1+8J??Ga z>i4RUvVN`%po)^G_ecb^&B7Q2!zknq-$Lab3xkL1gLk&3+{ zh+QqI_G$=Ict86~|9XWROCn@LUWlY5wD5^FHi z`i|d-gmU9tFOe;Z%s{5|jZU}@fj~Q*!;yXurwR{tLgiFrETxDW;ow8gIF6FTn!*@u zE9>gS#3#`3OiF8zUL!K$!I-l;csZ!05#!f3xpHjZj;303dOlr%n$!DE8GObSF-oyw zxJ0xh{yIR>HprQrNQ_WUW=-iE1M;|6QZT7@!U`smOuU>!I8~7wB-2o)^p0lLiesW5Y7WH)q*||FdP@Y;`*@l$hT-|LCpFKKbv%31&QjL% zu57segeG?zsh}Zk+Z8F2?TRGRx2vQ{wW}nH+SSK*c_f}Z#HI_Mnza-6*6KNz3cRB+ zzCEG1DgNK@v6ckzBm>o>orrj(9Rrxt$vub{KGB zD93?!9kMCY%YaSptO34*4cZlO@$)i05Mf-L_qC&M&>Pil>y@$=Nt%dw%ZU~=Hh$58S;7F#%j-QIZ@hX)-Mo2)#%UM3Z4w%x zsl(xE)5WH9m~NUm9p-n5FTYD>F6X7bbeGPY?lNDx%Vth@xi8)2GpD=4m+p$0(_QIH zccrBBa#Z^1bd%tbb?+fjCfdd8j@`GHN0@Qc2FN&SGuZN~3wQBQ$#E0LJ-pq7aSv}l z{Cjvh_A;-@Fgc$LuqpUxfc=molW-H5(sElg`o6ax>)j7}+P5)$D8PR3g#i1ZkK&rm zroKdLKJ;Ax^C9m6;4v4eG#>!4x(a;-z{H&F#_-h?n-AUn+Ydg`YCpEQAKTrJ9qxzq z0LONt2RKWBKH%&}$_tz=D80bh5900=oRuj!Vteeg)HtOpje`Hf@VsO zPx`XUMW56^&{-^G7Ye*c{>A%Q)q&o^jRSc(27ww0ii=FC(1!$)wt&->by6dGH?ct| zLZO$Lffx*$P&RzxHLy-V_$GuRN!UQX)Zd2>2@XHlY*v+}wky(-Ya}bReU<>UnMRwn zMa!ZHCJ0ps+YhC-CrW_rdoI+!XEVh-^k(WlNer;!S~TeFY$s~bHpKf&1A)d4mG0FL z?Qmn_j9d||J^l+A!)zu@urw|OVLiC9HgbQSHv4+%^We$D{4R-5(+8V zoQZWq=oQRY6+*Y8BnW!!9yhYDt_+VW4ot($yL@)T*V# zq+uX$q+t9;^Ij*QAnWM1GaZ+B76rlU7kVzL{P*b_eO)oL-q1U+YwW@QEZvrOMEQOVy%`Rwy$oYk$Kr`W z%TBhoC;adqK4QC(xK8S}E@VsJd2$e3wkil7TkdHqU-@VE`hmBV2S>*yTa(A)DzPjA z%M!@x?PYRs(mLfnONQeM2DDY9;kluSW8-m`gYb?Y1~Q$uHxJ=JWvCHb0lE>CLlDz= z8CCKOX!_%y(OP2+EIU@29)$HXjCpw3+gKC!cQNIEZxhchsLLB~3M|KXCCpvQuo{;T z!aUk3XQ{?L)NJ0Fk}*&^#&shu5;wfZj;LEm1#Sx`;7ZOdgF~liVp$%q;6m%R#PdyJ z;AY=$@{LW{P0~3|!ebB~L}93P5;RRpp8L8b)|5Qzm6r3ToQ;`_cRtKwN%fA?8Mux& zO>0nGz{DyyIB1V&ylJqrgElm_tHIf`1hpNjwJD6D*c8fW2vc}-!R`<*QN;!dPBtZo zX}q&;uo1HZy+=Yc$@1Ge%PY`HLuc=a%}Uu;M8z?3d}Lsx}GP zfS%F2 zW~opJD;{WFJ2bKU$gIggo4avF--Em>;oC;LFA;MUJPNy9@X^Tf>bM@*LNGd*ImyHFl6 z*$*Bu*$*Bu*$*Bu*$*Bu*$*Bu*^lS`h{=+k#SxS2c025D_Yw6(Se;;wg(rYEBlLhHXUaOoddfOmha7$_V>fnId)^+I6BD{ zO4!Nr$YcS2ay*#8)8p8D?-so)p5N#LfFmEg*&ZFLboce$AO|ZrZvZaOSr~-tFTC^u zBD^|~?aNV7EACoKJS4Ioh2Ab6uS7P*{%sIZRuw4zq1;w@t0UV|eRpH~CUc)Av;JN7=;DQ2Y-(-rFCfII>!sV$A!?di% zDj#H;U1O)kwPso*uC!oqnKR2m4ugbU6$D>f5(J-H?9n;+q+K2{nQFNE1Z+mad)X>q z`&Px|y(b*==pBhj&zrm`NXtqQo!A&&)pfi_=mbMLV{QY*zgKC0tINC7PhDWDRw7yD zxg3f^2e7!Z6P%%#>)f5MUK2c@fSllF-1Ioyy3$J(R2tAh zBxW5D;d8v-4qtkxf~F%xWdHfb1d?HT82ZOJP2fTbI%KD6K*97dl#g+mloW+DeeyaI zaK}i0NpUjVG14WHv{BJtTa2f$G>swk5FaOk5f+xEkW+{7v!ursJ8&$lsg5a5V4%@cP^3>1tjjt7oa(t+bcos_7bvs?y{@r3oLY< zg)$cEv{2SUISWyA!4VH$b?maxZX4Tep@N03x6ln1Dq5(=LcJF1vrxZ(aX9-?eq*qk3bL; z0K92tP{Dc^UQC$!;iRSyEt1zjG63HeoKr;7QN@s0|Jb0CoH_=HBNd+rgl3_4SaDJUx%!W3RHCh2Opx<`Bu6W`l5KA&KCh$r;a%XB^#HoH5f-d1f*!hIy4 zEbyG(mn9C&IgDfe&tx3<)ECJ+#10p)=Kl-sA$#kAMF0+{VqJ_CK!R9zubR=MN!v}C zl#bbyZ~3NBkD;wpoJL?chP4ur#Vf&fPmj!?%-vpl>(_kC={@;aDkA?PHXrG1l69PM38P_m)F9{nj&C}cqHW+%8 zj=i|=7})S--Pv?ms96U6NeTiGy zP6qZckm-D4U$}+{C8XysN?(Qt++Xcs{9Rsy@*i897iJj2-;sY-}lvZCeLW z8ppAC{H7rYjN@e7+&A>L9Mc`CO^l)4V=c#|d&6+%>Rm+}LvR(8u6_Z*Zr#0OY#g<% zPqrF&#hSfeLdy(guHG>=4iAe*;`>uv;BK|{GK{IbHN};niDRC^-pFvbwBFP>nHy`t z*H^+*eii3(Q8@GVN(|gs#Ki9^Hx&gft+$RxYK=)2)*V%Q5ypZ_9TTfSXcA+YuhmM$ zgl~TM?YPLu$^4DBpH^H(U2i=;czC_68w@9}H~1<0ExWj+?uytL+HcvS`|Y=ck=|N!^^o3Ij|OYh8NZ{VU)DEC8cUFZcd!h18NUXZ4` zw~#C5O=_x#fuFCG3peFaqJDU9+6&t)B*M*t(td-6PiT94%Xkc$FD78OK%;fhlkd$G zD#UVDotkZ!0~Q)IO~h5_I(X7~t?xmO|NK?Qn*%TDyW^eL@@1@h<*lJQcuyS*!@+~` zbL*T$R7?ctq&K}jvFAx&keB^tOs|S(Px^szEP{16y`TS0G;q>??9RHY!-WD@LT^AQ zOYU8FCZYgslwO`BAqJ{lKW5=s^n|vQUE%B+}(Gup00lURVNW z$>lNI^WZDHcjrs^F7#sRR-*5Lez2i1p8TLxz@g6m8}j?XYf1yfe12a)50)_T!5|o* zdIEaW`Zg+_GVQ$Hv%5E%04$XC3F>F%xp!yInfN}&Q&TGsy|?Y(8m`oj!aT?&fGhP9 z)NV}By+I-k-5c06i7~MuwY#xbJ!J8a?z_Ww%bgY)vCt?XbXDRUW@(VYC958s$}Pp? zA_@h;I`G7y|16$ZOFC0T#Wkp1Yt5vM@yaUjR8hn01EQLCx`u8p7%oa^=~I7dN|Lo> zDYHjPgb0sJ9=ko`ixRC(?Xh`uiMU3Oetsi%CvFYY5=F}HmE>`XF*P|_YsJLq0t0&( z$X5RE;;4yn{jBA+XTs~4Chnzc%+8Xgg~l!PLNjv`{<<7_DkDeJ(Jq-nPQEKMP^^fL zCL{9{GyCOuexnhG%%?e@hZNJ*SL(@di;c7Xfl5!Ne8coS??Ol~tc>tH`>xQ0EqKd9 zlcoyu0#oWBpd;iz3KP4pDV^&Z&`A{|&xd3nc^B43OPvq6gSOC8=L3?;yG+ioMW1fy zQ1+&%Z)9()Wf#6UWt-u!g^pP0C?W90gpIsuC#*4rvR-VBx;F^G9`QFo@zDXd<5O}x zW~tw0p%mv!?v7>{Flq!}R&UScu=U_TiFILr81~<}$a>qgh1W22 z%EY>{j9{HD+K=ADiPj;pg$NIY+_ow+$_#sM!&q>GpvkJ33a&su#28Jh8 zT%vwrxUp0vNMXq&rGm?->o`Y;Sp9&G($jIL*dVxCIKcVzF;;xzGa< zFw+agSh*_?l^KplM0KW{TyfAE+B?$Tu%}PH^^77d8NC1;+&w+q@9OIe=VULwaFF36^l~>t4(i}S|l#=YEhzKELS&CO&fqhDq)+Nc#fq4q7&JZ5^(JAB7TlCEiqM%@*#}& z0n2C~G>q17H3#h(IXf<>>@DOf-Q@fEEG$!syy4tCP%I*(w-3w)c4=~HIbY22fu2GR z4>P=dY5TGE>tgs_t<~; z?Y_Ly#w_Gczl4V4#Gx7(OiW;f8=tYEjD&J%dnL5V+QB3{s?-izM)X{!Nv*53gLY~4 zo~$M;;X)I*Hd5mVj;~za0GXR1thsmL7LzA8f!H_+zPHwcFu6|nNy?g_nHUGzfbUG6 zJRv0m+KD?08BiwfyY0Yxj~RH&;<^o2;)0k3rvtsY4CW2p4&d=l3UUf@UPEsW%>+#_ z3PmW!G0nweAP};!VTD1OV^8{CoAdiD^nOzY4u0$}gELUalqFh%%StsKvLrrWp$}T< z*DUlQLf8+do~ZsjWWpc&WJ2$Xz@7iZSZyRZ`nmIG`2WY=y8uaYocEoTS=}?U3xGt= zl9VXx!5&Z#>wGf1u>d8V9;lw(1(sOsZqMwJfczNtEEXiB#RA=ng+Wo_V-G1g!gq1O z9`NLFTqsW6AVG znO%UA?6~t()O0?-{PKHdW@TliDv-O_k?dret(@#&I=n9LRHbiVPhPUuoBB#Vye^x> znN#h1B)sa9Cy#`41=!b}8hHA8{&8o%VR3+GHP=^5l{dFF)qzS`1ycnmBi%&HC|~{e2uqc zIM3_))b|4^tA_>dC2EyDbJ?9`!O?ExvNBo+yl$T!0_7<>GvozydH_@+2@Jm+h4aR5 z6z4c14=LxZY<9a$A3vD)UJNii0QJ|u)Sh88xgLgk>|bqn*yJtTvr2jGaxOA1X9kyd z=}Bk+Z7winm@cPmg}en=z%(4udoWWyW^q9(tY*@zU*Ie>kq@ zWN+wte~==BI68b2#eHVevo zxnZCGHmIUn^7M!PBr*9lifaKv{_muYz)_mKp3e$`GwfdbT;4w4T<_sF!zNB3BZ=wR z;qGY91BV`$u3US3YOl=lnbqXQ`&_%2tYyx8czwK#>5|n}?yU2@m#;jwbF`KFY{4xZgZwIOL269$zY^pIZ*i)~ zTZtmiya&NdZR*4FsU9XOnmN~s`J;+zQE;O4`er?9?sg3)nhyvjdkkimd3}m;s#792 z*2NT@ik2Cvc9?y=E>Ed*pEx8d6jLLlWOc$1k-js>9jsk?YFe+B&nN1XJ1n~Vtow3x z)@Gbck|f&Sme;~G`~-R~F0&$>3UBV52}gSHDag5Mtrrkc#V4lLQ1k|(PgDNBaV6_=p~!;?BpjWZ!0f8ueT`DQoeMoFdB$62KGl}=tmw^ZqzKS*L+ zN$uvX3Ny-cFOzHds|CddM+s$QO4;KPuhtb^wqWH6vVYpfvg7p(1fR&O{TK5DN8+Jl zF*$Y8S-cym#rsqm`gCIZ?DYJ*5O5B_{Xy_qtkHdW*685_$o#$^b!U9Lce40Y$>qk? z>-h4i*V2>sv(i_y7=gHAN^srCoAe}=1j@q}C2j`zA*CM&WmjI-RMUazs^I?0wm($L>bLw`#lY}USAce#%TgFw1) zCC}>Il8E!fhhuV|dh)63SqHOEWO(vJvGeE7U-YLIy;cp+8%JK^oABDOGUG`vah`yZ zQ-_*Y_i9piMw6~4byHzHtnQ4b9M?@9<^kf6E*eT4QrSq4cyY4vt0`AMmxlTYe`j9# zxjk4;HkA0`+1VtfhrPG+a%8gEgt=1?{3EQ|V|iBXmUP*(e7%u%_y;h&7OmX6jYvdk z>T?ALz&#(GaB%ac=g#RkaRbHu>mYiA5>c!*S{KGkAcsSFs`2Q7P|i0VO`)94v9H2K zCRL&-CwT4Z<4-+xIs3YXO30Z?O11K{nv{^$$`iW(4-5NtD&jAuA?<|o&imKX(EpN# zej^S2ZG|v;UxQNog#}i==W|xR^BzUG$KBakhkL;7ryO~!VVBl)FbvC1KjMxD+-It4 z<6O=pT1zcfo|U}Br|9<`ns&*3CpcG=lMQEHC%Kv&Yk27EBv)OV`)X=EA+49! z=B2gVeNva!ZegR;RknjoevzamC6-S!~8rPOjJnW1{ z-eADjef%1yckQcs`Wj4eHS^Y$(pI&RY+qfP)n+nRJCB>ZNzaIGW`7><(vz5O(92sR zx|G(NS$V&d)=k&mPvjUTsLR5ue_IV{de78;7zj znLORdqnsr2Sqbw#2l~L}XC+&y2hB6kSJ$py*J*B?OX^Os%_`&7wX-ho++)5IUN7H~ zONSXKoX(luuCNc%itB~AOjNE&Bu2L$pPWIEw}y_J84KFX%$uCCw51d9Jc*;+qwA0H#$iK}lj#!~Cu*nC z4ACZ!Ulh{;-fmyXV^e`}mlbS`M@k20L}nesq#M?3@Zr!5>X zeocq0>2yY`Ci|XVq{Y(X230J5P_8+8@)DndT8>Fxn7ieVO{6VocTF1E_ZnZCv+p~D zE=R3vcg=XQ;P0eki~ltZ{oOS5_tMbcPecD84gJG3^!YS2NJBem=p}_1wao0=nP<4} zKCW<#F};qU;(fRWby}f2X#OaPT4>cU|0pFD*2`%c`U9vIwz;ek6`s}Bpfp34Xcw=>8+ z@+lEJd-0*#$(3`bk{A5mxIby-WOU|DBy)-j@BW=$S-mi6WG-;fR)gTT=J@(yF=u#| zw=V3Q(##;sjnL8|(t)*RoRO=QI-)!m?%JB&QtGNrww2}?Ay}ZHdf+g|9g?68uURkb&PC9!*F)Uz zlVh*s&gS!H<7O<<*(b-o$(_-c!4NOsOTNO?m%?X=AW zqOG$vSl=x_|Y} zNtRBmw>8>^(K|SF7WS}B!}%~Gp0`En`GSXF-e}t z9Sf2z!WU0+QdP1^_;rDH2~Xld@K;|S1n;;bXPA-qAb?r;_15&~b(w!(Z;d~%n>XWR z{pQJMnFv*%YQ1OeF}&lC&ejJgoE+m#0fVbn>v$PyO(8>GSV6tn{@R3a%bX!DnVlzcVSF=a#SV1d=nA`4EfUK`9C-dtTwMU0ojKyhkVYPCxs)>HzQ%C(Sz;3j1WTB+AhFs*V%S(#26EZ+GsM zwI{DU>cj}eo?Wm$cjZwhK@fMmYMlq;>Kd5j!*Gbq!pM`u3D*V4<8lbk1=3@c;dmac zudF@(^yMc!y!|%oGEKwF5i1RL+&fAr<~GK-LkT4K3jY{ z7#5(eT<6d`cQp012^1{8Lab~*^!KO2=Xq?_h=2H5eRd$(M6h=4`cqFm*~&f>JpYb| zS;bEatR@A7-T55tySnzwrJF#!y7tcHR|)gl&0(&-T9}WuZi?rrl~;-9mGzs#JX3p> zFrT=3QI?bV*;f z*WLr?aq>n_dXDSA+|DlXOhrA&P0~+$5B{pB`EE9>wRcVPS$kJdll&y8=LAVm6Z|Bo zrvyn*6Z|Bo4Vy_&llvs7seKaE#6AfoAEQ=lI^r)$)sulFsN?;TVDeNzWsgl#HI+{a z=xDzrsH6RopgumG1oi3ZB&ZKhCqaF7Itl8d(@9XDoKAxJ;B*rF=1K5dCc(E%g5^nY zX%f6^5`60<_^p%Rw@rfIJ_&xuB={#M!S9>||Eo#xPfddV^(6RRli;781m89ZRwlvf zBzX5Ec-#lwLdkC?3nlkVFOM!rx~?#Cmu<*>I3KAb#i6p+zMZeI_qL=f4pCZ__Mi5 zPg1nF^3Zv}zmCY+bLj@()z=eWK65f!@h32!KJkWe0!DdqaE6|UoZ|@Yhj@ll<9sQe z=4gNLH;|lcE2em|UXd(ee4}fYe(;fOx4r&6yXW-;=A6E?%}NJIWpcHA^k!G(p>uru z3NkHo{^9DWm2(ei4d@%vtRHgkjq)j5Wzo&^uFq^!&Ngx<#m}8N;Si-=oYtK*NTE!M z2kB8zvM=Y+D^dUSg_95YwB-j*EI7Znl zIu3xk%v#b)q^D&U&!6EFUwXHFnPE>=KTN6h!#rF+EIR0i)dc;pyy1R)5f%+xkq6xm z)BLXov>T9}JDVJ@vbK8h{P}Y$7nI|MRk=BCaFmQh<=n-yCpd24{*!uw=scCaw0?nap~I&m zq$Qt?XZej6f}h3E?tA?>f8aZIOV=2aUwZoTqwGR>?~~b~`PI}zttLet@cDVOe1oGX+(}NjmQwX@%h||@Y~*A%aw;3SKO1=<8#$egydxWV zFdI3OjXac%oXtkgWh3Xak$N_=l8vlpBNwufi`mFKvypdYBM)aIk7Of1l#TqEY~;^o zBY!R%`SaPxS~l|TY^0HmtY;&avXMu}5jXt$N6GN(^7Qaa{%<^pTE#gpUpRT;K)#>MlTAFYy0BrHc9w|JI$ksAT(10{UDO=G5WE03tm zpLS(v5%*e{%DmOr(u>a`k>BXUXmu?b zzbma$Z^)E7#klO`$~cwL6yKiWThwcM&NfbUVbYRZAjpOLal!>?uY^$ zC(d2u;8Z@C#}~9$RY|Zox%}1W8;oJ9D)C1zRcSXKh+Pm+_7GyZb z<}0^tY=24dUC26I-~-@@IHIdHf56j(a&*Xblg}z%T)uG8>$96{iM_&~Zk&9WQ`yIC zaK#;#=#c;=181)kBDF7(WsdfoDb-bj^fDNkIo?=u+$W3F&Noiy^QFfN(ZeXosdLH| zdX9(}-gSEUWU@U@8BS}Y$v%VEla=b^d6MdCDqWhGK_c78$%mP%dGY>Jw^S-Y;<)&9 zbC_$(r|!Q+xI9}|=|3?I_Z=7E$2(7*U;7?)MEaa*RNt{g4O3!DBF45bQ8n!)R83Jb z$*tcUc|PX?T+74^oXoFpf52%JCZi=SJO9TsBWGkz^?ZSA4cd>IemtLG~M;URP0 z{%N)_U`3ddD*0O-1SC}-(0nJ7mzs3%gc3~?!l%!=Z3r?lUbt0Xt^#?Cyzr4AS#Svx zNR!lyXQzZ#;yLzt0;al}b0hdCmoJXBTx8ZusZQw0blvpd$5JJ+Uh=&v+Mm9_Icq=U z4TM`+h#rDPiK!Cn4=p)SPvD9&i6M0A^RCl4c>4T#abv%qbGi(8y@;kd-bH+uVi)0-*TY#mcbd;dBw60h z$tU~riOkFxMqk0_IYGP2SKyOlo}r1UVWDH?T}aMJ=cv9XE#$CF*JwC4j>Vm|3lBtR z5f)&~WYe7ktDdZ1#D*VMRRZij_qfL9S@~h_<~1~N&gF!Rs5rQM=A1?fqL`c(t!l)O zI3Q7*6xpV+OLB6;=tAiUG)5#B9`S}=5U1IwG8&c$6ehx-*0<_4itpJzC^&Lmd`g3L zjRT}sK4FDU%l!+^wCLh6#{wV^yh>N~iCmv30YkY`v#j3v4{nU>h>JdDH9B?&9)Ikr=yMd_6zwOnOud0Ryt{2Zfc=p`8u#3)= zIRzm{x}`zkjDSoj2gPJTFFGT3;Q=HO4HK~(qqOFjd^lK5ePg3FqzXZq~ zc%FXvE3bD~+>^8aw9mz77T)w^#W3UKS%+5IwCtAdrPQ)p8qu;_`oKubZpqUTExHlp zO^W&HDe9X7N8QOpD{$5}Sm1zX`rt8%~ z@Fk|tKanTQd7E%9!CF3bsvQ+m58B*UQM84^J*3OqqLsc6_eA4TYwCNx>DzD*`5XyW z-u~TvZ(L?xxXgP8VeQ)EoJ2Zvirw03ny7a2L{P6^=_N8fhIGjC%sJCpW$WcQJ(6@7 zvs~?Z{arbmAJ+EwHq*-)L6dYz&{Ba)MNJ|oQJXzUM(K&5xuuZb(o%>E{dOAq$I0@@ zzOOyVz9nM{PJUTE&9R-DH*xNfd%K6Ph>Ty3c_><5Ij2v-`#=!<6bA5k-W&RPd~hUK zn|a;EQDO2bao&a~UvJ;*pT1`1#m{OE-8tx$H|U=Hk*t(*+G~;~&gX4A@-3!yvs>wW zt0@S-nJ&-#@rLH3+VAFIWyFRzGauC!HwVbcOP-7$_QKqE=JfOFCoz?oR-S&6Jwp!q zL6Ut)A0^qj{miojDh#D&-lb3~L`vVGxMc|+Kf_36KQ*RKoc~EG&i`8)`lo5=e@{dI zOd$+yaoW%x4V>h<0qE^X*uNllB;agXMg`{{Jb7o5ktXn3*8{*S{NWnMJhmTZ+VYI4 z$efy}%h}Bm%1N!$$%mXMcYP?TU#=EB(2#;Tjlp!Hg#?36`EzT2E zOvAU->1n2rM)Y_-jp*@w8qwo<7jZUsH?_1cry&jMy+!_=H1xY^==ajlzeq#>G7bH! zH1vNcgg2czdGofw+i2%bOWBC`scF7;_N0*&zS){aIQgB!Hxn?v7Czcpeny`x(j{RQ zNH3mz{W!)`yoda2+}Rh4=7Uu>z4J!x3(s>#4&V5Bto6iN;~5Tpy<7-*FYt-2mz4f` zm+p>{ZCrZ#@n@3ElfS3T1(&H80(_MV|5~Yc2I;2QC;cYvxnTMFHFlBzt1m16jZ^vB z0NK!%?)}w%Xa2|m#n~Hu0F=+Z>7Y97eLkShzd5iDySfjk^Q~WZP&@30KA_I8f5Sm_ znEfA6XYCsgu5;;tI?sOdL3P*zeL$V9^8Pw71=hfz{jAwp+Fx87)?M-GCQ>MGt?sX* z4e5u~spr(uR{O*1{Kecl2)DX&0B+xK_kP^8vHh?*pUbJEWt_w6{OjC0mkzD-*5mte z(`NR=+NtN%(I)W2>ior=I=JFP>-?On!=RK0pBGo%)AF&h|8^$p+!>d}DHnXHgH2tS zooBvVz4A4+D9h8jDKNkKy~+oeHYQ>ZGcA0}4=Rg|pZ;m&L~UpV)o@sRuPqj8WkJ80U}lR3Zi8N=$*c z;R?LYOAHI#T7x|~4dYM#>=X=FWD3Tgbp=uwdN{_n=BMy@+s{v7>WfSPdBl})l;d&B zJJwcL-szs@PZj!&oI=|2GF7N}BgNN2(!-gl0{`SQD&U%OkCDg3@`Vyp@tc2Lh2}*V z7203=y}zOYuGbC<`_(ysb$_`B|JHOl|L}HyxgYqP%B8I0Y4;hHER&((>Wj)u49=-F zm+AREHu8IaPbHkS;u+*P^^xCHs_TWGtB;d^`(G&8Sx>iuKdJD~|ATUzMR!Y1Q#ASc zKTxJqL%$xC!^bcFKPuylx*r2iLHIlND7i`JwNBz5rLLTq;?K!~3f=cDmGJYo*G=85 zm{AY~TefX}z*NllmIi^YCTYh^BdnXnuy1+=rPYGxgE;7$C1Xq!TrLa)Ywn$kf=%;5 zJ0hn;okgI<{6@hZzYo}sY1)$c@SPQ6e<5t}KMoqn)erhX1!xVR?F7e)`rWldyK5RY zvUOtHW~4N*)bCzUwq4T&lPFjrt!&F-$9%$kh*s83-8PJwi{?+5MIeGjI0{B~6m)}; z!)wRxm;voY!Ew@>LEZL(7Il1ohk>pRv54HBiw%R#aNE9kG@|FngI_kSV98X%b*NM~ zu_@W{<@*aADD`Q2vTm9{S+cvtE2bAz!?szpUDAfM9syndkAp)gR6pwGcyK&a`;i$2 z+fYTh8{r__4&y?p7#HHgzz%G!P%hj9{qClJE5-uLny-Xqe${e6x&KzM5o|%DY8aUw zG%A5_1U=KswXPZ++o!L>>1zpp&mR(;EDrbl5x~sC|1aU!#`i2=?g>7HX8l}X>>#)c zy{VZRl2t{TrDHeyAGtF6zm9}PLF3T>ZCj>{|9^?lE-m$feo>k&N&cV1pPcW3%?f$g zl0v^QN-u+5X`p|~*)$!lQCKtYcw^1buCo;-@=Mqi;jxKkspOJ1MtUviO|ErQc4cEi z({~MRlLq~=c_COT?pWy^ctHhYn$#JEmkhuNH_dt)S_xakd%<#mO)*=PE6Jvysn|Dg zy$idjboCo-GGWDa?FJRw;CIi(dcn2O+o>*=$xuspn~;XFDT>{P?fR#8^nyw_fKswF z!f_b1;N1XyYtpiM+;aV1bhU1PQJqi^>m-{PDc?rs73_v+w?R8yY`&+Na(5}!56Zv{ z>1|~8$mchx0jD17qHBPsoR?G1`XOMnbzDA{|7x3l1F1guj%b%U&kDLK$&EIEgFE5?clx-92s+<0)u4oFp5!R?SfwC_jP>!yk>?_me(P`qUu z;Lt#87eix5K?&aN*=9Hj2IN-huTT34TTep24cB7Rh2AO)CNpvIP|($DVe{FbMgOWu zMocS5Z=+3z&B#0)R>L@Gnk9?OV1ZO;$(6cN@;+cv#_lWgKP>t(#{LzkS#glm8`=DB zP=-n#*56;;18xucH2D=qciO1f3;xE}Rl~Yz(CP>}4#^*I_2JWquY}g_D@LQwv7q)X?fG+KAk8RnV5Id4qWod8i|qz2MvC7fDsjP$oh) zWbyQW2MHyQepI=8q()qCFt5y6vxN+Fk?Sb9JKSSzQgc$eg+#@qNrov+8>+EoHc2&h z(R9LVw#B_}SK+6zf*&EzRi_<&SNgELp4qg$;N_W`YD03T`nBMajqEn<#j-v?Uv#Yq zA45y@3P~1@Er%5&5XzxLzpxO*AVd#s1-Ju;*$06t4h^j^ ztAtBt$k=NgE)5n0sf<5mL=H8;##WpSm!*9ha({eY)_D|+@X2FdkEIaokhMv_H-Zvv zZi83FjR026Dsf3)#Hh4M``a@T6+2n#$_u$(Z6(sB9`16F?f$FBWhb;)hDun6XC+ex z55dghBYM1ceA;H+$}cvJq`d==w#_xPYXnc94@zOzwWsmIJJ6(Wd;Ng2LvlxOq#sno z2e`b128rJ{0^)=oDJ&Z74xH#RbA#`U0> zw)uV8N}l;erem~I61Oc`#O4^n4OWA?X8n-ZioMm6>&8I+TZ4L7i#4QHP|En^EUicp)br_WaDHv^0e)4G#}M|z+@CVt>U6A!9@ki9Iu6J1;g%8cyksIuLh=kF`Gbmute*E8zXN`@R2l>_*HHb>v7GLkCu-_3;cgw7idbq z4!ja$6l9Cm)i(Yq>^Rv{Ol5x0s&*Snj2Nl!V5_>w)zp7{{wR2f`Q`T`?{z$Q6@Bbd zXBRql8Mz1+b6&IJBvs)JTB{-nvcDQXA4k`E!58MMp~qtnszi1e3}qut8Hqv1skaFH zMMlkopk!m}b%Wj^i=Z=jLu`|gO54sE;t%JpSrFL!|qZJ~x@$I1nyL7g7>d&N$|<23!&ZgP7$uI0*M$-Fm_z#B92Cu$h;7`Qd)dj$6SkA~Ub z5B>waluX3X=iBXw(bFFND>Fliz?eKFp$%87#?Y#0R}1dJf<6!Rsv+Yga4t(iktIRB z2g&TAy(`p~ZTEZ-5ALDevOUfWr3d_ow#vX8I8UpwyXVv4xqpN4SEP}*lWa+m0ssB~ z@12*vL2=V?SP5${kCpI|`MsdeCCw0bD`CY!84}Z4v^?q~)F0e-Lh|SoWm<~Ndqd_jTSPgQRW~B zY~}Seb0z$gsX+fB+Bf2Qi!}=yP*;$JMHd;2q1;~3unp2qgE6#Ea+QC>4Bh2R_);2~ z?1J+Sv(p&7H4cb?TA^N-`a?%ig_;SZnrlnAeTjAjDP!3pwDWvWIMqJ-c$h^^WtC|8`2Kd$GaSEYESl|0Ml&^r#4GlEu|nO) zsN12$mK{Ndb^7No*}azSI~d1lD+&hGLNEBQv19iC`EWm^FBNJ?z_@-LOnmJR%vGRN zgIoXo^&@buL5Y^&;~Pf7lI=p#0ck6=74v%!d{VB#uEAaK*(L2h#(^7P+6&t74qk+M z;-Y@bD6OT457j#x}f+{ZtQW%eG0;IIxqZR9wnlf<-=75tixYqQ^7_mpe`TCiQ{77F(fa7{*CF z7=<5lkgaQPmmJTRm+*d!MbPN%%^LQ6H#>wfL&FPe?ucu}@zK>v2lqFJAl%xt*Q zJ5cA}nG$Oyee;HJVAaZQ(3zh|4r?e*NB_7+BYyyeN@iJow{0Y&6_(8A+!u<^qs@{B zT~#PAOMz5TPI6{QsUu~MXFS!6&EJKly9IiUJ*d({EFoMM9|w$;^eawY3p?g6yFv-U zUbKT?lk&Y#)JocNb!9(aF>j>~lHy7(ni}(r6)46?(xoZ=IrAtS^fmQ=!i`=~McTZ7 zm9GDjQ2MQQy6`~K-$hn`t+?f+-b>MMmXfJ{95>B~|8Hj&y9HGvsP`Fi?-uQ#sqiYBEz?IM zq?vocH$h3mvvOm%xve#Jk-JA&zg6xn!n)5>*XQi;yP4b@{3=(q_qYW?zltvr-r;wX zdn>sW{#|b6>&E`T?H}fzrmy%Z8~1+)8{l6J;W+lG4DIUX2|INDmi_>vPsz8=eH4EC z@bTg@T&SB`*ku;&xfgGfU3E^8~^r>l&@XsE?*xloTW_>DvgWToqj8};8q z8t3fp%TfNz87sYIHQMk}f=`A&E8%YkHF(PSjv1)`-QjnayOsRfuxmC5>;84_ZSEfT zdUCJutGrEa0jbYw2~{ zr;K{=Nqp#Um=Kgnq~e1g(c?^6s=9&BWe$TD~Y`~cp7P2FLc8=c*#b#>8RLB zb2do7LE4^6Y2szutU7+)48Cy#`bN}m2A{KoH|p2teZVx{JjwfO#e;HwHIwtXLgV73 zj)(KpX7sI-w0nYI3Z8;nBe=vW5Kr+cra|9~xnw?K-hi%0Zd9e;tQGK5dJnqx*`%hg z_aSDTeLRsa(Lq}J*>Dg%A7bZ&rdc=rLJM29W14PV2>P4SoMgq>4{FweUo%fb8E6F- z9#TX*O$RLwehFyDiXK|al&JBd^P4Ro4qdxjLF~$|n$N(GZPSPQ9*(z1zi*x)y^qCf zvvR*lTe2n^EB1pny4J))M)0x$U6gk(o~`dVGGcwEO)Y6|HQ~~|^nW|-vo_pyTvo5| z4dM_Bh=*H3f6A2HaTsj5I-}rkhb2diCK41Y2a2m7K{#0K2A{WGo|@=tx$>V1J|0BK z%XZkHtxL?er|a#SA<)1W+BeM#8c>3AO~G~71vu(sHR4$=#!yO{aBna|H|`C#7`J^q zxT`pV7K@=gl6c1WJsiP}yF$EfVFwtScEpQ&U2fmPF=*B|C2sEplsesx_rLcB|IutP zZfjz7df^gYVg&pe_=!gF7#lYzESbJRV^aJV>2=2(bJAc<3$NFOOVXVRdjsmWYM!4{ ziD>Ho`C1726=M&QpyF{DO0Kg%LT=Ch;Hx2VL~o0?KtKv30QT*l}2r==;$O zE4D#cBhVHlB@yp80i`Q;yATKX6Gxv#Gb{)%Nlu#{vCb35wnxhqMjw~JszjXzC7_a( zbP3<_<;Dt7&1A-_)ugpA2P13Evph!^M}A^q5BY5~;;Yk2*E9>HQnFJp){xS`+r8p? z_##>-+AY#{6uc6?&mOaJp!-qqekBPXvtJ?fihb7J4Ru~LKZ(9P&)8M#QbqL#hz(YP zhXsw#$JaE6|1F-|Q>KD;?EtUr_$q&1qc$2qexe(!HZ4*@IBf;emJy?+x4V>zcncP( zWkgS*E zbP_(si5@>jsgH0sD1)R*N+~6L7?qjOcEbUs{UuG2tcqHD_F3U&hIT86;K#t;NJ3pa zluzrjjyTSJK258pp<1vPtQS_08sx${iv^XiSQ)Ow=HrY%#J#fPRNwf&GP>C3+T)gt zEScvFvJSPn&{3&uNAjLd?xjuGXp27Hhd+#2o%+q zFBN68T#bWk4#GYAAXsEac5n=-!?+-ZT9R{i{e_Pfw)mC3+Yj>wln_?G#A-^zj+k5Z z8CA)9ltNKnSJgy?ZSZPwZzs9ULSAl-=Or3BTx6vA(Idx@+Y&tjmmr2RFWPltD~!`B zR@At}JfR8h*I4J@!c0^bwbql!O)4aRT4c>4RU4|aR;5mCtu*sEGYhu;< zK-ddvCI(96Jmb4fyR;gz+kyU5lGa9)c@FuDsquxP`j{>MW5F+&mxJE{=AB{v*xmTm zxKs-y#s1E*!CQq?vDgC5q+2$-66-kI|7`8jcLfb@6{%F~SbcL`mca1RYN zuZ~CJkodD`Ja;7Xx5gVJfc{tZ(RxhjI1r^b3ftkPo`nROdG&Ny2%V-@$PFZ`coA7zu3Ci$+B!`!$wR%oLal=!c! z%J0Og`kt#M_8$DU;NZA+os#Pg!a=oJm!riAj8}?+u?GyE4J9~ap(w0t(OI?$7QJ8u zq%j=%{Z_aEq)AUyvzOq~DYh;44SMDENH~pVVD5Ai``cVYiS>>S^}&5D)4#% zESDIGWvNsvRMbm1ipO7LcY65!QbM!+eDj`0+PBTPLtbXT_SMWW_`s?`u8q%XAaygA z&`Xpw@EUs_npkViS_MV6P2Zs z&v9&GSN7{7HjR}_x58uo9#X&vhrUS{<3QFmtBozUuR;h+P z?CAF*49#f6lf(n^(kQ08C%7{ASmPSN?cXbppPZH zY3tON220B)SZM8LqLDXjE0LHkTJCkPR>P%m zg=@*JU`lgKq-WbfL!7@lpW5N;N2PhjjDovuAFfB?2&q8hz;zueu9Ks9k5T@trQU!> zi%_RxXU76fWU^-d-TX3i>(g6}&BVP4z3OQ6lBvTnU2eRa=->z$`p|;(4W0x@hnZON z8a#=x)sW+cd%4Icav=V|flKy-juy{{B~!*zmVrzSaur%M*TUzV9A1MX;aoT9 zV*Ay$#!`Jsb%3!-sABt!NW~>DbBo0Z<|FL6mpMuMGe@@J)_@D$MB?^>2K|Y_sf5Q- zA2jx@a`zbv#r)qQSFs4}c9@~J!Lw;su;h}B4ZDae&@yqxE{wPQ*kcC@E}FZj*L703 z1#Q;J^Y}%Ky&4W*S+k1c@jb!&%(iAk8J+0Q=)?|ks$QzaX-V0F61Ct1shnImT8BC# z*&lj{INOq`1DSo}l;l$RP@~kRDHr1j`-P612gyP)&Mvf**rpqm_Thd6R~G4KDQq)_ zZZdC_bnXD{7^&?-oBd2po_fdQHiD-M{bVdVHF9N*Q|+s!WNk7gTFQaXQ$8mv8cAi# zE*d{hs|CmCN4{Lk{>iS+%Cgs9$%ABJV)s_yS4=yGIwh#(N2AXZtEQtR&%p`*B)8HC zFJrTFpZznJC>dF37A{Us>${(=jAua2R2HUf<03Mwy6W3B1TP22neDtc+~ZvWMjW{_ zot~>Xu`9Nq{%(f`dQJEtJO8zKnB&2Z?UU)|j7*RFa!^k`?N$l0Tv|kzX1U;X=<~^{ z?(yLJvEnz-K%^Iq)e6!M@~So(_^TzSv(jMk?H-K@X$6ZA4p@)4jx;BE*vc-F(9}*k zq>OQl^Gd68v8y{x`)fdT<635YF9ajJ8FnP>pnP4h8F8}?>(&dq;Da}{pTC5kk!4Oz?BQ-Ir zFFhz7evHB~BTZFVS{V8;}VH&}Gtf7oZuaFKO2w@G9GK;ngUAD|97zNlhSA+iHzgBHT znXc2ZE__l<*ojIb=)7In10P*Hdzo)hmz@B>@6Z!VSzT&z1>d4P^)tdpZ$O=Ox9f9> zC)5?&AeC{Gn?bu#5#gA!OQvCm)L-JxmWwH`auq0|(aiv_T17eqeUm*8U_lGn8dc(Y z=5)VVu~=?5YHtxzji|V88??YUj{nEtWf?nKR&R+fCcm;$i|`&g1FPyJuF7bkkJO6W zvS+5K=bc-mGBOLR<~tmRsazU#6!kxg?+qkFRNk{E%r6AX#m!K- zs5Q}g5VY`3<*-M%;h_1xd#Ir;hqA^7MEL}0s<%wb z)Q_kZa!bCXtOo2EHePf{w-Ph^ggFb=^ zry27#O`SKA8sx|}dn%0cE97>}5GX!n6ugNP!?S9&Gnn(K6{FPQyi&Ib^&Q>EEi|!F z7f*li9+hLt3$6hku K83W4bjd2gOFLq; zCt3iX6qVcx#D5QU5^p%FE8c`peKSH5p{;{bqIWIRrVlOCr-yLHL5y5Da=Gd&=`P%G z;lBINK2y@WF1_sj_cLLi-f$^HVD5%JGnz9YKDc0jzQ@~QJyVCDG5GCjS{4Po-wB6bU{!q8N%=MVGInm{MwL6{SLqe7k$^7T-mrLidMtgYn&$l7 z##?mR;(LStHi(d|KH=-gco%v~@|6>_XCZ=0aR7FtXs<#u_>J%f-E-z%@H=-f7Ys+h z-VVzKFA7(Ff;Z@Qkf}>tE8!3v_V6QuyktAzBi>dDL!jxZh3n1=mS}S;=rHq<=F}OP zN;As*m+g~2$H-(KZBi|4H#Dm1LboFKZo>vE@r%%A48zzem{-j;XzVRZ9|)a&kfkj> zs8luOg-u6=O(5zC!JzPp?eW_!ZURZ~wR8(R$k>40vQ@i7Uyhk_aXV;-CwMkEZg&=Q zji44OcQ+QkLi@7W`Y&!(>2o-OVyYFnUvS))GAj5o zy`Te~B#r8`<_IMy)F32}T&MmhxMyC{^!;#9t1#0X96-%1*9MMn9r#`{;#)Zx@vI7x z6^EkW)5R|ocYys`Ik*li&%t)M7nc5$aIg{n?))DO2OIP*%Q3}XJ-2v^CwV?|@#r2> zByAg^)1urW`eWeE)A$;rF+nK4yun^@l66^}a{fw3uwjRGWb0uASb{m7u2k=VkU=D*;;><@BY{^pLu{;U z$Ry$)?jAM*9@3)Z6F>X#r&e=Jl$^Jp`xNfmRqTjA0!Og%Sy(;a)%5nl{C zv}->K6hqBUuteKYK)PDB6*Io{+);G+C}WN;d0%nAlMwW`G4qyeedbln!-Sc5-*=<0 zES9YqESpg2n#1$Uf!`a{1CzhW|_tQGiHnl{cWgTL&wdQmJej|=L|V!Il> z;*0y-F(bEeFH6|U3cY9|f%qoy)@VaB3e{gl>igICn3ltJPoIy z9HH5Ad!*+>@Hs2U%QR%AALK*#>u^?cB}+|ncX8|mFPQH|_IR^~S>D@B``8|OI|>GF zv=s8Bx&v*a;0w0lephTA*}h>Lrf-jdmBv^m)UU23cu_$UUNm<*YwSm)tnDyb$m7Zm zaE;?gi8BH!%%2o1rdI6a?TyJ>9Ci1`inV^m(m}Jj z)ZmFe^Hf>6-C*cOT$+`R=n)h^+xwKO({|nXowWFWD3HB+u5GnHxumbznXYyU_X5Tn zq%UGWrmq21o4zz&5CoIXbXWlcFZ32oTnwA!SKL@-ge{5*4H?x87{OM!2Da(0*veLo zkhy7Ww9eQJejJQOjFdWzMw-}!*z_3D#?0GGv@I@Xd$8%AS$&myF|_J9FCjjUf&dMirBP@}q7=yX`zDamMSh65KC_Hd&wOpIR?7P`hu2veXOAQ(Abnp=a zw-zf33N!fv{a0D7ueR9Hfo}s+3EWHgm<>XU_EQV2T+P?OSM6!6pqVbd%xXl|Bvc{Z z0KRY(E~1tCAbceq3M*Z>r}#Qpo8UFRs81PBwU?2;hM-WsjqFH6^d3Z$e9b%tf$p}T za+mBNi1{6Hnj33V2s zbSb&Z{5q-Ox6a++?j~XVj&J3)xf|R~?udJkgq5x|<>^*g#rw&x;a69iJLXoN!VT^Y zx3NB~GEtJIye_xOkIS`_yn6Dh@(L?ozs=-VVU_K2M@hJmv@sxFAv}UAqku9_Cp>L< zqsw`E=wpY$VqwUd^)Ps8eu#X@mr1(*J>d@(mqKa4rY$-7e92Z{vusOtJ(PTD{$4zH zUVBYxD*W}@J%GDgH-YqHK-#uTVTn0)iO~tt#I=FlTeO8EyYy8G3;iZ$>Ngpm>n&z5KTU@k zyD}@_zr(z@&Ky`U-e$9a2xa`_kd1%5Sy`V0)MgB&{5(iI4q~lmjUN4QwYVO(r zyxa!I9%J}YC_MeO8#GM^Z#x-tj?gAglkYaR*n}J7c007vODw)-bHY*myKA8tRG57X zu^_r+mn+a{1rGpST-si+T3j-B&jFb}bZBA1LuMH8z9JfPX^itiaQ$^nAalVi2?O~5O0Qzuotbw9^sf%-zM~51U~X)NBC$@SMgn!C^{f_LeUt``_aO6dbU#7 z1l9n5TBC16+SvuZXiiVTTrjep9{B+)kFn}^c#GA-U6tE{|5d12vaAZZnu1nI{avh9 zkng9EE%n9N60#U$u_isS;Chf`^ox^zj4_ZGr9LyK0dugjTM3H_r9wMw7AnPdSSk!% zT8Xp~;~(F{EM6XxsJ{{Rp?%EV2hx!LF>5_tt_Htt#!pSK^L*I|OHilnN)O5DqA8WI zOGvdk{Hk=vZad0&-fcME_0XMKrpKaG55F^lW6OFWb!G)t0w10#CRWtqD zqJQ2tc$={8Y{9Pke=D4p{x%aG`3w^Gk)zeH0+u77Vt=^xE4^$x3Fv5bjw?n2>R}TN z>?ZVay2?|G2ECFGt5C;t|Es}@sp2=glW*a#~fk1YjqHntR!tMyD@C0Dm1Kc2&S)3{Af z*O8qTJVt86D6AAJg?15(9d-)M(DzYNGAN9tWMUoG!zQ}jN6VXVyW^z7TLa-$Lg!3q z!a7$!9AQ72VJY<5uhm5L!t-pKeq=4)4*lrSV@brVSpdx!*au$NfO`YDE#B4Py!eB} z!XL%F-9A|V^Z9ck<&VKb3(Bkw7-jhL;iPA>5tNK| z?Ug+rkRBr~$e9&ZlA`NwjBZTXmh8}!sNLW~#<=RXOsE2+3Ta*9b$%neM2gq)cTZ_~ z4_@rI`mxjU*Jk(c$=Hw@Qux~KeihjpP~Te)gb+E|4jN9D`-ImC-^}Xw50Gx}S0vkN z!6YNY?Oty71V)q-NEX%~|H#2s>=`4RY9HiDCSvG$ zyuY~@C}sRW$$5e@>uz37ejvj~JHy94sK0}5j<8Fbx%Tnmw=yR59-$d}&U(HMfhFry z=NC;i;!=TkPo=aP2S-?4gUgHu3)>bhFEfj_?r-&5Wkuc)n@v zdhD-v(SY@gHQJ^9o7tK%&o(IOxhA_Xz*`SE_ds{0;QN*Bhp*L7Ms4e%biU)>6%buE zoOd22y-|-mAKvC>xGhR=>Le_%6|%85rfwTqhjNRj{2+YKG>Ry~{4*)3<^}o?ge$ zW|?Od*eTOR3v29IXxgtZ4lriPG|Y(640b=sT?VtS;IS9Y+vj%(x3I56e%a}dg`G&k zmT3fC(r>_NSwlZ#3Fk*hkZf5k!^v%N5sW`IW?d+J^=(&)t5)~^OX z0p2xdc`ER97z}{2ghb(oEpG-ee-(B^hg}x4I2j9St$!?A8(>t;V6-KSa@G?1Irc!Z zC3~=rT$LE3RoFRE;%*i?g;Akh=rVUGCs&(a$=d`U^~P&(+s$29GFWKtx&zcKMJBZH zbWji4#@JnYu!J|NXX=Xr+xXMN>i-h;EmYj5ezxr$QNZz}X{UKI;c?8YMp)<#6>(!Z z;l>4fH*XZ}1r4O|N6iP3fEX$15Nj8>>D4u6Dt)tMDjIK*(y!Hr@Z)Oj)?o7boJG4egZ!gHt2GtwjM_{$Yhzy2>R=~#@MQyxq5J0_~@F3 zfh3`Kf>BLiG--JNRR&x!<8o2^c~?KqsqZD=K3f682)Wxs-h{zjnbtif(`}DiZBlj* z$r`#D0(Oj6N3>hQDyroyzN(|u&YwhvUYQ$Vu?N8reeK&S^p%&6;q$J;a*I$4y&1x_ z2pgm?k>QV%-*rk3sT0%sh@7EoX`Gr(6P?A^X-pVTnI>9Ta`i@mF!ggDJtbLj6sSP6 z9yVo@cXH862ca7*A&o6NDwNDiE=B39PH*;jst=|>?eNAeexKhSzdaEHm34> z>=)K=jd%Pjc%K)7A3rjpCtExV*n%Q^)LeA9$x?2h2^D&3S(7PY37{8uHz-;CHuZ*8x#o$5 z5%})fVPL8M3N#+~RlaEny4bKr&x|SSANh6jVz^`sV?IlN7s(UtpcAV+Jj&T>5}}lk%f|JaCvD{u5s}S6pEb$_0S8o>#wX1ju_!hXc|$YmZ3~3 zp^TTnDljH>eXWlLzjH*AD4Gm{I(RM8cEnxbj=8(k!hSMOqo3ev(6%_SqFB?QPrmB3 z!*zF?`5L~a?8Yjpv1lT@;%Y6Ly|By9$a0}%2d+Qs&{yyld2Y~UZ@@TxleSvU@7!fh z%#GVM)bgW&TE_E>HhT#TJ_0`Vpc8b#X9VT6j_?d}64461VhmApzp|~rH1N$5xq3XzbYFS!6^Vjr0udtEH}k(l(Zo(&&*ZM{Tu0|0kWV=lJ6=R{!5+3fF-SYIb z5qmBp^0BdullzVmi%3q#ZWK3)C01!GU=bs^i+CYxoA7SH-Gzg)h${|`tjsoa`J{v7 zZS7JRlD9{@;@zelT2Z%*?$k*0wiX`IH^pj>!&}b23+jZ=sy*qibX+qG#*54^>gM}0 zJ^dBe&z}v-ob~ue)x-aoO8#umO6mqQneCtNnWxpbSL#!CtS`OWOFW5};EEYIsTu|v z!@wikG7aSSSi%2FgDw4C_^zjYI4OlJ|S6s_0ntQ>S2EL#hNIw*7y0kw3b-vv?*3=f2yGS`~1z70U+c?$O zWNcWm4MLiW#ay-EIjq`un@@1=pxW=)KHTrJLW8XEp3`UMRAYdtPi za505j#l?^Pjt5_4Of_IX!!N_lOR|7L2|CuzFz{AP-x|egK=}%`$yiZomy}AeO#gM) zv8^$E=+Xn9Mqkji2+Fp}m!B*%t1a72dfBIr;;L&h_c)G)#p>#Rj}}#1cE1noU7jU1 zoUNLs>6ok68C?s@5qG(OOz|6AsLO9DB%OOmT=$6EB)7gwQ-RqcExiOEy_76D3Bk(-*9vXNtFmc8`6ek5mt??S;y#?U z+fGNnG^HP&#%M{{1p6i9Wvzm(?jiyH5;R|~#W>E(Qp}h^Uq9emb)@-J^wFhmp_3m* z#+&31@UdI-)%h-aEn0IPj`p#(*c(#9_ul+^Q>Kh8|Es;QU%^xJ!iKe{a2FabLXR%A z5ycnLqmS5lp^S_)d6v?gix(QqX4_%e4xKz#if#0&GOrl#oZc}s5fa$8@oht%(Ufdw zF0vhd>!i0?6B|OcChwfO%T(?#rp_B%m4*63=}31jnj6dyitYJ9ST1%7rQ5m-@%&(J zG;fUVh#em)ABASFxzL%9=gLP6f2n}7516E*_KC<2U?A3o=x7aNzryh2TgRs5O)>n+#4>T;4=bOdK!f2sUXdW3Y z3>QZ8!@{r_%|}JyH)PGWvQU{H@g=!vu3Ie6cjoE~{dvJMwy`jn=grz;XQAov8Jalx zEzQ^GqlE}~O;@&QyR=ZAx!Rn_P^SM;puWaQUpud_%$4SwqMj(k%)f6MvWm3WpYLE> z%C>Jt*bL}kn@9TWY^uz43iU!{>a2$v`Y>4N+R}W5TAe}^_K(z|-H@8i+Z%TbY#erg z(7b&Jlm=Yya{>nX9n&-$XVlrW~3O*iJUuk`5;uwBvYFKiZz_&yBds^TROWX=IkQAnnzn7)w|8 zABk-j+uoqP7)wx@t4l)X`^ZUUp?^E@(d$xJxgF_1e#%&lL0GmG$_||!8O&IX0dF^t z7R-_Q(au~43GSn9-GV9B3#Fs|BkhIy>&%gfTnx}mGv6Vlv@mkI&FW^c>FkiFRs~t@ z7aK)#kIKqKP7~|4b2L8MFAk3Mu{QCMVR0}Q6(QF`Y)A9itBL>W%r)mKScs-?p)jUWH zl_LXo=2d8|UX08D3tK{lhVwB}G{AZ^3WKn5Br5d7*bHp_4)c1$2q3Zz)48oyY z$aaGgvRh?^CSsJgNLtfuxpmD=THYW}bLE)-A#>qf&h2Xu)*LBvsR|zt-paUj&pwA_ zDZa^kyFyFa-P8yx$XEraO$SS*pXO1FY+y(4dUZiFt;-PVOR<5)K;6 zj_faoo0M%Jw`E40BSwiYnhw;Af{xj8J(>Mw1(7dm#$d2W%`L2EH;~pu!LJv1tCP6W zwp?C23CH|)Gikn_FIOi0R_=&$m0P%P1=b%{8TDg)cL?hq#~Xylx6=CDagrbLd$YSs znKpNmTVd7JZ{=&e1@Bg2G$=d1>x6H18_F1FEaSUGI7;G8ejD6AZHwO;}$gc}xOB^x8JRiISqk-r=K>aHj8GQY}K?Kl{saqM}(gTzR9#di5$wjKVT zU`3^ACI8((dd0dRx;6?LNVg$hI&@!gqW@1g{kP#TnAZOxiv z<+*4D`i{uC+w|#=KkZp9U}3Oh7n1u+#C1PPyvh7it9LQ2@FW^9w}ITXkUxL7`E7$& z!<}OxK;q>ltjec$C{TpuR)XVdE!(~#0WF%_GXdNrX>sLf(G_%Qe9Y4gtcZtydt zz3scY!50hN;N7GJU>bmjaQURL4atl6rR>|dzf75*{w8kKSD5?V!24{ zo+te&?iUJBV{HZ@P|07)Q zpa1v8g?-o87j=EdO|O4k{FlYQy6_0^e|`>}KEYS&_5WkY{WJzmBy4;MmpJH~x8DBe z@A!lHe+h)6bI&_UeVjgioa^mL*``V+H6@?AhFo>hhdQ0{w(p(qIr_iAc~c(_qtW}{ zxZ_GmdSY&soLnBlIB$p3Q^c15>U|QrzW@X;MWU+cdncTfWc|D=^8w19=k_T-?@D}_ z5^tlf_!dxGc^?ac1xbT=CrE<-#iX8i{ITHkx6uywyD6s<-%tMVAAHo+{xBs!Oxk(w z&k2Hf&9CC)Utz0qF9e@c`-I-YuW~;?sn2u2o7-dklT*`TxnIq#|d+ zB%t1Xlu+GwC#@+>w}VaECxNdrf%?h)|F(A?@KIIi|9&T=PbL#U5D^tcKtPbDAgGi; zAP`6-p{NK34bK`aR3qJkYPYr%q85OvxAb8eeE zLjpl%|E#}tKX>^)=iGAYd){;InVW4K9pgJm5_Y&cosw##>$xdB$=ylXcXaU0KGhTE z^4x0U3e^MVa%|$*W;-_FSALFZrxkGK3er_gY)7tEEqzu(Cu!PD#j1O);Mhs;Q7hNi zw^yMVJYSuwu2torMvfO#;?-CsE8A^ulQTGeyZ`KmNk3+XBG zq+9)cPW5j!Wp`OZf(qd;A_>3pZ;_~IZj*WRgapbl lOa%x;_gj7&A>K~tOP}jh85ij*O6e_9r8ond(yoDS?^R4E z%KwrL4S9=VUJ+4d$e;1=e9Bd&ei{2H%bP}?uhP~Ni@AMZC??JOK9ye19nO#?X`8jw zc2Rw5`DWg?D0^U@Zz_A3iqo$#&$6e$3{z=YL@7VW|8L_-s=O+wX|pxWpyds!uh)la zZKraU!>`|0J$1g;>w0s=EZWKp+F^z2MX;)~=Cm8tS7xZ5z@bJr{eS9;85|kha}hnI z6D8HBFMo;K$W!DA>KPAcoX+5Wc`!?tL3di=$H*6)MQfD6KUDdy| zO|GC6wUXUL+gPNv?`lF+I>hnZNs;@QSE@8L=eaY~^GUNh)L6B|#rJNw=O)5cF1PWo z>fJk~Ppf_JVm@6|3b;caci4hoAY7$VrEJN|&NsAl>*-W=@gVJ|6aTy4O6Lld&bUj8 z%qN)nH0xin`k(%<8LC1SlMiJ>J7T9)3RE4;qK=oiI&1k*7Dwfy+Q>&o$MIdwr|9>z z-&f^l1!re)RB*Rh4RU~D)(x0SS#r@J-rHx|+$BfiYl6#z9zL9J6lCGu{7U}*A zWpjpPvFA$gVwA_zo4l#gI)fA(pZlg!y5=2}l~Vm@6KAOYvy`XK;%PgLvK5EpBdoQ!hV*e#isy)=3_r_K&-THHD|NqCebm{Sr z*mUhzM8`Zr4wMgYS<+kV{)TdIx`Pl5^pq=u>ZW$T9Hi@M!eAw>YFd{63sK+aY~#bKrM~d;wRY zZ{`>U?||2$KjAnZ{u*}O?vR{&9a0F#IYcI*Gv_*FCY%h1(Zl9BWHy`*Uy45eK8M@` z9|7Nto<83pi{Pg4a`cT09Q0_RoOm93`9g<03Acjpx!)mIEON+;@X7F#=(&p>vI*`C ze}MjYi9_CoyTeVEIwbA^hkOK|1@}O=e~|Km`@vrHsAUfM0UiWjgDzd}kbl8>@MiP} z4>=?$QDg+%XoW)(9(G6uJR0tc?)Qj8j)Du}OVL+7>W~xQGWc2a@|6y02M6Ho=oeNw zq$?bT|ApT9m_yElr^0O>cgS&1I3x?60gq7nNr&XZRJ8=rr#?lR;hFFl^of6WhzGtI z9)fQ8v_rK7fd0e%Nwi(bQpZ^7H(f1~%l?2r%Pf5JUpameZG9r8K+6{ewdmz_-F-bkR@b z30?wUjh>YlC(V-SPjEGQP*R-S0PljQqt8i>lUw0E@O9|7?}}r_#AJjvntFGfbX*W8 zmpetez#eq|qBz+M_kxSi^`3~6FW{;0Dd@|dj+4P@v?us)=oM??WCDCUT#X*RK2B!C zOJP6yoy~Fb9J~hJi{3P|p8N<;CJlShC*505j;K#thex1OAE_r-!HFp%XQCflRZo6} zkA^=%?@El9qZ`maQiXDkmo};K@>4@>2RsUWdV0LnKSJa(*n@tre!R4RXTwJ{;M(T# zau)nDoR2=cL%hs}-Q@9d^!m;izeXbM;a%uJZoIUE?}g`}w-@j{_%S$jc)WBR8862) zrtQJS=+{TZOBeWc_-AzfIq@5r~)F@R{&*^x469 zNjXv^3%(HDdetz4+pNpQ)u@cUKUq?6H5HEj+bK(Bz8#tba^WoCh$?Kc( z@+({jpNT$~x*2cHDrfPT7Bf_wsZgnvMPdt`$A0C$C3G)WLwQ##r)^k29i`oZH8q&_?n{s4X9 zi3!pJu7p>jKWddAOhogZl35{M{0ACf54UK@0KQr8}5`L z()7Uz zpnptBly)s>5AZ3ei89)mDEV+-_zLuE>51ZlbKnGbqIAJIxe3mN$DsX95@iv54m=zE zNV7z#cOqj0ybb*mM|;={pLk57+}4_Vz?Z}8(EV{ik}P;P+zq|0Z=#$J{{q*~Oq9R%BR_CF zW5g@yV+SP4R5$}3j6NniQErBhRg8YMAW@dWr@?#Cabw6&E9wSrhrW{IQg{OVGb_M4$CU zqHKm2!IRKO;_Q45uY^aS9n~Cd@Ri`+=%N=Br91pBJRkk$tBEoW-U~Oz5$gJnM7ab` zV@wO9hi^%g`{3sA4d@)4p>?nt1Fu3mzD|@qun#^1efu}mSzD11{04gV?nF5ko(I2# z?u;|^0Q@}cML$_TNq&RBg1Hf*`IlLSG7+o+pSx)XsT{4EwL|2bYmO?lOe)`;G zNeLv&M)-EP4|?Q`WI5+l$^*U$efmww@+o{KW88T3hj%24_cUxVeC$2RlC?Hjo`ipd z!{{;VljW{%qK$bsp>Np2HE^aH)6fgICriif^mq7ewD*f-se~uPqjn_APd_Hh!|)=w zy24mL6=y|>r`4T=0-hiGyAw@c!LHmT)pl=PPNFF=^ zu12q)k|LAfIq)uY<|Qez23`YCNB?a}iX@*&T`-1ygzmR0MfSk=!qd=!r&46-S+oy$ zKDx;ZDH4X&m^TppZ%mPI;Y7x$J?M$Ar$~G++6(+JI{1$iIT}6= zUV`rYW{R|d+rs7OGq$EkFSr|Ah93BKij0JN!Bf#kf0!a(xCkDKp8OGch9|?z(W^dA zk;mZ~@HgoAPg7(ad^Ow^UGQs)ya|5{Uyt5fFI9&1X8eQO$EQjISE|g1)fn0v-Lqk; zd;&Lv$D@yFlq$)6$Sd3)eNE$3ITCII7ao}^%g;`g4sh!6_#?woW%Jdka$jG{7Cz$I zRGIcrs-*WLt&D;9p$nc*m2Ul+?=XhVS(7R`Kc~uD@X?Gp6VbakJOi+g@N0WgWpBDu zs^IJ4%}ff;?&6fw1~Qj~J?NsYPB}80v63-k#HmjCKF=u~U^T|PbhcAgjdsc|_#yb( z^PMuM)G5OU;Sa%~GN)__aSoiunDOW&?myWn?FN%}_#*Ulj&5)xcpiHDRHyWWo51PQ zoRV^(QwG2-;6CVq*EwYjJQ5C}w{xt5$H14|=#=ATIprO=1kOPZ;`k?A3J1{--RzVv z;qmZ$=qUF8m{U=*v!-2!8@sp%=a4l*{0+ z;3XS))<&l+hkt-qzUh?qZ#(51xE^EdD0Ju@r=$+0eBrNlIHluPPPqkk!)55AZ=7-$ z+z`GCealXs0Urs!gl_zuQyztz!dd7Kzjw-0a0j^Y4^FxBN2k0E_fY4fUB5Zy3wR`a z20FD~n$*vwJ;0ghNl9ta3%(b=3Vl>snoNM7f=^0Mlg~5KWGTD`Zp@_bRE}rib?^yI z)8zQ(X|fak3Lb&JyJecR&SPxBN7#aX?bI~Mfk(h`r=>}gL20rM{uCaJe&_r&8GAOq zD`R}qF=?{6Fim#DSHK(5cly($=`fLJ;A-?^;WW7b{s`WI-g#k~tc2qj61? zj;Zhf_&oF(H>JtN@ECX^`cxJd7Qj=O4#$_su6J)4Pm zceosW3O&8COQyiH;D^yU&0O*ryaK+fxr@1qOEN~`%fidhY3*HdH2fue3i_7QToQmA zw^#m)OPcm@$>Z>Ga4vf7SuR-*cYybx=k;;Phj1@=Q6}dPbxHC$qzBGHzfjwcHCfE}k`Qx>~q%R?^7f=_~fL9boqlB?hxcn>=3 zX~N)gICq^(y1Yml&c_#n$Dva|@K^9&^!cB-Bz+9F622Mz_;)Tj z0Y0iD=b(rE;*!B|4|v3HE_pXGU9N_GusaFuN|&whb?^h|ibm;Df2_#g;f3fAo2APb zcpF@KLb@cjO_!HpUinEI^e-$tB#gt?gHP#{E*Eu6mu_%(_)+w+XQoRoJOq9hJvS>| zD&a}+8uZMZba@iK4So)tUXU)|!cW61N2JSp=ch}yhxZBaztKrW>2eADGu#V(F2{rL zFYt}%rQURT7_Qfu^#}C1zI3UE8^B)&(q%<3T~Z3^Kk)nL2Uyr>2%imaL^ryfJiy9_ ze+4~tZn~UQ#M}d(gYK{>U3~DDaK=N#J(e!-!_F?)SM(jvaF1fzKRoJL%5P1&41)*5 zZP%vDj91d-DtH3?3i`6w(`7Y$16+-6_F2083jYW%{xV&1ZT33LkoXUQ+z7yb$T!5eOI`SFL~MsK>M(YtQeVYwgN9X<0~xBL_C+MO{MedaFmRL=Mb z7o(T`=$7l@LGTA?zhuZ#_yYKsxD1)zC_^#=BCo>tqP-_%$Sts%bIn9w%kd>#4?dw4 zaa}SbG06Sk_2_SgWk?8K4Y$tEkg8yYoL_;h=|THICtj2x9WTIFg1e$WotYtjgBQaM zug{R2IT_*z;rqjt=nFU|!aL#X7G=mPb-=seZRi2dX2?@;eoxvE`oYZ^az-Wo2fP(M zczcFSfhle<99TWq0{hZ;GAz7NU!f2$P{=O zJOM4=H(<=dUxeGEbAD?{)fZ+|BxZx2B9|@J95btj}+N z3*c|j&#|7`=4kpGoX(5d-K;;gXYQAt#XACC#O-FiX#u{}5sD`#$y2N^?P`xN45vMo z#JoRQZe%R&0*^y)WWD91&h%$^#HeKXn)Q?FuGlj8#yeU2VEtn;w&7g(SM(0nH|En9 zy>K8tMQ&rhT1DSl3V()vg86D|>T)@p%zX8I=Bs!0CB1O_Yf@zl^V53d{Ym&iv@i!< zPhM8TdFW*3p#A}B>|}gFU(nSlrwnB70l$m>R~~b&Z0rF%g!$)c=AS#@O|YB!=OX5x zLkD5&;N9r$%s-dITj3^^PWhJkV*SCqABEe_bjnudcWdD9;UgA0Wi9i!U=Hi4q~TZe z)`y(34tB!zS1{LPe)b;R58j2ohxys9Lr4p}6+MIb*fVf3{1p1s_ni2I_#bCO)z3VbnoE<9@SE_j=&tzG%?q$U@HF(7_|JC^XZ(au{)Bra<3EjH z{HKgAK%a}h+i4{J5qul^A^g*wa7XwD^qs{n-qSI6gWo}afd6>>xr~qSiTIBr@ekjH z&r#Q-Kf&L-?>zDYpS;K=Z8=UGP5r|Gw4b9VTmmmc7vS&phRfku=yCXG@%VGMzzfk| z<8MvDADaueKPFvHJ~LhBjio)n7oeNrAC==DRl}pvW%xIpJ&d*LdUOkXmiOV0U=R8X z{FUR2XnXJ!^dkI|2VtR2{1bf={zeY|MhfgjzlDFX*vnW6kHWw3G;vGk5?&#}_oCln z{6DS~e-_Rf?3VdKx7=1n|A0S1zrpyr(uaM6>rZpbITyL*SjNw>@SW)H_qe4OTnbmA zr!t($unE$~S6 zAndghd!0d>o`znHz1{#%hJQp?yw^ZhPi4IdUV=Ua`}{UM6Aq#;!M>JYU+;qdj&6hf z?1ufkA0ChX414u0+^>J8-&0wc<0}k#LQ`C+1|vLSPrkRZ(iaT4QuB*Ee(#WAvDcN_ zKjf+O=6OnyeX7F2eBV^m5N~;*Hxzv*TbL_VU62{93WQy$nL&S5dBA|aRpD^ZgaS`t zemLX}7nSjNZ%IM0Li;zzTf$`o4D|X+%XB%?R~**Ps+Vnac{ zzpp1$sfT9=3Otn)U~Ur340%0aQk)qqFZZhC6nIKqsku4*`-MEEdJYZ9^A&}wLY%5` zu)-D@tmt1-;w=jEfXHP^Wf!T^((*CI&!s9^1-=T->s!SYA^jfKoil@hFlp@@oJ@lJ z!Aeh|x~NZ4*f-HAVyz7H0x)xLWL*`0COPnutt{@-H|Q_cRd(3p_Z8`SsHdDes`%Wh zu-_LjAivC`6_tw6Yfw|+kZ*!FTo$U*FBu*v_J$%Ck=kN!pwhTS|H)x*z<6S2nJ1L* zRW(D|W(7m#9zzfDgeH(Rl3Ar1*T7(vRw-VJsaVwx4=f6+i~3U#oX{swR2C#d13iAD zwlh5yVXX-c@l4hm3$4u;FeOFJeTD=l>P5#%W-%d+lHznL&=)WRJ(IPvV19+C$QPiw4e6Jy zN{Rdy7w1qZSzfOyj!eI=!e|oEK(B}5kM2{pFfR7{N&|W$?&J5<(6qA9+k}^z>FX() zkRR6CVPA6O4Ml-b4t?pA#d?<{0ac-i9=*|!8Ju-C@B=`81CrZ^4ubnwW*$RDbjckH3lt;~%4(^h>mq zhiGL+s45!@gwh@A#UN;)7afgVs{t)YJ;UJ4GM~TL%mjH3dyS^+2^4w#q`_O_sq)jR z`v+7@qjU#*r{o7igk<^rej}%P_a`PV$3Mw4r7}05HBA%x2CMWZPe_dz zR*;evRpB8ReXW`bgPu^adZN*Es2?pTCpgIn85pb#>y}bk)e+uM;Sg^CBdAET#(G8h z0u#8YW^v7)ZL=Cff>jKRL7#4tHPYKdo+qH1koFJBCsD)b+PMKgy=fSxFjTC!HC>x6 z+D=B7@cKQfD|-C>Cs)wfC_A%Ou`D5FnDyey4H)LM-;{u-+*hOw0i8`5RwIOZXE=@y zF^3TAlt9=VNo+xSG1&sFam5y*w}(?V~!DOGjm1=W-6+)8^N|( zXF%|VbPr$%-PWgXj^vgLN(f9bQ|0>tfjBgr#TgPV?onF%B}D+4C>BO9?st+ znxGoOP3txg3#`Wd36#&l4sEJ`=KDQ{qZbUB%~@-0`9)=PTIF0=&Ck|0l_516r9NI6 zV9R-h-xt=b=?Klb>Y2##RZ^;|$nrfCxw}#YzH)D{$_Uo_q8^?(rAWD0>J(*n$zRYv zMeDRGubxoY7{E;%Y9zt3SGMF@VYb|4hrQ)7XuHDn8`N1f1lxl2R_QIa-OIe#7G$1f zyYP118O5Sp2A4 z4z2S04NpKB_^`J$51vz0$n5ag60{dG@dSkUaM#^uJ;!*J_W@5;ujrRtUM zK2V=Ms3Sz=hq5O&n znO(z-#SEyn*_WOf@dCAS!NxM6VNoeo{iIyH;&RQ(4zKj~^J2B z%JOi5QKtGdT)RdesBvO+Z-WzQPU=Q_gnogZg^^|6kl~x-KxO&7e*8^kc+FDLPFAhc z7N_4p`3(BGv}@XmT2siX3NS_0+F!n}oG}_FiO!^@isXj8o(Z@yp^$P~^t%iQdCK)B zh(R$1U+!1JTsNFq<}I3_r!y)@Ywr{ZjclTKWSKAQRdX{8Xs6T1b}b0%&O{Nu zSaxMUUr7mO1z&sAkR099F+`<)8N}U6d<@#7^81CgnTisa7>rY?Ppt^RB_WS7X|jUK z)jU(5US?PJ3FG_}Rw-kkYE@5oR?J01gP9ctA&;`4!vnq|ZSf_$Qkg-ORIG%yUW1|m zoz@knoEd9&AhTbef}1vk z3h@I|(1=C0VsLE7>YQ zc_LPTm2)a=g!1#1IYpbdqR%xn6^vcYx9F^zMSB;AN^buQS8Xl!` zhG@`}f=c9tf<>%ktIYecDPv4V|OaR?VS>$WIc`&hqSiXeG^UpJxn#^d)0!k6>|{@y9ho`O zVZSpxbLwE5!-L}Q4y7gRJn~qu+w#vj1)+lStsLaK=s5d-+&cd#>-Wt7dX%4do>OJ}lQw_`* zQEP=TvS?_o{p;)Wwf42&yKYo#r#zUIAFXj)ebiVSjp`)YbTcwuRL)7?Sb_3f0WCqpRGwdBa#w^s@ zYYwI1|J|+Me7|aJr?IT;KCRC4m}{UpS9UAfuPiYf7Ryt1#Lu~=X9;Pw^OxVm(pT|rUqnhteZ__eun=Hiac*)u(GTabB{?ZPNOu;z(T)QmQ2 zDQKUKBjzp%A=c?ObF_eBBzP%|e*X$*>gG4$1#-yVz^qr><>G;kBW9 z#Tl6-uvyI7N^GsT7;iUXcCtq=EpbjQ`^U|FhU$F1sFkvI7Ai1z5NcZ6_@XJ>CPKxw z-Gd6%t7L6odY$)^|0z4k&E4I#_Ht|D6uskHZIsquH`Kg)+P2f!vQRZ_Ij*7qAJSdO z2QrFLyNQ4A=HV!dV>1vo!(iJ#_{Vo~)oB-24Q3&F!XKH^@CuhVjQj4(v~OY5wf;_6 z4FtbqJENYW1Fq0fnvvh&L?`*L_ZqBj=Gpes3hT#EwlKAWBl5!6{836xzk!H((QEAN zFhY%uAb-Ly6D$j03?i20VoQv6_d$){_ZU07wcq#s@g3Qw0~zxU(H?BetJT1bi9nPiY1_yA2R1dEE@fl~ zuWqxWt+4W54vSy(*-YR8&EoH{hIO%GwmA`7Tcdu}@V_3c|H`S(JvizoB{99UR(JKV zZlE;{%eEf9f9v(96-VupyP68`&t0H7xYrPt4Yz*Vs*1?4clz8qb`_+q?t!t~QQHt- z<4Qx6UmrEK-(TIBMpQ4{$gAmSBl_nS^I>C>&H9cE!gcd-Z9S#7D!1nI|FJ4Rh{YpY zuQpeTY`r^bsNP@OF^6{RXF-Qs4~^=CI+zPZ)&jwytRLmT*Yp#ZdZ|WkyzN)F1 zS?4f5x}cQ4mht<0?P1qL>((!8-f9^$MOX86trakrvwja1l3?!V)hxv%p}YUVuEX#VAz9g#>;+_ z8qAz6D5?`i*}T}L?dWxH+kQu5i=#P)s?js%_lkAxs&#AMwfjcaOx$Xr)`k&tkc(MO zv7DA#oz;jlz;=H9$C3wHpsd@^|D#$}Oq-1LLk_qA_aECLci7oP%m3W}o=)SmI&Y1v zTT?t37pUe}OIAz$lSbhEzsoaxmEU9X43{C|Bt~vxb-PGkiE_iE45HokM7|>tWrj@a zWjoajve~#OW3|7|WE!TLtkCaw4r+2W{ttEzqgmA45iIxrzr5{R4Sb(Y@cUc5*`g1o zksDtG&>OPt!)XT`9&DdW(?&$&qiBb6dTS22+VixJM%B@z+P+q18AscYZ&ZP4E^8gP zc`mN4_H^|@H>(PxEK`&XInc1qy`sLodq zti7$9?616QZ4Nb6gxQ9SCZ&x9wSAYb4%h$D-$d8p5r6sLmDf}Tw$2|@V^#w*{2Hs1 z*L0gdcc`zMF{?f4rg>CN+(^Cd14V(+GO2d+J9=s-hrXx7wtM41{j1hqvA?cl6=sY} z8P!9hTswPrt>xQGM(*mqqVwn0+F|FQ)vX!Xy({~6DXaaP{o+6kA!a|J^#fM*Th@d7 z#9ho*#M%~XZ138%-;>t5=kTDvdd6t{hnH;_RJ0e>b!*a*kBphVo2|i{3o*8F$~?;! zWS(WaFly#gv!5L0r9>^m7(>>6cNrc^C-1Q7Pi&?9Q$7@X@cpqC`(1NQS{>GGdB3~k zTD>)=+6xP86D0r|IAl@*T(~E@29ptX6svK53~iDJ-({Ueb2V{D)5{?jZ;?6)1GiS^$J*f**{y6X@oEKSc|cL^&elw9 z&BIt%);28Lw_Tf)#G2~N?EHq8SJQXJY#;5a=@Vl{(=|WKb#PxCBO`y+&u>}ZFsk8$ zMs3@+BajLhyJm+eLwj3N2(<@h5fwye1XpD0(un|@nb<>>1fga?NCxN zNji*{lHlY*U!ZeEsI&uL1hnJ$ic&jrh7|W0UB!nFD@XgQ!c#|kD%8h7J)`}6JkdXz z*MSvLw=0=kAr+xuMdet&AJ-wwpCZzUpY;??C=5=v2l3Yx^ealmm4<><6;Z*)_w-`I_-K|rMEg+YJ^`L$wq$!lws4hMZ(yP?6bz{Egxg}g z#lCQKN=vY;wi6UqdhM5#@_AF+2@1y+X?y5nL(AB=AC-0=u--BQCXq`FqGJ zaJ&&Q+a93;x3tl(SZa?@feTL7Bc8EGsK9ql(IeipN2tK_I_VK#*&|fomd<*F7)7Jv z6II~UE_y@*dxQ#H)lH9RVUJLOeY)!rJ?#-Ha8XY^Vz@m*1wPwLk0`ZAsKC75dc;I~ zgbIw$(j%_6N2tJs1NDg8>=7z(Wwsu%%pRcvKQbcL*dtV6ufh5iTkH`k@bV#g#Ao&h z6}V%l9MfVsK90;^@w)%2o?D0IeJ7NdxQ#{b)FtE z#vY*pkKzw$sg@YBN2tJajEL*(5i0O$BVwLCLIqZj(QmcV9-#u0#_ACp>=7#PnQ?l= zc6)>hbQS9n-`OKn;HUhZFO}SS{9QHkzeE+7Q>I5WvPY=EJA8UXOM8S0%=7CJ-Ru!6 caBR6Akz (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/Fb2P_Diff/fb2p_diff.frmdiff.sc2 b/Fb2P_Diff/fb2p_diff.frmdiff.sc2 new file mode 100644 index 0000000..8e7795e --- /dev/null +++ b/Fb2P_Diff/fb2p_diff.frmdiff.sc2 @@ -0,0 +1,1471 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_diff.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS frmdiff AS form + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="pgfDiff" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.lbl_File1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.lbl_File2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.txtFile1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.txtFile2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.cmdFile1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.cmdFile2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.txtDiffToolName" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.lbl_DiffTool" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.cmdDiff" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.shpFile1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.shpFile2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.chkShowCall" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.lbl_DiffTool" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.txtDiffToolConfig" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cboDiffToolName" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.Label1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmgEditPanel" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdResetAll" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdSave" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdCancel" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdSetDefault" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.txtDiffToolPath" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.Label2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdDiffToolPath" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="chkAlwaysOnTop" UniqueID="" Timestamp="" /> + + * + *m: cancel && Specifies if a CommandButton is the Cancel button. + *m: checkfilenames_dt + *m: create_default_cfg + *m: deletetool + *m: difftoolchanged + *m: difftoolcombo_refresh + *m: edittool + *m: filesdiff + *m: initialize + *m: load_cfg_data + *m: newtool + *m: resetalltools + *m: savetool + *m: save_cfg_data + *m: updateglobalenabled + *p: colorgreen + *p: coloryellow + *p: c_cfg_data && Contenido del archivo de configuración + *p: c_cfg_file && Ruta del archivo de configuración + *p: c_curdir && Ruta actual de la llamada + *p: c_fb2p_diff_fullpath && Ruta de este form + *p: difftoolconfig && Configuration for the Diff tool + *p: difftoolname && Name of the Diff tool + *p: difftoolpath + *p: filename1 + *p: filename1_dt + *p: filename2 + *p: filename2_dt + *p: lastfilename1 + *p: lastfilename2 + *p: l_editmode + *p: l_showcallonly && Show Diff Call Only, but don't Diff. (For testing) + *p: n_editoption + *p: n_selectedtoolindex + *p: n_toolcount + *p: ofb2p + *a: a_tools[1,3] + *p: _memberdata && XML Metadata for customizable properties + * + + * + AllowOutput = .F. + AlwaysOnTop = .T. + AutoCenter = .T. + BackColor = 255,255,255 + Caption = "Diff VFP 9 binary files (scx,vcx,mnx,pjx,frx,lbx,dbc,dbf)" + colorgreen = (RGB(35,245,24)) + coloryellow = (RGB(239,245,165)) + c_cfg_data = + c_cfg_file = + c_curdir = + c_fb2p_diff_fullpath = + difftoolconfig = + difftoolname = + difftoolpath = + DoCreate = .T. + filename1 = + filename1_dt = {} + filename2 = + filename2_dt = {} + Height = 191 + Icon = fb2p_diff.ico + lastfilename1 = + lastfilename2 = + l_editmode = .F. + l_showcallonly = .F. + MaxButton = .F. + Name = "frmDiff" + n_editoption = 0 + n_selectedtoolindex = 0 + n_toolcount = 0 + ofb2p = .NULL. + ShowTips = .T. + ShowWindow = 2 + Width = 760 + _memberdata = + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + + * + + ADD OBJECT 'chkAlwaysOnTop' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 8, ; + BackStyle = 0, ; + Caption = "Always on top", ; + ControlSource = "thisform.alwaysontop", ; + Height = 17, ; + Left = 652, ; + Name = "chkAlwaysOnTop", ; + TabIndex = 2, ; + Top = 8, ; + Value = .F., ; + Width = 96 + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'pgfDiff' AS pageframe WITH ; + Anchor = 15, ; + ErasePage = .T., ; + Height = 180, ; + Left = 8, ; + Name = "pgfDiff", ; + PageCount = 2, ; + TabIndex = 1, ; + TabStyle = 1, ; + Top = 4, ; + Width = 744, ; + Page1.Caption = "Files Diff", ; + Page1.Name = "pagFilesDiff", ; + Page2.Caption = "Diff tool configure", ; + Page2.Name = "pagDiffToolConfig" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.cboDiffToolName' AS combobox WITH ; + Anchor = 10, ; + BorderColor = 0,128,192, ; + Height = 24, ; + Left = 63, ; + Name = "cboDiffToolName", ; + SelectOnEntry = .T., ; + SpecialEffect = 1, ; + Style = 2, ; + TabIndex = 1, ; + Top = 12, ; + Width = 572 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdCancel' AS commandbutton WITH ; + Anchor = 8, ; + Caption = "Cancel", ; + Height = 27, ; + Left = 639, ; + Name = "cmdCancel", ; + TabIndex = 8, ; + Top = 116, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdDiffToolPath' AS commandbutton WITH ; + Anchor = 8, ; + Caption = "...", ; + Height = 27, ; + Left = 695, ; + Name = "cmdDiffToolPath", ; + TabIndex = 3, ; + Top = 42, ; + Width = 28 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdResetAll' AS commandbutton WITH ; + Anchor = 8, ; + Caption = "Reset All", ; + Height = 27, ; + Left = 399, ; + Name = "cmdResetAll", ; + TabIndex = 6, ; + Top = 116, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdSave' AS commandbutton WITH ; + Anchor = 8, ; + Caption = "Save", ; + Height = 27, ; + Left = 551, ; + Name = "cmdSave", ; + TabIndex = 7, ; + Top = 116, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdSetDefault' AS commandbutton WITH ; + Anchor = 8, ; + Caption = "Set Default", ; + Height = 27, ; + Left = 639, ; + Name = "cmdSetDefault", ; + TabIndex = 9, ; + Top = 10, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmgEditPanel' AS commandgroup WITH ; + Anchor = 2, ; + BackStyle = 0, ; + BorderStyle = 0, ; + ButtonCount = 3, ; + ControlSource = "THISFORM.n_EditOption", ; + Height = 36, ; + Left = 63, ; + Name = "cmgEditPanel", ; + SpecialEffect = 1, ; + TabIndex = 5, ; + Top = 112, ; + Value = 1, ; + Width = 268, ; + Command1.Caption = "New tool", ; + Command1.Height = 27, ; + Command1.Left = 4, ; + Command1.Name = "cmdNew", ; + Command1.Top = 4, ; + Command1.Width = 84, ; + Command2.Caption = "Edit tool", ; + Command2.Height = 27, ; + Command2.Left = 92, ; + Command2.Name = "cmdEdit", ; + Command2.Top = 4, ; + Command2.Width = 84, ; + Command3.Caption = "Delete tool", ; + Command3.Height = 27, ; + Command3.Left = 180, ; + Command3.Name = "cmdDelete", ; + Command3.Top = 4, ; + Command3.Width = 84 + *< END OBJECT: BaseClass="commandgroup" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.Label1' AS label WITH ; + BackStyle = 0, ; + Caption = "Config", ; + Height = 17, ; + Left = 15, ; + Name = "Label1", ; + TabIndex = 11, ; + Top = 80, ; + Width = 48 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.Label2' AS label WITH ; + BackStyle = 0, ; + Caption = "Path", ; + Height = 17, ; + Left = 15, ; + Name = "Label2", ; + TabIndex = 12, ; + Top = 48, ; + Width = 48 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.lbl_DiffTool' AS label WITH ; + BackStyle = 0, ; + Caption = "Diff tool", ; + Height = 17, ; + Left = 15, ; + Name = "lbl_DiffTool", ; + TabIndex = 10, ; + Top = 16, ; + Width = 48 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.txtDiffToolConfig' AS textbox WITH ; + Anchor = 10, ; + BorderColor = 0,128,192, ; + Enabled = .F., ; + Format = "T", ; + Height = 23, ; + Left = 63, ; + MaxLength = 255, ; + Name = "txtDiffToolConfig", ; + SelectOnEntry = .T., ; + SpecialEffect = 1, ; + TabIndex = 4, ; + ToolTipText = "Keywords: <>, <>", ; + Top = 76, ; + Width = 660 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'pgfDiff.pagDiffToolConfig.txtDiffToolPath' AS textbox WITH ; + Anchor = 10, ; + BorderColor = 0,128,192, ; + Enabled = .F., ; + Format = "T", ; + Height = 23, ; + Left = 63, ; + MaxLength = 255, ; + Name = "txtDiffToolPath", ; + SelectOnEntry = .T., ; + SpecialEffect = 1, ; + TabIndex = 2, ; + ToolTipText = "Keywords: <>, <>", ; + Top = 44, ; + Width = 628 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.chkShowCall' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 8, ; + BackStyle = 0, ; + Caption = "Only show Diff call (for testing)", ; + ControlSource = "THISFORM.l_ShowCallOnly", ; + Height = 17, ; + Left = 443, ; + Name = "chkShowCall", ; + TabIndex = 2, ; + Top = 116, ; + Value = .F., ; + Width = 192 + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.cmdDiff' AS commandbutton WITH ; + Anchor = 8, ; + Caption = "Diff", ; + Height = 60, ; + Left = 643, ; + Name = "cmdDiff", ; + TabIndex = 6, ; + Top = 80, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.cmdFile1' AS commandbutton WITH ; + Anchor = 8, ; + Caption = "...", ; + Height = 27, ; + Left = 667, ; + Name = "cmdFile1", ; + TabIndex = 2, ; + Top = 10, ; + Width = 28 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.cmdFile2' AS commandbutton WITH ; + Anchor = 8, ; + Caption = "...", ; + Height = 27, ; + Left = 667, ; + Name = "cmdFile2", ; + TabIndex = 4, ; + Top = 42, ; + Width = 28 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.lbl_DiffTool' AS label WITH ; + BackStyle = 0, ; + Caption = "Diff tool", ; + Height = 17, ; + Left = 11, ; + Name = "lbl_DiffTool", ; + TabIndex = 9, ; + Top = 88, ; + Width = 48 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.lbl_File1' AS label WITH ; + BackStyle = 0, ; + Caption = "File 1", ; + Height = 17, ; + Left = 11, ; + Name = "lbl_File1", ; + TabIndex = 7, ; + Top = 16, ; + Width = 36 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.lbl_File2' AS label WITH ; + BackStyle = 0, ; + Caption = "File 2", ; + Height = 17, ; + Left = 11, ; + Name = "lbl_File2", ; + TabIndex = 8, ; + Top = 48, ; + Width = 36 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.shpFile1' AS shape WITH ; + Anchor = 8, ; + BorderStyle = 0, ; + Curvature = 10, ; + Height = 23, ; + Left = 699, ; + Name = "shpFile1", ; + SpecialEffect = 1, ; + ToolTipText = "TXTStatus: Green=Unchanged, Yellow=Changed", ; + Top = 12, ; + Width = 24 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.shpFile2' AS shape WITH ; + Anchor = 8, ; + BorderStyle = 0, ; + Curvature = 10, ; + Height = 23, ; + Left = 699, ; + Name = "shpFile2", ; + SpecialEffect = 1, ; + ToolTipText = "TXTStatus: Green=Unchanged, Yellow=Changed", ; + Top = 44, ; + Width = 24 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.txtDiffToolName' AS textbox WITH ; + Anchor = 10, ; + BorderColor = 232,232,232, ; + ControlSource = "THISFORM.diffToolName", ; + Enabled = .F., ; + Format = "T", ; + Height = 23, ; + Left = 63, ; + MaxLength = 255, ; + Name = "txtDiffToolName", ; + SelectOnEntry = .T., ; + SpecialEffect = 1, ; + TabIndex = 5, ; + Top = 84, ; + Width = 564 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.txtFile1' AS textbox WITH ; + Anchor = 10, ; + BorderColor = 0,128,192, ; + ControlSource = "THISFORM.filename1", ; + Format = "T", ; + Height = 23, ; + Left = 63, ; + MaxLength = 255, ; + Name = "txtFile1", ; + OLEDropMode = 1, ; + SelectOnEntry = .T., ; + SpecialEffect = 1, ; + TabIndex = 1, ; + Top = 12, ; + Width = 600 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'pgfDiff.pagFilesDiff.txtFile2' AS textbox WITH ; + Anchor = 10, ; + BorderColor = 0,128,192, ; + ControlSource = "THISFORM.filename2", ; + Format = "T", ; + Height = 23, ; + Left = 63, ; + MaxLength = 255, ; + Name = "txtFile2", ; + OLEDropMode = 1, ; + SelectOnEntry = .T., ; + SpecialEffect = 1, ; + TabIndex = 3, ; + Top = 44, ; + Width = 600 + *< END OBJECT: BaseClass="textbox" /> + + PROCEDURE Activate + *-- activate + THISFORM.updateGlobalEnabled() + + ENDPROC + + PROCEDURE cancel && Specifies if a CommandButton is the Cancel button. + *-- cancel + THISFORM.l_EditMode = .F. + THISFORM.updateGlobalEnabled() + + WITH THISFORM.pgfDiff.pagDiffToolConfig.cboDiffToolName + .Style = 2 && Dropdown List + .RowSourceType= 5 + .RowSource = 'THISFORM.a_Tools' + .ControlSource = 'THISFORM.diffToolName' + .Value = THISFORM.diffToolName + THISFORM.pgfDiff.pagDiffToolConfig.txtDiffToolConfig.Value = THISFORM.diffToolConfig + THISFORM.pgfDiff.pagDiffToolConfig.txtDiffToolPath.Value = THISFORM.diffToolPath + .SetFocus() + ENDWITH + + ENDPROC + + PROCEDURE checkfilenames_dt + LPARAMETERS tnFilename + + LOCAL laFile1(1,5), laFile2(1,5), ltFilename1_dt, ltFilename2_dt, lnCodError, lcMessage, lnIcon ; + , lcFilename1, lcFilename2, lcExt, lcExt2, lcDir, lcFilename1_dt, lcFilename2_dt ; + , loFB2P as c_foxbin2prg OF foxbin2prg.prg + + #DEFINE CR_LF CHR(13)+CHR(10) + + TRY + lnCodError = 0 + STORE '' TO lcMessage, lcFilename1, lcFilename2, lcExt, lcExt2, lcDir + loFB2P = THIS.oFB2P + tnFilename = EVL(tnFilename, 0) + + DO CASE + CASE INLIST(tnFilename, 0, 1) AND EMPTY(THIS.filename1) + EXIT + CASE INLIST(tnFilename, 0, 2) AND EMPTY(THIS.filename2) + EXIT + ENDCASE + + IF INLIST(tnFilename, 0, 1) THEN + lcExt = JUSTEXT(THIS.filename1) + lcDir = JUSTPATH(THIS.filename1) + lcExt2 = loFB2P.get_Ext2FromExt( lcExt, lcDir ) + lcFilename1 = FORCEEXT( THIS.filename1, lcExt2 ) + + IF ADIR(laFile1, lcFilename1) = 1 THEN + lcFilename1_dt = '{^' + TRANSFORM( DTOS( laFile1(1,3) ), '@R ####/##/##' ) + ' ' + laFile1(1,4) + '}' + ltFilename1_dt = EVALUATE( lcFilename1_dt ) + + DO CASE + CASE EMPTY(THIS.filename1_dt) + THIS.filename1_dt = ltFilename1_dt + THIS.pgfDiff.pagFilesDiff.shpFile1.BackColor= THIS.colorGreen + THIS.lastFilename1 = THIS.filename1 + + CASE NOT THIS.filename1 == THIS.lastFilename1 + THIS.filename1_dt = ltFilename1_dt + THIS.pgfDiff.pagFilesDiff.shpFile1.BackColor= THIS.colorGreen + THIS.lastFilename1 = THIS.filename1 + + CASE THIS.filename1_dt <> ltFilename1_dt + THIS.pgfDiff.pagFilesDiff.shpFile1.BackColor= THIS.colorYellow + + OTHERWISE + THIS.pgfDiff.pagFilesDiff.shpFile1.BackColor= THIS.colorGreen + + ENDCASE + ENDIF + + ENDIF + + IF INLIST(tnFilename, 0, 2) THEN + lcExt = JUSTEXT(THIS.filename2) + lcDir = JUSTPATH(THIS.filename2) + lcExt2 = loFB2P.get_Ext2FromExt( lcExt, lcDir ) + lcFilename2 = FORCEEXT( THIS.filename2, lcExt2 ) + + IF ADIR(laFile2, lcFilename2) = 1 THEN + lcFilename2_dt = '{^' + TRANSFORM( DTOS( laFile2(1,3) ), '@R ####/##/##' ) + ' ' + laFile2(1,4) + '}' + ltFilename2_dt = EVALUATE( lcFilename2_dt ) + + DO CASE + CASE EMPTY(THIS.filename2_dt) + THIS.filename2_dt = ltFilename2_dt + THIS.pgfDiff.pagFilesDiff.shpFile2.BackColor= THIS.colorGreen + THIS.lastFilename2 = THIS.filename2 + + CASE NOT THIS.filename2 == THIS.lastFilename2 + THIS.filename2_dt = ltFilename2_dt + THIS.pgfDiff.pagFilesDiff.shpFile2.BackColor= THIS.colorGreen + THIS.lastFilename2 = THIS.filename2 + + CASE THIS.filename2_dt <> ltFilename2_dt + THIS.pgfDiff.pagFilesDiff.shpFile2.BackColor= THIS.colorYellow + + OTHERWISE + THIS.pgfDiff.pagFilesDiff.shpFile2.BackColor= THIS.colorGreen + + ENDCASE + ENDIF + ENDIF + + CATCH TO loEx + lnCodError = loEx.ErrorNo + lnIcon = 16 + *IF NOT EMPTY(loEx.UserValue) + loEx.UserValue = CR_LF ; + + 'lcDir = ' + TRANSFORM(lcDir) + CR_LF ; + + 'lcExt = ' + TRANSFORM(lcExt) + CR_LF ; + + 'lcExt2 = ' + TRANSFORM(lcExt2) + CR_LF ; + + 'tnFilename = ' + TRANSFORM(tnFilename) + CR_LF ; + + 'filename1 = "' + THIS.filename1 + '"' + CR_LF ; + + 'lcFilename1 = "' + lcFilename1 + '"' + CR_LF ; + + 'lcFilename1_dt = ' + TRANSFORM(lcFilename1_dt) + CR_LF ; + + 'laFile1(1,3) = ' + TRANSFORM(laFile1(1,3)) + CR_LF ; + + 'laFile1(1,4) = ' + TRANSFORM(laFile1(1,4)) + CR_LF ; + + 'filename2 = "' + THIS.filename2 + '"' + CR_LF ; + + 'lcFilename2 = "' + lcFilename2 + '"' + CR_LF ; + + 'lcFilename2_dt = ' + TRANSFORM(lcFilename2_dt) + CR_LF ; + + 'laFile2(1,3) = ' + TRANSFORM(laFile2(1,3)) + CR_LF ; + + 'laFile2(1,4) = ' + TRANSFORM(laFile2(1,4)) + CR_LF + *ENDIF + TEXT TO lcMessage TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2+4 + Error <>, <> + Procedure <>, Line <> + LineContents: <> + Details: <> + UserValue: <> + ENDTEXT + + FINALLY + IF lnCodError > 0 THEN + MESSAGEBOX( lcMessage, 0+lnIcon, 'FoxBin2Prg checkFilenames_dt' ) + ENDIF + + ENDTRY + + #UNDEF CR_LF + + ENDPROC + + PROCEDURE create_default_cfg + *-- create_Default_CFG + LOCAL lcPath + + lcPath = EVL( JUSTPATH(THISFORM.c_CFG_File), JUSTPATH(SYS(16)) ) + + IF LEFT(lcPath,10) == 'PROCEDURE ' THEN + lcPath = SUBSTR( lcPath, AT(' ', lcPath, 2) + 1 ) + ENDIF + + *-- Configuración de Herramientas DIFF predefinidas + THIS.n_ToolCount = 1 + DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) + THIS.a_Tools( THIS.n_ToolCount, 1 ) = 'WinMergePortable' + THIS.a_Tools( THIS.n_ToolCount, 2 ) = '/e /x /u /maximize <> <>' + THIS.a_Tools( THIS.n_ToolCount, 3 ) = '<>WinMergePortable\WinMergePortable.exe' + + THIS.n_ToolCount = 2 + DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) + THIS.a_Tools( THIS.n_ToolCount, 1 ) = 'Beyond Compare 2' + THIS.a_Tools( THIS.n_ToolCount, 2 ) = '<> <>' + THIS.a_Tools( THIS.n_ToolCount, 3 ) = '<>Beyond Compare 2\BC2.exe' + + *-- + THIS.diffToolName = THIS.a_Tools( 1, 1 ) + THIS.diffToolConfig = THIS.a_Tools( 1, 2 ) + THIS.diffToolPath = THIS.a_Tools( 1, 3 ) + THIS.save_CFG_Data() + THIS.diffToolCombo_Refresh() + THIS.diffToolChanged() + THIS.Refresh() + + ENDPROC + + PROCEDURE deletetool + *-- deleteTool + LOCAL locboDiffToolName as ComboBox, loTxtDiffToolCfg as TextBox, loTxtDiffToolPath as TextBox, lnListIndex + + locboDiffToolName = THIS.pgfDiff.pagDiffToolConfig.cboDiffToolName + loTxtDiffToolCfg = THIS.pgfDiff.pagDiffToolConfig.txtDiffToolConfig + loTxtDiffToolPath = THIS.pgfDiff.pagDiffToolConfig.txtDiffToolPath + + IF MESSAGEBOX( '¿Confirm Delete?',4+32+256+4096, 'FoxBin2Prg: Delete tool config' ) = 6 THEN + + IF THIS.n_ToolCount > 0 THEN + lnListIndex = locboDiffToolName.ListIndex + THIS.n_ToolCount = THIS.n_ToolCount - 1 + + IF THIS.n_ToolCount > 0 THEN + ADEL(THIS.a_Tools, lnListIndex) + DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) + ELSE + THIS.a_Tools = '' + ENDIF + + IF THIS.n_ToolCount > 0 THEN + IF lnListIndex > THIS.n_ToolCount THEN + lnListIndex = THIS.n_ToolCount + ENDIF + locboDiffToolName.ListIndex = lnListIndex + THIS.diffToolConfig = THIS.a_Tools(lnListIndex,2) + THIS.diffToolPath = THIS.a_Tools(lnListIndex,3) + loTxtDiffToolCfg.Value = THIS.diffToolConfig + loTxtDiffToolPath.Value = THIS.diffToolPath + ELSE + locboDiffToolName.ListIndex = 0 + THIS.diffToolName = '' + THIS.diffToolPath = '' + THIS.diffToolConfig = '' + loTxtDiffToolCfg.Value = '' + loTxtDiffToolPath.Value = '' + ENDIF + + locboDiffToolName.RowSource = locboDiffToolName.RowSource + locboDiffToolName.Refresh() + THIS.save_CFG_Data() + THIS.updateGlobalEnabled() + ENDIF + ENDIF + + ENDPROC + + PROCEDURE Destroy + *-- destroy + THIS.oFB2P = NULL + + IF _VFP.StartMode = 0 THEN + lcFB2P_App = 'foxbin2prg.prg' + ELSE + lcFB2P_App = 'foxbin2prg.exe' + ENDIF + + DO CASE + CASE ATC( lcFB2P_App, SET("Procedure") ) > 0 + RELEASE PROCEDURE (lcFB2P_App) + CASE ATC( FORCEEXT(lcFB2P_App, 'FXP'), SET("Procedure") ) > 0 + RELEASE PROCEDURE (FORCEEXT(lcFB2P_App, 'FXP')) + ENDCASE + + ENDPROC + + PROCEDURE difftoolchanged + *-- diffToolChanged + + WITH THISFORM.pgfDiff.pagDiffToolConfig.cboDiffToolName + IF .ListCount > 0 THEN + THISFORM.diffToolConfig = THISFORM.a_Tools(.ListIndex,2) + THISFORM.diffToolPath = THISFORM.a_Tools(.ListIndex,3) + THISFORM.n_SelectedToolIndex = .ListIndex + .Parent.txtDiffToolConfig.Value = THISFORM.diffToolConfig + .Parent.txtDiffToolPath.Value = THISFORM.diffToolPath + ENDIF + ENDWITH + + ENDPROC + + PROCEDURE difftoolcombo_refresh + WITH THIS.pgfDiff.pagDiffToolConfig.cboDiffToolName + IF THIS.l_EditMode THEN + .Clear() + .ControlSource = '' + .RowSourceType = 1 && Value + .RowSource = '' + .Style = 0 && Dropdown Combo + .AddItem(THIS.diffToolName) + .Value = THIS.diffToolName + .SelectOnEntry = .T. + ELSE + .Style = 2 && Dropdown List + .RowSourceType = 5 && Array + .RowSource = 'THISFORM.a_Tools' + .ControlSource = 'THISFORM.diffToolName' + .Value = THIS.diffToolName + + IF .ListIndex > THIS.n_ToolCount THEN + .ListIndex = THIS.n_ToolCount + ENDIF + + THIS.n_SelectedToolIndex = .ListIndex + ENDIF + ENDWITH + + ENDPROC + + PROCEDURE edittool + *-- editTool + + THISFORM.l_EditMode = .T. + THISFORM.updateGlobalEnabled() + + WITH THISFORM.pgfDiff.pagDiffToolConfig.cboDiffToolName + THISFORM.diffToolCombo_Refresh() + .SetFocus() + ENDWITH + + ENDPROC + + PROCEDURE filesdiff + *-- filesDiff + + LOCAL laFile(1,5), lcMessage, lnIcon, lcFilename1, lcFilename2, lcDiffToolConfig ; + , llAlwaysOnTop, lnCodError, lcDiffToolPath ; + , loShell AS WScript.Shell ; + , loEx as Exception ; + , loFB2P as c_foxbin2prg OF foxbin2prg.prg + + #DEFINE CR_LF CHR(13)+CHR(10) + + TRY + loFB2P = THIS.oFB2P + lnCodError = 0 + + WITH THISFORM as Form + llAlwaysOnTop = .AlwaysOnTop + lcFilename1 = '"' + FORCEEXT( .filename1, loFB2P.get_Ext2FromExt( JUSTEXT(.filename1), JUSTPATH(.filename1) ) ) + '"' + lcFilename2 = '"' + FORCEEXT( .filename2, loFB2P.get_Ext2FromExt( JUSTEXT(.filename2), JUSTPATH(.filename2) ) ) + '"' + + lcDiffToolConfig = THIS.diffToolConfig + lcDiffToolConfig = STRTRAN( lcDiffToolConfig, '<>', '<>', 1, 1, 1 ) + lcDiffToolConfig = STRTRAN( lcDiffToolConfig, '<>', '<>', 1, 1, 1 ) + lcDiffToolConfig = TEXTMERGE(lcDiffToolConfig) + + lcDiffToolPath = '"' + THISFORM.diffToolPath + '"' + lcDiffToolPath = STRTRAN( lcDiffToolPath, '<>', '<>', 1, 1, 1 ) + lcDiffToolPath = STRTRAN( lcDiffToolPath, '<>', '<>', 1, 1, 1 ) + lcDiffToolPath = TEXTMERGE(lcDiffToolPath) + + IF THISFORM.l_ShowCallOnly THEN + MESSAGEBOX( lcDiffToolPath + ' ' + lcDiffToolConfig ) + EXIT + ENDIF + + IF ADIR(laFile, .Filename1) = 0 THEN + lcMessage = 'File not found' + ERROR lcMessage + ': [' + .Filename1 + ']' + ENDIF + + IF ADIR(laFile, .Filename2) = 0 THEN + lcMessage = 'File not found' + ERROR lcMessage + ': [' + .Filename2 + ']' + ENDIF + + IF ADIR(laFile, lcDiffToolPath) = 0 THEN + lcMessage = 'File not found' + ERROR lcMessage + ': [' + lcDiffToolPath + ']' + ENDIF + + IF NOT loFB2P.hasSupport_Bin2Prg( .filename1 ) + lcMessage = 'File type not supported' + ERROR lcMessage + ': [' + .filename1 + ']' + ENDIF + + lcMessage = 'File is in use [' + .filename1 + ']' + USE (.filename1) EXCLUSIVE + USE + + IF NOT loFB2P.hasSupport_Bin2Prg( .filename2 ) + lcMessage = 'File type not supported' + ERROR lcMessage + ': [' + .filename1 + ']' + ENDIF + + lcMessage = 'File is in use [' + .filename2 + ']' + USE (.filename2) EXCLUSIVE + USE + + lcMessage = .Filename1 + loFB2P.execute( .Filename1, '', '', '', '1', '0', '0', NULL, NULL, .T. ) + + lcMessage = .Filename2 + loFB2P.execute( .Filename2, '', '', '', '1', '0', '0', NULL, NULL, .T. ) + + lcMessage = '' + + IF llAlwaysOnTop THEN + THIS.AlwaysOnTop = .F. + ENDIF + + loShell = CREATEOBJECT('WScript.Shell') + + THIS.filename1_dt = {//::} + THIS.filename2_dt = {//::} + THIS.checkFilenames_dt() + + lnResp = loShell.Run( lcDiffToolPath + ' ' + lcDiffToolConfig, 1, 1) + + IF lnResp = 0 THEN + *-- OK + THIS.checkFilenames_dt() + ELSE + MESSAGEBOX( 'DIFF operation returned the code ' + TRANSFORM(lnResp), 0+48, 'FoxBin2Prg: Diff VFP 9 binary files' ) + ENDIF + + *THIS.lastFilename1 = THIS.filename1 + *THIS.lastFilename2 = THIS.filename2 + + ENDWITH + + CATCH TO loEx WHEN loEx.ErrorNo = 3 + lnCodError = loEx.ErrorNo + lnIcon = 48 + + CATCH TO loEx WHEN loEx.ErrorNo = 1098 + lnCodError = loEx.ErrorNo + lnIcon = 48 + lcMessage = loEx.Message + + CATCH TO loEx + lnCodError = loEx.ErrorNo + lnIcon = 16 + IF NOT EMPTY(lcMessage) + loEx.UserValue = lcMessage + ENDIF + TEXT TO lcMessage TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2+4 + Error <>, <> + Procedure <>, Line <> + LineContents: <> + Details: <> + UserValue: <> + ENDTEXT + + FINALLY + IF lnCodError > 0 THEN + MESSAGEBOX( lcMessage, 0+lnIcon, 'FoxBin2Prg Diff Status' ) + ENDIF + + THIS.AlwaysOnTop = llAlwaysOnTop + STORE NULL TO loShell, loFB2P + RELEASE loShell, loFB2P + ENDTRY + + #UNDEF CR_LF + + RETURN + + ENDPROC + + PROCEDURE Init + LOCAL lcSys16, lnPosProg + + *-- init + THISFORM.MinHeight = THISFORM.Height + THISFORM.MaxHeight = THISFORM.Height + THISFORM.MinWidth = THISFORM.Width + + THISFORM.a_Tools = '' + + lcSys16 = SYS(16) + IF LEFT(lcSys16,10) == 'PROCEDURE ' + lnPosProg = AT(" ", lcSys16, 2) + 1 + ELSE + lnPosProg = 1 + ENDIF + + THIS.c_CurDir = SYS(5) + CURDIR() && Directorio actual, que no necesariamente es donde está FoxBin2Prg + THIS.c_fb2p_diff_FullPath = SUBSTR( lcSys16, lnPosProg ) + THIS.c_CFG_File = FORCEEXT( THIS.c_fb2p_diff_FullPath, 'CFG' ) + + ENDPROC + + PROCEDURE initialize + *-- initialize + LOCAL lcFB2P_App + + IF VARTYPE(THIS.oFB2P) <> "O" OR ISNULL(THIS.oFB2P) + IF _VFP.StartMode = 0 THEN + lcFB2P_App = 'foxbin2prg.prg' + ELSE + lcFB2P_App = 'foxbin2prg.exe' + ENDIF + + SET PROCEDURE TO (lcFB2P_App) + THIS.oFB2P = CREATEOBJECT('c_foxbin2prg') + ENDIF + + THIS.load_CFG_Data() + THIS.diffToolCombo_Refresh() + THIS.diffToolChanged() + THIS.updateGlobalEnabled() + + ENDPROC + + PROCEDURE load_cfg_data + *-- load_CFG_Data + LOCAL laFile(1,5), llCreateNewCFGFile, I, lcDiffTool + + #DEFINE CR_LF CHR(13) + CHR(10) + + *-- Estructura de CFG_Data: + *-- tool-nametool-config + *-- tool-nametool-config + *-- tool-name + + IF ADIR(laFile, THIS.c_CFG_File) = 1 + THIS.c_CFG_Data = FILETOSTR( THIS.c_CFG_File ) + + DO CASE + CASE EMPTY(THIS.c_CFG_Data) OR EMPTY( STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) ) + llCreateNewCFGFile = .T. + CASE EMPTY( STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) ) + THIS.diffToolName = STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) + THIS.c_CFG_Data = THIS.c_CFG_Data + CR_LF + '' + THIS.diffToolName + '' + THIS.save_CFG_Data() + OTHERWISE + THIS.diffToolName = STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) + ENDCASE + ELSE + llCreateNewCFGFile = .T. + ENDIF + + *-- Si no hay CFG, creo uno por defecto + IF llCreateNewCFGFile + THIS.create_Default_CFG() + ENDIF + + *-- Lo cargo en el combobox + THIS.diffToolName = STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) + THIS.n_ToolCount = 0 + + FOR I = 1 TO OCCURS('', THIS.c_CFG_Data ) + THIS.n_ToolCount = THIS.n_ToolCount + 1 + DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) + lcDiffTool = STREXTRACT(THIS.c_CFG_Data, '', '', I, 1) + THIS.a_Tools( THIS.n_ToolCount, 1 ) = STREXTRACT(lcDiffTool, '', '', 1, 1) + THIS.a_Tools( THIS.n_ToolCount, 2 ) = STREXTRACT(lcDiffTool, '', '', 1, 1) + THIS.a_Tools( THIS.n_ToolCount, 3 ) = STREXTRACT(lcDiffTool, '', '', 1, 1) + + IF EMPTY(THIS.diffToolConfig) AND THIS.a_Tools( THIS.n_ToolCount, 1 ) == THIS.diffToolName THEN + THIS.diffToolConfig = THIS.a_Tools( THIS.n_ToolCount, 2 ) + ENDIF + + IF EMPTY(THIS.diffToolPath) AND THIS.a_Tools( THIS.n_ToolCount, 1 ) == THIS.diffToolName THEN + THIS.diffToolPath = THIS.a_Tools( THIS.n_ToolCount, 3 ) + ENDIF + ENDFOR + + #UNDEF CR_LF + + ENDPROC + + PROCEDURE newtool + *-- newTool + + THISFORM.l_EditMode = .T. + THISFORM.updateGlobalEnabled() + + WITH THISFORM.pgfDiff.pagDiffToolConfig.cboDiffToolName + .RowSourceType= 0 + .RowSource = '' + .ControlSource = '' + .Style = 0 && Dropdown Combo + .Value = '' + .SetFocus() + ENDWITH + + THISFORM.pgfDiff.pagDiffToolConfig.txtDiffToolConfig.Value = '' + THISFORM.pgfDiff.pagDiffToolConfig.txtDiffToolPath.Value = '' + + ENDPROC + + PROCEDURE QueryUnload + CLEAR EVENTS + + ENDPROC + + PROCEDURE resetalltools + *-- resetAllTools + THIS.cancel() + THIS.create_Default_CFG() + THIS.initialize() + THIS.updateGlobalEnabled() + + ENDPROC + + PROCEDURE savetool + *-- saveTool + LOCAL lnItem + + THIS.l_EditMode = .F. + THIS.updateGlobalEnabled() + + WITH THIS.pgfDiff.pagDiffToolConfig.cboDiffToolName + THIS.diffToolName = .Text + THIS.diffToolConfig = THIS.pgfDiff.pagDiffToolConfig.txtDiffToolConfig.Value + THIS.diffToolPath = THIS.pgfDiff.pagDiffToolConfig.txtDiffToolPath.Value + + IF THIS.n_EditOption = 1 THEN + *-- New tool + THIS.n_ToolCount = THIS.n_ToolCount + 1 + DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) + lnItem = THIS.n_ToolCount + ELSE + *-- Edit tool + lnItem = THIS.n_SelectedToolIndex + ENDIF + + THIS.a_Tools( lnItem, 1 ) = THIS.diffToolName + THIS.a_Tools( lnItem, 2 ) = THIS.diffToolConfig + THIS.a_Tools( lnItem, 3 ) = THIS.diffToolPath + THIS.diffToolCombo_Refresh() + .SetFocus() + + THIS.n_SelectedToolIndex = .ListIndex + THIS.save_CFG_Data() + THIS.updateGlobalEnabled() + ENDWITH + + ENDPROC + + PROCEDURE save_cfg_data + *-- save_CFG_Data + LOCAL I + + #DEFINE CR_LF CHR(13) + CHR(10) + + THIS.c_CFG_Data = '' + + TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2+4 + <<>> + ENDTEXT + + FOR I = 1 TO THIS.n_ToolCount + TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2+4 + <<>> + <<>> <> + <<>> <> + <<>> <> + <<>> + ENDTEXT + ENDFOR + + IF EMPTY(THIS.diffToolName) THEN + IF NOT EMPTY(THIS.a_Tools(1,1)) THEN + TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2+4 + <<>> <> + ENDTEXT + ENDIF + ELSE + TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2+4 + <<>> <> + ENDTEXT + ENDIF + + TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2+4 + <<>> + ENDTEXT + + STRTOFILE( THIS.c_CFG_Data, THIS.c_CFG_File ) + + #UNDEF CR_LF + + ENDPROC + + PROCEDURE updateglobalenabled + *-- updateGlobalEnabled + LOCAL lopagFilesDiff as Page, loPagConfig as Page, cmgPanel as CommandGroup + + WITH THIS AS Form + lopagFilesDiff = .pgfDiff.pagFilesDiff + loPagConfig = .pgfDiff.pagDiffToolConfig + cmgPanel = loPagConfig.cmgEditPanel + + *-- Edit? + loPagConfig.txtDiffToolConfig.Enabled = .l_EditMode + loPagConfig.txtDiffToolPath.Enabled = .l_EditMode + cmgPanel.cmdNew.Enabled = NOT .l_EditMode + cmgPanel.cmdEdit.Enabled = NOT .l_EditMode AND .n_ToolCount > 0 + cmgPanel.cmdDelete.Enabled = NOT .l_EditMode AND .n_ToolCount > 0 + loPagConfig.cmdDiffToolPath.Enabled = .l_EditMode + loPagConfig.cmdSetDefault.Enabled = NOT .l_EditMode AND .n_ToolCount > 0 + loPagConfig.cmdSave.Enabled = .l_EditMode + loPagConfig.cmdCancel.Enabled = .l_EditMode + lopagFilesDiff.Enabled = NOT .l_EditMode + + *-- cmdDiff + lopagFilesDiff.cmdDiff.Enabled = NOT .l_EditMode ; + AND NOT EMPTY(.filename1) AND NOT EMPTY(.filename2) ; + AND NOT .filename1 == .filename2 ; + AND NOT EMPTY(.diffToolName) AND NOT EMPTY(.diffToolPath) AND NOT EMPTY(.diffToolConfig) + + THIS.checkFilenames_dt() + ENDWITH && THISFORM + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.Activate + THISFORM.updateGlobalEnabled() + THIS.cboDiffToolName.SetFocus() + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cboDiffToolName.DropDown + IF THISFORM.l_EditMode OR THIS.ListCount = 0 THEN + NODEFAULT + ENDIF + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cboDiffToolName.InteractiveChange + IF NOT THISFORM.l_EditMode + THISFORM.diffToolChanged() + ENDIF + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cmdCancel.Click + THISFORM.cancel() + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cmdDiffToolPath.Click + LOCAL lcFile + + lcFile = GETFILE('exe') + + IF NOT EMPTY(lcFile) THEN + THIS.Parent.txtDiffToolPath.Value = lcFile + THIS.Parent.txtDiffToolPath.Refresh() + *THISFORM.updateGlobalEnabled() + ENDIF + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cmdResetAll.Click + THISFORM.resetAllTools() + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cmdSave.Click + THISFORM.saveTool() + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cmdSetDefault.Click + THISFORM.save_CFG_Data() + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cmgEditPanel.cmdDelete.Click + THISFORM.deleteTool() + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cmgEditPanel.cmdEdit.Click + THISFORM.editTool() + + ENDPROC + + PROCEDURE pgfDiff.pagDiffToolConfig.cmgEditPanel.cmdNew.Click + THISFORM.newTool() + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.Activate + THISFORM.updateGlobalEnabled() + THIS.txtFile1.SetFocus() + *THIS.txtDiffToolName.Refresh() + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.cmdDiff.Click + THISFORM.filesDiff() + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.cmdFile1.Click + LOCAL lcFile + + lcFile = GETFILE('scx;vcx;mnx;pjx;frx;lbx;dbc;dbf') + + IF NOT EMPTY(lcFile) THEN + THISFORM.filename1 = lcFile + THIS.Parent.txtFile1.Refresh() + THISFORM.updateGlobalEnabled() + ENDIF + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.cmdFile2.Click + LOCAL lcFile + + lcFile = GETFILE('scx;vcx;mnx;pjx;frx;lbx;dbc;dbf') + + IF NOT EMPTY(lcFile) THEN + THISFORM.filename2 = lcFile + THIS.Parent.txtFile2.Refresh() + THISFORM.updateGlobalEnabled() + ENDIF + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.txtFile1.InteractiveChange + THISFORM.updateGlobalEnabled() + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.txtFile1.OLEDragDrop + LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord + LOCAL aValues, i, cText, nOperation + + *-- Check to see whether the user wants to copy or move + *IF nShift == 1 + nOperation = 1 &&DROPEFFECT_COPY + *ELSE + * nOperation = 2 &&DROPEFFECT_MOVE + *ENDIF + + *Thisform.LockScreen = .T. + + DO CASE + CASE oDataObject.GetFormat(1) && Text + cText = oDataObject.GetData(1) + + *-- Add the text as a new item in the list + *This.AddItem( cText ) + *? 2, cText + + CASE oDataObject.GetFormat(15) && Files CF_DROP + DIMENSION aValues[1] + oDataObject.GetData(15, @aValues ) + + *-- Add each filename as a new item in the list + *!* FOR i = 1 to alen(aValues) + *!* This.AddItem(aValues[m.i]) + *!* NEXT + *? 3, aValues[1] + THIS.Value = aValues[1] + ENDCASE + + *Thisform.LockScreen = .F. + + *-- Set the nEffect parameter for communication back to the source object + nEffect = nOperation + *NODEFAULT + THISFORM.updateGlobalEnabled() + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.txtFile1.OLEDragOver + LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord, nState + + DO CASE + CASE nState == 0 &&DRAG_ENTER + DO CASE + *CASE oDataObject.GetFormat("OLE Variant Array") && Array + * This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL + * This.OLEDropEffects = 1+2 &&DROPEFFECT_COPY + DROPEFFECT_MOVE + + CASE oDataObject.GetFormat(1) && Text + This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL + This.OLEDropEffects = 1+2 &&DROPEFFECT_COPY + DROPEFFECT_MOVE + + CASE oDataObject.GetFormat(15) && Files CF_HDROP + This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL + *This.OLEDropEffects = 4 &&DROPEFFECT_LINK + This.OLEDropEffects = 1 &&DROPEFFECT_COPY + OTHERWISE + This.OLEDropHasData = 0 &&DROPHASDATA_NOTUSEFUL + ENDCASE + + CASE nState == 1 && Drag Leave + CASE nState == 2 && Drag Over + ENDCASE + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.txtFile1.Valid + THISFORM.updateGlobalEnabled() + *THISFORM.checkFilenames_dt(1) + THIS.Refresh() + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.txtFile2.InteractiveChange + THISFORM.updateGlobalEnabled() + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.txtFile2.OLEDragDrop + LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord + LOCAL aValues, i, cText, nOperation + + *-- Check to see whether the user wants to copy or move + *IF nShift == 1 + nOperation = 1 &&DROPEFFECT_COPY + *ELSE + * nOperation = 2 &&DROPEFFECT_MOVE + *ENDIF + + *Thisform.LockScreen = .T. + + DO CASE + CASE oDataObject.GetFormat(1) && Text + cText = oDataObject.GetData(1) + + *-- Add the text as a new item in the list + *This.AddItem( cText ) + *? 2, cText + + CASE oDataObject.GetFormat(15) && Files CF_DROP + DIMENSION aValues[1] + oDataObject.GetData(15, @aValues ) + + *-- Add each filename as a new item in the list + *!* FOR i = 1 to alen(aValues) + *!* This.AddItem(aValues[m.i]) + *!* NEXT + *? 3, aValues[1] + THIS.Value = aValues[1] + ENDCASE + + *Thisform.LockScreen = .F. + + *-- Set the nEffect parameter for communication back to the source object + nEffect = nOperation + *NODEFAULT + THISFORM.updateGlobalEnabled() + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.txtFile2.OLEDragOver + LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord, nState + + DO CASE + CASE nState == 0 &&DRAG_ENTER + DO CASE + *CASE oDataObject.GetFormat("OLE Variant Array") && Array + * This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL + * This.OLEDropEffects = 1+2 &&DROPEFFECT_COPY + DROPEFFECT_MOVE + + CASE oDataObject.GetFormat(1) && Text + This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL + This.OLEDropEffects = 1+2 &&DROPEFFECT_COPY + DROPEFFECT_MOVE + + CASE oDataObject.GetFormat(15) && Files CF_HDROP + This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL + *This.OLEDropEffects = 4 &&DROPEFFECT_LINK + This.OLEDropEffects = 1 &&DROPEFFECT_COPY + OTHERWISE + This.OLEDropHasData = 0 &&DROPHASDATA_NOTUSEFUL + ENDCASE + + CASE nState == 1 && Drag Leave + CASE nState == 2 && Drag Over + ENDCASE + + ENDPROC + + PROCEDURE pgfDiff.pagFilesDiff.txtFile2.Valid + THISFORM.updateGlobalEnabled() + *THISFORM.checkFilenames_dt(2) + THIS.Refresh() + + ENDPROC + +ENDDEFINE diff --git a/Fb2P_Diff/fb2p_diff.pj2 b/Fb2P_Diff/fb2p_diff.pj2 index a427afc..73fd65d 100644 --- a/Fb2P_Diff/fb2p_diff.pj2 +++ b/Fb2P_Diff/fb2p_diff.pj2 @@ -33,7 +33,7 @@ _AutoIncrement = "0" * -*<.HomeDir = 'g:\desa\foxbin2prg' /> +*<.HomeDir = 'e:\se\vfpx\foxbin2prg\fb2p_diff' /> FOR EACH loProject IN _VFP.Projects FOXOBJECT loProject.Close() @@ -50,10 +50,10 @@ MODIFY PROJECT 'fb2p_diff.pjx' NOWAIT NOSHOW NOPROJECTHOOK loProject = _VFP.Projects('fb2p_diff.pjx') WITH loProject.FILES - .ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" DevInfo="" /> - .ADD('fb2p_diff.ico') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" DevInfo="" /> - .ADD('fb2p_diff.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" DevInfo="" /> - .ADD('main_fb2p_diff.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" DevInfo="" /> + .ADD('config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('fb2p_diff.ico') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('fb2p_diff.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" /> + .ADD('main_fb2p_diff.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" /> * .ITEM('__newproject.f2b').Remove() @@ -65,13 +65,14 @@ WITH loProject.FILES * * - .ITEM(lcCurdir + 'config\config.fpw').Type = 'T' + .ITEM(lcCurdir + 'config.fpw').Type = 'T' * ENDWITH WITH loProject * .SetMain(lcCurdir + 'main_fb2p_diff.prg') + .Icon = lcCurdir + 'fb2p_diff.ico' .Debug = .T. .Encrypted = .F. diff --git a/Fb2P_Diff/fb2p_diff.sc2 b/Fb2P_Diff/fb2p_diff.sc2 index eb35c7b..9f8d81f 100644 --- a/Fb2P_Diff/fb2p_diff.sc2 +++ b/Fb2P_Diff/fb2p_diff.sc2 @@ -4,1479 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_diff.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="frmdiff" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS frmdiff AS form - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="pgfDiff" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.lbl_File1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.lbl_File2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.txtFile1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.txtFile2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.cmdFile1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.cmdFile2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.txtDiffToolName" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.lbl_DiffTool" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.cmdDiff" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.shpFile1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.shpFile2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagFilesDiff.chkShowCall" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.lbl_DiffTool" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.txtDiffToolConfig" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cboDiffToolName" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.Label1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmgEditPanel" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdResetAll" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdSave" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdCancel" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdSetDefault" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.txtDiffToolPath" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.Label2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgfDiff.pagDiffToolConfig.cmdDiffToolPath" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="chkAlwaysOnTop" UniqueID="" Timestamp="" /> - - * - *m: cancel && Specifies if a CommandButton is the Cancel button. - *m: checkfilenames_dt - *m: create_default_cfg - *m: deletetool - *m: difftoolchanged - *m: difftoolcombo_refresh - *m: edittool - *m: filesdiff - *m: initialize - *m: load_cfg_data - *m: newtool - *m: resetalltools - *m: savetool - *m: save_cfg_data - *m: updateglobalenabled - *p: colorgreen - *p: coloryellow - *p: c_cfg_data && Contenido del archivo de configuración - *p: c_cfg_file && Ruta del archivo de configuración - *p: c_curdir && Ruta actual de la llamada - *p: c_fb2p_diff_fullpath && Ruta de este form - *p: difftoolconfig && Configuration for the Diff tool - *p: difftoolname && Name of the Diff tool - *p: difftoolpath - *p: filename1 - *p: filename1_dt - *p: filename2 - *p: filename2_dt - *p: lastfilename1 - *p: lastfilename2 - *p: l_editmode - *p: l_showcallonly && Show Diff Call Only, but don't Diff. (For testing) - *p: n_editoption - *p: n_selectedtoolindex - *p: n_toolcount - *p: ofb2p - *a: a_tools[1,3] - *p: _memberdata && XML Metadata for customizable properties - * - - AllowOutput = .F. - AlwaysOnTop = .T. - AutoCenter = .T. - BackColor = 255,255,255 - Caption = "Diff VFP 9 binary files (scx,vcx,mnx,pjx,frx,lbx,dbc,dbf)" - colorgreen = (RGB(35,245,24)) - coloryellow = (RGB(239,245,165)) - c_cfg_data = && Contenido del archivo de configuración - c_cfg_file = && Ruta del archivo de configuración - c_curdir = && Ruta actual de la llamada - c_fb2p_diff_fullpath = && Ruta de este form - difftoolconfig = && Configuration for the Diff tool - difftoolname = && Name of the Diff tool - difftoolpath = - DoCreate = .T. - filename1 = - filename1_dt = {} - filename2 = - filename2_dt = {} - Height = 191 - Icon = fb2p_diff.ico - lastfilename1 = - lastfilename2 = - l_editmode = .F. - l_showcallonly = .F. && Show Diff Call Only, but don't Diff. (For testing) - MaxButton = .F. - Name = "frmDiff" - n_editoption = 0 - n_selectedtoolindex = 0 - n_toolcount = 0 - ofb2p = .NULL. - ShowTips = .T. - ShowWindow = 2 - Width = 760 - _memberdata = - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - && XML Metadata for customizable properties - - ADD OBJECT 'chkAlwaysOnTop' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 8, ; - BackStyle = 0, ; - Caption = "Always on top", ; - ControlSource = "thisform.alwaysontop", ; - Height = 17, ; - Left = 652, ; - Name = "chkAlwaysOnTop", ; - TabIndex = 2, ; - Top = 8, ; - Value = .F., ; - Width = 96 - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'pgfDiff' AS pageframe WITH ; - Anchor = 15, ; - ErasePage = .T., ; - Height = 180, ; - Left = 8, ; - Name = "pgfDiff", ; - PageCount = 2, ; - TabIndex = 1, ; - TabStyle = 1, ; - Top = 4, ; - Width = 744, ; - Page1.Caption = "Files Diff", ; - Page1.Name = "pagFilesDiff", ; - Page2.Caption = "Diff tool configure", ; - Page2.Name = "pagDiffToolConfig" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.cboDiffToolName' AS combobox WITH ; - Anchor = 10, ; - BorderColor = 0,128,192, ; - Height = 24, ; - Left = 63, ; - Name = "cboDiffToolName", ; - SelectOnEntry = .T., ; - SpecialEffect = 1, ; - Style = 2, ; - TabIndex = 1, ; - Top = 12, ; - Width = 572 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdCancel' AS commandbutton WITH ; - Anchor = 8, ; - Caption = "Cancel", ; - Height = 27, ; - Left = 639, ; - Name = "cmdCancel", ; - TabIndex = 8, ; - Top = 116, ; - Width = 84 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdDiffToolPath' AS commandbutton WITH ; - Anchor = 8, ; - Caption = "...", ; - Height = 27, ; - Left = 695, ; - Name = "cmdDiffToolPath", ; - TabIndex = 3, ; - Top = 42, ; - Width = 28 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdResetAll' AS commandbutton WITH ; - Anchor = 8, ; - Caption = "Reset All", ; - Height = 27, ; - Left = 399, ; - Name = "cmdResetAll", ; - TabIndex = 6, ; - Top = 116, ; - Width = 84 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdSave' AS commandbutton WITH ; - Anchor = 8, ; - Caption = "Save", ; - Height = 27, ; - Left = 551, ; - Name = "cmdSave", ; - TabIndex = 7, ; - Top = 116, ; - Width = 84 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmdSetDefault' AS commandbutton WITH ; - Anchor = 8, ; - Caption = "Set Default", ; - Height = 27, ; - Left = 639, ; - Name = "cmdSetDefault", ; - TabIndex = 9, ; - Top = 10, ; - Width = 84 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.cmgEditPanel' AS commandgroup WITH ; - Anchor = 2, ; - BackStyle = 0, ; - BorderStyle = 0, ; - ButtonCount = 3, ; - ControlSource = "THISFORM.n_EditOption", ; - Height = 36, ; - Left = 63, ; - Name = "cmgEditPanel", ; - SpecialEffect = 1, ; - TabIndex = 5, ; - Top = 112, ; - Value = 1, ; - Width = 268, ; - Command1.Caption = "New tool", ; - Command1.Height = 27, ; - Command1.Left = 4, ; - Command1.Name = "cmdNew", ; - Command1.Top = 4, ; - Command1.Width = 84, ; - Command2.Caption = "Edit tool", ; - Command2.Height = 27, ; - Command2.Left = 92, ; - Command2.Name = "cmdEdit", ; - Command2.Top = 4, ; - Command2.Width = 84, ; - Command3.Caption = "Delete tool", ; - Command3.Height = 27, ; - Command3.Left = 180, ; - Command3.Name = "cmdDelete", ; - Command3.Top = 4, ; - Command3.Width = 84 - *< END OBJECT: BaseClass="commandgroup" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.Label1' AS label WITH ; - BackStyle = 0, ; - Caption = "Config", ; - Height = 17, ; - Left = 15, ; - Name = "Label1", ; - TabIndex = 11, ; - Top = 80, ; - Width = 48 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.Label2' AS label WITH ; - BackStyle = 0, ; - Caption = "Path", ; - Height = 17, ; - Left = 15, ; - Name = "Label2", ; - TabIndex = 12, ; - Top = 48, ; - Width = 48 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.lbl_DiffTool' AS label WITH ; - BackStyle = 0, ; - Caption = "Diff tool", ; - Height = 17, ; - Left = 15, ; - Name = "lbl_DiffTool", ; - TabIndex = 10, ; - Top = 16, ; - Width = 48 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.txtDiffToolConfig' AS textbox WITH ; - Anchor = 10, ; - BorderColor = 0,128,192, ; - Enabled = .F., ; - Format = "T", ; - Height = 23, ; - Left = 63, ; - MaxLength = 255, ; - Name = "txtDiffToolConfig", ; - SelectOnEntry = .T., ; - SpecialEffect = 1, ; - TabIndex = 4, ; - ToolTipText = "Keywords: <>, <>", ; - Top = 76, ; - Width = 660 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'pgfDiff.pagDiffToolConfig.txtDiffToolPath' AS textbox WITH ; - Anchor = 10, ; - BorderColor = 0,128,192, ; - Enabled = .F., ; - Format = "T", ; - Height = 23, ; - Left = 63, ; - MaxLength = 255, ; - Name = "txtDiffToolPath", ; - SelectOnEntry = .T., ; - SpecialEffect = 1, ; - TabIndex = 2, ; - ToolTipText = "Keywords: <>, <>", ; - Top = 44, ; - Width = 628 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.chkShowCall' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 8, ; - BackStyle = 0, ; - Caption = "Only show Diff call (for testing)", ; - ControlSource = "THISFORM.l_ShowCallOnly", ; - Height = 17, ; - Left = 443, ; - Name = "chkShowCall", ; - TabIndex = 2, ; - Top = 116, ; - Value = .F., ; - Width = 192 - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.cmdDiff' AS commandbutton WITH ; - Anchor = 8, ; - Caption = "Diff", ; - Height = 60, ; - Left = 643, ; - Name = "cmdDiff", ; - TabIndex = 6, ; - Top = 80, ; - Width = 84 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.cmdFile1' AS commandbutton WITH ; - Anchor = 8, ; - Caption = "...", ; - Height = 27, ; - Left = 667, ; - Name = "cmdFile1", ; - TabIndex = 2, ; - Top = 10, ; - Width = 28 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.cmdFile2' AS commandbutton WITH ; - Anchor = 8, ; - Caption = "...", ; - Height = 27, ; - Left = 667, ; - Name = "cmdFile2", ; - TabIndex = 4, ; - Top = 42, ; - Width = 28 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.lbl_DiffTool' AS label WITH ; - BackStyle = 0, ; - Caption = "Diff tool", ; - Height = 17, ; - Left = 11, ; - Name = "lbl_DiffTool", ; - TabIndex = 9, ; - Top = 88, ; - Width = 48 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.lbl_File1' AS label WITH ; - BackStyle = 0, ; - Caption = "File 1", ; - Height = 17, ; - Left = 11, ; - Name = "lbl_File1", ; - TabIndex = 7, ; - Top = 16, ; - Width = 36 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.lbl_File2' AS label WITH ; - BackStyle = 0, ; - Caption = "File 2", ; - Height = 17, ; - Left = 11, ; - Name = "lbl_File2", ; - TabIndex = 8, ; - Top = 48, ; - Width = 36 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.shpFile1' AS shape WITH ; - Anchor = 8, ; - BorderStyle = 0, ; - Curvature = 10, ; - Height = 23, ; - Left = 699, ; - Name = "shpFile1", ; - SpecialEffect = 1, ; - ToolTipText = "TXTStatus: Green=Unchanged, Yellow=Changed", ; - Top = 12, ; - Width = 24 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.shpFile2' AS shape WITH ; - Anchor = 8, ; - BorderStyle = 0, ; - Curvature = 10, ; - Height = 23, ; - Left = 699, ; - Name = "shpFile2", ; - SpecialEffect = 1, ; - ToolTipText = "TXTStatus: Green=Unchanged, Yellow=Changed", ; - Top = 44, ; - Width = 24 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.txtDiffToolName' AS textbox WITH ; - Anchor = 10, ; - BorderColor = 232,232,232, ; - ControlSource = "THISFORM.diffToolName", ; - Enabled = .F., ; - Format = "T", ; - Height = 23, ; - Left = 63, ; - MaxLength = 255, ; - Name = "txtDiffToolName", ; - SelectOnEntry = .T., ; - SpecialEffect = 1, ; - TabIndex = 5, ; - Top = 84, ; - Width = 564 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.txtFile1' AS textbox WITH ; - Anchor = 10, ; - BorderColor = 0,128,192, ; - ControlSource = "THISFORM.filename1", ; - Format = "T", ; - Height = 23, ; - Left = 63, ; - MaxLength = 255, ; - Name = "txtFile1", ; - OLEDropMode = 1, ; - SelectOnEntry = .T., ; - SpecialEffect = 1, ; - TabIndex = 1, ; - Top = 12, ; - Width = 600 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'pgfDiff.pagFilesDiff.txtFile2' AS textbox WITH ; - Anchor = 10, ; - BorderColor = 0,128,192, ; - ControlSource = "THISFORM.filename2", ; - Format = "T", ; - Height = 23, ; - Left = 63, ; - MaxLength = 255, ; - Name = "txtFile2", ; - OLEDropMode = 1, ; - SelectOnEntry = .T., ; - SpecialEffect = 1, ; - TabIndex = 3, ; - Top = 44, ; - Width = 600 - *< END OBJECT: BaseClass="textbox" /> - - PROCEDURE Activate - *-- activate - THISFORM.updateGlobalEnabled() - - ENDPROC - - PROCEDURE cancel && Specifies if a CommandButton is the Cancel button. - *-- cancel - THISFORM.l_EditMode = .F. - THISFORM.updateGlobalEnabled() - - WITH THISFORM.pgfDiff.pagDiffToolConfig.cboDiffToolName - .Style = 2 && Dropdown List - .RowSourceType= 5 - .RowSource = 'THISFORM.a_Tools' - .ControlSource = 'THISFORM.diffToolName' - .Value = THISFORM.diffToolName - THISFORM.pgfDiff.pagDiffToolConfig.txtDiffToolConfig.Value = THISFORM.diffToolConfig - THISFORM.pgfDiff.pagDiffToolConfig.txtDiffToolPath.Value = THISFORM.diffToolPath - .SetFocus() - ENDWITH - - ENDPROC - - PROCEDURE checkfilenames_dt - LPARAMETERS tnFilename - - LOCAL laFile1(1,5), laFile2(1,5), ltFilename1_dt, ltFilename2_dt, lnCodError, lcMessage, lnIcon ; - , lcFilename1, lcFilename2, lcExt, lcExt2, lcDir, lcFilename1_dt, lcFilename2_dt ; - , loFB2P as c_foxbin2prg OF foxbin2prg.prg - - #DEFINE CR_LF CHR(13)+CHR(10) - - TRY - lnCodError = 0 - STORE '' TO lcMessage, lcFilename1, lcFilename2, lcExt, lcExt2, lcDir - loFB2P = THIS.oFB2P - tnFilename = EVL(tnFilename, 0) - - DO CASE - CASE INLIST(tnFilename, 0, 1) AND EMPTY(THIS.filename1) - EXIT - CASE INLIST(tnFilename, 0, 2) AND EMPTY(THIS.filename2) - EXIT - ENDCASE - - IF INLIST(tnFilename, 0, 1) THEN - lcExt = JUSTEXT(THIS.filename1) - lcDir = JUSTPATH(THIS.filename1) - lcExt2 = loFB2P.get_Ext2FromExt( lcExt, lcDir ) - lcFilename1 = FORCEEXT( THIS.filename1, lcExt2 ) - - IF ADIR(laFile1, lcFilename1) = 1 THEN - lcFilename1_dt = '{^' + TRANSFORM( DTOS( laFile1(1,3) ), '@R ####/##/##' ) + ' ' + laFile1(1,4) + '}' - ltFilename1_dt = EVALUATE( lcFilename1_dt ) - - DO CASE - CASE EMPTY(THIS.filename1_dt) - THIS.filename1_dt = ltFilename1_dt - THIS.pgfDiff.pagFilesDiff.shpFile1.BackColor= THIS.colorGreen - THIS.lastFilename1 = THIS.filename1 - - CASE NOT THIS.filename1 == THIS.lastFilename1 - THIS.filename1_dt = ltFilename1_dt - THIS.pgfDiff.pagFilesDiff.shpFile1.BackColor= THIS.colorGreen - THIS.lastFilename1 = THIS.filename1 - - CASE THIS.filename1_dt <> ltFilename1_dt - THIS.pgfDiff.pagFilesDiff.shpFile1.BackColor= THIS.colorYellow - - OTHERWISE - THIS.pgfDiff.pagFilesDiff.shpFile1.BackColor= THIS.colorGreen - - ENDCASE - ENDIF - - ENDIF - - IF INLIST(tnFilename, 0, 2) THEN - lcExt = JUSTEXT(THIS.filename2) - lcDir = JUSTPATH(THIS.filename2) - lcExt2 = loFB2P.get_Ext2FromExt( lcExt, lcDir ) - lcFilename2 = FORCEEXT( THIS.filename2, lcExt2 ) - - IF ADIR(laFile2, lcFilename2) = 1 THEN - lcFilename2_dt = '{^' + TRANSFORM( DTOS( laFile2(1,3) ), '@R ####/##/##' ) + ' ' + laFile2(1,4) + '}' - ltFilename2_dt = EVALUATE( lcFilename2_dt ) - - DO CASE - CASE EMPTY(THIS.filename2_dt) - THIS.filename2_dt = ltFilename2_dt - THIS.pgfDiff.pagFilesDiff.shpFile2.BackColor= THIS.colorGreen - THIS.lastFilename2 = THIS.filename2 - - CASE NOT THIS.filename2 == THIS.lastFilename2 - THIS.filename2_dt = ltFilename2_dt - THIS.pgfDiff.pagFilesDiff.shpFile2.BackColor= THIS.colorGreen - THIS.lastFilename2 = THIS.filename2 - - CASE THIS.filename2_dt <> ltFilename2_dt - THIS.pgfDiff.pagFilesDiff.shpFile2.BackColor= THIS.colorYellow - - OTHERWISE - THIS.pgfDiff.pagFilesDiff.shpFile2.BackColor= THIS.colorGreen - - ENDCASE - ENDIF - ENDIF - - CATCH TO loEx - lnCodError = loEx.ErrorNo - lnIcon = 16 - *IF NOT EMPTY(loEx.UserValue) - loEx.UserValue = CR_LF ; - + 'lcDir = ' + TRANSFORM(lcDir) + CR_LF ; - + 'lcExt = ' + TRANSFORM(lcExt) + CR_LF ; - + 'lcExt2 = ' + TRANSFORM(lcExt2) + CR_LF ; - + 'tnFilename = ' + TRANSFORM(tnFilename) + CR_LF ; - + 'filename1 = "' + THIS.filename1 + '"' + CR_LF ; - + 'lcFilename1 = "' + lcFilename1 + '"' + CR_LF ; - + 'lcFilename1_dt = ' + TRANSFORM(lcFilename1_dt) + CR_LF ; - + 'laFile1(1,3) = ' + TRANSFORM(laFile1(1,3)) + CR_LF ; - + 'laFile1(1,4) = ' + TRANSFORM(laFile1(1,4)) + CR_LF ; - + 'filename2 = "' + THIS.filename2 + '"' + CR_LF ; - + 'lcFilename2 = "' + lcFilename2 + '"' + CR_LF ; - + 'lcFilename2_dt = ' + TRANSFORM(lcFilename2_dt) + CR_LF ; - + 'laFile2(1,3) = ' + TRANSFORM(laFile2(1,3)) + CR_LF ; - + 'laFile2(1,4) = ' + TRANSFORM(laFile2(1,4)) + CR_LF - *ENDIF - TEXT TO lcMessage TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2+4 - Error <>, <> - Procedure <>, Line <> - LineContents: <> - Details: <> - UserValue: <> - ENDTEXT - - FINALLY - IF lnCodError > 0 THEN - MESSAGEBOX( lcMessage, 0+lnIcon, 'FoxBin2Prg checkFilenames_dt' ) - ENDIF - - ENDTRY - - #UNDEF CR_LF - - ENDPROC - - PROCEDURE create_default_cfg - *-- create_Default_CFG - LOCAL lcPath - - lcPath = EVL( JUSTPATH(THISFORM.c_CFG_File), JUSTPATH(SYS(16)) ) - - IF LEFT(lcPath,10) == 'PROCEDURE ' THEN - lcPath = SUBSTR( lcPath, AT(' ', lcPath, 2) + 1 ) - ENDIF - - *-- Configuración de Herramientas DIFF predefinidas - THIS.n_ToolCount = 1 - DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) - THIS.a_Tools( THIS.n_ToolCount, 1 ) = 'WinMergePortable' - THIS.a_Tools( THIS.n_ToolCount, 2 ) = '/e /x /u /maximize <> <>' - THIS.a_Tools( THIS.n_ToolCount, 3 ) = '<>WinMergePortable\WinMergePortable.exe' - - THIS.n_ToolCount = 2 - DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) - THIS.a_Tools( THIS.n_ToolCount, 1 ) = 'Beyond Compare 2' - THIS.a_Tools( THIS.n_ToolCount, 2 ) = '<> <>' - THIS.a_Tools( THIS.n_ToolCount, 3 ) = '<>Beyond Compare 2\BC2.exe' - - *-- - THIS.diffToolName = THIS.a_Tools( 1, 1 ) - THIS.diffToolConfig = THIS.a_Tools( 1, 2 ) - THIS.diffToolPath = THIS.a_Tools( 1, 3 ) - THIS.save_CFG_Data() - THIS.diffToolCombo_Refresh() - THIS.diffToolChanged() - THIS.Refresh() - - ENDPROC - - PROCEDURE deletetool - *-- deleteTool - LOCAL locboDiffToolName as ComboBox, loTxtDiffToolCfg as TextBox, loTxtDiffToolPath as TextBox, lnListIndex - - locboDiffToolName = THIS.pgfDiff.pagDiffToolConfig.cboDiffToolName - loTxtDiffToolCfg = THIS.pgfDiff.pagDiffToolConfig.txtDiffToolConfig - loTxtDiffToolPath = THIS.pgfDiff.pagDiffToolConfig.txtDiffToolPath - - IF MESSAGEBOX( '¿Confirm Delete?',4+32+256+4096, 'FoxBin2Prg: Delete tool config' ) = 6 THEN - - IF THIS.n_ToolCount > 0 THEN - lnListIndex = locboDiffToolName.ListIndex - THIS.n_ToolCount = THIS.n_ToolCount - 1 - - IF THIS.n_ToolCount > 0 THEN - ADEL(THIS.a_Tools, lnListIndex) - DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) - ELSE - THIS.a_Tools = '' - ENDIF - - IF THIS.n_ToolCount > 0 THEN - IF lnListIndex > THIS.n_ToolCount THEN - lnListIndex = THIS.n_ToolCount - ENDIF - locboDiffToolName.ListIndex = lnListIndex - THIS.diffToolConfig = THIS.a_Tools(lnListIndex,2) - THIS.diffToolPath = THIS.a_Tools(lnListIndex,3) - loTxtDiffToolCfg.Value = THIS.diffToolConfig - loTxtDiffToolPath.Value = THIS.diffToolPath - ELSE - locboDiffToolName.ListIndex = 0 - THIS.diffToolName = '' - THIS.diffToolPath = '' - THIS.diffToolConfig = '' - loTxtDiffToolCfg.Value = '' - loTxtDiffToolPath.Value = '' - ENDIF - - locboDiffToolName.RowSource = locboDiffToolName.RowSource - locboDiffToolName.Refresh() - THIS.save_CFG_Data() - THIS.updateGlobalEnabled() - ENDIF - ENDIF - - ENDPROC - - PROCEDURE Destroy - *-- destroy - THIS.oFB2P = NULL - - IF _VFP.StartMode = 0 THEN - lcFB2P_App = 'foxbin2prg.prg' - ELSE - lcFB2P_App = 'foxbin2prg.exe' - ENDIF - - DO CASE - CASE ATC( lcFB2P_App, SET("Procedure") ) > 0 - RELEASE PROCEDURE (lcFB2P_App) - CASE ATC( FORCEEXT(lcFB2P_App, 'FXP'), SET("Procedure") ) > 0 - RELEASE PROCEDURE (FORCEEXT(lcFB2P_App, 'FXP')) - ENDCASE - - ENDPROC - - PROCEDURE difftoolchanged - *-- diffToolChanged - - WITH THISFORM.pgfDiff.pagDiffToolConfig.cboDiffToolName - IF .ListCount > 0 THEN - THISFORM.diffToolConfig = THISFORM.a_Tools(.ListIndex,2) - THISFORM.diffToolPath = THISFORM.a_Tools(.ListIndex,3) - THISFORM.n_SelectedToolIndex = .ListIndex - .Parent.txtDiffToolConfig.Value = THISFORM.diffToolConfig - .Parent.txtDiffToolPath.Value = THISFORM.diffToolPath - ENDIF - ENDWITH - - ENDPROC - - PROCEDURE difftoolcombo_refresh - WITH THIS.pgfDiff.pagDiffToolConfig.cboDiffToolName - IF THIS.l_EditMode THEN - .Clear() - .ControlSource = '' - .RowSourceType = 1 && Value - .RowSource = '' - .Style = 0 && Dropdown Combo - .AddItem(THIS.diffToolName) - .Value = THIS.diffToolName - .SelectOnEntry = .T. - ELSE - .Style = 2 && Dropdown List - .RowSourceType = 5 && Array - .RowSource = 'THISFORM.a_Tools' - .ControlSource = 'THISFORM.diffToolName' - .Value = THIS.diffToolName - - IF .ListIndex > THIS.n_ToolCount THEN - .ListIndex = THIS.n_ToolCount - ENDIF - - THIS.n_SelectedToolIndex = .ListIndex - ENDIF - ENDWITH - - ENDPROC - - PROCEDURE edittool - *-- editTool - - THISFORM.l_EditMode = .T. - THISFORM.updateGlobalEnabled() - - WITH THISFORM.pgfDiff.pagDiffToolConfig.cboDiffToolName - THISFORM.diffToolCombo_Refresh() - .SetFocus() - ENDWITH - - ENDPROC - - PROCEDURE filesdiff - *-- filesDiff - - LOCAL laFile(1,5), lcMessage, lnIcon, lcFilename1, lcFilename2, lcDiffToolConfig ; - , llAlwaysOnTop, lnCodError, lcDiffToolPath ; - , loShell AS WScript.Shell ; - , loEx as Exception ; - , loFB2P as c_foxbin2prg OF foxbin2prg.prg - - #DEFINE CR_LF CHR(13)+CHR(10) - - TRY - loFB2P = THIS.oFB2P - lnCodError = 0 - - WITH THISFORM as Form - llAlwaysOnTop = .AlwaysOnTop - lcFilename1 = '"' + FORCEEXT( .filename1, loFB2P.get_Ext2FromExt( JUSTEXT(.filename1), JUSTPATH(.filename1) ) ) + '"' - lcFilename2 = '"' + FORCEEXT( .filename2, loFB2P.get_Ext2FromExt( JUSTEXT(.filename2), JUSTPATH(.filename2) ) ) + '"' - - lcDiffToolConfig = THIS.diffToolConfig - lcDiffToolConfig = STRTRAN( lcDiffToolConfig, '<>', '<>', 1, 1, 1 ) - lcDiffToolConfig = STRTRAN( lcDiffToolConfig, '<>', '<>', 1, 1, 1 ) - lcDiffToolConfig = TEXTMERGE(lcDiffToolConfig) - - lcDiffToolPath = '"' + THISFORM.diffToolPath + '"' - lcDiffToolPath = STRTRAN( lcDiffToolPath, '<>', '<>', 1, 1, 1 ) - lcDiffToolPath = STRTRAN( lcDiffToolPath, '<>', '<>', 1, 1, 1 ) - lcDiffToolPath = TEXTMERGE(lcDiffToolPath) - - IF THISFORM.l_ShowCallOnly THEN - MESSAGEBOX( lcDiffToolPath + ' ' + lcDiffToolConfig ) - EXIT - ENDIF - - IF ADIR(laFile, .Filename1) = 0 THEN - lcMessage = 'File not found' - ERROR lcMessage + ': [' + .Filename1 + ']' - ENDIF - - IF ADIR(laFile, .Filename2) = 0 THEN - lcMessage = 'File not found' - ERROR lcMessage + ': [' + .Filename2 + ']' - ENDIF - - IF ADIR(laFile, lcDiffToolPath) = 0 THEN - lcMessage = 'File not found' - ERROR lcMessage + ': [' + lcDiffToolPath + ']' - ENDIF - - IF NOT loFB2P.hasSupport_Bin2Prg( .filename1 ) - lcMessage = 'File type not supported' - ERROR lcMessage + ': [' + .filename1 + ']' - ENDIF - - lcMessage = 'File is in use [' + .filename1 + ']' - USE (.filename1) EXCLUSIVE - USE - - IF NOT loFB2P.hasSupport_Bin2Prg( .filename2 ) - lcMessage = 'File type not supported' - ERROR lcMessage + ': [' + .filename1 + ']' - ENDIF - - lcMessage = 'File is in use [' + .filename2 + ']' - USE (.filename2) EXCLUSIVE - USE - - lcMessage = .Filename1 - loFB2P.execute( .Filename1, '', '', '', '1', '0', '0', NULL, NULL, .T. ) - - lcMessage = .Filename2 - loFB2P.execute( .Filename2, '', '', '', '1', '0', '0', NULL, NULL, .T. ) - - lcMessage = '' - - IF llAlwaysOnTop THEN - THIS.AlwaysOnTop = .F. - ENDIF - - loShell = CREATEOBJECT('WScript.Shell') - - THIS.filename1_dt = {//::} - THIS.filename2_dt = {//::} - THIS.checkFilenames_dt() - - lnResp = loShell.Run( lcDiffToolPath + ' ' + lcDiffToolConfig, 1, 1) - - IF lnResp = 0 THEN - *-- OK - THIS.checkFilenames_dt() - ELSE - MESSAGEBOX( 'DIFF operation returned the code ' + TRANSFORM(lnResp), 0+48, 'FoxBin2Prg: Diff VFP 9 binary files' ) - ENDIF - - *THIS.lastFilename1 = THIS.filename1 - *THIS.lastFilename2 = THIS.filename2 - - ENDWITH - - CATCH TO loEx WHEN loEx.ErrorNo = 3 - lnCodError = loEx.ErrorNo - lnIcon = 48 - - CATCH TO loEx WHEN loEx.ErrorNo = 1098 - lnCodError = loEx.ErrorNo - lnIcon = 48 - lcMessage = loEx.Message - - CATCH TO loEx - lnCodError = loEx.ErrorNo - lnIcon = 16 - IF NOT EMPTY(lcMessage) - loEx.UserValue = lcMessage - ENDIF - TEXT TO lcMessage TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2+4 - Error <>, <> - Procedure <>, Line <> - LineContents: <> - Details: <> - UserValue: <> - ENDTEXT - - FINALLY - IF lnCodError > 0 THEN - MESSAGEBOX( lcMessage, 0+lnIcon, 'FoxBin2Prg Diff Status' ) - ENDIF - - THIS.AlwaysOnTop = llAlwaysOnTop - STORE NULL TO loShell, loFB2P - RELEASE loShell, loFB2P - ENDTRY - - #UNDEF CR_LF - - RETURN - - ENDPROC - - PROCEDURE Init - LOCAL lcSys16, lnPosProg - - *-- init - THISFORM.MinHeight = THISFORM.Height - THISFORM.MaxHeight = THISFORM.Height - THISFORM.MinWidth = THISFORM.Width - - THISFORM.a_Tools = '' - - lcSys16 = SYS(16) - IF LEFT(lcSys16,10) == 'PROCEDURE ' - lnPosProg = AT(" ", lcSys16, 2) + 1 - ELSE - lnPosProg = 1 - ENDIF - - THIS.c_CurDir = SYS(5) + CURDIR() && Directorio actual, que no necesariamente es donde está FoxBin2Prg - THIS.c_fb2p_diff_FullPath = SUBSTR( lcSys16, lnPosProg ) - THIS.c_CFG_File = FORCEEXT( THIS.c_fb2p_diff_FullPath, 'CFG' ) - - ENDPROC - - PROCEDURE initialize - *-- initialize - LOCAL lcFB2P_App - - IF VARTYPE(THIS.oFB2P) <> "O" OR ISNULL(THIS.oFB2P) - IF _VFP.StartMode = 0 THEN - lcFB2P_App = 'foxbin2prg.prg' - ELSE - lcFB2P_App = 'foxbin2prg.exe' - ENDIF - - SET PROCEDURE TO (lcFB2P_App) - THIS.oFB2P = CREATEOBJECT('c_foxbin2prg') - ENDIF - - THIS.load_CFG_Data() - THIS.diffToolCombo_Refresh() - THIS.diffToolChanged() - THIS.updateGlobalEnabled() - - ENDPROC - - PROCEDURE load_cfg_data - *-- load_CFG_Data - LOCAL laFile(1,5), llCreateNewCFGFile, I, lcDiffTool - - #DEFINE CR_LF CHR(13) + CHR(10) - - *-- Estructura de CFG_Data: - *-- tool-nametool-config - *-- tool-nametool-config - *-- tool-name - - IF ADIR(laFile, THIS.c_CFG_File) = 1 - THIS.c_CFG_Data = FILETOSTR( THIS.c_CFG_File ) - - DO CASE - CASE EMPTY(THIS.c_CFG_Data) OR EMPTY( STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) ) - llCreateNewCFGFile = .T. - CASE EMPTY( STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) ) - THIS.diffToolName = STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) - THIS.c_CFG_Data = THIS.c_CFG_Data + CR_LF + '' + THIS.diffToolName + '' - THIS.save_CFG_Data() - OTHERWISE - THIS.diffToolName = STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) - ENDCASE - ELSE - llCreateNewCFGFile = .T. - ENDIF - - *-- Si no hay CFG, creo uno por defecto - IF llCreateNewCFGFile - THIS.create_Default_CFG() - ENDIF - - *-- Lo cargo en el combobox - THIS.diffToolName = STREXTRACT(THIS.c_CFG_Data, '', '', 1, 1) - THIS.n_ToolCount = 0 - - FOR I = 1 TO OCCURS('', THIS.c_CFG_Data ) - THIS.n_ToolCount = THIS.n_ToolCount + 1 - DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) - lcDiffTool = STREXTRACT(THIS.c_CFG_Data, '', '', I, 1) - THIS.a_Tools( THIS.n_ToolCount, 1 ) = STREXTRACT(lcDiffTool, '', '', 1, 1) - THIS.a_Tools( THIS.n_ToolCount, 2 ) = STREXTRACT(lcDiffTool, '', '', 1, 1) - THIS.a_Tools( THIS.n_ToolCount, 3 ) = STREXTRACT(lcDiffTool, '', '', 1, 1) - - IF EMPTY(THIS.diffToolConfig) AND THIS.a_Tools( THIS.n_ToolCount, 1 ) == THIS.diffToolName THEN - THIS.diffToolConfig = THIS.a_Tools( THIS.n_ToolCount, 2 ) - ENDIF - - IF EMPTY(THIS.diffToolPath) AND THIS.a_Tools( THIS.n_ToolCount, 1 ) == THIS.diffToolName THEN - THIS.diffToolPath = THIS.a_Tools( THIS.n_ToolCount, 3 ) - ENDIF - ENDFOR - - #UNDEF CR_LF - - ENDPROC - - PROCEDURE newtool - *-- newTool - - THISFORM.l_EditMode = .T. - THISFORM.updateGlobalEnabled() - - WITH THISFORM.pgfDiff.pagDiffToolConfig.cboDiffToolName - .RowSourceType= 0 - .RowSource = '' - .ControlSource = '' - .Style = 0 && Dropdown Combo - .Value = '' - .SetFocus() - ENDWITH - - THISFORM.pgfDiff.pagDiffToolConfig.txtDiffToolConfig.Value = '' - THISFORM.pgfDiff.pagDiffToolConfig.txtDiffToolPath.Value = '' - - ENDPROC - - PROCEDURE QueryUnload - CLEAR EVENTS - - ENDPROC - - PROCEDURE resetalltools - *-- resetAllTools - THIS.cancel() - THIS.create_Default_CFG() - THIS.initialize() - THIS.updateGlobalEnabled() - - ENDPROC - - PROCEDURE savetool - *-- saveTool - LOCAL lnItem - - THIS.l_EditMode = .F. - THIS.updateGlobalEnabled() - - WITH THIS.pgfDiff.pagDiffToolConfig.cboDiffToolName - THIS.diffToolName = .Text - THIS.diffToolConfig = THIS.pgfDiff.pagDiffToolConfig.txtDiffToolConfig.Value - THIS.diffToolPath = THIS.pgfDiff.pagDiffToolConfig.txtDiffToolPath.Value - - IF THIS.n_EditOption = 1 THEN - *-- New tool - THIS.n_ToolCount = THIS.n_ToolCount + 1 - DIMENSION THIS.a_Tools( THIS.n_ToolCount, 3 ) - lnItem = THIS.n_ToolCount - ELSE - *-- Edit tool - lnItem = THIS.n_SelectedToolIndex - ENDIF - - THIS.a_Tools( lnItem, 1 ) = THIS.diffToolName - THIS.a_Tools( lnItem, 2 ) = THIS.diffToolConfig - THIS.a_Tools( lnItem, 3 ) = THIS.diffToolPath - THIS.diffToolCombo_Refresh() - .SetFocus() - - THIS.n_SelectedToolIndex = .ListIndex - THIS.save_CFG_Data() - THIS.updateGlobalEnabled() - ENDWITH - - ENDPROC - - PROCEDURE save_cfg_data - *-- save_CFG_Data - LOCAL I - - #DEFINE CR_LF CHR(13) + CHR(10) - - THIS.c_CFG_Data = '' - - TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1 PRETEXT 1+2+4 - <<>> - ENDTEXT - - FOR I = 1 TO THIS.n_ToolCount - TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2+4 - <<>> - <<>> <> - <<>> <> - <<>> <> - <<>> - ENDTEXT - ENDFOR - - IF EMPTY(THIS.diffToolName) THEN - IF NOT EMPTY(THIS.a_Tools(1,1)) THEN - TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2+4 - <<>> <> - ENDTEXT - ENDIF - ELSE - TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2+4 - <<>> <> - ENDTEXT - ENDIF - - TEXT TO THISFORM.c_CFG_Data ADDITIVE TEXTMERGE NOSHOW FLAGS 1+2 PRETEXT 1+2+4 - <<>> - ENDTEXT - - STRTOFILE( THIS.c_CFG_Data, THIS.c_CFG_File ) - - #UNDEF CR_LF - - ENDPROC - - PROCEDURE updateglobalenabled - *-- updateGlobalEnabled - LOCAL lopagFilesDiff as Page, loPagConfig as Page, cmgPanel as CommandGroup - - WITH THIS AS Form - lopagFilesDiff = .pgfDiff.pagFilesDiff - loPagConfig = .pgfDiff.pagDiffToolConfig - cmgPanel = loPagConfig.cmgEditPanel - - *-- Edit? - loPagConfig.txtDiffToolConfig.Enabled = .l_EditMode - loPagConfig.txtDiffToolPath.Enabled = .l_EditMode - cmgPanel.cmdNew.Enabled = NOT .l_EditMode - cmgPanel.cmdEdit.Enabled = NOT .l_EditMode AND .n_ToolCount > 0 - cmgPanel.cmdDelete.Enabled = NOT .l_EditMode AND .n_ToolCount > 0 - loPagConfig.cmdDiffToolPath.Enabled = .l_EditMode - loPagConfig.cmdSetDefault.Enabled = NOT .l_EditMode AND .n_ToolCount > 0 - loPagConfig.cmdSave.Enabled = .l_EditMode - loPagConfig.cmdCancel.Enabled = .l_EditMode - lopagFilesDiff.Enabled = NOT .l_EditMode - - *-- cmdDiff - lopagFilesDiff.cmdDiff.Enabled = NOT .l_EditMode ; - AND NOT EMPTY(.filename1) AND NOT EMPTY(.filename2) ; - AND NOT .filename1 == .filename2 ; - AND NOT EMPTY(.diffToolName) AND NOT EMPTY(.diffToolPath) AND NOT EMPTY(.diffToolConfig) - - THIS.checkFilenames_dt() - ENDWITH && THISFORM - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.Activate - THISFORM.updateGlobalEnabled() - THIS.cboDiffToolName.SetFocus() - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cboDiffToolName.DropDown - IF THISFORM.l_EditMode OR THIS.ListCount = 0 THEN - NODEFAULT - ENDIF - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cboDiffToolName.InteractiveChange - IF NOT THISFORM.l_EditMode - THISFORM.diffToolChanged() - ENDIF - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cmdCancel.Click - THISFORM.cancel() - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cmdDiffToolPath.Click - LOCAL lcFile - - lcFile = GETFILE('exe') - - IF NOT EMPTY(lcFile) THEN - THIS.Parent.txtDiffToolPath.Value = lcFile - THIS.Parent.txtDiffToolPath.Refresh() - *THISFORM.updateGlobalEnabled() - ENDIF - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cmdResetAll.Click - THISFORM.resetAllTools() - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cmdSave.Click - THISFORM.saveTool() - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cmdSetDefault.Click - THISFORM.save_CFG_Data() - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cmgEditPanel.cmdDelete.Click - THISFORM.deleteTool() - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cmgEditPanel.cmdEdit.Click - THISFORM.editTool() - - ENDPROC - - PROCEDURE pgfDiff.pagDiffToolConfig.cmgEditPanel.cmdNew.Click - THISFORM.newTool() - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.Activate - THISFORM.updateGlobalEnabled() - THIS.txtFile1.SetFocus() - *THIS.txtDiffToolName.Refresh() - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.cmdDiff.Click - THISFORM.filesDiff() - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.cmdFile1.Click - LOCAL lcFile - - lcFile = GETFILE('scx;vcx;mnx;pjx;frx;lbx;dbc;dbf') - - IF NOT EMPTY(lcFile) THEN - THISFORM.filename1 = lcFile - THIS.Parent.txtFile1.Refresh() - THISFORM.updateGlobalEnabled() - ENDIF - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.cmdFile2.Click - LOCAL lcFile - - lcFile = GETFILE('scx;vcx;mnx;pjx;frx;lbx;dbc;dbf') - - IF NOT EMPTY(lcFile) THEN - THISFORM.filename2 = lcFile - THIS.Parent.txtFile2.Refresh() - THISFORM.updateGlobalEnabled() - ENDIF - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.txtFile1.InteractiveChange - THISFORM.updateGlobalEnabled() - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.txtFile1.OLEDragDrop - LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord - LOCAL aValues, i, cText, nOperation - - *-- Check to see whether the user wants to copy or move - *IF nShift == 1 - nOperation = 1 &&DROPEFFECT_COPY - *ELSE - * nOperation = 2 &&DROPEFFECT_MOVE - *ENDIF - - *Thisform.LockScreen = .T. - - DO CASE - CASE oDataObject.GetFormat(1) && Text - cText = oDataObject.GetData(1) - - *-- Add the text as a new item in the list - *This.AddItem( cText ) - *? 2, cText - - CASE oDataObject.GetFormat(15) && Files CF_DROP - DIMENSION aValues[1] - oDataObject.GetData(15, @aValues ) - - *-- Add each filename as a new item in the list - *!* FOR i = 1 to alen(aValues) - *!* This.AddItem(aValues[m.i]) - *!* NEXT - *? 3, aValues[1] - THIS.Value = aValues[1] - ENDCASE - - *Thisform.LockScreen = .F. - - *-- Set the nEffect parameter for communication back to the source object - nEffect = nOperation - *NODEFAULT - THISFORM.updateGlobalEnabled() - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.txtFile1.OLEDragOver - LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord, nState - - DO CASE - CASE nState == 0 &&DRAG_ENTER - DO CASE - *CASE oDataObject.GetFormat("OLE Variant Array") && Array - * This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL - * This.OLEDropEffects = 1+2 &&DROPEFFECT_COPY + DROPEFFECT_MOVE - - CASE oDataObject.GetFormat(1) && Text - This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL - This.OLEDropEffects = 1+2 &&DROPEFFECT_COPY + DROPEFFECT_MOVE - - CASE oDataObject.GetFormat(15) && Files CF_HDROP - This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL - *This.OLEDropEffects = 4 &&DROPEFFECT_LINK - This.OLEDropEffects = 1 &&DROPEFFECT_COPY - OTHERWISE - This.OLEDropHasData = 0 &&DROPHASDATA_NOTUSEFUL - ENDCASE - - CASE nState == 1 && Drag Leave - CASE nState == 2 && Drag Over - ENDCASE - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.txtFile1.Valid - THISFORM.updateGlobalEnabled() - *THISFORM.checkFilenames_dt(1) - THIS.Refresh() - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.txtFile2.InteractiveChange - THISFORM.updateGlobalEnabled() - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.txtFile2.OLEDragDrop - LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord - LOCAL aValues, i, cText, nOperation - - *-- Check to see whether the user wants to copy or move - *IF nShift == 1 - nOperation = 1 &&DROPEFFECT_COPY - *ELSE - * nOperation = 2 &&DROPEFFECT_MOVE - *ENDIF - - *Thisform.LockScreen = .T. - - DO CASE - CASE oDataObject.GetFormat(1) && Text - cText = oDataObject.GetData(1) - - *-- Add the text as a new item in the list - *This.AddItem( cText ) - *? 2, cText - - CASE oDataObject.GetFormat(15) && Files CF_DROP - DIMENSION aValues[1] - oDataObject.GetData(15, @aValues ) - - *-- Add each filename as a new item in the list - *!* FOR i = 1 to alen(aValues) - *!* This.AddItem(aValues[m.i]) - *!* NEXT - *? 3, aValues[1] - THIS.Value = aValues[1] - ENDCASE - - *Thisform.LockScreen = .F. - - *-- Set the nEffect parameter for communication back to the source object - nEffect = nOperation - *NODEFAULT - THISFORM.updateGlobalEnabled() - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.txtFile2.OLEDragOver - LPARAMETERS oDataObject, nEffect, nButton, nShift, nXCoord, nYCoord, nState - - DO CASE - CASE nState == 0 &&DRAG_ENTER - DO CASE - *CASE oDataObject.GetFormat("OLE Variant Array") && Array - * This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL - * This.OLEDropEffects = 1+2 &&DROPEFFECT_COPY + DROPEFFECT_MOVE - - CASE oDataObject.GetFormat(1) && Text - This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL - This.OLEDropEffects = 1+2 &&DROPEFFECT_COPY + DROPEFFECT_MOVE - - CASE oDataObject.GetFormat(15) && Files CF_HDROP - This.OLEDropHasData = 1 &&DROPHASDATA_USEFUL - *This.OLEDropEffects = 4 &&DROPEFFECT_LINK - This.OLEDropEffects = 1 &&DROPEFFECT_COPY - OTHERWISE - This.OLEDropHasData = 0 &&DROPHASDATA_NOTUSEFUL - ENDCASE - - CASE nState == 1 && Drag Leave - CASE nState == 2 && Drag Over - ENDCASE - - ENDPROC - - PROCEDURE pgfDiff.pagFilesDiff.txtFile2.Valid - THISFORM.updateGlobalEnabled() - *THISFORM.checkFilenames_dt(2) - THIS.Refresh() - - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/FileName_Caps/Filename_caps.pj2 b/FileName_Caps/Filename_caps.pj2 index 2f69969..129aa8b 100644 --- a/FileName_Caps/Filename_caps.pj2 +++ b/FileName_Caps/Filename_caps.pj2 @@ -50,8 +50,8 @@ MODIFY PROJECT 'Filename_caps.pjx' NOWAIT NOSHOW NOPROJECTHOOK loProject = _VFP.Projects('Filename_caps.pjx') WITH loProject.FILES - .ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" DevInfo="" /> - .ADD('filename_caps.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" DevInfo="" /> + .ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('filename_caps.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="544" User="" /> * .ITEM('__newproject.f2b').Remove() @@ -63,13 +63,14 @@ WITH loProject.FILES * * - .ITEM(lcCurdir + 'config\config.fpw').Type = 'T' + .ITEM("config\config.fpw").Type = 'T' * ENDWITH WITH loProject * - .SetMain(lcCurdir + 'filename_caps.prg') + .SetMain("filename_caps.prg") + .Debug = .T. .Encrypted = .F. *<.CmntStyle = 1 /> diff --git a/README.md b/README.md index 74eed3b..a492088 100644 --- a/README.md +++ b/README.md @@ -10,13 +10,16 @@ Since I now maintain this project, my [fork](https://github.com/lscheffler/foxbi The spanish documentation is not longer maintained - it would fade. Remind yourself to compile the exe first. +**Note: If you have cloned the project, you must run it against itself to create the binaries.** +1. Run `DO FOXBIN2PRG.PRG WITH "path_to_FoxBin2Prg","Prg2Bin",,,,,,,,,"foxbin2prg_self.cfg"` +2. Create the exe by compiling the pjx + --- If you like to value my work, support the Geeks at [![Virtual Fox Fest!](https://virtualfoxfest.com/images/ZoomFoxSmall.png)](https://virtualfoxfest.com/) or [![Southwest Fox!](http://www.swfox.net/images/KokoWhite.jpg)](https://www.swfox.net). I also do not reject invitations to a beer, next time in Gilbert. --- - If you like to see Fernandos blog, or value his work: - Blog: http://fdbozzo.blogspot.com.es/ - [![DONATE!](http://www.pngall.com/wp-content/uploads/2016/05/PayPal-Donate-Button-PNG-File-180x100.png)](https://www.paypal.com/cgi-bin/webscr?cmd=_donations&business=fdbozzo%40gmail%2ecom&lc=ES&item_name=FoxBin2Prg&item_number=FoxBin2Prg&currency_code=USD&bn=PP%2dDonationsBF%3abtn_donateCC_LG%2egif%3aNonHosted) diff --git a/TESTS/DATOS_READONLY/FB2P_DBC.DC2 b/TESTS/DATOS_READONLY/FB2P_DBC.DC2 index 6cc2582..9bf4d24 100644 --- a/TESTS/DATOS_READONLY/FB2P_DBC.DC2 +++ b/TESTS/DATOS_READONLY/FB2P_DBC.DC2 @@ -4,6 +4,18 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * +*-- EXTERNAL_MEMBER identify external member names / EXTERNAL_MEMBER identifica los nombres de los miembros externos +*< EXTERNAL_MEMBER: Name="remote_connection_dbf" Type="connection" /> +*< EXTERNAL_MEMBER: Name="remote_connection_oracle" Type="connection" /> +*< EXTERNAL_MEMBER: Name="fb2p_depto" Type="table" /> +*< EXTERNAL_MEMBER: Name="nombrelargodeldbf" Type="table" /> +*< EXTERNAL_MEMBER: Name="rv_db_debug_setup" Type="view" /> +*< EXTERNAL_MEMBER: Name="vista_local" Type="view" /> +*< EXTERNAL_MEMBER: Name="vw_local_encuestas" Type="view" /> +*< EXTERNAL_MEMBER: Name="vw_ora_convenios" Type="view" /> +*< EXTERNAL_MEMBER: Name="vw_ora_dual" Type="view" /> +*< EXTERNAL_MEMBER: Name="storedproceduressource" Type="database" /> + FB2P_DBC @@ -11,1226 +23,4 @@ 11 .T. eventsfile.prg - - - - REMOTE_CONNECTION_DBF - - Visual FoxPro Tables - foxuser_fdb - - .F. - .T. - 15 - .F. - 1 - .F. - 0 - 4096 - - 0 - 1 - - 100 - - - REMOTE_CONNECTION_ORACLE - - - - DRIVER={Oracle en OraClient11g_home1};SERVER=BDDServer;UID=BDDUser;PWD=BDDPwd;DBQ=CARTERA;DBA=W;APA=T;EXC=F;XSM=Default;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;BTD=F;BNF=F;BAM=IfAllSuccessful;NUM=NLS;DPM=F;MTS=T;MDI=Me;CSR=F;FWC=F;FBS=60000;TLO=O;MLD=0;ODA - .F. - .T. - 15 - .F. - 3 - .F. - 10 - 8192 - - 180 - 1 - - 100 - - - - - - - - FB2P_DEPTO - Comentario de "fb2p_depto" - fb2p_depto.dbf - __ri_delete_fb2p_depto() - - - depto - fb2p_depto_record_rule_validation() - fb2p_depto_record_rule_validation_message() - - - - depto - - depto_field_comment - "Depto." - cl_optiongroup - c:\desa\foxbin2prg\tests\datos_readonly\fb2p_test.vcx - ! - XXXXXXXXXX - depto_field_validation_rule() - depto_field_validation_message() - - - descrip - - - - - - - - - - - - - - - depto - - .T. - - - descrip - - .F. - - - - - - -
"Depto.Caption"Descripción
- - - NOMBRELARGODELDBF - Comentario de la tabla "fb2p_dbf" - fb2p_dbf.dbf - del_trg() - __ri_insert_nombrelargodeldbf().AND.(ins_trg()) - __ri_update_nombrelargodeldbf().AND.(upd_trg()) - id - edad>10 - "Mensaje de error de la regla edad > 10" - - - - nombre - - Comentario de "Nombre" - "." - - - A - !XXXXXXXXXXXXXXXXXXXXXXXXXXXXX - .NOT.EMPTY(nombre) - "El nombre está vacío" - - - edad - - - - - - - - - - - - id - - - - - - - - - - - - bigtext - - - - - - - - - - - - depto - - - - - - - - - - - - - - - depto - - .F. - - - edad_nd - - .F. - - - edad - - .T. - - - i_nombre - - .F. - - - id - - .T. - - - nombre - - .F. - - - notdeleted - - .F. - - - - - - Relation 1 - NOMBRELARGODELDBF - FB2P_DEPTO - DEPTO - DEPTO - - - - -
"Nombre:"
- - - - - - - RV_DB_DEBUG_SETUP - - STROSNC.DB_DEBUG_SETUP - SELECT Db_debug_setup.PK_NAME, Db_debug_setup.ENABLED, Db_debug_setup.EVALUACION, Db_debug_setup.PK_METODO, Db_debug_setup.NIVELDEBUG, Db_debug_setup.F_DESDE, Db_debug_setup.F_HASTA, Db_debug_setup.DIRECCION_IP, Db_debug_setup.USUARIO FROM STROSNC.DB_DEBUG_SETUP Db_debug_setup ORDER BY Db_debug_setup.PK_NAME, Db_debug_setup.PK_METODO - .T. - 1 - .T. - remote_connection_Oracle - .T. - .T. - 100 - -1 - .F. - - .T. - - - .F. - .T. - 2 - 1 - 255 - 3 - - - - pk_name - - - C(30) - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.PK_NAME - - - enabled - - - N(3) - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.ENABLED - - - evaluacion - - - M - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.EVALUACION - - - pk_metodo - - - C(30) - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.PK_METODO - - - niveldebug - - - N(3) - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.NIVELDEBUG - - - f_desde - - - T - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.F_DESDE - - - f_hasta - - - T - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.F_HASTA - - - direccion_ip - - - C(30) - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.DIRECCION_IP - - - usuario - - - C(30) - - - - - - .F. - - - .F. - STROSNC.DB_DEBUG_SETUP.USUARIO - - - - - - - - - - VISTA_LOCAL - - fb2p_dbc!nombrelargodeldbf - SELECT Fb2p_depto.descrip, Nombrelargodeldbf.nombre, Nombrelargodeldbf.edad, Nombrelargodeldbf.id, Nombrelargodeldbf.depto FROM fb2p_dbc!fb2p_depto INNER JOIN fb2p_dbc!nombrelargodeldbf ON Fb2p_depto.depto = Nombrelargodeldbf.depto - .F. - 1 - .T. - - .F. - .T. - 100 - -1 - .T. - - .F. - - - .T. - .F. - 1 - 1 - 255 - 3 - - - - descrip - - - C(50) - - - - - - .F. - - - .F. - fb2p_dbc!fb2p_depto.descrip - - - nombre - - - C(30) - - - - - - .F. - - - .T. - fb2p_dbc!nombrelargodeldbf.nombre - - - edad - - - N(3) - - - - - - .F. - - - .T. - fb2p_dbc!nombrelargodeldbf.edad - - - id - - - I - - - - - - .T. - - - .F. - fb2p_dbc!nombrelargodeldbf.id - - - depto - - - C(10) - - - - - - .F. - - - .T. - fb2p_dbc!nombrelargodeldbf.depto - - - - - - - - - - VW_LOCAL_ENCUESTAS - - - SELECT ENCUESTAS.Promotor,ENCUESTAS.Idenc,ENCUESTAS.Calific,ENCUESTAS.Fecha, ENCUESTAS.Resultado FROM C:\DESA\FOXBIN2PRG\TESTS\DATOS_READONLY\ENCUESTAS.DBF ENCUESTAS - .F. - 1 - .T. - - .F. - .T. - 100 - -1 - .T. - - .F. - - - .F. - .T. - 1 - 1 - 255 - 3 - - - - promotor - - - C(20) - - - - - - .F. - - - .F. - promotor - - - idenc - - - C(20) - - - - - - .F. - - - .F. - idenc - - - calific - - - C(2) - - - - - - .F. - - - .F. - calific - - - fecha - - - D - - - - - - .F. - - - .F. - fecha - - - resultado - - - C(10) - - - - - - .F. - - - .F. - resultado - - - - - - - - - - VW_ORA_CONVENIOS - - CONVENIOS - SELECT CONVENIOS.ID_CONVENIO,CONVENIOS.NOMBRE_CONVENIO,CONVENIOS.HISTORICO FROM CONVENIOS - .F. - 1 - .T. - remote_connection_Oracle - .F. - .T. - 100 - -1 - .T. - - .F. - - - .F. - .T. - 2 - 1 - 255 - 3 - - - - id_convenio - - - C(15) - - - - - - .F. - - - .T. - CONVENIOS.ID_CONVENIO - - - nombre_convenio - - - C(250) - - - - - - .F. - - - .T. - CONVENIOS.NOMBRE_CONVENIO - - - historico - - - C(1) - - - - - - .F. - - - .T. - CONVENIOS.HISTORICO - - - - - - - - - - VW_ORA_DUAL - - DUAL - SELECT DUAL.DUMMY FROM DUAL - .F. - 1 - .T. - REMOTE_CONNECTION_ORACLE - .F. - .T. - 100 - -1 - .T. - - .F. - - - .F. - .T. - 2 - 1 - 255 - 3 - - - - dummy - Dummy - Dummy_field_comment - C(1) - Depto. - cl_optiongroup - fb2p_test.vcx - ! - XXXXXXXXXX - .F. - dummy_field_validation_rule() - dummy_field_validation_message - .T. - DUAL.DUMMY - - - - - - - - - - - 1 - =TABLEUPDATE() - ENDIF - ENDIF NOT already DELETED - ENDIF - UNLOCK RECORD (RECNO()) - llRetVal=pnerror=0 - RETURN llRetVal - -PROCEDURE RIUPDATE - LPARAMETERS tcFieldName,tcNewValue,tcCascadeParent - LOCAL llRetVal - llRetVal=.T. - IF ISRLOCKED() OR !RLOCK() - llRetVal=.F. - ELSE - IF EVAL(tcFieldName)<>tcNewValue - PRIVATE pcCascadeParent - pcCascadeParent=UPPER(IIF(TYPE("tcCascadeParent")<>"C","",tcCascadeParent)) - REPLACE (tcFieldName) WITH tcNewValue - IF CURSORGETPROP('BUFFERING') > 1 - =TABLEUPDATE() - ENDIF - ENDIF VALUES don't already match - ENDIF it's locked already, or I was able to lock it - UNLOCK RECORD (RECNO()) - llRetVal=pnerror=0 - RETURN llRetVal - -PROCEDURE rierror - PARAMETERS tnErrNo,tcMessage,tcCode,tcProgram - LOCAL lnErrorRows,lnXX - lnErrorRows=ALEN(gaErrors,1) - IF TYPE('gaErrors[lnErrorRows,1]')<>"L" - DIMENSION gaErrors[lnErrorRows+1,alen(gaErrors,2)] - lnErrorRows=lnErrorRows+1 - ENDIF - gaErrors[lnErrorRows,1]=tnErrNo - gaErrors[lnErrorRows,2]=tcMessage - gaErrors[lnErrorRows,3]=tcCode - gaErrors[lnErrorRows,4]="" - lnXX=1 - DO WHILE !EMPTY(PROGRAM(lnXX)) - gaErrors[lnErrorRows,4]=gaErrors[lnErrorRows,4]+","+; - PROGRAM(lnXX) - lnXX=lnXX+1 - ENDDO - gaErrors[lnErrorRows,5]=pcParentDBF - gaErrors[lnErrorRows,6]=pnParentRec - gaErrors[lnErrorRows,7]=pcParentID - gaErrors[lnErrorRows,8]=pcParentExpr - gaErrors[lnErrorRows,9]=pcChildDBF - gaErrors[lnErrorRows,10]=pnChildRec - gaErrors[lnErrorRows,11]=pcChildID - gaErrors[lnErrorRows,12]=pcChildExpr - RETURN tnErrNo - - -PROCEDURE riopen - PARAMETERS tcTable,tcOrder - - LOCAL lcCurWkArea,lcNewWkArea,lnInUseSpot,lnOccurs,lnOccurance - lnInUseSpot=0 - lnOccurs = OCCURS(UPPER(tcTable)+"*",UPPER(pcRIcursors)) - FOR lnOccurance = 1 TO lnOccurs - lnInUseSpot=ATC(tcTable+"*",pcRIcursors,lnOccurance) - IF ISDIGIT(SUBSTR(pcRIcursors,lnInUseSpot-1,1)) OR; - EMPTY(SUBSTR(pcRIcursors,lnInUseSpot-1,1)) - EXIT - ENDIF - lnInUseSpot=0 - ENDFOR - - IF lnInUseSpot=0 - lcCurWkArea=SELECT() - SELECT 0 - lcNewWkArea=SELECT() - IF NOT EMPTY(tcOrder) - USE (tcTable) AGAIN ORDER (tcOrder) ; - ALIAS ("__ri"+LTRIM(STR(SELECT()))) SHARE - ELSE - USE (tcTable) AGAIN ALIAS ("__ri"+LTRIM(STR(SELECT()))) SHARE - ENDIF - IF pnerror=0 - pcRIcursors=pcRIcursors+UPPER(tcTable)+"?"+STR(SELECT(),5) - ELSE - lcNewWkArea=0 - ENDIF something bad happened WHILE attempting TO OPEN the FILE - ELSE - lcNewWkArea=VAL(SUBSTR(pcRIcursors,lnInUseSpot+LEN(tcTable)+1,5)) - pcRIcursors = STRTRAN(pcRIcursors,UPPER(tcTable)+"*"+STR(lcNewWkArea,5),; - UPPER(tcTable)+"?"+STR(lcNewWkArea,5)) - IF NOT EMPTY(tcOrder) - SET ORDER TO (tcOrder) IN (lcNewWkArea) - ENDIF sent an ORDER - IF pnerror<>0 - lcNewWkArea=0 - ENDIF something bad happened WHILE setting ORDER - ENDIF - RETURN (lcNewWkArea) - - -PROCEDURE riend - PARAMETERS tlSuccess - LOCAL lnXX,lnSpot,lcWorkArea - IF tlSuccess - END TRANSACTION - ELSE - SET DELETED OFF - ROLLBACK - SET DELETED ON - ENDIF - IF EMPTY(pcRIolderror) - ON ERROR - ELSE - ON ERROR &pcRIolderror. - ENDIF - FOR lnXX=1 TO OCCURS("*",pcRIcursors) - lnSpot=ATC("*",pcRIcursors,lnXX)+1 - USE IN (VAL(SUBSTR(pcRIcursors,lnSpot,5))) - ENDFOR - IF pcOldCompat = "ON" - SET COMPATIBLE ON - ENDIF - IF pcOldDele="OFF" - SET DELETED OFF - ENDIF - IF pcOldExact="ON" - SET EXACT ON - ENDIF - IF pcOldTalk="ON" - SET TALK ON - ENDIF - DO CASE - CASE EMPTY(pcOldDBC) - SET DATA TO - CASE pcOldDBC<>DBC() - SET DATA TO (pcOldDBC) - ENDCASE - RETURN .T. - - -PROCEDURE rireuse - * rireuse.prg - PARAMETERS tcTableName,tcWkArea - pcRIcursors = STRTRAN(pcRIcursors,UPPER(tcTableName)+"?"+STR(tcWkArea,5),; - UPPER(tcTableName)+"*"+STR(tcWkArea,5)) - RETURN .T. - - ******************************************************************************** - ** "Referential integrity delete trigger for" fb2p_depto -PROCEDURE __RI_DELETE_fb2p_depto - LOCAL llRetVal - llRetVal = .T. - PRIVATE pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildID - PRIVATE pcParentExpr,pcChildExpr - STORE "" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr - STORE 0 TO pnParentRec,pnChildRec - IF _TRIGGERLEVEL=1 - BEGIN TRANSACTION - PRIVATE pcRIcursors,pcRIwkareas,pcRIolderror,pnerror,; - pcOldDele,pcOldExact,pcOldTalk,pcOldCompat,pcOldDBC - pcOldTalk=SET("TALK") - SET TALK OFF - pcOldDele=SET("DELETED") - pcOldExact=SET("EXACT") - pcOldCompat=SET("COMPATIBLE") - SET COMPATIBLE OFF - SET DELETED ON - SET EXACT OFF - pcRIcursors="" - pcRIwkareas="" - pcRIolderror=ON("error") - pnerror=0 - ON ERROR pnerror=rierror(ERROR(),MESSAGE(),MESSAGE(1),PROGRAM()) - IF TYPE('gaErrors(1)')<>"U" - RELEASE gaErrors - ENDIF - PUBLIC gaErrors(1,12) - pcOldDBC=DBC() - SET DATA TO ("FB2P_DBC") - ENDIF FIRST TRIGGER - LOCAL lcParentID && parent's value to be sought in child - LOCAL lcChildWkArea && child work area handle returned by riopen - LOCAL lcParentWkArea - LOCAL llDelHeaderarea - LOCAL lcStartArea - lcStartArea=SELECT() - llRetVal=.T. - lcParentWkArea=SELECT() - SELECT (lcParentWkArea) - pcParentDBF=DBF() - pnParentRec=RECNO() - STORE DEPTO TO lcParentID,pcParentID - pcParentExpr="DEPTO" - lcChildWkArea=riopen("nombrelargodeldbf","depto") - IF lcChildWkArea<=0 - IF _TRIGGERLEVEL=1 - DO riend WITH .F. - ENDIF AT the END OF the highest TRIGGER LEVEL - RETURN .F. - ENDIF NOT able TO OPEN the CHILD WORK area - pcChildDBF=DBF(lcChildWkArea) - SELECT (lcChildWkArea) - SEEK lcParentID - SCAN WHILE DEPTO=lcParentID AND llRetVal - pnChildRec=RECNO() - pcChildID=DEPTO - pcChildExpr="DEPTO" - llRetVal=RIDELETE() - ENDSCAN GET ALL OF the nombrelargodeldbf RECORDS - =rireuse("nombrelargodeldbf",lcChildWkArea) - IF NOT llRetVal - IF _TRIGGERLEVEL=1 - DO riend WITH llRetVal - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN llRetVal - ENDIF - IF _TRIGGERLEVEL=1 - DO riend WITH llRetVal - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN llRetVal - ** "End of Referential integrity Delete trigger for" fb2p_depto - ******************************************************************************** - - ******************************************************************************** -PROCEDURE __RI_UPDATE_nombrelargodeldbf - ** "Referential integrity update trigger for" nombrelargodeldbf - LOCAL llRetVal - llRetVal = .T. - PRIVATE pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildID - PRIVATE pcParentExpr,pcChildExpr - STORE "" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr - STORE 0 TO pnParentRec,pnChildRec - IF _TRIGGERLEVEL=1 - BEGIN TRANSACTION - PRIVATE pcRIcursors,pcRIwkareas,pcRIolderror,pnerror,; - pcOldDele,pcOldExact,pcOldTalk,pcOldCompat,pcOldDBC - pcOldTalk=SET("TALK") - SET TALK OFF - pcOldDele=SET("DELETED") - pcOldExact=SET("EXACT") - pcOldCompat=SET("COMPATIBLE") - SET COMPATIBLE OFF - SET DELETED ON - SET EXACT OFF - pcRIcursors="" - pcRIwkareas="" - pcRIolderror=ON("error") - pnerror=0 - ON ERROR pnerror=rierror(ERROR(),MESSAGE(),MESSAGE(1),PROGRAM()) - IF TYPE('gaErrors(1)')<>"U" - RELEASE gaErrors - ENDIF - PUBLIC gaErrors(1,12) - pcOldDBC=DBC() - SET DATA TO ("FB2P_DBC") - ENDIF FIRST TRIGGER - LOCAL lcParentID && parent's value to be sought in child - LOCAL lcOldParentID && previous parent id value - LOCAL lcChildWkArea && child work area handle returned by riopen - LOCAL lcChildID && child's value to be sought in parent - LOCAL lcOldChildID && old child id value - LOCAL lcParentWkArea && parentwork area handle returned by riopen - LOCAL lcStartArea - lcStartArea=SELECT() - llRetVal=.T. - lcChildWkArea=SELECT() - IF _TRIGGERLEVEL=1 OR TYPE("pccascadeparent")#"C" OR (NOT pcCascadeParent=="FB2P_DEPTO") - SELECT (lcChildWkArea) - lcChildID=DEPTO - lcOldChildID=OLDVAL("DEPTO") - pcChildDBF=DBF(lcChildWkArea) - pnChildRec=RECNO(lcChildWkArea) - pcChildID=lcOldChildID - pcChildExpr="DEPTO" - IF ISNULL(lcChildID) OR ISNULL(lcOldChildID) OR lcChildID <> lcOldChildID - lcParentWkArea=riopen("fb2p_depto","depto") - IF lcParentWkArea<=0 - IF _TRIGGERLEVEL=1 - DO riend WITH .F. - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN .F. - ENDIF NOT able TO OPEN the CHILD WORK area - pcParentDBF=DBF(lcParentWkArea) - llRetVal=SEEK(lcChildID,lcParentWkArea) - pnParentRec=RECNO(lcParentWkArea) - IF llRetVal AND NOT (ISRLOCKED(pnParentRec, lcParentWkArea) OR ; - ISFLOCKED(lcParentWkArea)) - IF RLOCK(lcParentWkArea) - UNLOCK RECORD pnParentRec IN (lcParentWkArea) - ELSE - =rireuse("tparen",lcParentWkArea) - pnerror = rierror(-1,"Insert restrict rule violated.","","") - IF _TRIGGERLEVEL=1 - DO riend WITH llRetVal - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN llRetVal - ENDIF - ENDIF - =rireuse("fb2p_depto",lcParentWkArea) - IF NOT llRetVal - pnerror = rierror(-1,"Insert restrict rule violated.","","") - IF _TRIGGERLEVEL=1 - DO riend WITH llRetVal - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN llRetVal - ENDIF no PARENT - ENDIF THIS VALUE was changed - ENDIF NOT PART OF a CASCADE FROM "fb2p_depto" - lcParentWkArea=lcChildWkArea - IF _TRIGGERLEVEL=1 - DO riend WITH llRetVal - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN llRetVal - ** "End of Referential integrity Update trigger for" nombrelargodeldbf - ******************************************************************************** - - ******************************************************************************** - ** "Referential integrity insert trigger for" nombrelargodeldbf -PROCEDURE __RI_INSERT_nombrelargodeldbf - LOCAL llRetVal - llRetVal = .T. - PRIVATE pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildID - PRIVATE pcParentExpr,pcChildExpr - STORE "" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr - STORE 0 TO pnParentRec,pnChildRec - IF _TRIGGERLEVEL=1 - BEGIN TRANSACTION - PRIVATE pcRIcursors,pcRIwkareas,pcRIolderror,pnerror,; - pcOldDele,pcOldExact,pcOldTalk,pcOldCompat,pcOldDBC - pcOldTalk=SET("TALK") - SET TALK OFF - pcOldDele=SET("DELETED") - pcOldExact=SET("EXACT") - pcOldCompat=SET("COMPATIBLE") - SET COMPATIBLE OFF - SET DELETED ON - SET EXACT OFF - pcRIcursors="" - pcRIwkareas="" - pcRIolderror=ON("error") - pnerror=0 - ON ERROR pnerror=rierror(ERROR(),MESSAGE(),MESSAGE(1),PROGRAM()) - IF TYPE('gaErrors(1)')<>"U" - RELEASE gaErrors - ENDIF - PUBLIC gaErrors(1,12) - pcOldDBC=DBC() - SET DATA TO ("FB2P_DBC") - ENDIF FIRST TRIGGER - LOCAL lcChildID && child's value to be sought in parent - LOCAL lcParentWkArea && parentwork area handle returned by riopen - LOCAL lcChildWkArea && child's work area - LOCAL lcStartArea - lcStartArea=SELECT() - llRetVal=.T. - lcChildWkArea=SELECT() - SELECT (lcChildWkArea) - lcChildID=DEPTO - pcChildDBF=DBF(lcChildWkArea) - pnChildRec=RECNO(lcChildWkArea) - pcChildID=lcChildID - pcChildExpr="DEPTO" - lcParentWkArea=riopen("fb2p_depto","depto") - IF lcParentWkArea<=0 - IF _TRIGGERLEVEL=1 - DO riend WITH .F. - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN .F. - ENDIF NOT able TO OPEN the CHILD WORK area - pcParentDBF=DBF(lcParentWkArea) - llRetVal=SEEK(lcChildID,lcParentWkArea) - pnParentRec=RECNO(lcParentWkArea) - IF llRetVal AND NOT (ISRLOCKED(pnParentRec, lcParentWkArea) OR ; - ISFLOCKED(lcParentWkArea)) - IF RLOCK(lcParentWkArea) - UNLOCK RECORD pnParentRec IN (lcParentWkArea) - ELSE - =rireuse("tparen",lcParentWkArea) - pnerror = rierror(-1,"Insert restrict rule violated.","","") - IF _TRIGGERLEVEL=1 - DO riend WITH llRetVal - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN llRetVal - ENDIF - ENDIF - =rireuse("fb2p_depto",lcParentWkArea) - IF NOT llRetVal - pnerror = rierror(-1,"Insert restrict rule violated.","","") - IF _TRIGGERLEVEL=1 - DO riend WITH llRetVal - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN llRetVal - ENDIF - IF _TRIGGERLEVEL=1 - DO riend WITH llRetVal - ENDIF AT the END OF the highest TRIGGER LEVEL - SELECT (lcStartArea) - RETURN llRetVal - ** "End of Referential integrity insert trigger for" nombrelargodeldbf - ******************************************************************************** - **__RI_FOOTER!@ Do NOT REMOVE or MODIFY this line!!!! @!__RI_FOOTER** - - ]]> \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/FB2P_DBF.DB2 b/TESTS/DATOS_READONLY/FB2P_DBF.DB2 index 48af5b3..b153952 100644 --- a/TESTS/DATOS_READONLY/FB2P_DBF.DB2 +++ b/TESTS/DATOS_READONLY/FB2P_DBF.DB2 @@ -5,10 +5,11 @@ *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbf.dbf" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * + 1252 - 2014/01/06 + fb2p_dbc.dbc0x00000031Visual FoxPro, autoincrement enabled @@ -116,66 +117,117 @@ + - FB2P_DBF.CDX + + + + + DEPTO + REGULAR + DEPTO + .NOT.DELETED().AND..T. + ASCENDING + GENERAL + + + EDAD + CANDIDATE + EDAD + + DESCENDING + MACHINE + + + EDAD_ND + REGULAR + EDAD + .NOT.DELETED() + ASCENDING + MACHINE + + + ID + PRIMARY + ID + + ASCENDING + MACHINE + + + I_NOMBRE + REGULAR + NOMBRE + .NOT.DELETED().AND..T..AND..NOT..F. + DESCENDING + GENERAL + + + NOMBRE + REGULAR + NOMBRE + .NOT.DELETED().AND..T..AND..T. + ASCENDING + GENERAL + + + NOTDELETED + BINARY + .NOT.DELETED() + + ASCENDING + MACHINE + + + + + + + + + + + Fer + 45 + 18 + + D.1.C + + + + Fer2 + 46 + 22 + + D.1.C + + + + Fer3 + 47 + 24 + + D.1.C + + + + Fer4 + 48 + 26 + + D.1.C + + + + Fer5 + 49 + 28 + + D.1.C + + + - - - ID - PRIMARY - ID - - ASCENDING - MACHINE - - - EDAD_ND - REGULAR - EDAD - .NOT.DELETED() - ASCENDING - MACHINE - - - NOTDELETED - BINARY - .NOT.DELETED() - - ASCENDING - MACHINE - - - EDAD - CANDIDATE - EDAD - - DESCENDING - MACHINE - - - DEPTO - REGULAR - DEPTO - .NOT.DELETED().AND..T. - ASCENDING - GENERAL - - - NOMBRE - REGULAR - NOMBRE - .NOT.DELETED().AND..T..AND..T. - ASCENDING - GENERAL - - - I_NOMBRE - REGULAR - NOMBRE - .NOT.DELETED().AND..T..AND..NOT..F. - DESCENDING - GENERAL - -
+ diff --git a/TESTS/DATOS_READONLY/Menu_Comments_Procedure.mn2 b/TESTS/DATOS_READONLY/Menu_Comments_Procedure.mn2 index e5e7456..8b30112 100644 --- a/TESTS/DATOS_READONLY/Menu_Comments_Procedure.mn2 +++ b/TESTS/DATOS_READONLY/Menu_Comments_Procedure.mn2 @@ -9,7 +9,7 @@ * DEFINE MENU _MSYSMENU BAR -DEFINE PAD _40O0YW62F OF _MSYSMENU PROMPT "A first Entry" COLOR SCHEME 3 +DEFINE PAD "_40O0YW62F" OF _MSYSMENU PROMPT "A first Entry" COLOR SCHEME 3 ON PAD _40O0YW62F OF _MSYSMENU ACTIVATE POPUP AfirstEntr @@ -22,7 +22,7 @@ ON PAD _40O0YW62F OF _MSYSMENU ACTIVATE POPUP AfirstEntr DEFINE BAR 2 OF AfirstEntr PROMPT "Hide Errors" && Setup some very effective error handling ON SELECTION BAR 2 OF AfirstEntr DO BAR_2_OF_AfirstEntr_FB2P -DEFINE PAD _40O0YW62G OF _MSYSMENU PROMPT "E\ DEFINE MENU _MSYSMENU BAR -DEFINE PAD _40O0YW62F OF _MSYSMENU PROMPT "A first Entry" COLOR SCHEME 3 +DEFINE PAD "_40O0YW62F" OF _MSYSMENU PROMPT "A first Entry" COLOR SCHEME 3 ON PAD _40O0YW62F OF _MSYSMENU ACTIVATE POPUP AfirstEntr @@ -22,7 +22,7 @@ ON PAD _40O0YW62F OF _MSYSMENU ACTIVATE POPUP AfirstEntr DEFINE BAR 2 OF AfirstEntr PROMPT "Hide Errors" ON SELECTION BAR 2 OF AfirstEntr DO BAR_2_OF_AfirstEntr_FB2P -DEFINE PAD _40O0YW62G OF _MSYSMENU PROMPT "E\a line break in it ON SELECTION PAD _40O101BHZ OF _MSYSMENU messageb("Hello!") diff --git a/TESTS/DATOS_READONLY/classlib_method_order_bug_test.grdbase.vc2 b/TESTS/DATOS_READONLY/classlib_method_order_bug_test.grdbase.vc2 new file mode 100644 index 0000000..4839743 --- /dev/null +++ b/TESTS/DATOS_READONLY/classlib_method_order_bug_test.grdbase.vc2 @@ -0,0 +1,139 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="classlib_method_order_bug_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS grdbase AS grid + *< CLASSDATA: Baseclass="grid" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Column1.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column1.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column2.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column2.Text1" UniqueID="" Timestamp="" /> + + * + *m: canresort + *m: commoncolumnclick && Generic column click handler + *m: createtag && Create a grid indexd tag for sorting + *m: resizecover + *m: visible_assign + * + + * + ColumnCount = 2 + Height = 200 + Name = "grdbase" + Width = 320 + Column1.Name = "Column1" + Column2.Name = "Column2" + * + + ADD OBJECT 'Column1.Header1' AS header WITH ; + Caption = "Header1", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Column1.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Column2.Header1' AS header WITH ; + Caption = "Header1", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Column2.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + PROCEDURE canresort + * + * CanResort + * + RETURN .T. + ENDPROC + + PROCEDURE Click + * + * Do some things here + * + DODEFAULT() + ENDPROC + + PROCEDURE commoncolumnclick && Generic column click handler + * + * Common behavior when clicked + * + LPARAMETERS toColumn + ENDPROC + + PROCEDURE createtag && Create a grid indexd tag for sorting + * + * Index on each column's ControlSource + * + ENDPROC + + PROCEDURE DblClick + * + * Double-clicked! + * + RETURN DODEFAULT() + ENDPROC + + PROCEDURE Destroy + * + * Destroy the grid + * + RETURN .T. + ENDPROC + + PROCEDURE Resize + * + * React to resizing the grid + * + ENDPROC + + PROCEDURE resizecover + * + * ResizeCover if one exists + * + ENDPROC + + PROCEDURE visible_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.Visible = m.vNewVal + + ENDPROC + + PROCEDURE When + * + * When what? + * + ENDPROC + + PROCEDURE Column1.Text1.Click + * + * Call common method + * + this.Parent.Parent.commoncolumnclick(this) + ENDPROC + + PROCEDURE Column2.Text1.Click + * + * Call common method + * + this.Parent.Parent.commoncolumnclick(this) + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/classlib_method_order_bug_test.grdgeneral.vc2 b/TESTS/DATOS_READONLY/classlib_method_order_bug_test.grdgeneral.vc2 new file mode 100644 index 0000000..754e01e --- /dev/null +++ b/TESTS/DATOS_READONLY/classlib_method_order_bug_test.grdgeneral.vc2 @@ -0,0 +1,74 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="classlib_method_order_bug_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS grdgeneral AS grdbase OF "classlib_method_order_bug_test.vcx" + *< CLASSDATA: Baseclass="grid" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Name = "grdgeneral" + Column1.Header1.Name = "Header1" + Column1.Name = "Column1" + Column1.Text1.Name = "Text1" + Column2.Header1.Name = "Header1" + Column2.Name = "Column2" + Column2.Text1.Name = "Text1" + * + + PROCEDURE canresort + * + * Call default logic. + * + IF NOT DODEFAULT() + RETURN .F. + ENDIF + ENDPROC + + PROCEDURE commoncolumnclick && Generic column click handler + *!****************************************************************************** + *!* Method: grdGeneral::CommonColumnClick() + *!* Returns: Logical + LPARAMETERS toColumn + + * + * Call default logic. + * + IF NOT DODEFAULT() + RETURN .F. + ENDIF + + * + * Measure Success + * + LOCAL llSuccess as Boolean + llSuccess = .T. + + ** TODO + + * + * Return logical, success(T) or failure(F) + * + RETURN llSuccess + ENDPROC + + PROCEDURE Init + * + * Call default logic. + * + IF NOT DODEFAULT() + RETURN .F. + ENDIF + ENDPROC + + PROCEDURE Column1.Text1.Click + * + * Call default logic. + * + IF NOT DODEFAULT() + RETURN .F. + ENDIF + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/classlib_method_order_bug_test.vc2 b/TESTS/DATOS_READONLY/classlib_method_order_bug_test.vc2 index 888f4aa..777f797 100644 --- a/TESTS/DATOS_READONLY/classlib_method_order_bug_test.vc2 +++ b/TESTS/DATOS_READONLY/classlib_method_order_bug_test.vc2 @@ -4,202 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="classlib_method_order_bug_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS grdbase AS grid - *< CLASSDATA: Baseclass="grid" Timestamp="" Scale="Pixels" Uniqueid="" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="grdbase" Baseclass="grid" /> +*< EXTERNAL_CLASS: Name="grdgeneral" Baseclass="grid" /> - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Column1.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column1.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column2.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column2.Text1" UniqueID="" Timestamp="" /> - - * - *m: canresort - *m: commoncolumnclick && Generic column click handler - *m: createtag && Create a grid indexd tag for sorting - *m: resizecover - *m: visible_assign - * - - ColumnCount = 2 - Height = 200 - Name = "grdbase" - Width = 320 - Column1.Name = "Column1" - Column2.Name = "Column2" - - ADD OBJECT 'Column1.Header1' AS header WITH ; - Caption = "Header1", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Column1.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Column2.Header1' AS header WITH ; - Caption = "Header1", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Column2.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - PROCEDURE canresort - * - * CanResort - * - RETURN .T. - ENDPROC - - PROCEDURE Click - * - * Do some things here - * - DODEFAULT() - ENDPROC - - PROCEDURE commoncolumnclick && Generic column click handler - * - * Common behavior when clicked - * - LPARAMETERS toColumn - ENDPROC - - PROCEDURE createtag && Create a grid indexd tag for sorting - * - * Index on each column's ControlSource - * - ENDPROC - - PROCEDURE DblClick - * - * Double-clicked! - * - RETURN DODEFAULT() - ENDPROC - - PROCEDURE Destroy - * - * Destroy the grid - * - RETURN .T. - ENDPROC - - PROCEDURE Resize - * - * React to resizing the grid - * - ENDPROC - - PROCEDURE resizecover - * - * ResizeCover if one exists - * - ENDPROC - - PROCEDURE visible_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.Visible = m.vNewVal - - ENDPROC - - PROCEDURE When - * - * When what? - * - ENDPROC - - PROCEDURE Column1.Text1.Click - * - * Call common method - * - this.Parent.Parent.commoncolumnclick(this) - ENDPROC - - PROCEDURE Column2.Text1.Click - * - * Call common method - * - this.Parent.Parent.commoncolumnclick(this) - ENDPROC - -ENDDEFINE - -DEFINE CLASS grdgeneral AS grdbase OF "classlib_method_order_bug_test.vcx" - *< CLASSDATA: Baseclass="grid" Timestamp="" Scale="Pixels" Uniqueid="" /> - - Name = "grdgeneral" - Column1.Header1.Name = "Header1" - Column1.Name = "Column1" - Column1.Text1.Name = "Text1" - Column2.Header1.Name = "Header1" - Column2.Name = "Column2" - Column2.Text1.Name = "Text1" - - PROCEDURE canresort - * - * Call default logic. - * - IF NOT DODEFAULT() - RETURN .F. - ENDIF - ENDPROC - - PROCEDURE commoncolumnclick && Generic column click handler - *!****************************************************************************** - *!* Method: grdGeneral::CommonColumnClick() - *!* Returns: Logical - LPARAMETERS toColumn - - * - * Call default logic. - * - IF NOT DODEFAULT() - RETURN .F. - ENDIF - - * - * Measure Success - * - LOCAL llSuccess as Boolean - llSuccess = .T. - - ** TODO - - * - * Return logical, success(T) or failure(F) - * - RETURN llSuccess - ENDPROC - - PROCEDURE Init - * - * Call default logic. - * - IF NOT DODEFAULT() - RETURN .F. - ENDIF - ENDPROC - - PROCEDURE Column1.Text1.Click - * - * Call default logic. - * - IF NOT DODEFAULT() - RETURN .F. - ENDIF - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_checkbox.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_checkbox.dataenvironment.sc2 new file mode 100644 index 0000000..6c1f08d --- /dev/null +++ b/TESTS/DATOS_READONLY/f_checkbox.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_checkbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_checkbox.f_base1.sc2 b/TESTS/DATOS_READONLY/f_checkbox.f_base1.sc2 new file mode 100644 index 0000000..5d9b091 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_checkbox.f_base1.sc2 @@ -0,0 +1,822 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_checkbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_checkbox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Check1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_checkbox2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Check2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_checkbox3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Check3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_checkbox4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Check4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Check5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Check6" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Left = 0 + Name = "F_base1" + Top = 0 + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "CHECKBOX NORMAL" + Label1.Name = "Label1" + Label2.Caption = "CHECKBOX SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Check1' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (17), ; + HelpContextID = 0, ; + Left = (64), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (72), ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (152), ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Check2' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 64, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 96, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Cl_checkbox1' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 340, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 72, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Cl_checkbox2' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 340, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 96, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 76, ; + Left = 24, ; + Name = "Container1", ; + Top = 152, ; + Width = 516 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Check3' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 40, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Container1.Check4' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 40, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 40, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Container1.Cl_checkbox3' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 316, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Container1.Cl_checkbox4' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 316, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 40, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 113, ; + Left = 24, ; + Name = "Pageframe1", ; + PageCount = 2, ; + Top = 276, ; + Width = 517, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Check5' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 35, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Pageframe1.Page1.Check6' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 35, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 40, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_checkbox5' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 311, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_checkbox6' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 311, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 40, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_checkbox.sc2 b/TESTS/DATOS_READONLY/f_checkbox.sc2 index 05a45b7..d1988ca 100644 --- a/TESTS/DATOS_READONLY/f_checkbox.sc2 +++ b/TESTS/DATOS_READONLY/f_checkbox.sc2 @@ -4,830 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_checkbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_base1" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_checkbox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Check1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_checkbox2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Check2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_checkbox3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Check3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_checkbox4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Check4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Check5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Check6" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Left = 0 - Name = "F_base1" - Top = 0 - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "CHECKBOX NORMAL" - Label1.Name = "Label1" - Label2.Caption = "CHECKBOX SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Check1' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (17), ; - HelpContextID = 0, ; - Left = (64), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (72), ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (152), ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Check2' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 64, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 96, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Cl_checkbox1' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 340, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 72, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Cl_checkbox2' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 340, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 96, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 76, ; - Left = 24, ; - Name = "Container1", ; - Top = 152, ; - Width = 516 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Check3' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 40, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Container1.Check4' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 40, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 40, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Container1.Cl_checkbox3' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 316, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Container1.Cl_checkbox4' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 316, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 40, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 113, ; - Left = 24, ; - Name = "Pageframe1", ; - PageCount = 2, ; - Top = 276, ; - Width = 517, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Check5' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 35, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Pageframe1.Page1.Check6' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 35, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 40, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_checkbox5' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 311, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_checkbox6' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 311, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 40, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_combobox.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_combobox.dataenvironment.sc2 new file mode 100644 index 0000000..728286b --- /dev/null +++ b/TESTS/DATOS_READONLY/f_combobox.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_combobox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_combobox.f_base1.sc2 b/TESTS/DATOS_READONLY/f_combobox.f_base1.sc2 new file mode 100644 index 0000000..c8cd5b5 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_combobox.f_base1.sc2 @@ -0,0 +1,1236 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_combobox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="ComboDropdown1" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Name = "F_base1" + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "COMBOBOX NORMAL" + Label1.Name = "Label1" + Label2.Caption = "COMBOBOX SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_ComboDropdown1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 328, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Cl_ComboList1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 328, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 7, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 76, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'ComboDropdown1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (24), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = (48), ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (44), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (200) + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'ComboList1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 48, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 76, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 97, ; + Left = 28, ; + Name = "Container1", ; + TabIndex = 9, ; + Top = 116, ; + Width = 512 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Cl_ComboDropdown1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 300, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 20, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Container1.Cl_ComboList1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 300, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 7, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 52, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Container1.ComboDropdown1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 20, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 20, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'Container1.ComboList1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 20, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 52, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 153, ; + Left = 28, ; + Name = "Pageframe1", ; + PageCount = 2, ; + TabIndex = 10, ; + Top = 236, ; + Width = 513, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_ComboDropdown1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 299, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_ComboList1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 299, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 7, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Pageframe1.Page1.ComboDropdown1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 19, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'Pageframe1.Page1.ComboList1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 19, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + PROCEDURE Cl_ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Cl_ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.Cl_ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.Cl_ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.Cl_ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.Cl_ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_combobox.sc2 b/TESTS/DATOS_READONLY/f_combobox.sc2 index e46ebb6..5e9f165 100644 --- a/TESTS/DATOS_READONLY/f_combobox.sc2 +++ b/TESTS/DATOS_READONLY/f_combobox.sc2 @@ -4,1244 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_combobox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_base1" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="ComboDropdown1" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Name = "F_base1" - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "COMBOBOX NORMAL" - Label1.Name = "Label1" - Label2.Caption = "COMBOBOX SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_ComboDropdown1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 328, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Cl_ComboList1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 328, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 7, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 76, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'ComboDropdown1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (24), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = (48), ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (44), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (200) - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'ComboList1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 48, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 76, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 97, ; - Left = 28, ; - Name = "Container1", ; - TabIndex = 9, ; - Top = 116, ; - Width = 512 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Cl_ComboDropdown1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 300, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 20, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Container1.Cl_ComboList1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 300, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 7, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 52, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Container1.ComboDropdown1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 20, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 20, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'Container1.ComboList1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 20, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 52, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 153, ; - Left = 28, ; - Name = "Pageframe1", ; - PageCount = 2, ; - TabIndex = 10, ; - Top = 236, ; - Width = 513, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_ComboDropdown1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 299, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_ComboList1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 299, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 7, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Pageframe1.Page1.ComboDropdown1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 19, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'Pageframe1.Page1.ComboList1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 19, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - PROCEDURE Cl_ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Cl_ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.Cl_ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.Cl_ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.Cl_ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.Cl_ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_commandgroup.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_commandgroup.dataenvironment.sc2 new file mode 100644 index 0000000..f7097e9 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_commandgroup.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_commandgroup.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_commandgroup.f_base1.sc2 b/TESTS/DATOS_READONLY/f_commandgroup.f_base1.sc2 new file mode 100644 index 0000000..08e149d --- /dev/null +++ b/TESTS/DATOS_READONLY/f_commandgroup.f_base1.sc2 @@ -0,0 +1,1398 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_commandgroup.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_commandbutton1" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Name = "F_base1" + Edit1.Name = "Edit1" + Edit1.Value = * En los OptionGroup subclasados, cuando el Option de la clase de base tiene Autosize=.T. y la instancia tiene Autosize=.F., ocurre esto: - Los option normales deben mantener su longitud y apariencia nuevos - Los option graficos deben mantener su longitud y apariencia, pero pierden en height (bug de VFP) * En los OptionGroup normales, no hay problemas y se deben mantener igual siempre * RECOMENDACIÓN: No usar Autosize=.T. en una clase de base + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "COMMANDGROUP NORMAL" + Label1.Name = "Label1" + Label2.Caption = "COMMANDGROUP SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_commandbutton1' AS cl_commandbutton WITH ; + Alignment = 2, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + Caption = "Este es el boton 2", ; + ColorScheme = 1, ; + ColorSource = 4, ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (27), ; + Left = (306), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_commandbutton1", ; + OLEDragPicture = ..\..\, ; + Picture = bmps\sobrepostal.bmp, ; + PictureMargin = 0, ; + PicturePosition = 4, ; + PictureSpacing = 0, ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Themes = .T., ; + ToolTipText = "", ; + Top = (392), ; + Visible = .T., ; + Width = (200), ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandbutton" /> + + ADD OBJECT 'Cl_commandgroup1' AS cl_commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 304, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 128,255,128, ; + Command1.Cancel = .F., ; + Command1.Caption = "Este es el botón de comando 1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 0,128,192, ; + Command1.DisabledForeColor = 128,0,255, ; + Command1.DisabledPicture = bmps\treeview.bmp, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 21, ; + Command1.HelpContextID = 0, ; + Command1.Left = 4, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 200, ; + Command1.WordWrap = .F., ; + Command2.Alignment = 2, ; + Command2.Anchor = 0, ; + Command2.AutoSize = .F., ; + Command2.BackColor = 128,255,128, ; + Command2.Cancel = .F., ; + Command2.Caption = "Este es el botón de comando 2", ; + Command2.ColorScheme = 1, ; + Command2.ColorSource = 4, ; + Command2.Comment = "", ; + Command2.Default = .F., ; + Command2.DisabledBackColor = 0,128,192, ; + Command2.DisabledForeColor = 128,0,255, ; + Command2.DisabledPicture = bmps\treeview.bmp, ; + Command2.DownPicture = ..\..\, ; + Command2.DragIcon = ..\..\, ; + Command2.DragMode = 0, ; + Command2.Enabled = .F., ; + Command2.FontBold = .F., ; + Command2.FontCharSet = 0, ; + Command2.FontCondense = .F., ; + Command2.FontExtend = .F., ; + Command2.FontItalic = .F., ; + Command2.FontName = "Arial", ; + Command2.FontOutline = .F., ; + Command2.FontShadow = .F., ; + Command2.FontSize = 8, ; + Command2.FontStrikethru = .F., ; + Command2.FontUnderline = .F., ; + Command2.ForeColor = 0,0,0, ; + Command2.Height = 21, ; + Command2.HelpContextID = 0, ; + Command2.Left = 4, ; + Command2.MouseIcon = ..\..\, ; + Command2.MousePointer = 0, ; + Command2.Name = "Command2", ; + Command2.OLEDragMode = 0, ; + Command2.OLEDragPicture = ..\..\, ; + Command2.OLEDropEffects = 3, ; + Command2.OLEDropMode = 0, ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PictureMargin = 0, ; + Command2.PicturePosition = 4, ; + Command2.PictureSpacing = 0, ; + Command2.RightToLeft = .F., ; + Command2.SpecialEffect = 0, ; + Command2.StatusBarText = "", ; + Command2.Style = 0, ; + Command2.TabStop = .T., ; + Command2.Tag = "", ; + Command2.TerminateRead = .F., ; + Command2.Themes = .T., ; + Command2.ToolTipText = "", ; + Command2.Top = 28, ; + Command2.Visible = .T., ; + Command2.WhatsThisHelpID = -1, ; + Command2.Width = 200, ; + Command2.WordWrap = .F., ; + Command3.Alignment = 2, ; + Command3.Anchor = 0, ; + Command3.AutoSize = .F., ; + Command3.BackColor = 128,255,128, ; + Command3.Cancel = .F., ; + Command3.Caption = "Este es el botón de comando 3", ; + Command3.ColorScheme = 1, ; + Command3.ColorSource = 4, ; + Command3.Comment = "", ; + Command3.Default = .F., ; + Command3.DisabledBackColor = 0,128,192, ; + Command3.DisabledForeColor = 128,0,255, ; + Command3.DisabledPicture = bmps\treeview.bmp, ; + Command3.DownPicture = ..\..\, ; + Command3.DragIcon = ..\..\, ; + Command3.DragMode = 0, ; + Command3.Enabled = .T., ; + Command3.FontBold = .F., ; + Command3.FontCharSet = 0, ; + Command3.FontCondense = .F., ; + Command3.FontExtend = .F., ; + Command3.FontItalic = .F., ; + Command3.FontName = "Arial", ; + Command3.FontOutline = .F., ; + Command3.FontShadow = .F., ; + Command3.FontSize = 8, ; + Command3.FontStrikethru = .F., ; + Command3.FontUnderline = .F., ; + Command3.ForeColor = 0,0,0, ; + Command3.Height = 21, ; + Command3.HelpContextID = 0, ; + Command3.Left = 4, ; + Command3.MouseIcon = ..\..\, ; + Command3.MousePointer = 0, ; + Command3.Name = "Command3", ; + Command3.OLEDragMode = 0, ; + Command3.OLEDragPicture = ..\..\, ; + Command3.OLEDropEffects = 3, ; + Command3.OLEDropMode = 0, ; + Command3.Picture = bmps\sobrepostal.bmp, ; + Command3.PictureMargin = 0, ; + Command3.PicturePosition = 4, ; + Command3.PictureSpacing = 0, ; + Command3.RightToLeft = .F., ; + Command3.SpecialEffect = 0, ; + Command3.StatusBarText = "", ; + Command3.Style = 0, ; + Command3.TabStop = .T., ; + Command3.Tag = "", ; + Command3.TerminateRead = .F., ; + Command3.Themes = .T., ; + Command3.ToolTipText = "", ; + Command3.Top = 52, ; + Command3.Visible = .T., ; + Command3.WhatsThisHelpID = -1, ; + Command3.Width = 200, ; + Command3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'Command1' AS commandbutton WITH ; + Alignment = 2, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + Cancel = .F., ; + Caption = "Este es el boton 1", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Default = .F., ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (27), ; + HelpContextID = 0, ; + Left = (44), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Command1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureMargin = 0, ; + PicturePosition = 4, ; + PictureSpacing = 0, ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 10, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (392), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (200), ; + WordWrap = .F. + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (76), ; + HelpContextID = 0, ; + Left = (36), ; + MemberClass = "cl_commandbutton", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (44), ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (228), ; + Cl_commandbutton1.Alignment = 2, ; + Cl_commandbutton1.Anchor = 0, ; + Cl_commandbutton1.AutoSize = .F., ; + Cl_commandbutton1.BackColor = 128,255,128, ; + Cl_commandbutton1.Cancel = .F., ; + Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; + Cl_commandbutton1.ColorScheme = 1, ; + Cl_commandbutton1.ColorSource = 4, ; + Cl_commandbutton1.Comment = "", ; + Cl_commandbutton1.Default = .F., ; + Cl_commandbutton1.DisabledBackColor = 0,128,192, ; + Cl_commandbutton1.DisabledForeColor = 128,0,255, ; + Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton1.DownPicture = ..\..\, ; + Cl_commandbutton1.DragIcon = ..\..\, ; + Cl_commandbutton1.DragMode = 0, ; + Cl_commandbutton1.Enabled = .T., ; + Cl_commandbutton1.FontBold = .F., ; + Cl_commandbutton1.FontCharSet = 0, ; + Cl_commandbutton1.FontCondense = .F., ; + Cl_commandbutton1.FontExtend = .F., ; + Cl_commandbutton1.FontItalic = .F., ; + Cl_commandbutton1.FontName = "Arial", ; + Cl_commandbutton1.FontOutline = .F., ; + Cl_commandbutton1.FontShadow = .F., ; + Cl_commandbutton1.FontSize = 8, ; + Cl_commandbutton1.FontStrikethru = .F., ; + Cl_commandbutton1.FontUnderline = .F., ; + Cl_commandbutton1.Height = 21, ; + Cl_commandbutton1.HelpContextID = 0, ; + Cl_commandbutton1.Left = 8, ; + Cl_commandbutton1.MouseIcon = ..\..\, ; + Cl_commandbutton1.MousePointer = 0, ; + Cl_commandbutton1.Name = "Cl_commandbutton1", ; + Cl_commandbutton1.OLEDragMode = 0, ; + Cl_commandbutton1.OLEDragPicture = ..\..\, ; + Cl_commandbutton1.OLEDropEffects = 3, ; + Cl_commandbutton1.OLEDropMode = 0, ; + Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton1.PictureMargin = 0, ; + Cl_commandbutton1.PicturePosition = 4, ; + Cl_commandbutton1.PictureSpacing = 0, ; + Cl_commandbutton1.RightToLeft = .F., ; + Cl_commandbutton1.SpecialEffect = 0, ; + Cl_commandbutton1.StatusBarText = "", ; + Cl_commandbutton1.Style = 0, ; + Cl_commandbutton1.TabStop = .T., ; + Cl_commandbutton1.Tag = "", ; + Cl_commandbutton1.TerminateRead = .F., ; + Cl_commandbutton1.Themes = .T., ; + Cl_commandbutton1.ToolTipText = "", ; + Cl_commandbutton1.Top = 4, ; + Cl_commandbutton1.Visible = .T., ; + Cl_commandbutton1.WhatsThisHelpID = -1, ; + Cl_commandbutton1.Width = 200, ; + Cl_commandbutton1.WordWrap = .F., ; + Cl_commandbutton2.Alignment = 2, ; + Cl_commandbutton2.Anchor = 0, ; + Cl_commandbutton2.AutoSize = .F., ; + Cl_commandbutton2.BackColor = 128,255,128, ; + Cl_commandbutton2.Cancel = .F., ; + Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; + Cl_commandbutton2.ColorScheme = 1, ; + Cl_commandbutton2.ColorSource = 4, ; + Cl_commandbutton2.Comment = "", ; + Cl_commandbutton2.Default = .F., ; + Cl_commandbutton2.DisabledBackColor = 0,128,192, ; + Cl_commandbutton2.DisabledForeColor = 128,0,255, ; + Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton2.DownPicture = ..\..\, ; + Cl_commandbutton2.DragIcon = ..\..\, ; + Cl_commandbutton2.DragMode = 0, ; + Cl_commandbutton2.Enabled = .F., ; + Cl_commandbutton2.FontBold = .F., ; + Cl_commandbutton2.FontCharSet = 0, ; + Cl_commandbutton2.FontCondense = .F., ; + Cl_commandbutton2.FontExtend = .F., ; + Cl_commandbutton2.FontItalic = .F., ; + Cl_commandbutton2.FontName = "Arial", ; + Cl_commandbutton2.FontOutline = .F., ; + Cl_commandbutton2.FontShadow = .F., ; + Cl_commandbutton2.FontSize = 8, ; + Cl_commandbutton2.FontStrikethru = .F., ; + Cl_commandbutton2.FontUnderline = .F., ; + Cl_commandbutton2.Height = 21, ; + Cl_commandbutton2.HelpContextID = 0, ; + Cl_commandbutton2.Left = 8, ; + Cl_commandbutton2.MouseIcon = ..\..\, ; + Cl_commandbutton2.MousePointer = 0, ; + Cl_commandbutton2.Name = "Cl_commandbutton2", ; + Cl_commandbutton2.OLEDragMode = 0, ; + Cl_commandbutton2.OLEDragPicture = ..\..\, ; + Cl_commandbutton2.OLEDropEffects = 3, ; + Cl_commandbutton2.OLEDropMode = 0, ; + Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton2.PictureMargin = 0, ; + Cl_commandbutton2.PicturePosition = 4, ; + Cl_commandbutton2.PictureSpacing = 0, ; + Cl_commandbutton2.RightToLeft = .F., ; + Cl_commandbutton2.SpecialEffect = 0, ; + Cl_commandbutton2.StatusBarText = "", ; + Cl_commandbutton2.Style = 0, ; + Cl_commandbutton2.TabStop = .T., ; + Cl_commandbutton2.Tag = "", ; + Cl_commandbutton2.TerminateRead = .F., ; + Cl_commandbutton2.Themes = .T., ; + Cl_commandbutton2.ToolTipText = "", ; + Cl_commandbutton2.Top = 28, ; + Cl_commandbutton2.Visible = .T., ; + Cl_commandbutton2.WhatsThisHelpID = -1, ; + Cl_commandbutton2.Width = 200, ; + Cl_commandbutton2.WordWrap = .F., ; + Cl_commandbutton3.Alignment = 2, ; + Cl_commandbutton3.Anchor = 0, ; + Cl_commandbutton3.AutoSize = .F., ; + Cl_commandbutton3.BackColor = 128,255,128, ; + Cl_commandbutton3.Cancel = .F., ; + Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; + Cl_commandbutton3.ColorScheme = 1, ; + Cl_commandbutton3.ColorSource = 4, ; + Cl_commandbutton3.Comment = "", ; + Cl_commandbutton3.Default = .F., ; + Cl_commandbutton3.DisabledBackColor = 0,128,192, ; + Cl_commandbutton3.DisabledForeColor = 128,0,255, ; + Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton3.DownPicture = ..\..\, ; + Cl_commandbutton3.DragIcon = ..\..\, ; + Cl_commandbutton3.DragMode = 0, ; + Cl_commandbutton3.Enabled = .T., ; + Cl_commandbutton3.FontBold = .F., ; + Cl_commandbutton3.FontCharSet = 0, ; + Cl_commandbutton3.FontCondense = .F., ; + Cl_commandbutton3.FontExtend = .F., ; + Cl_commandbutton3.FontItalic = .F., ; + Cl_commandbutton3.FontName = "Arial", ; + Cl_commandbutton3.FontOutline = .F., ; + Cl_commandbutton3.FontShadow = .F., ; + Cl_commandbutton3.FontSize = 8, ; + Cl_commandbutton3.FontStrikethru = .F., ; + Cl_commandbutton3.FontUnderline = .F., ; + Cl_commandbutton3.Height = 21, ; + Cl_commandbutton3.HelpContextID = 0, ; + Cl_commandbutton3.Left = 8, ; + Cl_commandbutton3.MouseIcon = ..\..\, ; + Cl_commandbutton3.MousePointer = 0, ; + Cl_commandbutton3.Name = "Cl_commandbutton3", ; + Cl_commandbutton3.OLEDragMode = 0, ; + Cl_commandbutton3.OLEDragPicture = ..\..\, ; + Cl_commandbutton3.OLEDropEffects = 3, ; + Cl_commandbutton3.OLEDropMode = 0, ; + Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton3.PictureMargin = 0, ; + Cl_commandbutton3.PicturePosition = 4, ; + Cl_commandbutton3.PictureSpacing = 0, ; + Cl_commandbutton3.RightToLeft = .F., ; + Cl_commandbutton3.SpecialEffect = 0, ; + Cl_commandbutton3.StatusBarText = "", ; + Cl_commandbutton3.Style = 0, ; + Cl_commandbutton3.TabStop = .T., ; + Cl_commandbutton3.Tag = "", ; + Cl_commandbutton3.TerminateRead = .F., ; + Cl_commandbutton3.Themes = .T., ; + Cl_commandbutton3.ToolTipText = "", ; + Cl_commandbutton3.Top = 52, ; + Cl_commandbutton3.Visible = .T., ; + Cl_commandbutton3.WhatsThisHelpID = -1, ; + Cl_commandbutton3.Width = 200, ; + Cl_commandbutton3.WordWrap = .F. + *< END OBJECT: BaseClass="commandgroup" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 101, ; + Left = 28, ; + Name = "Container1", ; + Top = 140, ; + Width = 517 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Cl_commandgroup1' AS cl_commandgroup WITH ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 0, ; + ButtonCount = 3, ; + Enabled = .F., ; + Height = 76, ; + Left = 276, ; + Name = "Cl_commandgroup1", ; + Top = 12, ; + Width = 228, ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 128,255,128, ; + Command1.Cancel = .F., ; + Command1.Caption = "Este es el botón de comando 1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 0,128,192, ; + Command1.DisabledForeColor = 128,0,255, ; + Command1.DisabledPicture = bmps\treeview.bmp, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 21, ; + Command1.HelpContextID = 0, ; + Command1.Left = 4, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 200, ; + Command1.WordWrap = .F., ; + Command2.Alignment = 2, ; + Command2.Anchor = 0, ; + Command2.AutoSize = .F., ; + Command2.BackColor = 128,255,128, ; + Command2.Cancel = .F., ; + Command2.Caption = "Este es el botón de comando 2", ; + Command2.ColorScheme = 1, ; + Command2.ColorSource = 4, ; + Command2.Comment = "", ; + Command2.Default = .F., ; + Command2.DisabledBackColor = 0,128,192, ; + Command2.DisabledForeColor = 128,0,255, ; + Command2.DisabledPicture = bmps\treeview.bmp, ; + Command2.DownPicture = ..\..\, ; + Command2.DragIcon = ..\..\, ; + Command2.DragMode = 0, ; + Command2.Enabled = .F., ; + Command2.FontBold = .F., ; + Command2.FontCharSet = 0, ; + Command2.FontCondense = .F., ; + Command2.FontExtend = .F., ; + Command2.FontItalic = .F., ; + Command2.FontName = "Arial", ; + Command2.FontOutline = .F., ; + Command2.FontShadow = .F., ; + Command2.FontSize = 8, ; + Command2.FontStrikethru = .F., ; + Command2.FontUnderline = .F., ; + Command2.ForeColor = 0,0,0, ; + Command2.Height = 21, ; + Command2.HelpContextID = 0, ; + Command2.Left = 4, ; + Command2.MouseIcon = ..\..\, ; + Command2.MousePointer = 0, ; + Command2.Name = "Command2", ; + Command2.OLEDragMode = 0, ; + Command2.OLEDragPicture = ..\..\, ; + Command2.OLEDropEffects = 3, ; + Command2.OLEDropMode = 0, ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PictureMargin = 0, ; + Command2.PicturePosition = 4, ; + Command2.PictureSpacing = 0, ; + Command2.RightToLeft = .F., ; + Command2.SpecialEffect = 0, ; + Command2.StatusBarText = "", ; + Command2.Style = 0, ; + Command2.TabStop = .T., ; + Command2.Tag = "", ; + Command2.TerminateRead = .F., ; + Command2.Themes = .T., ; + Command2.ToolTipText = "", ; + Command2.Top = 28, ; + Command2.Visible = .T., ; + Command2.WhatsThisHelpID = -1, ; + Command2.Width = 200, ; + Command2.WordWrap = .F., ; + Command3.Alignment = 2, ; + Command3.Anchor = 0, ; + Command3.AutoSize = .F., ; + Command3.BackColor = 128,255,128, ; + Command3.Cancel = .F., ; + Command3.Caption = "Este es el botón de comando 3", ; + Command3.ColorScheme = 1, ; + Command3.ColorSource = 4, ; + Command3.Comment = "", ; + Command3.Default = .F., ; + Command3.DisabledBackColor = 0,128,192, ; + Command3.DisabledForeColor = 128,0,255, ; + Command3.DisabledPicture = bmps\treeview.bmp, ; + Command3.DownPicture = ..\..\, ; + Command3.DragIcon = ..\..\, ; + Command3.DragMode = 0, ; + Command3.Enabled = .T., ; + Command3.FontBold = .F., ; + Command3.FontCharSet = 0, ; + Command3.FontCondense = .F., ; + Command3.FontExtend = .F., ; + Command3.FontItalic = .F., ; + Command3.FontName = "Arial", ; + Command3.FontOutline = .F., ; + Command3.FontShadow = .F., ; + Command3.FontSize = 8, ; + Command3.FontStrikethru = .F., ; + Command3.FontUnderline = .F., ; + Command3.ForeColor = 0,0,0, ; + Command3.Height = 21, ; + Command3.HelpContextID = 0, ; + Command3.Left = 4, ; + Command3.MouseIcon = ..\..\, ; + Command3.MousePointer = 0, ; + Command3.Name = "Command3", ; + Command3.OLEDragMode = 0, ; + Command3.OLEDragPicture = ..\..\, ; + Command3.OLEDropEffects = 3, ; + Command3.OLEDropMode = 0, ; + Command3.Picture = bmps\sobrepostal.bmp, ; + Command3.PictureMargin = 0, ; + Command3.PicturePosition = 4, ; + Command3.PictureSpacing = 0, ; + Command3.RightToLeft = .F., ; + Command3.SpecialEffect = 0, ; + Command3.StatusBarText = "", ; + Command3.Style = 0, ; + Command3.TabStop = .T., ; + Command3.Tag = "", ; + Command3.TerminateRead = .F., ; + Command3.Themes = .T., ; + Command3.ToolTipText = "", ; + Command3.Top = 52, ; + Command3.Visible = .T., ; + Command3.WhatsThisHelpID = -1, ; + Command3.Width = 200, ; + Command3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'Container1.Commandgroup1' AS commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 8, ; + MemberClass = "cl_commandbutton", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Cl_commandbutton1.Alignment = 2, ; + Cl_commandbutton1.Anchor = 0, ; + Cl_commandbutton1.AutoSize = .F., ; + Cl_commandbutton1.BackColor = 128,255,128, ; + Cl_commandbutton1.Cancel = .F., ; + Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; + Cl_commandbutton1.ColorScheme = 1, ; + Cl_commandbutton1.ColorSource = 4, ; + Cl_commandbutton1.Comment = "", ; + Cl_commandbutton1.Default = .F., ; + Cl_commandbutton1.DisabledBackColor = 0,128,192, ; + Cl_commandbutton1.DisabledForeColor = 128,0,255, ; + Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton1.DownPicture = ..\..\, ; + Cl_commandbutton1.DragIcon = ..\..\, ; + Cl_commandbutton1.DragMode = 0, ; + Cl_commandbutton1.Enabled = .T., ; + Cl_commandbutton1.FontBold = .F., ; + Cl_commandbutton1.FontCharSet = 0, ; + Cl_commandbutton1.FontCondense = .F., ; + Cl_commandbutton1.FontExtend = .F., ; + Cl_commandbutton1.FontItalic = .F., ; + Cl_commandbutton1.FontName = "Arial", ; + Cl_commandbutton1.FontOutline = .F., ; + Cl_commandbutton1.FontShadow = .F., ; + Cl_commandbutton1.FontSize = 8, ; + Cl_commandbutton1.FontStrikethru = .F., ; + Cl_commandbutton1.FontUnderline = .F., ; + Cl_commandbutton1.Height = 21, ; + Cl_commandbutton1.HelpContextID = 0, ; + Cl_commandbutton1.Left = 8, ; + Cl_commandbutton1.MouseIcon = ..\..\, ; + Cl_commandbutton1.MousePointer = 0, ; + Cl_commandbutton1.Name = "Cl_commandbutton1", ; + Cl_commandbutton1.OLEDragMode = 0, ; + Cl_commandbutton1.OLEDragPicture = ..\..\, ; + Cl_commandbutton1.OLEDropEffects = 3, ; + Cl_commandbutton1.OLEDropMode = 0, ; + Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton1.PictureMargin = 0, ; + Cl_commandbutton1.PicturePosition = 4, ; + Cl_commandbutton1.PictureSpacing = 0, ; + Cl_commandbutton1.RightToLeft = .F., ; + Cl_commandbutton1.SpecialEffect = 0, ; + Cl_commandbutton1.StatusBarText = "", ; + Cl_commandbutton1.Style = 0, ; + Cl_commandbutton1.TabStop = .T., ; + Cl_commandbutton1.Tag = "", ; + Cl_commandbutton1.TerminateRead = .F., ; + Cl_commandbutton1.Themes = .T., ; + Cl_commandbutton1.ToolTipText = "", ; + Cl_commandbutton1.Top = 4, ; + Cl_commandbutton1.Visible = .T., ; + Cl_commandbutton1.WhatsThisHelpID = -1, ; + Cl_commandbutton1.Width = 200, ; + Cl_commandbutton1.WordWrap = .F., ; + Cl_commandbutton2.Alignment = 2, ; + Cl_commandbutton2.Anchor = 0, ; + Cl_commandbutton2.AutoSize = .F., ; + Cl_commandbutton2.BackColor = 128,255,128, ; + Cl_commandbutton2.Cancel = .F., ; + Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; + Cl_commandbutton2.ColorScheme = 1, ; + Cl_commandbutton2.ColorSource = 4, ; + Cl_commandbutton2.Comment = "", ; + Cl_commandbutton2.Default = .F., ; + Cl_commandbutton2.DisabledBackColor = 0,128,192, ; + Cl_commandbutton2.DisabledForeColor = 128,0,255, ; + Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton2.DownPicture = ..\..\, ; + Cl_commandbutton2.DragIcon = ..\..\, ; + Cl_commandbutton2.DragMode = 0, ; + Cl_commandbutton2.Enabled = .F., ; + Cl_commandbutton2.FontBold = .F., ; + Cl_commandbutton2.FontCharSet = 0, ; + Cl_commandbutton2.FontCondense = .F., ; + Cl_commandbutton2.FontExtend = .F., ; + Cl_commandbutton2.FontItalic = .F., ; + Cl_commandbutton2.FontName = "Arial", ; + Cl_commandbutton2.FontOutline = .F., ; + Cl_commandbutton2.FontShadow = .F., ; + Cl_commandbutton2.FontSize = 8, ; + Cl_commandbutton2.FontStrikethru = .F., ; + Cl_commandbutton2.FontUnderline = .F., ; + Cl_commandbutton2.Height = 21, ; + Cl_commandbutton2.HelpContextID = 0, ; + Cl_commandbutton2.Left = 8, ; + Cl_commandbutton2.MouseIcon = ..\..\, ; + Cl_commandbutton2.MousePointer = 0, ; + Cl_commandbutton2.Name = "Cl_commandbutton2", ; + Cl_commandbutton2.OLEDragMode = 0, ; + Cl_commandbutton2.OLEDragPicture = ..\..\, ; + Cl_commandbutton2.OLEDropEffects = 3, ; + Cl_commandbutton2.OLEDropMode = 0, ; + Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton2.PictureMargin = 0, ; + Cl_commandbutton2.PicturePosition = 4, ; + Cl_commandbutton2.PictureSpacing = 0, ; + Cl_commandbutton2.RightToLeft = .F., ; + Cl_commandbutton2.SpecialEffect = 0, ; + Cl_commandbutton2.StatusBarText = "", ; + Cl_commandbutton2.Style = 0, ; + Cl_commandbutton2.TabStop = .T., ; + Cl_commandbutton2.Tag = "", ; + Cl_commandbutton2.TerminateRead = .F., ; + Cl_commandbutton2.Themes = .T., ; + Cl_commandbutton2.ToolTipText = "", ; + Cl_commandbutton2.Top = 28, ; + Cl_commandbutton2.Visible = .T., ; + Cl_commandbutton2.WhatsThisHelpID = -1, ; + Cl_commandbutton2.Width = 200, ; + Cl_commandbutton2.WordWrap = .F., ; + Cl_commandbutton3.Alignment = 2, ; + Cl_commandbutton3.Anchor = 0, ; + Cl_commandbutton3.AutoSize = .F., ; + Cl_commandbutton3.BackColor = 128,255,128, ; + Cl_commandbutton3.Cancel = .F., ; + Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; + Cl_commandbutton3.ColorScheme = 1, ; + Cl_commandbutton3.ColorSource = 4, ; + Cl_commandbutton3.Comment = "", ; + Cl_commandbutton3.Default = .F., ; + Cl_commandbutton3.DisabledBackColor = 0,128,192, ; + Cl_commandbutton3.DisabledForeColor = 128,0,255, ; + Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton3.DownPicture = ..\..\, ; + Cl_commandbutton3.DragIcon = ..\..\, ; + Cl_commandbutton3.DragMode = 0, ; + Cl_commandbutton3.Enabled = .T., ; + Cl_commandbutton3.FontBold = .F., ; + Cl_commandbutton3.FontCharSet = 0, ; + Cl_commandbutton3.FontCondense = .F., ; + Cl_commandbutton3.FontExtend = .F., ; + Cl_commandbutton3.FontItalic = .F., ; + Cl_commandbutton3.FontName = "Arial", ; + Cl_commandbutton3.FontOutline = .F., ; + Cl_commandbutton3.FontShadow = .F., ; + Cl_commandbutton3.FontSize = 8, ; + Cl_commandbutton3.FontStrikethru = .F., ; + Cl_commandbutton3.FontUnderline = .F., ; + Cl_commandbutton3.Height = 21, ; + Cl_commandbutton3.HelpContextID = 0, ; + Cl_commandbutton3.Left = 8, ; + Cl_commandbutton3.MouseIcon = ..\..\, ; + Cl_commandbutton3.MousePointer = 0, ; + Cl_commandbutton3.Name = "Cl_commandbutton3", ; + Cl_commandbutton3.OLEDragMode = 0, ; + Cl_commandbutton3.OLEDragPicture = ..\..\, ; + Cl_commandbutton3.OLEDropEffects = 3, ; + Cl_commandbutton3.OLEDropMode = 0, ; + Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton3.PictureMargin = 0, ; + Cl_commandbutton3.PicturePosition = 4, ; + Cl_commandbutton3.PictureSpacing = 0, ; + Cl_commandbutton3.RightToLeft = .F., ; + Cl_commandbutton3.SpecialEffect = 0, ; + Cl_commandbutton3.StatusBarText = "", ; + Cl_commandbutton3.Style = 0, ; + Cl_commandbutton3.TabStop = .T., ; + Cl_commandbutton3.Tag = "", ; + Cl_commandbutton3.TerminateRead = .F., ; + Cl_commandbutton3.Themes = .T., ; + Cl_commandbutton3.ToolTipText = "", ; + Cl_commandbutton3.Top = 52, ; + Cl_commandbutton3.Visible = .T., ; + Cl_commandbutton3.WhatsThisHelpID = -1, ; + Cl_commandbutton3.Width = 200, ; + Cl_commandbutton3.WordWrap = .F. + *< END OBJECT: BaseClass="commandgroup" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 132, ; + Left = 28, ; + Name = "Pageframe1", ; + PageCount = 2, ; + Top = 256, ; + Width = 517, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_commandgroup1' AS cl_commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 275, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 128,255,128, ; + Command1.Cancel = .F., ; + Command1.Caption = "Este es el botón de comando 1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 0,128,192, ; + Command1.DisabledForeColor = 128,0,255, ; + Command1.DisabledPicture = bmps\treeview.bmp, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 21, ; + Command1.HelpContextID = 0, ; + Command1.Left = 4, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 200, ; + Command1.WordWrap = .F., ; + Command2.Alignment = 2, ; + Command2.Anchor = 0, ; + Command2.AutoSize = .F., ; + Command2.BackColor = 128,255,128, ; + Command2.Cancel = .F., ; + Command2.Caption = "Este es el botón de comando 2", ; + Command2.ColorScheme = 1, ; + Command2.ColorSource = 4, ; + Command2.Comment = "", ; + Command2.Default = .F., ; + Command2.DisabledBackColor = 0,128,192, ; + Command2.DisabledForeColor = 128,0,255, ; + Command2.DisabledPicture = bmps\treeview.bmp, ; + Command2.DownPicture = ..\..\, ; + Command2.DragIcon = ..\..\, ; + Command2.DragMode = 0, ; + Command2.Enabled = .F., ; + Command2.FontBold = .F., ; + Command2.FontCharSet = 0, ; + Command2.FontCondense = .F., ; + Command2.FontExtend = .F., ; + Command2.FontItalic = .F., ; + Command2.FontName = "Arial", ; + Command2.FontOutline = .F., ; + Command2.FontShadow = .F., ; + Command2.FontSize = 8, ; + Command2.FontStrikethru = .F., ; + Command2.FontUnderline = .F., ; + Command2.ForeColor = 0,0,0, ; + Command2.Height = 21, ; + Command2.HelpContextID = 0, ; + Command2.Left = 4, ; + Command2.MouseIcon = ..\..\, ; + Command2.MousePointer = 0, ; + Command2.Name = "Command2", ; + Command2.OLEDragMode = 0, ; + Command2.OLEDragPicture = ..\..\, ; + Command2.OLEDropEffects = 3, ; + Command2.OLEDropMode = 0, ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PictureMargin = 0, ; + Command2.PicturePosition = 4, ; + Command2.PictureSpacing = 0, ; + Command2.RightToLeft = .F., ; + Command2.SpecialEffect = 0, ; + Command2.StatusBarText = "", ; + Command2.Style = 0, ; + Command2.TabStop = .T., ; + Command2.Tag = "", ; + Command2.TerminateRead = .F., ; + Command2.Themes = .T., ; + Command2.ToolTipText = "", ; + Command2.Top = 28, ; + Command2.Visible = .T., ; + Command2.WhatsThisHelpID = -1, ; + Command2.Width = 200, ; + Command2.WordWrap = .F., ; + Command3.Alignment = 2, ; + Command3.Anchor = 0, ; + Command3.AutoSize = .F., ; + Command3.BackColor = 128,255,128, ; + Command3.Cancel = .F., ; + Command3.Caption = "Este es el botón de comando 3", ; + Command3.ColorScheme = 1, ; + Command3.ColorSource = 4, ; + Command3.Comment = "", ; + Command3.Default = .F., ; + Command3.DisabledBackColor = 0,128,192, ; + Command3.DisabledForeColor = 128,0,255, ; + Command3.DisabledPicture = bmps\treeview.bmp, ; + Command3.DownPicture = ..\..\, ; + Command3.DragIcon = ..\..\, ; + Command3.DragMode = 0, ; + Command3.Enabled = .T., ; + Command3.FontBold = .F., ; + Command3.FontCharSet = 0, ; + Command3.FontCondense = .F., ; + Command3.FontExtend = .F., ; + Command3.FontItalic = .F., ; + Command3.FontName = "Arial", ; + Command3.FontOutline = .F., ; + Command3.FontShadow = .F., ; + Command3.FontSize = 8, ; + Command3.FontStrikethru = .F., ; + Command3.FontUnderline = .F., ; + Command3.ForeColor = 0,0,0, ; + Command3.Height = 21, ; + Command3.HelpContextID = 0, ; + Command3.Left = 4, ; + Command3.MouseIcon = ..\..\, ; + Command3.MousePointer = 0, ; + Command3.Name = "Command3", ; + Command3.OLEDragMode = 0, ; + Command3.OLEDragPicture = ..\..\, ; + Command3.OLEDropEffects = 3, ; + Command3.OLEDropMode = 0, ; + Command3.Picture = bmps\sobrepostal.bmp, ; + Command3.PictureMargin = 0, ; + Command3.PicturePosition = 4, ; + Command3.PictureSpacing = 0, ; + Command3.RightToLeft = .F., ; + Command3.SpecialEffect = 0, ; + Command3.StatusBarText = "", ; + Command3.Style = 0, ; + Command3.TabStop = .T., ; + Command3.Tag = "", ; + Command3.TerminateRead = .F., ; + Command3.Themes = .T., ; + Command3.ToolTipText = "", ; + Command3.Top = 52, ; + Command3.Visible = .T., ; + Command3.WhatsThisHelpID = -1, ; + Command3.Width = 200, ; + Command3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'Pageframe1.Page1.Commandgroup1' AS commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 11, ; + MemberClass = "cl_commandbutton", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Cl_commandbutton1.Alignment = 2, ; + Cl_commandbutton1.Anchor = 0, ; + Cl_commandbutton1.AutoSize = .F., ; + Cl_commandbutton1.BackColor = 128,255,128, ; + Cl_commandbutton1.Cancel = .F., ; + Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; + Cl_commandbutton1.ColorScheme = 1, ; + Cl_commandbutton1.ColorSource = 4, ; + Cl_commandbutton1.Comment = "", ; + Cl_commandbutton1.Default = .F., ; + Cl_commandbutton1.DisabledBackColor = 0,128,192, ; + Cl_commandbutton1.DisabledForeColor = 128,0,255, ; + Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton1.DownPicture = ..\..\, ; + Cl_commandbutton1.DragIcon = ..\..\, ; + Cl_commandbutton1.DragMode = 0, ; + Cl_commandbutton1.Enabled = .T., ; + Cl_commandbutton1.FontBold = .F., ; + Cl_commandbutton1.FontCharSet = 0, ; + Cl_commandbutton1.FontCondense = .F., ; + Cl_commandbutton1.FontExtend = .F., ; + Cl_commandbutton1.FontItalic = .F., ; + Cl_commandbutton1.FontName = "Arial", ; + Cl_commandbutton1.FontOutline = .F., ; + Cl_commandbutton1.FontShadow = .F., ; + Cl_commandbutton1.FontSize = 8, ; + Cl_commandbutton1.FontStrikethru = .F., ; + Cl_commandbutton1.FontUnderline = .F., ; + Cl_commandbutton1.Height = 21, ; + Cl_commandbutton1.HelpContextID = 0, ; + Cl_commandbutton1.Left = 8, ; + Cl_commandbutton1.MouseIcon = ..\..\, ; + Cl_commandbutton1.MousePointer = 0, ; + Cl_commandbutton1.Name = "Cl_commandbutton1", ; + Cl_commandbutton1.OLEDragMode = 0, ; + Cl_commandbutton1.OLEDragPicture = ..\..\, ; + Cl_commandbutton1.OLEDropEffects = 3, ; + Cl_commandbutton1.OLEDropMode = 0, ; + Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton1.PictureMargin = 0, ; + Cl_commandbutton1.PicturePosition = 4, ; + Cl_commandbutton1.PictureSpacing = 0, ; + Cl_commandbutton1.RightToLeft = .F., ; + Cl_commandbutton1.SpecialEffect = 0, ; + Cl_commandbutton1.StatusBarText = "", ; + Cl_commandbutton1.Style = 0, ; + Cl_commandbutton1.TabStop = .T., ; + Cl_commandbutton1.Tag = "", ; + Cl_commandbutton1.TerminateRead = .F., ; + Cl_commandbutton1.Themes = .T., ; + Cl_commandbutton1.ToolTipText = "", ; + Cl_commandbutton1.Top = 4, ; + Cl_commandbutton1.Visible = .T., ; + Cl_commandbutton1.WhatsThisHelpID = -1, ; + Cl_commandbutton1.Width = 200, ; + Cl_commandbutton1.WordWrap = .F., ; + Cl_commandbutton2.Alignment = 2, ; + Cl_commandbutton2.Anchor = 0, ; + Cl_commandbutton2.AutoSize = .F., ; + Cl_commandbutton2.BackColor = 128,255,128, ; + Cl_commandbutton2.Cancel = .F., ; + Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; + Cl_commandbutton2.ColorScheme = 1, ; + Cl_commandbutton2.ColorSource = 4, ; + Cl_commandbutton2.Comment = "", ; + Cl_commandbutton2.Default = .F., ; + Cl_commandbutton2.DisabledBackColor = 0,128,192, ; + Cl_commandbutton2.DisabledForeColor = 128,0,255, ; + Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton2.DownPicture = ..\..\, ; + Cl_commandbutton2.DragIcon = ..\..\, ; + Cl_commandbutton2.DragMode = 0, ; + Cl_commandbutton2.Enabled = .F., ; + Cl_commandbutton2.FontBold = .F., ; + Cl_commandbutton2.FontCharSet = 0, ; + Cl_commandbutton2.FontCondense = .F., ; + Cl_commandbutton2.FontExtend = .F., ; + Cl_commandbutton2.FontItalic = .F., ; + Cl_commandbutton2.FontName = "Arial", ; + Cl_commandbutton2.FontOutline = .F., ; + Cl_commandbutton2.FontShadow = .F., ; + Cl_commandbutton2.FontSize = 8, ; + Cl_commandbutton2.FontStrikethru = .F., ; + Cl_commandbutton2.FontUnderline = .F., ; + Cl_commandbutton2.Height = 21, ; + Cl_commandbutton2.HelpContextID = 0, ; + Cl_commandbutton2.Left = 8, ; + Cl_commandbutton2.MouseIcon = ..\..\, ; + Cl_commandbutton2.MousePointer = 0, ; + Cl_commandbutton2.Name = "Cl_commandbutton2", ; + Cl_commandbutton2.OLEDragMode = 0, ; + Cl_commandbutton2.OLEDragPicture = ..\..\, ; + Cl_commandbutton2.OLEDropEffects = 3, ; + Cl_commandbutton2.OLEDropMode = 0, ; + Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton2.PictureMargin = 0, ; + Cl_commandbutton2.PicturePosition = 4, ; + Cl_commandbutton2.PictureSpacing = 0, ; + Cl_commandbutton2.RightToLeft = .F., ; + Cl_commandbutton2.SpecialEffect = 0, ; + Cl_commandbutton2.StatusBarText = "", ; + Cl_commandbutton2.Style = 0, ; + Cl_commandbutton2.TabStop = .T., ; + Cl_commandbutton2.Tag = "", ; + Cl_commandbutton2.TerminateRead = .F., ; + Cl_commandbutton2.Themes = .T., ; + Cl_commandbutton2.ToolTipText = "", ; + Cl_commandbutton2.Top = 28, ; + Cl_commandbutton2.Visible = .T., ; + Cl_commandbutton2.WhatsThisHelpID = -1, ; + Cl_commandbutton2.Width = 200, ; + Cl_commandbutton2.WordWrap = .F., ; + Cl_commandbutton3.Alignment = 2, ; + Cl_commandbutton3.Anchor = 0, ; + Cl_commandbutton3.AutoSize = .F., ; + Cl_commandbutton3.BackColor = 128,255,128, ; + Cl_commandbutton3.Cancel = .F., ; + Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; + Cl_commandbutton3.ColorScheme = 1, ; + Cl_commandbutton3.ColorSource = 4, ; + Cl_commandbutton3.Comment = "", ; + Cl_commandbutton3.Default = .F., ; + Cl_commandbutton3.DisabledBackColor = 0,128,192, ; + Cl_commandbutton3.DisabledForeColor = 128,0,255, ; + Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton3.DownPicture = ..\..\, ; + Cl_commandbutton3.DragIcon = ..\..\, ; + Cl_commandbutton3.DragMode = 0, ; + Cl_commandbutton3.Enabled = .T., ; + Cl_commandbutton3.FontBold = .F., ; + Cl_commandbutton3.FontCharSet = 0, ; + Cl_commandbutton3.FontCondense = .F., ; + Cl_commandbutton3.FontExtend = .F., ; + Cl_commandbutton3.FontItalic = .F., ; + Cl_commandbutton3.FontName = "Arial", ; + Cl_commandbutton3.FontOutline = .F., ; + Cl_commandbutton3.FontShadow = .F., ; + Cl_commandbutton3.FontSize = 8, ; + Cl_commandbutton3.FontStrikethru = .F., ; + Cl_commandbutton3.FontUnderline = .F., ; + Cl_commandbutton3.Height = 21, ; + Cl_commandbutton3.HelpContextID = 0, ; + Cl_commandbutton3.Left = 8, ; + Cl_commandbutton3.MouseIcon = ..\..\, ; + Cl_commandbutton3.MousePointer = 0, ; + Cl_commandbutton3.Name = "Cl_commandbutton3", ; + Cl_commandbutton3.OLEDragMode = 0, ; + Cl_commandbutton3.OLEDragPicture = ..\..\, ; + Cl_commandbutton3.OLEDropEffects = 3, ; + Cl_commandbutton3.OLEDropMode = 0, ; + Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton3.PictureMargin = 0, ; + Cl_commandbutton3.PicturePosition = 4, ; + Cl_commandbutton3.PictureSpacing = 0, ; + Cl_commandbutton3.RightToLeft = .F., ; + Cl_commandbutton3.SpecialEffect = 0, ; + Cl_commandbutton3.StatusBarText = "", ; + Cl_commandbutton3.Style = 0, ; + Cl_commandbutton3.TabStop = .T., ; + Cl_commandbutton3.Tag = "", ; + Cl_commandbutton3.TerminateRead = .F., ; + Cl_commandbutton3.Themes = .T., ; + Cl_commandbutton3.ToolTipText = "", ; + Cl_commandbutton3.Top = 52, ; + Cl_commandbutton3.Visible = .T., ; + Cl_commandbutton3.WhatsThisHelpID = -1, ; + Cl_commandbutton3.Width = 200, ; + Cl_commandbutton3.WordWrap = .F. + *< END OBJECT: BaseClass="commandgroup" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_commandgroup.sc2 b/TESTS/DATOS_READONLY/f_commandgroup.sc2 index 2beba0f..05d28f5 100644 --- a/TESTS/DATOS_READONLY/f_commandgroup.sc2 +++ b/TESTS/DATOS_READONLY/f_commandgroup.sc2 @@ -4,1406 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_commandgroup.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_base1" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_commandbutton1" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Name = "F_base1" - Edit1.Name = "Edit1" - Edit1.Value = * En los OptionGroup subclasados, cuando el Option de la clase de base tiene Autosize=.T. y la instancia tiene Autosize=.F., ocurre esto: - Los option normales deben mantener su longitud y apariencia nuevos - Los option graficos deben mantener su longitud y apariencia, pero pierden en height (bug de VFP) * En los OptionGroup normales, no hay problemas y se deben mantener igual siempre * RECOMENDACIÓN: No usar Autosize=.T. en una clase de base - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "COMMANDGROUP NORMAL" - Label1.Name = "Label1" - Label2.Caption = "COMMANDGROUP SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_commandbutton1' AS cl_commandbutton WITH ; - Alignment = 2, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - Caption = "Este es el boton 2", ; - ColorScheme = 1, ; - ColorSource = 4, ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (27), ; - Left = (306), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_commandbutton1", ; - OLEDragPicture = ..\..\, ; - Picture = bmps\sobrepostal.bmp, ; - PictureMargin = 0, ; - PicturePosition = 4, ; - PictureSpacing = 0, ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Themes = .T., ; - ToolTipText = "", ; - Top = (392), ; - Visible = .T., ; - Width = (200), ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandbutton" /> - - ADD OBJECT 'Cl_commandgroup1' AS cl_commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 304, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 128,255,128, ; - Command1.Cancel = .F., ; - Command1.Caption = "Este es el botón de comando 1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 0,128,192, ; - Command1.DisabledForeColor = 128,0,255, ; - Command1.DisabledPicture = bmps\treeview.bmp, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 21, ; - Command1.HelpContextID = 0, ; - Command1.Left = 4, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 200, ; - Command1.WordWrap = .F., ; - Command2.Alignment = 2, ; - Command2.Anchor = 0, ; - Command2.AutoSize = .F., ; - Command2.BackColor = 128,255,128, ; - Command2.Cancel = .F., ; - Command2.Caption = "Este es el botón de comando 2", ; - Command2.ColorScheme = 1, ; - Command2.ColorSource = 4, ; - Command2.Comment = "", ; - Command2.Default = .F., ; - Command2.DisabledBackColor = 0,128,192, ; - Command2.DisabledForeColor = 128,0,255, ; - Command2.DisabledPicture = bmps\treeview.bmp, ; - Command2.DownPicture = ..\..\, ; - Command2.DragIcon = ..\..\, ; - Command2.DragMode = 0, ; - Command2.Enabled = .F., ; - Command2.FontBold = .F., ; - Command2.FontCharSet = 0, ; - Command2.FontCondense = .F., ; - Command2.FontExtend = .F., ; - Command2.FontItalic = .F., ; - Command2.FontName = "Arial", ; - Command2.FontOutline = .F., ; - Command2.FontShadow = .F., ; - Command2.FontSize = 8, ; - Command2.FontStrikethru = .F., ; - Command2.FontUnderline = .F., ; - Command2.ForeColor = 0,0,0, ; - Command2.Height = 21, ; - Command2.HelpContextID = 0, ; - Command2.Left = 4, ; - Command2.MouseIcon = ..\..\, ; - Command2.MousePointer = 0, ; - Command2.Name = "Command2", ; - Command2.OLEDragMode = 0, ; - Command2.OLEDragPicture = ..\..\, ; - Command2.OLEDropEffects = 3, ; - Command2.OLEDropMode = 0, ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PictureMargin = 0, ; - Command2.PicturePosition = 4, ; - Command2.PictureSpacing = 0, ; - Command2.RightToLeft = .F., ; - Command2.SpecialEffect = 0, ; - Command2.StatusBarText = "", ; - Command2.Style = 0, ; - Command2.TabStop = .T., ; - Command2.Tag = "", ; - Command2.TerminateRead = .F., ; - Command2.Themes = .T., ; - Command2.ToolTipText = "", ; - Command2.Top = 28, ; - Command2.Visible = .T., ; - Command2.WhatsThisHelpID = -1, ; - Command2.Width = 200, ; - Command2.WordWrap = .F., ; - Command3.Alignment = 2, ; - Command3.Anchor = 0, ; - Command3.AutoSize = .F., ; - Command3.BackColor = 128,255,128, ; - Command3.Cancel = .F., ; - Command3.Caption = "Este es el botón de comando 3", ; - Command3.ColorScheme = 1, ; - Command3.ColorSource = 4, ; - Command3.Comment = "", ; - Command3.Default = .F., ; - Command3.DisabledBackColor = 0,128,192, ; - Command3.DisabledForeColor = 128,0,255, ; - Command3.DisabledPicture = bmps\treeview.bmp, ; - Command3.DownPicture = ..\..\, ; - Command3.DragIcon = ..\..\, ; - Command3.DragMode = 0, ; - Command3.Enabled = .T., ; - Command3.FontBold = .F., ; - Command3.FontCharSet = 0, ; - Command3.FontCondense = .F., ; - Command3.FontExtend = .F., ; - Command3.FontItalic = .F., ; - Command3.FontName = "Arial", ; - Command3.FontOutline = .F., ; - Command3.FontShadow = .F., ; - Command3.FontSize = 8, ; - Command3.FontStrikethru = .F., ; - Command3.FontUnderline = .F., ; - Command3.ForeColor = 0,0,0, ; - Command3.Height = 21, ; - Command3.HelpContextID = 0, ; - Command3.Left = 4, ; - Command3.MouseIcon = ..\..\, ; - Command3.MousePointer = 0, ; - Command3.Name = "Command3", ; - Command3.OLEDragMode = 0, ; - Command3.OLEDragPicture = ..\..\, ; - Command3.OLEDropEffects = 3, ; - Command3.OLEDropMode = 0, ; - Command3.Picture = bmps\sobrepostal.bmp, ; - Command3.PictureMargin = 0, ; - Command3.PicturePosition = 4, ; - Command3.PictureSpacing = 0, ; - Command3.RightToLeft = .F., ; - Command3.SpecialEffect = 0, ; - Command3.StatusBarText = "", ; - Command3.Style = 0, ; - Command3.TabStop = .T., ; - Command3.Tag = "", ; - Command3.TerminateRead = .F., ; - Command3.Themes = .T., ; - Command3.ToolTipText = "", ; - Command3.Top = 52, ; - Command3.Visible = .T., ; - Command3.WhatsThisHelpID = -1, ; - Command3.Width = 200, ; - Command3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'Command1' AS commandbutton WITH ; - Alignment = 2, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - Cancel = .F., ; - Caption = "Este es el boton 1", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Default = .F., ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (27), ; - HelpContextID = 0, ; - Left = (44), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Command1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureMargin = 0, ; - PicturePosition = 4, ; - PictureSpacing = 0, ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 10, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (392), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (200), ; - WordWrap = .F. - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (76), ; - HelpContextID = 0, ; - Left = (36), ; - MemberClass = "cl_commandbutton", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (44), ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (228), ; - Cl_commandbutton1.Alignment = 2, ; - Cl_commandbutton1.Anchor = 0, ; - Cl_commandbutton1.AutoSize = .F., ; - Cl_commandbutton1.BackColor = 128,255,128, ; - Cl_commandbutton1.Cancel = .F., ; - Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; - Cl_commandbutton1.ColorScheme = 1, ; - Cl_commandbutton1.ColorSource = 4, ; - Cl_commandbutton1.Comment = "", ; - Cl_commandbutton1.Default = .F., ; - Cl_commandbutton1.DisabledBackColor = 0,128,192, ; - Cl_commandbutton1.DisabledForeColor = 128,0,255, ; - Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton1.DownPicture = ..\..\, ; - Cl_commandbutton1.DragIcon = ..\..\, ; - Cl_commandbutton1.DragMode = 0, ; - Cl_commandbutton1.Enabled = .T., ; - Cl_commandbutton1.FontBold = .F., ; - Cl_commandbutton1.FontCharSet = 0, ; - Cl_commandbutton1.FontCondense = .F., ; - Cl_commandbutton1.FontExtend = .F., ; - Cl_commandbutton1.FontItalic = .F., ; - Cl_commandbutton1.FontName = "Arial", ; - Cl_commandbutton1.FontOutline = .F., ; - Cl_commandbutton1.FontShadow = .F., ; - Cl_commandbutton1.FontSize = 8, ; - Cl_commandbutton1.FontStrikethru = .F., ; - Cl_commandbutton1.FontUnderline = .F., ; - Cl_commandbutton1.Height = 21, ; - Cl_commandbutton1.HelpContextID = 0, ; - Cl_commandbutton1.Left = 8, ; - Cl_commandbutton1.MouseIcon = ..\..\, ; - Cl_commandbutton1.MousePointer = 0, ; - Cl_commandbutton1.Name = "Cl_commandbutton1", ; - Cl_commandbutton1.OLEDragMode = 0, ; - Cl_commandbutton1.OLEDragPicture = ..\..\, ; - Cl_commandbutton1.OLEDropEffects = 3, ; - Cl_commandbutton1.OLEDropMode = 0, ; - Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton1.PictureMargin = 0, ; - Cl_commandbutton1.PicturePosition = 4, ; - Cl_commandbutton1.PictureSpacing = 0, ; - Cl_commandbutton1.RightToLeft = .F., ; - Cl_commandbutton1.SpecialEffect = 0, ; - Cl_commandbutton1.StatusBarText = "", ; - Cl_commandbutton1.Style = 0, ; - Cl_commandbutton1.TabStop = .T., ; - Cl_commandbutton1.Tag = "", ; - Cl_commandbutton1.TerminateRead = .F., ; - Cl_commandbutton1.Themes = .T., ; - Cl_commandbutton1.ToolTipText = "", ; - Cl_commandbutton1.Top = 4, ; - Cl_commandbutton1.Visible = .T., ; - Cl_commandbutton1.WhatsThisHelpID = -1, ; - Cl_commandbutton1.Width = 200, ; - Cl_commandbutton1.WordWrap = .F., ; - Cl_commandbutton2.Alignment = 2, ; - Cl_commandbutton2.Anchor = 0, ; - Cl_commandbutton2.AutoSize = .F., ; - Cl_commandbutton2.BackColor = 128,255,128, ; - Cl_commandbutton2.Cancel = .F., ; - Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; - Cl_commandbutton2.ColorScheme = 1, ; - Cl_commandbutton2.ColorSource = 4, ; - Cl_commandbutton2.Comment = "", ; - Cl_commandbutton2.Default = .F., ; - Cl_commandbutton2.DisabledBackColor = 0,128,192, ; - Cl_commandbutton2.DisabledForeColor = 128,0,255, ; - Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton2.DownPicture = ..\..\, ; - Cl_commandbutton2.DragIcon = ..\..\, ; - Cl_commandbutton2.DragMode = 0, ; - Cl_commandbutton2.Enabled = .F., ; - Cl_commandbutton2.FontBold = .F., ; - Cl_commandbutton2.FontCharSet = 0, ; - Cl_commandbutton2.FontCondense = .F., ; - Cl_commandbutton2.FontExtend = .F., ; - Cl_commandbutton2.FontItalic = .F., ; - Cl_commandbutton2.FontName = "Arial", ; - Cl_commandbutton2.FontOutline = .F., ; - Cl_commandbutton2.FontShadow = .F., ; - Cl_commandbutton2.FontSize = 8, ; - Cl_commandbutton2.FontStrikethru = .F., ; - Cl_commandbutton2.FontUnderline = .F., ; - Cl_commandbutton2.Height = 21, ; - Cl_commandbutton2.HelpContextID = 0, ; - Cl_commandbutton2.Left = 8, ; - Cl_commandbutton2.MouseIcon = ..\..\, ; - Cl_commandbutton2.MousePointer = 0, ; - Cl_commandbutton2.Name = "Cl_commandbutton2", ; - Cl_commandbutton2.OLEDragMode = 0, ; - Cl_commandbutton2.OLEDragPicture = ..\..\, ; - Cl_commandbutton2.OLEDropEffects = 3, ; - Cl_commandbutton2.OLEDropMode = 0, ; - Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton2.PictureMargin = 0, ; - Cl_commandbutton2.PicturePosition = 4, ; - Cl_commandbutton2.PictureSpacing = 0, ; - Cl_commandbutton2.RightToLeft = .F., ; - Cl_commandbutton2.SpecialEffect = 0, ; - Cl_commandbutton2.StatusBarText = "", ; - Cl_commandbutton2.Style = 0, ; - Cl_commandbutton2.TabStop = .T., ; - Cl_commandbutton2.Tag = "", ; - Cl_commandbutton2.TerminateRead = .F., ; - Cl_commandbutton2.Themes = .T., ; - Cl_commandbutton2.ToolTipText = "", ; - Cl_commandbutton2.Top = 28, ; - Cl_commandbutton2.Visible = .T., ; - Cl_commandbutton2.WhatsThisHelpID = -1, ; - Cl_commandbutton2.Width = 200, ; - Cl_commandbutton2.WordWrap = .F., ; - Cl_commandbutton3.Alignment = 2, ; - Cl_commandbutton3.Anchor = 0, ; - Cl_commandbutton3.AutoSize = .F., ; - Cl_commandbutton3.BackColor = 128,255,128, ; - Cl_commandbutton3.Cancel = .F., ; - Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; - Cl_commandbutton3.ColorScheme = 1, ; - Cl_commandbutton3.ColorSource = 4, ; - Cl_commandbutton3.Comment = "", ; - Cl_commandbutton3.Default = .F., ; - Cl_commandbutton3.DisabledBackColor = 0,128,192, ; - Cl_commandbutton3.DisabledForeColor = 128,0,255, ; - Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton3.DownPicture = ..\..\, ; - Cl_commandbutton3.DragIcon = ..\..\, ; - Cl_commandbutton3.DragMode = 0, ; - Cl_commandbutton3.Enabled = .T., ; - Cl_commandbutton3.FontBold = .F., ; - Cl_commandbutton3.FontCharSet = 0, ; - Cl_commandbutton3.FontCondense = .F., ; - Cl_commandbutton3.FontExtend = .F., ; - Cl_commandbutton3.FontItalic = .F., ; - Cl_commandbutton3.FontName = "Arial", ; - Cl_commandbutton3.FontOutline = .F., ; - Cl_commandbutton3.FontShadow = .F., ; - Cl_commandbutton3.FontSize = 8, ; - Cl_commandbutton3.FontStrikethru = .F., ; - Cl_commandbutton3.FontUnderline = .F., ; - Cl_commandbutton3.Height = 21, ; - Cl_commandbutton3.HelpContextID = 0, ; - Cl_commandbutton3.Left = 8, ; - Cl_commandbutton3.MouseIcon = ..\..\, ; - Cl_commandbutton3.MousePointer = 0, ; - Cl_commandbutton3.Name = "Cl_commandbutton3", ; - Cl_commandbutton3.OLEDragMode = 0, ; - Cl_commandbutton3.OLEDragPicture = ..\..\, ; - Cl_commandbutton3.OLEDropEffects = 3, ; - Cl_commandbutton3.OLEDropMode = 0, ; - Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton3.PictureMargin = 0, ; - Cl_commandbutton3.PicturePosition = 4, ; - Cl_commandbutton3.PictureSpacing = 0, ; - Cl_commandbutton3.RightToLeft = .F., ; - Cl_commandbutton3.SpecialEffect = 0, ; - Cl_commandbutton3.StatusBarText = "", ; - Cl_commandbutton3.Style = 0, ; - Cl_commandbutton3.TabStop = .T., ; - Cl_commandbutton3.Tag = "", ; - Cl_commandbutton3.TerminateRead = .F., ; - Cl_commandbutton3.Themes = .T., ; - Cl_commandbutton3.ToolTipText = "", ; - Cl_commandbutton3.Top = 52, ; - Cl_commandbutton3.Visible = .T., ; - Cl_commandbutton3.WhatsThisHelpID = -1, ; - Cl_commandbutton3.Width = 200, ; - Cl_commandbutton3.WordWrap = .F. - *< END OBJECT: BaseClass="commandgroup" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 101, ; - Left = 28, ; - Name = "Container1", ; - Top = 140, ; - Width = 517 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Cl_commandgroup1' AS cl_commandgroup WITH ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 0, ; - ButtonCount = 3, ; - Enabled = .F., ; - Height = 76, ; - Left = 276, ; - Name = "Cl_commandgroup1", ; - Top = 12, ; - Width = 228, ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 128,255,128, ; - Command1.Cancel = .F., ; - Command1.Caption = "Este es el botón de comando 1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 0,128,192, ; - Command1.DisabledForeColor = 128,0,255, ; - Command1.DisabledPicture = bmps\treeview.bmp, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 21, ; - Command1.HelpContextID = 0, ; - Command1.Left = 4, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 200, ; - Command1.WordWrap = .F., ; - Command2.Alignment = 2, ; - Command2.Anchor = 0, ; - Command2.AutoSize = .F., ; - Command2.BackColor = 128,255,128, ; - Command2.Cancel = .F., ; - Command2.Caption = "Este es el botón de comando 2", ; - Command2.ColorScheme = 1, ; - Command2.ColorSource = 4, ; - Command2.Comment = "", ; - Command2.Default = .F., ; - Command2.DisabledBackColor = 0,128,192, ; - Command2.DisabledForeColor = 128,0,255, ; - Command2.DisabledPicture = bmps\treeview.bmp, ; - Command2.DownPicture = ..\..\, ; - Command2.DragIcon = ..\..\, ; - Command2.DragMode = 0, ; - Command2.Enabled = .F., ; - Command2.FontBold = .F., ; - Command2.FontCharSet = 0, ; - Command2.FontCondense = .F., ; - Command2.FontExtend = .F., ; - Command2.FontItalic = .F., ; - Command2.FontName = "Arial", ; - Command2.FontOutline = .F., ; - Command2.FontShadow = .F., ; - Command2.FontSize = 8, ; - Command2.FontStrikethru = .F., ; - Command2.FontUnderline = .F., ; - Command2.ForeColor = 0,0,0, ; - Command2.Height = 21, ; - Command2.HelpContextID = 0, ; - Command2.Left = 4, ; - Command2.MouseIcon = ..\..\, ; - Command2.MousePointer = 0, ; - Command2.Name = "Command2", ; - Command2.OLEDragMode = 0, ; - Command2.OLEDragPicture = ..\..\, ; - Command2.OLEDropEffects = 3, ; - Command2.OLEDropMode = 0, ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PictureMargin = 0, ; - Command2.PicturePosition = 4, ; - Command2.PictureSpacing = 0, ; - Command2.RightToLeft = .F., ; - Command2.SpecialEffect = 0, ; - Command2.StatusBarText = "", ; - Command2.Style = 0, ; - Command2.TabStop = .T., ; - Command2.Tag = "", ; - Command2.TerminateRead = .F., ; - Command2.Themes = .T., ; - Command2.ToolTipText = "", ; - Command2.Top = 28, ; - Command2.Visible = .T., ; - Command2.WhatsThisHelpID = -1, ; - Command2.Width = 200, ; - Command2.WordWrap = .F., ; - Command3.Alignment = 2, ; - Command3.Anchor = 0, ; - Command3.AutoSize = .F., ; - Command3.BackColor = 128,255,128, ; - Command3.Cancel = .F., ; - Command3.Caption = "Este es el botón de comando 3", ; - Command3.ColorScheme = 1, ; - Command3.ColorSource = 4, ; - Command3.Comment = "", ; - Command3.Default = .F., ; - Command3.DisabledBackColor = 0,128,192, ; - Command3.DisabledForeColor = 128,0,255, ; - Command3.DisabledPicture = bmps\treeview.bmp, ; - Command3.DownPicture = ..\..\, ; - Command3.DragIcon = ..\..\, ; - Command3.DragMode = 0, ; - Command3.Enabled = .T., ; - Command3.FontBold = .F., ; - Command3.FontCharSet = 0, ; - Command3.FontCondense = .F., ; - Command3.FontExtend = .F., ; - Command3.FontItalic = .F., ; - Command3.FontName = "Arial", ; - Command3.FontOutline = .F., ; - Command3.FontShadow = .F., ; - Command3.FontSize = 8, ; - Command3.FontStrikethru = .F., ; - Command3.FontUnderline = .F., ; - Command3.ForeColor = 0,0,0, ; - Command3.Height = 21, ; - Command3.HelpContextID = 0, ; - Command3.Left = 4, ; - Command3.MouseIcon = ..\..\, ; - Command3.MousePointer = 0, ; - Command3.Name = "Command3", ; - Command3.OLEDragMode = 0, ; - Command3.OLEDragPicture = ..\..\, ; - Command3.OLEDropEffects = 3, ; - Command3.OLEDropMode = 0, ; - Command3.Picture = bmps\sobrepostal.bmp, ; - Command3.PictureMargin = 0, ; - Command3.PicturePosition = 4, ; - Command3.PictureSpacing = 0, ; - Command3.RightToLeft = .F., ; - Command3.SpecialEffect = 0, ; - Command3.StatusBarText = "", ; - Command3.Style = 0, ; - Command3.TabStop = .T., ; - Command3.Tag = "", ; - Command3.TerminateRead = .F., ; - Command3.Themes = .T., ; - Command3.ToolTipText = "", ; - Command3.Top = 52, ; - Command3.Visible = .T., ; - Command3.WhatsThisHelpID = -1, ; - Command3.Width = 200, ; - Command3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'Container1.Commandgroup1' AS commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 8, ; - MemberClass = "cl_commandbutton", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Cl_commandbutton1.Alignment = 2, ; - Cl_commandbutton1.Anchor = 0, ; - Cl_commandbutton1.AutoSize = .F., ; - Cl_commandbutton1.BackColor = 128,255,128, ; - Cl_commandbutton1.Cancel = .F., ; - Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; - Cl_commandbutton1.ColorScheme = 1, ; - Cl_commandbutton1.ColorSource = 4, ; - Cl_commandbutton1.Comment = "", ; - Cl_commandbutton1.Default = .F., ; - Cl_commandbutton1.DisabledBackColor = 0,128,192, ; - Cl_commandbutton1.DisabledForeColor = 128,0,255, ; - Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton1.DownPicture = ..\..\, ; - Cl_commandbutton1.DragIcon = ..\..\, ; - Cl_commandbutton1.DragMode = 0, ; - Cl_commandbutton1.Enabled = .T., ; - Cl_commandbutton1.FontBold = .F., ; - Cl_commandbutton1.FontCharSet = 0, ; - Cl_commandbutton1.FontCondense = .F., ; - Cl_commandbutton1.FontExtend = .F., ; - Cl_commandbutton1.FontItalic = .F., ; - Cl_commandbutton1.FontName = "Arial", ; - Cl_commandbutton1.FontOutline = .F., ; - Cl_commandbutton1.FontShadow = .F., ; - Cl_commandbutton1.FontSize = 8, ; - Cl_commandbutton1.FontStrikethru = .F., ; - Cl_commandbutton1.FontUnderline = .F., ; - Cl_commandbutton1.Height = 21, ; - Cl_commandbutton1.HelpContextID = 0, ; - Cl_commandbutton1.Left = 8, ; - Cl_commandbutton1.MouseIcon = ..\..\, ; - Cl_commandbutton1.MousePointer = 0, ; - Cl_commandbutton1.Name = "Cl_commandbutton1", ; - Cl_commandbutton1.OLEDragMode = 0, ; - Cl_commandbutton1.OLEDragPicture = ..\..\, ; - Cl_commandbutton1.OLEDropEffects = 3, ; - Cl_commandbutton1.OLEDropMode = 0, ; - Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton1.PictureMargin = 0, ; - Cl_commandbutton1.PicturePosition = 4, ; - Cl_commandbutton1.PictureSpacing = 0, ; - Cl_commandbutton1.RightToLeft = .F., ; - Cl_commandbutton1.SpecialEffect = 0, ; - Cl_commandbutton1.StatusBarText = "", ; - Cl_commandbutton1.Style = 0, ; - Cl_commandbutton1.TabStop = .T., ; - Cl_commandbutton1.Tag = "", ; - Cl_commandbutton1.TerminateRead = .F., ; - Cl_commandbutton1.Themes = .T., ; - Cl_commandbutton1.ToolTipText = "", ; - Cl_commandbutton1.Top = 4, ; - Cl_commandbutton1.Visible = .T., ; - Cl_commandbutton1.WhatsThisHelpID = -1, ; - Cl_commandbutton1.Width = 200, ; - Cl_commandbutton1.WordWrap = .F., ; - Cl_commandbutton2.Alignment = 2, ; - Cl_commandbutton2.Anchor = 0, ; - Cl_commandbutton2.AutoSize = .F., ; - Cl_commandbutton2.BackColor = 128,255,128, ; - Cl_commandbutton2.Cancel = .F., ; - Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; - Cl_commandbutton2.ColorScheme = 1, ; - Cl_commandbutton2.ColorSource = 4, ; - Cl_commandbutton2.Comment = "", ; - Cl_commandbutton2.Default = .F., ; - Cl_commandbutton2.DisabledBackColor = 0,128,192, ; - Cl_commandbutton2.DisabledForeColor = 128,0,255, ; - Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton2.DownPicture = ..\..\, ; - Cl_commandbutton2.DragIcon = ..\..\, ; - Cl_commandbutton2.DragMode = 0, ; - Cl_commandbutton2.Enabled = .F., ; - Cl_commandbutton2.FontBold = .F., ; - Cl_commandbutton2.FontCharSet = 0, ; - Cl_commandbutton2.FontCondense = .F., ; - Cl_commandbutton2.FontExtend = .F., ; - Cl_commandbutton2.FontItalic = .F., ; - Cl_commandbutton2.FontName = "Arial", ; - Cl_commandbutton2.FontOutline = .F., ; - Cl_commandbutton2.FontShadow = .F., ; - Cl_commandbutton2.FontSize = 8, ; - Cl_commandbutton2.FontStrikethru = .F., ; - Cl_commandbutton2.FontUnderline = .F., ; - Cl_commandbutton2.Height = 21, ; - Cl_commandbutton2.HelpContextID = 0, ; - Cl_commandbutton2.Left = 8, ; - Cl_commandbutton2.MouseIcon = ..\..\, ; - Cl_commandbutton2.MousePointer = 0, ; - Cl_commandbutton2.Name = "Cl_commandbutton2", ; - Cl_commandbutton2.OLEDragMode = 0, ; - Cl_commandbutton2.OLEDragPicture = ..\..\, ; - Cl_commandbutton2.OLEDropEffects = 3, ; - Cl_commandbutton2.OLEDropMode = 0, ; - Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton2.PictureMargin = 0, ; - Cl_commandbutton2.PicturePosition = 4, ; - Cl_commandbutton2.PictureSpacing = 0, ; - Cl_commandbutton2.RightToLeft = .F., ; - Cl_commandbutton2.SpecialEffect = 0, ; - Cl_commandbutton2.StatusBarText = "", ; - Cl_commandbutton2.Style = 0, ; - Cl_commandbutton2.TabStop = .T., ; - Cl_commandbutton2.Tag = "", ; - Cl_commandbutton2.TerminateRead = .F., ; - Cl_commandbutton2.Themes = .T., ; - Cl_commandbutton2.ToolTipText = "", ; - Cl_commandbutton2.Top = 28, ; - Cl_commandbutton2.Visible = .T., ; - Cl_commandbutton2.WhatsThisHelpID = -1, ; - Cl_commandbutton2.Width = 200, ; - Cl_commandbutton2.WordWrap = .F., ; - Cl_commandbutton3.Alignment = 2, ; - Cl_commandbutton3.Anchor = 0, ; - Cl_commandbutton3.AutoSize = .F., ; - Cl_commandbutton3.BackColor = 128,255,128, ; - Cl_commandbutton3.Cancel = .F., ; - Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; - Cl_commandbutton3.ColorScheme = 1, ; - Cl_commandbutton3.ColorSource = 4, ; - Cl_commandbutton3.Comment = "", ; - Cl_commandbutton3.Default = .F., ; - Cl_commandbutton3.DisabledBackColor = 0,128,192, ; - Cl_commandbutton3.DisabledForeColor = 128,0,255, ; - Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton3.DownPicture = ..\..\, ; - Cl_commandbutton3.DragIcon = ..\..\, ; - Cl_commandbutton3.DragMode = 0, ; - Cl_commandbutton3.Enabled = .T., ; - Cl_commandbutton3.FontBold = .F., ; - Cl_commandbutton3.FontCharSet = 0, ; - Cl_commandbutton3.FontCondense = .F., ; - Cl_commandbutton3.FontExtend = .F., ; - Cl_commandbutton3.FontItalic = .F., ; - Cl_commandbutton3.FontName = "Arial", ; - Cl_commandbutton3.FontOutline = .F., ; - Cl_commandbutton3.FontShadow = .F., ; - Cl_commandbutton3.FontSize = 8, ; - Cl_commandbutton3.FontStrikethru = .F., ; - Cl_commandbutton3.FontUnderline = .F., ; - Cl_commandbutton3.Height = 21, ; - Cl_commandbutton3.HelpContextID = 0, ; - Cl_commandbutton3.Left = 8, ; - Cl_commandbutton3.MouseIcon = ..\..\, ; - Cl_commandbutton3.MousePointer = 0, ; - Cl_commandbutton3.Name = "Cl_commandbutton3", ; - Cl_commandbutton3.OLEDragMode = 0, ; - Cl_commandbutton3.OLEDragPicture = ..\..\, ; - Cl_commandbutton3.OLEDropEffects = 3, ; - Cl_commandbutton3.OLEDropMode = 0, ; - Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton3.PictureMargin = 0, ; - Cl_commandbutton3.PicturePosition = 4, ; - Cl_commandbutton3.PictureSpacing = 0, ; - Cl_commandbutton3.RightToLeft = .F., ; - Cl_commandbutton3.SpecialEffect = 0, ; - Cl_commandbutton3.StatusBarText = "", ; - Cl_commandbutton3.Style = 0, ; - Cl_commandbutton3.TabStop = .T., ; - Cl_commandbutton3.Tag = "", ; - Cl_commandbutton3.TerminateRead = .F., ; - Cl_commandbutton3.Themes = .T., ; - Cl_commandbutton3.ToolTipText = "", ; - Cl_commandbutton3.Top = 52, ; - Cl_commandbutton3.Visible = .T., ; - Cl_commandbutton3.WhatsThisHelpID = -1, ; - Cl_commandbutton3.Width = 200, ; - Cl_commandbutton3.WordWrap = .F. - *< END OBJECT: BaseClass="commandgroup" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 132, ; - Left = 28, ; - Name = "Pageframe1", ; - PageCount = 2, ; - Top = 256, ; - Width = 517, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_commandgroup1' AS cl_commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 275, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 128,255,128, ; - Command1.Cancel = .F., ; - Command1.Caption = "Este es el botón de comando 1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 0,128,192, ; - Command1.DisabledForeColor = 128,0,255, ; - Command1.DisabledPicture = bmps\treeview.bmp, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 21, ; - Command1.HelpContextID = 0, ; - Command1.Left = 4, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 200, ; - Command1.WordWrap = .F., ; - Command2.Alignment = 2, ; - Command2.Anchor = 0, ; - Command2.AutoSize = .F., ; - Command2.BackColor = 128,255,128, ; - Command2.Cancel = .F., ; - Command2.Caption = "Este es el botón de comando 2", ; - Command2.ColorScheme = 1, ; - Command2.ColorSource = 4, ; - Command2.Comment = "", ; - Command2.Default = .F., ; - Command2.DisabledBackColor = 0,128,192, ; - Command2.DisabledForeColor = 128,0,255, ; - Command2.DisabledPicture = bmps\treeview.bmp, ; - Command2.DownPicture = ..\..\, ; - Command2.DragIcon = ..\..\, ; - Command2.DragMode = 0, ; - Command2.Enabled = .F., ; - Command2.FontBold = .F., ; - Command2.FontCharSet = 0, ; - Command2.FontCondense = .F., ; - Command2.FontExtend = .F., ; - Command2.FontItalic = .F., ; - Command2.FontName = "Arial", ; - Command2.FontOutline = .F., ; - Command2.FontShadow = .F., ; - Command2.FontSize = 8, ; - Command2.FontStrikethru = .F., ; - Command2.FontUnderline = .F., ; - Command2.ForeColor = 0,0,0, ; - Command2.Height = 21, ; - Command2.HelpContextID = 0, ; - Command2.Left = 4, ; - Command2.MouseIcon = ..\..\, ; - Command2.MousePointer = 0, ; - Command2.Name = "Command2", ; - Command2.OLEDragMode = 0, ; - Command2.OLEDragPicture = ..\..\, ; - Command2.OLEDropEffects = 3, ; - Command2.OLEDropMode = 0, ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PictureMargin = 0, ; - Command2.PicturePosition = 4, ; - Command2.PictureSpacing = 0, ; - Command2.RightToLeft = .F., ; - Command2.SpecialEffect = 0, ; - Command2.StatusBarText = "", ; - Command2.Style = 0, ; - Command2.TabStop = .T., ; - Command2.Tag = "", ; - Command2.TerminateRead = .F., ; - Command2.Themes = .T., ; - Command2.ToolTipText = "", ; - Command2.Top = 28, ; - Command2.Visible = .T., ; - Command2.WhatsThisHelpID = -1, ; - Command2.Width = 200, ; - Command2.WordWrap = .F., ; - Command3.Alignment = 2, ; - Command3.Anchor = 0, ; - Command3.AutoSize = .F., ; - Command3.BackColor = 128,255,128, ; - Command3.Cancel = .F., ; - Command3.Caption = "Este es el botón de comando 3", ; - Command3.ColorScheme = 1, ; - Command3.ColorSource = 4, ; - Command3.Comment = "", ; - Command3.Default = .F., ; - Command3.DisabledBackColor = 0,128,192, ; - Command3.DisabledForeColor = 128,0,255, ; - Command3.DisabledPicture = bmps\treeview.bmp, ; - Command3.DownPicture = ..\..\, ; - Command3.DragIcon = ..\..\, ; - Command3.DragMode = 0, ; - Command3.Enabled = .T., ; - Command3.FontBold = .F., ; - Command3.FontCharSet = 0, ; - Command3.FontCondense = .F., ; - Command3.FontExtend = .F., ; - Command3.FontItalic = .F., ; - Command3.FontName = "Arial", ; - Command3.FontOutline = .F., ; - Command3.FontShadow = .F., ; - Command3.FontSize = 8, ; - Command3.FontStrikethru = .F., ; - Command3.FontUnderline = .F., ; - Command3.ForeColor = 0,0,0, ; - Command3.Height = 21, ; - Command3.HelpContextID = 0, ; - Command3.Left = 4, ; - Command3.MouseIcon = ..\..\, ; - Command3.MousePointer = 0, ; - Command3.Name = "Command3", ; - Command3.OLEDragMode = 0, ; - Command3.OLEDragPicture = ..\..\, ; - Command3.OLEDropEffects = 3, ; - Command3.OLEDropMode = 0, ; - Command3.Picture = bmps\sobrepostal.bmp, ; - Command3.PictureMargin = 0, ; - Command3.PicturePosition = 4, ; - Command3.PictureSpacing = 0, ; - Command3.RightToLeft = .F., ; - Command3.SpecialEffect = 0, ; - Command3.StatusBarText = "", ; - Command3.Style = 0, ; - Command3.TabStop = .T., ; - Command3.Tag = "", ; - Command3.TerminateRead = .F., ; - Command3.Themes = .T., ; - Command3.ToolTipText = "", ; - Command3.Top = 52, ; - Command3.Visible = .T., ; - Command3.WhatsThisHelpID = -1, ; - Command3.Width = 200, ; - Command3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'Pageframe1.Page1.Commandgroup1' AS commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 11, ; - MemberClass = "cl_commandbutton", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Cl_commandbutton1.Alignment = 2, ; - Cl_commandbutton1.Anchor = 0, ; - Cl_commandbutton1.AutoSize = .F., ; - Cl_commandbutton1.BackColor = 128,255,128, ; - Cl_commandbutton1.Cancel = .F., ; - Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; - Cl_commandbutton1.ColorScheme = 1, ; - Cl_commandbutton1.ColorSource = 4, ; - Cl_commandbutton1.Comment = "", ; - Cl_commandbutton1.Default = .F., ; - Cl_commandbutton1.DisabledBackColor = 0,128,192, ; - Cl_commandbutton1.DisabledForeColor = 128,0,255, ; - Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton1.DownPicture = ..\..\, ; - Cl_commandbutton1.DragIcon = ..\..\, ; - Cl_commandbutton1.DragMode = 0, ; - Cl_commandbutton1.Enabled = .T., ; - Cl_commandbutton1.FontBold = .F., ; - Cl_commandbutton1.FontCharSet = 0, ; - Cl_commandbutton1.FontCondense = .F., ; - Cl_commandbutton1.FontExtend = .F., ; - Cl_commandbutton1.FontItalic = .F., ; - Cl_commandbutton1.FontName = "Arial", ; - Cl_commandbutton1.FontOutline = .F., ; - Cl_commandbutton1.FontShadow = .F., ; - Cl_commandbutton1.FontSize = 8, ; - Cl_commandbutton1.FontStrikethru = .F., ; - Cl_commandbutton1.FontUnderline = .F., ; - Cl_commandbutton1.Height = 21, ; - Cl_commandbutton1.HelpContextID = 0, ; - Cl_commandbutton1.Left = 8, ; - Cl_commandbutton1.MouseIcon = ..\..\, ; - Cl_commandbutton1.MousePointer = 0, ; - Cl_commandbutton1.Name = "Cl_commandbutton1", ; - Cl_commandbutton1.OLEDragMode = 0, ; - Cl_commandbutton1.OLEDragPicture = ..\..\, ; - Cl_commandbutton1.OLEDropEffects = 3, ; - Cl_commandbutton1.OLEDropMode = 0, ; - Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton1.PictureMargin = 0, ; - Cl_commandbutton1.PicturePosition = 4, ; - Cl_commandbutton1.PictureSpacing = 0, ; - Cl_commandbutton1.RightToLeft = .F., ; - Cl_commandbutton1.SpecialEffect = 0, ; - Cl_commandbutton1.StatusBarText = "", ; - Cl_commandbutton1.Style = 0, ; - Cl_commandbutton1.TabStop = .T., ; - Cl_commandbutton1.Tag = "", ; - Cl_commandbutton1.TerminateRead = .F., ; - Cl_commandbutton1.Themes = .T., ; - Cl_commandbutton1.ToolTipText = "", ; - Cl_commandbutton1.Top = 4, ; - Cl_commandbutton1.Visible = .T., ; - Cl_commandbutton1.WhatsThisHelpID = -1, ; - Cl_commandbutton1.Width = 200, ; - Cl_commandbutton1.WordWrap = .F., ; - Cl_commandbutton2.Alignment = 2, ; - Cl_commandbutton2.Anchor = 0, ; - Cl_commandbutton2.AutoSize = .F., ; - Cl_commandbutton2.BackColor = 128,255,128, ; - Cl_commandbutton2.Cancel = .F., ; - Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; - Cl_commandbutton2.ColorScheme = 1, ; - Cl_commandbutton2.ColorSource = 4, ; - Cl_commandbutton2.Comment = "", ; - Cl_commandbutton2.Default = .F., ; - Cl_commandbutton2.DisabledBackColor = 0,128,192, ; - Cl_commandbutton2.DisabledForeColor = 128,0,255, ; - Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton2.DownPicture = ..\..\, ; - Cl_commandbutton2.DragIcon = ..\..\, ; - Cl_commandbutton2.DragMode = 0, ; - Cl_commandbutton2.Enabled = .F., ; - Cl_commandbutton2.FontBold = .F., ; - Cl_commandbutton2.FontCharSet = 0, ; - Cl_commandbutton2.FontCondense = .F., ; - Cl_commandbutton2.FontExtend = .F., ; - Cl_commandbutton2.FontItalic = .F., ; - Cl_commandbutton2.FontName = "Arial", ; - Cl_commandbutton2.FontOutline = .F., ; - Cl_commandbutton2.FontShadow = .F., ; - Cl_commandbutton2.FontSize = 8, ; - Cl_commandbutton2.FontStrikethru = .F., ; - Cl_commandbutton2.FontUnderline = .F., ; - Cl_commandbutton2.Height = 21, ; - Cl_commandbutton2.HelpContextID = 0, ; - Cl_commandbutton2.Left = 8, ; - Cl_commandbutton2.MouseIcon = ..\..\, ; - Cl_commandbutton2.MousePointer = 0, ; - Cl_commandbutton2.Name = "Cl_commandbutton2", ; - Cl_commandbutton2.OLEDragMode = 0, ; - Cl_commandbutton2.OLEDragPicture = ..\..\, ; - Cl_commandbutton2.OLEDropEffects = 3, ; - Cl_commandbutton2.OLEDropMode = 0, ; - Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton2.PictureMargin = 0, ; - Cl_commandbutton2.PicturePosition = 4, ; - Cl_commandbutton2.PictureSpacing = 0, ; - Cl_commandbutton2.RightToLeft = .F., ; - Cl_commandbutton2.SpecialEffect = 0, ; - Cl_commandbutton2.StatusBarText = "", ; - Cl_commandbutton2.Style = 0, ; - Cl_commandbutton2.TabStop = .T., ; - Cl_commandbutton2.Tag = "", ; - Cl_commandbutton2.TerminateRead = .F., ; - Cl_commandbutton2.Themes = .T., ; - Cl_commandbutton2.ToolTipText = "", ; - Cl_commandbutton2.Top = 28, ; - Cl_commandbutton2.Visible = .T., ; - Cl_commandbutton2.WhatsThisHelpID = -1, ; - Cl_commandbutton2.Width = 200, ; - Cl_commandbutton2.WordWrap = .F., ; - Cl_commandbutton3.Alignment = 2, ; - Cl_commandbutton3.Anchor = 0, ; - Cl_commandbutton3.AutoSize = .F., ; - Cl_commandbutton3.BackColor = 128,255,128, ; - Cl_commandbutton3.Cancel = .F., ; - Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; - Cl_commandbutton3.ColorScheme = 1, ; - Cl_commandbutton3.ColorSource = 4, ; - Cl_commandbutton3.Comment = "", ; - Cl_commandbutton3.Default = .F., ; - Cl_commandbutton3.DisabledBackColor = 0,128,192, ; - Cl_commandbutton3.DisabledForeColor = 128,0,255, ; - Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton3.DownPicture = ..\..\, ; - Cl_commandbutton3.DragIcon = ..\..\, ; - Cl_commandbutton3.DragMode = 0, ; - Cl_commandbutton3.Enabled = .T., ; - Cl_commandbutton3.FontBold = .F., ; - Cl_commandbutton3.FontCharSet = 0, ; - Cl_commandbutton3.FontCondense = .F., ; - Cl_commandbutton3.FontExtend = .F., ; - Cl_commandbutton3.FontItalic = .F., ; - Cl_commandbutton3.FontName = "Arial", ; - Cl_commandbutton3.FontOutline = .F., ; - Cl_commandbutton3.FontShadow = .F., ; - Cl_commandbutton3.FontSize = 8, ; - Cl_commandbutton3.FontStrikethru = .F., ; - Cl_commandbutton3.FontUnderline = .F., ; - Cl_commandbutton3.Height = 21, ; - Cl_commandbutton3.HelpContextID = 0, ; - Cl_commandbutton3.Left = 8, ; - Cl_commandbutton3.MouseIcon = ..\..\, ; - Cl_commandbutton3.MousePointer = 0, ; - Cl_commandbutton3.Name = "Cl_commandbutton3", ; - Cl_commandbutton3.OLEDragMode = 0, ; - Cl_commandbutton3.OLEDragPicture = ..\..\, ; - Cl_commandbutton3.OLEDropEffects = 3, ; - Cl_commandbutton3.OLEDropMode = 0, ; - Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton3.PictureMargin = 0, ; - Cl_commandbutton3.PicturePosition = 4, ; - Cl_commandbutton3.PictureSpacing = 0, ; - Cl_commandbutton3.RightToLeft = .F., ; - Cl_commandbutton3.SpecialEffect = 0, ; - Cl_commandbutton3.StatusBarText = "", ; - Cl_commandbutton3.Style = 0, ; - Cl_commandbutton3.TabStop = .T., ; - Cl_commandbutton3.Tag = "", ; - Cl_commandbutton3.TerminateRead = .F., ; - Cl_commandbutton3.Themes = .T., ; - Cl_commandbutton3.ToolTipText = "", ; - Cl_commandbutton3.Top = 52, ; - Cl_commandbutton3.Visible = .T., ; - Cl_commandbutton3.WhatsThisHelpID = -1, ; - Cl_commandbutton3.Width = 200, ; - Cl_commandbutton3.WordWrap = .F. - *< END OBJECT: BaseClass="commandgroup" /> - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_containers.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_containers.dataenvironment.sc2 new file mode 100644 index 0000000..d27a4fe --- /dev/null +++ b/TESTS/DATOS_READONLY/f_containers.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_containers.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_containers.f_base1.sc2 b/TESTS/DATOS_READONLY/f_containers.f_base1.sc2 new file mode 100644 index 0000000..ce65c55 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_containers.f_base1.sc2 @@ -0,0 +1,327 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_containers.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Oleboundcontrol1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_olebound1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_control1" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Name = "F_base1" + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "CONTAINER NORMAL" + Label1.Name = "Label1" + Label2.Caption = "CONTAINER SUBCLASADO" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_container1' AS cl_container WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 255,255,0, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = 68, ; + HelpContextID = 0, ; + Left = 296, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_container1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\fondogris.bmp, ; + SpecialEffect = 2, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + ToolTipText = "", ; + Top = 36, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 244 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" /> + + ADD OBJECT 'Cl_control1' AS cl_control WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = (61), ; + HelpContextID = 0, ; + Left = (296), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_control1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + SpecialEffect = 2, ; + Style = 0, ; + TabIndex = 12, ; + TabStop = .T., ; + Tag = "", ; + ToolTipText = "", ; + Top = (196), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (242) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" /> + + ADD OBJECT 'Cl_olebound1' AS cl_olebound WITH ; + Anchor = 0, ; + AutoActivate = 2, ; + AutoSize = .F., ; + AutoVerbMenu = .T., ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 57, ; + HelpContextID = 0, ; + HostName = "", ; + Left = 296, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_olebound1", ; + Sizable = .T., ; + StatusBarText = "", ; + Stretch = 0, ; + TabStop = .T., ; + Tag = "", ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 244 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="oleboundcontrol" /> + + ADD OBJECT 'Cl_pageframe1' AS cl_pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = 116, ; + HelpContextID = 0, ; + Left = 300, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_pageframe1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 3, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabOrientation = 0, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 280, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 256, ; + Page1.Name = "Page1", ; + Page2.Name = "Page2", ; + Page3.Caption = "Page3", ; + Page3.Name = "Page3" + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> + + ADD OBJECT 'Container1' AS container WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 255,255,0, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = (68), ; + HelpContextID = 0, ; + Left = (28), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Container1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\fondogris.bmp, ; + SpecialEffect = 2, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + ToolTipText = "", ; + Top = (36), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (244) + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Oleboundcontrol1' AS oleboundcontrol WITH ; + Anchor = 0, ; + AutoActivate = 2, ; + AutoSize = .F., ; + AutoVerbMenu = .T., ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (57), ; + HelpContextID = 0, ; + HostName = "", ; + Left = (28), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Oleboundcontrol1", ; + Sizable = .T., ; + StatusBarText = "", ; + Stretch = 0, ; + TabStop = .T., ; + Tag = "", ; + ToolTipText = "", ; + Top = (120), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (244) + *< END OBJECT: BaseClass="oleboundcontrol" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = (117), ; + HelpContextID = 0, ; + Left = (24), ; + MemberClass = "cl_page", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Pageframe1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 3, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabOrientation = 0, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = (280), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (256), ; + Cl_page1.BackColor = 240,240,240, ; + Cl_page1.Caption = "Página 1", ; + Cl_page1.ColorSource = 4, ; + Cl_page1.Comment = "", ; + Cl_page1.DragIcon = ..\..\, ; + Cl_page1.DragMode = 0, ; + Cl_page1.Enabled = .T., ; + Cl_page1.FontBold = .F., ; + Cl_page1.FontCharSet = 0, ; + Cl_page1.FontCondense = .F., ; + Cl_page1.FontExtend = .F., ; + Cl_page1.FontItalic = .F., ; + Cl_page1.FontName = "Arial", ; + Cl_page1.FontOutline = .F., ; + Cl_page1.FontShadow = .F., ; + Cl_page1.FontSize = 8, ; + Cl_page1.FontStrikethru = .F., ; + Cl_page1.FontUnderline = .F., ; + Cl_page1.ForeColor = 0,0,0, ; + Cl_page1.HelpContextID = 0, ; + Cl_page1.MouseIcon = ..\..\, ; + Cl_page1.MousePointer = 0, ; + Cl_page1.Name = "Cl_page1", ; + Cl_page1.OLEDragMode = 0, ; + Cl_page1.OLEDragPicture = ..\..\, ; + Cl_page1.OLEDropEffects = 3, ; + Cl_page1.OLEDropMode = 0, ; + Cl_page1.PageOrder = 1, ; + Cl_page1.Picture = ..\..\, ; + Cl_page1.StatusBarText = "", ; + Cl_page1.Tag = "", ; + Cl_page1.ToolTipText = "", ; + Cl_page1.WhatsThisHelpID = -1, ; + Cl_page2.Caption = "Página 2", ; + Cl_page2.Name = "Cl_page2", ; + Cl_page2.PageOrder = 2, ; + Cl_page3.Caption = "Página 3", ; + Cl_page3.Name = "Cl_page3", ; + Cl_page3.PageOrder = 3 + *< END OBJECT: BaseClass="pageframe" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_containers.sc2 b/TESTS/DATOS_READONLY/f_containers.sc2 index 7e78c20..eaee88a 100644 --- a/TESTS/DATOS_READONLY/f_containers.sc2 +++ b/TESTS/DATOS_READONLY/f_containers.sc2 @@ -4,335 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_containers.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_base1" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Oleboundcontrol1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_olebound1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_control1" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Name = "F_base1" - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "CONTAINER NORMAL" - Label1.Name = "Label1" - Label2.Caption = "CONTAINER SUBCLASADO" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_container1' AS cl_container WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 255,255,0, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = 68, ; - HelpContextID = 0, ; - Left = 296, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_container1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\fondogris.bmp, ; - SpecialEffect = 2, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - ToolTipText = "", ; - Top = 36, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 244 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" /> - - ADD OBJECT 'Cl_control1' AS cl_control WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = (61), ; - HelpContextID = 0, ; - Left = (296), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_control1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - SpecialEffect = 2, ; - Style = 0, ; - TabIndex = 12, ; - TabStop = .T., ; - Tag = "", ; - ToolTipText = "", ; - Top = (196), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (242) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" /> - - ADD OBJECT 'Cl_olebound1' AS cl_olebound WITH ; - Anchor = 0, ; - AutoActivate = 2, ; - AutoSize = .F., ; - AutoVerbMenu = .T., ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 57, ; - HelpContextID = 0, ; - HostName = "", ; - Left = 296, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_olebound1", ; - Sizable = .T., ; - StatusBarText = "", ; - Stretch = 0, ; - TabStop = .T., ; - Tag = "", ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 244 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="oleboundcontrol" /> - - ADD OBJECT 'Cl_pageframe1' AS cl_pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = 116, ; - HelpContextID = 0, ; - Left = 300, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_pageframe1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 3, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabOrientation = 0, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 280, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 256, ; - Page1.Name = "Page1", ; - Page2.Name = "Page2", ; - Page3.Caption = "Page3", ; - Page3.Name = "Page3" - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> - - ADD OBJECT 'Container1' AS container WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 255,255,0, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = (68), ; - HelpContextID = 0, ; - Left = (28), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Container1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\fondogris.bmp, ; - SpecialEffect = 2, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - ToolTipText = "", ; - Top = (36), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (244) - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Oleboundcontrol1' AS oleboundcontrol WITH ; - Anchor = 0, ; - AutoActivate = 2, ; - AutoSize = .F., ; - AutoVerbMenu = .T., ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (57), ; - HelpContextID = 0, ; - HostName = "", ; - Left = (28), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Oleboundcontrol1", ; - Sizable = .T., ; - StatusBarText = "", ; - Stretch = 0, ; - TabStop = .T., ; - Tag = "", ; - ToolTipText = "", ; - Top = (120), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (244) - *< END OBJECT: BaseClass="oleboundcontrol" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = (117), ; - HelpContextID = 0, ; - Left = (24), ; - MemberClass = "cl_page", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Pageframe1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 3, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabOrientation = 0, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = (280), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (256), ; - Cl_page1.BackColor = 240,240,240, ; - Cl_page1.Caption = "Página 1", ; - Cl_page1.ColorSource = 4, ; - Cl_page1.Comment = "", ; - Cl_page1.DragIcon = ..\..\, ; - Cl_page1.DragMode = 0, ; - Cl_page1.Enabled = .T., ; - Cl_page1.FontBold = .F., ; - Cl_page1.FontCharSet = 0, ; - Cl_page1.FontCondense = .F., ; - Cl_page1.FontExtend = .F., ; - Cl_page1.FontItalic = .F., ; - Cl_page1.FontName = "Arial", ; - Cl_page1.FontOutline = .F., ; - Cl_page1.FontShadow = .F., ; - Cl_page1.FontSize = 8, ; - Cl_page1.FontStrikethru = .F., ; - Cl_page1.FontUnderline = .F., ; - Cl_page1.ForeColor = 0,0,0, ; - Cl_page1.HelpContextID = 0, ; - Cl_page1.MouseIcon = ..\..\, ; - Cl_page1.MousePointer = 0, ; - Cl_page1.Name = "Cl_page1", ; - Cl_page1.OLEDragMode = 0, ; - Cl_page1.OLEDragPicture = ..\..\, ; - Cl_page1.OLEDropEffects = 3, ; - Cl_page1.OLEDropMode = 0, ; - Cl_page1.PageOrder = 1, ; - Cl_page1.Picture = ..\..\, ; - Cl_page1.StatusBarText = "", ; - Cl_page1.Tag = "", ; - Cl_page1.ToolTipText = "", ; - Cl_page1.WhatsThisHelpID = -1, ; - Cl_page2.Caption = "Página 2", ; - Cl_page2.Name = "Cl_page2", ; - Cl_page2.PageOrder = 2, ; - Cl_page3.Caption = "Página 3", ; - Cl_page3.Name = "Cl_page3", ; - Cl_page3.PageOrder = 3 - *< END OBJECT: BaseClass="pageframe" /> - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_form_aa.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_form_aa.dataenvironment.sc2 new file mode 100644 index 0000000..ee0ed6e --- /dev/null +++ b/TESTS/DATOS_READONLY/f_form_aa.dataenvironment.sc2 @@ -0,0 +1,17 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_form_aa.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="2" /> + + * + DataSource = .NULL. + Name = "Dataenvironment" + TabStop = .F. + Visible = .F. + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_form_aa.f_form_aa.sc2 b/TESTS/DATOS_READONLY/f_form_aa.f_form_aa.sc2 new file mode 100644 index 0000000..4669792 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_form_aa.f_form_aa.sc2 @@ -0,0 +1,2834 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_form_aa.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_grid1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.checkbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.collection" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.combobox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.commandgroup" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.commandbutton" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.container" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.control" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.editbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.hyperlink" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.image" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.label" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.line" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.listbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.optiongroup" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.option" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.spinner" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.textbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.timer" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.Cl_optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" /> + + * + *m: add_control + *m: run_tests + *p: l_activated + *p: n_controles_count + *p: valor + *a: a_controles[1,0] + * + + * + AllowOutput = .T. + AlwaysOnBottom = .F. + AlwaysOnTop = .T. + AutoCenter = .F. + BackColor = 192,192,192 + BindControls = .T. + BorderStyle = 3 + BufferMode = 0 + Caption = "AllControls_Test" + ClipControls = .T. + Closable = .T. + ColorSource = 4 + Comment = "" + ContinuousScroll = .T. + ControlBox = .T. + c_testname = AllControls_Test + DataSession = 2 + DEClass = "cl_dataenvironment" + DEClassLibrary = lib_controles.vcx + DefHeight = + DefLeft = + DefOleLCID = 0 + DefTop = + DefWidth = + Desktop = .F. + Dockable = 0 + DoCreate = .T. + DrawMode = 13 + DrawStyle = 0 + DrawWidth = 1 + Enabled = .T. + FillColor = 0,0,0 + FillStyle = 1 + FontBold = .F. + FontCharSet = 0 + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 9 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + HalfHeightCaption = .F. + Height = (460) + HelpContextID = 0 + HScrollSmallChange = 10 + Icon = bmps\container.ico + KeyPreview = .F. + Left = (2) + LockScreen = .F. + l_activated = .F. + MacDesktop = 0 + MaxButton = .T. + MaxHeight = -1 + MaxLeft = -1 + MaxTop = -1 + MaxWidth = -1 + MDIForm = .F. + MinButton = .T. + MinHeight = -1 + MinWidth = -1 + MouseIcon = ..\..\ + MousePointer = 0 + Movable = .T. + Name = "f_form_aa" + n_controles_count = 0 + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + Picture = bmps\fondogris.bmp + RightToLeft = .F. + ScaleMode = 3 + ScrollBars = 3 + ShowInTaskBar = .T. + ShowTips = .F. + ShowWindow = 0 + SizeBox = .F. + TabIndex = 1 + TabStop = .T. + Tag = "" + Themes = .T. + TitleBar = 1 + Top = (4) + valor = .F. + Visible = .T. + VScrollSmallChange = 10 + WhatsThisButton = .F. + WhatsThisHelp = .F. + WhatsThisHelpID = -1 + Width = (998) + WindowState = 0 + WindowType = 0 + ZoomBox = .F. + Edit1.Height = 144 + Edit1.Left = 764 + Edit1.Name = "Edit1" + Edit1.RightToLeft = .F. + Edit1.Top = 32 + Edit1.Width = 212 + Label3.BackColor = 128,255,128 + Label3.Height = 17 + Label3.Left = 764 + Label3.Name = "Label3" + Label3.RightToLeft = .F. + Label3.Top = 8 + Label3.Width = 212 + cmdCapturar.Height = 27 + cmdCapturar.Left = 764 + cmdCapturar.Name = "cmdCapturar" + cmdCapturar.RightToLeft = .F. + cmdCapturar.Top = 392 + cmdCapturar.Width = 212 + Label1.BackColor = 128,255,128 + Label1.Caption = "CONTROLES" + Label1.Height = 17 + Label1.Left = 12 + Label1.Name = "Label1" + Label1.RightToLeft = .F. + Label1.Top = 8 + Label1.Width = 268 + Label2.BackColor = 128,255,128 + Label2.Caption = "TESTS" + Label2.Height = 17 + Label2.Left = 296 + Label2.Name = "Label2" + Label2.RightToLeft = .F. + Label2.Top = 8 + Label2.Width = 460 + * + + ADD OBJECT 'Cl_grid1' AS cl_grid WITH ; + AllowAddNew = .F., ; + AllowAutoColumnFit = 0, ; + AllowCellSelection = .T., ; + AllowHeaderSizing = .F., ; + AllowRowSizing = .F., ; + Anchor = 0, ; + BackColor = 255,255,217, ; + ChildOrder = "", ; + ColumnCount = 6, ; + Comment = "", ; + DeleteMark = .F., ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + GridLineColor = 0,0,0, ; + GridLines = 3, ; + GridLineWidth = 1, ; + HeaderHeight = 18, ; + Height = 424, ; + HelpContextID = 0, ; + Highlight = .T., ; + HighlightBackColor = 51,153,255, ; + HighlightForeColor = 255,255,255, ; + HighlightRow = .T., ; + HighlightRowLineWidth = 1, ; + HighlightStyle = 0, ; + Left = 296, ; + LinkMaster = "", ; + LockColumns = 0, ; + LockColumnsLeft = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_grid1", ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Optimize = .F., ; + Panel = 1, ; + PanelLink = .T., ; + Partition = 0, ; + ReadOnly = .F., ; + RecordMark = .T., ; + RecordSource = "C_TESTS", ; + RecordSourceType = 1, ; + RelationalExpr = "", ; + RightToLeft = .F., ; + RowHeight = 18, ; + ScrollBars = 2, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SplitBar = .F., ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 32, ; + Value = 0, ; + View = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 460, ; + COLUMN1.Alignment = 3, ; + COLUMN1.BackColor = 255,255,217, ; + COLUMN1.Bound = .T., ; + COLUMN1.ColumnOrder = 1, ; + COLUMN1.Comment = "", ; + COLUMN1.ControlSource = "c_ctlname", ; + COLUMN1.CurrentControl = "Text1", ; + COLUMN1.DynamicAlignment = "", ; + COLUMN1.DynamicBackColor = "", ; + COLUMN1.DynamicCurrentControl = "", ; + COLUMN1.DynamicFontBold = "", ; + COLUMN1.DynamicFontItalic = "", ; + COLUMN1.DynamicFontName = "", ; + COLUMN1.DynamicFontOutline = "", ; + COLUMN1.DynamicFontShadow = "", ; + COLUMN1.DynamicFontSize = "", ; + COLUMN1.DynamicFontStrikethru = "", ; + COLUMN1.DynamicFontUnderline = "", ; + COLUMN1.DynamicForeColor = "", ; + COLUMN1.DynamicInputMask = "", ; + COLUMN1.Enabled = .T., ; + COLUMN1.FontBold = .F., ; + COLUMN1.FontCharSet = 0, ; + COLUMN1.FontCondense = .F., ; + COLUMN1.FontExtend = .F., ; + COLUMN1.FontItalic = .F., ; + COLUMN1.FontName = "Arial", ; + COLUMN1.FontOutline = .F., ; + COLUMN1.FontShadow = .F., ; + COLUMN1.FontSize = 9, ; + COLUMN1.FontStrikethru = .F., ; + COLUMN1.FontUnderline = .F., ; + COLUMN1.ForeColor = 0,0,0, ; + COLUMN1.Format = "", ; + COLUMN1.Header1.Alignment = 0, ; + COLUMN1.Header1.BackColor = 240,240,240, ; + COLUMN1.Header1.Caption = "Control", ; + COLUMN1.Header1.Comment = "", ; + COLUMN1.Header1.FontBold = .F., ; + COLUMN1.Header1.FontCharSet = 0, ; + COLUMN1.Header1.FontCondense = .F., ; + COLUMN1.Header1.FontExtend = .F., ; + COLUMN1.Header1.FontItalic = .F., ; + COLUMN1.Header1.FontName = "Arial", ; + COLUMN1.Header1.FontOutline = .F., ; + COLUMN1.Header1.FontShadow = .F., ; + COLUMN1.Header1.FontSize = 9, ; + COLUMN1.Header1.FontStrikethru = .F., ; + COLUMN1.Header1.FontUnderline = .F., ; + COLUMN1.Header1.ForeColor = 0,0,0, ; + COLUMN1.Header1.MouseIcon = ..\..\, ; + COLUMN1.Header1.MousePointer = 0, ; + COLUMN1.Header1.Name = "Header1", ; + COLUMN1.Header1.Picture = ..\..\, ; + COLUMN1.Header1.StatusBarText = "", ; + COLUMN1.Header1.Tag = "", ; + COLUMN1.Header1.ToolTipText = "", ; + COLUMN1.Header1.WordWrap = .F., ; + COLUMN1.InputMask = "", ; + COLUMN1.MouseIcon = ..\..\, ; + COLUMN1.MousePointer = 0, ; + COLUMN1.Movable = .T., ; + COLUMN1.Name = "COLUMN1", ; + COLUMN1.ReadOnly = .F., ; + COLUMN1.Resizable = .T., ; + COLUMN1.SelectOnEntry = .T., ; + COLUMN1.Sparse = .T., ; + COLUMN1.StatusBarText = "", ; + COLUMN1.Tag = "", ; + COLUMN1.Text1.Alignment = 3, ; + COLUMN1.Text1.Anchor = 0, ; + COLUMN1.Text1.AutoComplete = 0, ; + COLUMN1.Text1.AutoCompSource = "", ; + COLUMN1.Text1.AutoCompTable = "", ; + COLUMN1.Text1.BackColor = 255,255,217, ; + COLUMN1.Text1.BackStyle = 1, ; + COLUMN1.Text1.BorderColor = 100,100,100, ; + COLUMN1.Text1.BorderStyle = 0, ; + COLUMN1.Text1.Century = 1, ; + COLUMN1.Text1.ColorScheme = 1, ; + COLUMN1.Text1.ColorSource = 4, ; + COLUMN1.Text1.Comment = "", ; + COLUMN1.Text1.DateFormat = 0, ; + COLUMN1.Text1.DateMark = "", ; + COLUMN1.Text1.DisabledBackColor = 255,255,255, ; + COLUMN1.Text1.DisabledForeColor = 109,109,109, ; + COLUMN1.Text1.DragIcon = ..\..\, ; + COLUMN1.Text1.DragMode = 0, ; + COLUMN1.Text1.Enabled = .T., ; + COLUMN1.Text1.EnableHyperlinks = .F., ; + COLUMN1.Text1.FontBold = .F., ; + COLUMN1.Text1.FontCharSet = 0, ; + COLUMN1.Text1.FontCondense = .F., ; + COLUMN1.Text1.FontExtend = .F., ; + COLUMN1.Text1.FontItalic = .F., ; + COLUMN1.Text1.FontName = "Arial", ; + COLUMN1.Text1.FontOutline = .F., ; + COLUMN1.Text1.FontShadow = .F., ; + COLUMN1.Text1.FontSize = 9, ; + COLUMN1.Text1.FontStrikethru = .F., ; + COLUMN1.Text1.FontUnderline = .F., ; + COLUMN1.Text1.ForeColor = 0,0,0, ; + COLUMN1.Text1.Format = "", ; + COLUMN1.Text1.HelpContextID = 0, ; + COLUMN1.Text1.HideSelection = .T., ; + COLUMN1.Text1.Hours = 0, ; + COLUMN1.Text1.IMEMode = 0, ; + COLUMN1.Text1.InputMask = "", ; + COLUMN1.Text1.IntegralHeight = .F., ; + COLUMN1.Text1.MemoWindow = "", ; + COLUMN1.Text1.MouseIcon = ..\..\, ; + COLUMN1.Text1.MousePointer = 0, ; + COLUMN1.Text1.Name = "Text1", ; + COLUMN1.Text1.NullDisplay = "", ; + COLUMN1.Text1.OLEDragMode = 0, ; + COLUMN1.Text1.OLEDragPicture = ..\..\, ; + COLUMN1.Text1.OLEDropEffects = 3, ; + COLUMN1.Text1.OLEDropMode = 0, ; + COLUMN1.Text1.OLEDropTextInsertion = 0, ; + COLUMN1.Text1.OpenWindow = .F., ; + COLUMN1.Text1.PasswordChar = "", ; + COLUMN1.Text1.ReadOnly = .F., ; + COLUMN1.Text1.RightToLeft = .F., ; + COLUMN1.Text1.Seconds = 2, ; + COLUMN1.Text1.SelectedBackColor = 51,153,255, ; + COLUMN1.Text1.SelectedForeColor = 255,255,255, ; + COLUMN1.Text1.SelectOnEntry = .F., ; + COLUMN1.Text1.SpecialEffect = 0, ; + COLUMN1.Text1.StatusBarText = "", ; + COLUMN1.Text1.StrictDateEntry = 1, ; + COLUMN1.Text1.Style = 0, ; + COLUMN1.Text1.TabIndex = 1, ; + COLUMN1.Text1.TabStop = .T., ; + COLUMN1.Text1.Tag = "", ; + COLUMN1.Text1.TerminateRead = .F., ; + COLUMN1.Text1.Themes = .T., ; + COLUMN1.Text1.ToolTipText = "", ; + COLUMN1.Text1.Value = , ; + COLUMN1.Text1.Visible = .T., ; + COLUMN1.ToolTipText = "", ; + COLUMN1.Visible = .T., ; + COLUMN1.Width = 170, ; + COLUMN2.Alignment = 2, ; + COLUMN2.BackColor = 255,255,217, ; + COLUMN2.ControlSource = "c_Access", ; + COLUMN2.DynamicBackColor = 'ICASE( c_access="S", RGB(0,255,0), c_access="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN2.DynamicForeColor = 'ICASE( c_access="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN2.Enabled = .T., ; + COLUMN2.FontBold = .F., ; + COLUMN2.FontCharSet = 0, ; + COLUMN2.FontCondense = .F., ; + COLUMN2.FontExtend = .F., ; + COLUMN2.FontItalic = .F., ; + COLUMN2.FontName = "Arial", ; + COLUMN2.FontOutline = .F., ; + COLUMN2.FontShadow = .F., ; + COLUMN2.FontSize = 9, ; + COLUMN2.FontStrikethru = .F., ; + COLUMN2.FontUnderline = .F., ; + COLUMN2.ForeColor = 0,0,0, ; + COLUMN2.Header1.Alignment = 2, ; + COLUMN2.Header1.BackColor = 240,240,240, ; + COLUMN2.Header1.Caption = "Access", ; + COLUMN2.Header1.FontBold = .F., ; + COLUMN2.Header1.FontCharSet = 0, ; + COLUMN2.Header1.FontCondense = .F., ; + COLUMN2.Header1.FontExtend = .F., ; + COLUMN2.Header1.FontItalic = .F., ; + COLUMN2.Header1.FontName = "Arial", ; + COLUMN2.Header1.FontOutline = .F., ; + COLUMN2.Header1.FontShadow = .F., ; + COLUMN2.Header1.FontSize = 9, ; + COLUMN2.Header1.FontStrikethru = .F., ; + COLUMN2.Header1.FontUnderline = .F., ; + COLUMN2.Header1.Name = "Header1", ; + COLUMN2.Name = "COLUMN2", ; + COLUMN2.ReadOnly = .F., ; + COLUMN2.Text1.Alignment = 2, ; + COLUMN2.Text1.BackColor = 255,255,217, ; + COLUMN2.Text1.Enabled = .T., ; + COLUMN2.Text1.FontBold = .F., ; + COLUMN2.Text1.FontCharSet = 0, ; + COLUMN2.Text1.FontCondense = .F., ; + COLUMN2.Text1.FontExtend = .F., ; + COLUMN2.Text1.FontItalic = .F., ; + COLUMN2.Text1.FontName = "Arial", ; + COLUMN2.Text1.FontOutline = .F., ; + COLUMN2.Text1.FontShadow = .F., ; + COLUMN2.Text1.FontSize = 9, ; + COLUMN2.Text1.FontStrikethru = .F., ; + COLUMN2.Text1.FontUnderline = .F., ; + COLUMN2.Text1.ForeColor = 0,0,0, ; + COLUMN2.Text1.Name = "Text1", ; + COLUMN2.Text1.ReadOnly = .F., ; + COLUMN2.Text1.RightToLeft = .F., ; + COLUMN2.Text1.Visible = .T., ; + COLUMN2.Visible = .T., ; + COLUMN2.Width = 50, ; + COLUMN3.Alignment = 2, ; + COLUMN3.BackColor = 255,255,217, ; + COLUMN3.ControlSource = "c_Assign", ; + COLUMN3.DynamicBackColor = 'ICASE( c_assign="S", RGB(0,255,0), c_assign="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN3.DynamicForeColor = 'ICASE( c_assign="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN3.Enabled = .T., ; + COLUMN3.FontBold = .F., ; + COLUMN3.FontCharSet = 0, ; + COLUMN3.FontCondense = .F., ; + COLUMN3.FontExtend = .F., ; + COLUMN3.FontItalic = .F., ; + COLUMN3.FontName = "Arial", ; + COLUMN3.FontOutline = .F., ; + COLUMN3.FontShadow = .F., ; + COLUMN3.FontSize = 9, ; + COLUMN3.FontStrikethru = .F., ; + COLUMN3.FontUnderline = .F., ; + COLUMN3.ForeColor = 0,0,0, ; + COLUMN3.Header1.Alignment = 2, ; + COLUMN3.Header1.Caption = "Assign", ; + COLUMN3.Header1.FontBold = .F., ; + COLUMN3.Header1.FontCharSet = 0, ; + COLUMN3.Header1.FontCondense = .F., ; + COLUMN3.Header1.FontExtend = .F., ; + COLUMN3.Header1.FontItalic = .F., ; + COLUMN3.Header1.FontName = "Arial", ; + COLUMN3.Header1.FontOutline = .F., ; + COLUMN3.Header1.FontShadow = .F., ; + COLUMN3.Header1.FontSize = 9, ; + COLUMN3.Header1.FontStrikethru = .F., ; + COLUMN3.Header1.FontUnderline = .F., ; + COLUMN3.Header1.Name = "Header1", ; + COLUMN3.Name = "COLUMN3", ; + COLUMN3.ReadOnly = .F., ; + COLUMN3.Text1.Alignment = 2, ; + COLUMN3.Text1.BackColor = 255,255,217, ; + COLUMN3.Text1.Enabled = .T., ; + COLUMN3.Text1.FontBold = .F., ; + COLUMN3.Text1.FontCharSet = 0, ; + COLUMN3.Text1.FontCondense = .F., ; + COLUMN3.Text1.FontExtend = .F., ; + COLUMN3.Text1.FontItalic = .F., ; + COLUMN3.Text1.FontName = "Arial", ; + COLUMN3.Text1.FontOutline = .F., ; + COLUMN3.Text1.FontShadow = .F., ; + COLUMN3.Text1.FontSize = 9, ; + COLUMN3.Text1.FontStrikethru = .F., ; + COLUMN3.Text1.FontUnderline = .F., ; + COLUMN3.Text1.ForeColor = 0,0,0, ; + COLUMN3.Text1.Name = "Text1", ; + COLUMN3.Text1.ReadOnly = .F., ; + COLUMN3.Text1.RightToLeft = .F., ; + COLUMN3.Text1.Visible = .T., ; + COLUMN3.Visible = .T., ; + COLUMN3.Width = 50, ; + COLUMN4.Alignment = 2, ; + COLUMN4.BackColor = 255,255,217, ; + COLUMN4.ControlSource = "c_Value", ; + COLUMN4.DynamicBackColor = 'ICASE( c_value="S", RGB(0,255,0), c_value="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN4.DynamicForeColor = 'ICASE( c_value="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN4.Enabled = .T., ; + COLUMN4.FontBold = .F., ; + COLUMN4.FontCharSet = 0, ; + COLUMN4.FontCondense = .F., ; + COLUMN4.FontExtend = .F., ; + COLUMN4.FontItalic = .F., ; + COLUMN4.FontName = "Arial", ; + COLUMN4.FontOutline = .F., ; + COLUMN4.FontShadow = .F., ; + COLUMN4.FontSize = 9, ; + COLUMN4.FontStrikethru = .F., ; + COLUMN4.FontUnderline = .F., ; + COLUMN4.ForeColor = 0,0,0, ; + COLUMN4.Header1.Alignment = 2, ; + COLUMN4.Header1.Caption = "Value/Act", ; + COLUMN4.Header1.FontBold = .F., ; + COLUMN4.Header1.FontCharSet = 0, ; + COLUMN4.Header1.FontCondense = .F., ; + COLUMN4.Header1.FontExtend = .F., ; + COLUMN4.Header1.FontItalic = .F., ; + COLUMN4.Header1.FontName = "Arial", ; + COLUMN4.Header1.FontOutline = .F., ; + COLUMN4.Header1.FontShadow = .F., ; + COLUMN4.Header1.FontSize = 9, ; + COLUMN4.Header1.FontStrikethru = .F., ; + COLUMN4.Header1.FontUnderline = .F., ; + COLUMN4.Header1.Name = "Header1", ; + COLUMN4.Name = "COLUMN4", ; + COLUMN4.ReadOnly = .F., ; + COLUMN4.Text1.Alignment = 2, ; + COLUMN4.Text1.BackColor = 255,255,217, ; + COLUMN4.Text1.Enabled = .T., ; + COLUMN4.Text1.FontBold = .F., ; + COLUMN4.Text1.FontCharSet = 0, ; + COLUMN4.Text1.FontCondense = .F., ; + COLUMN4.Text1.FontExtend = .F., ; + COLUMN4.Text1.FontItalic = .F., ; + COLUMN4.Text1.FontName = "Arial", ; + COLUMN4.Text1.FontOutline = .F., ; + COLUMN4.Text1.FontShadow = .F., ; + COLUMN4.Text1.FontSize = 9, ; + COLUMN4.Text1.FontStrikethru = .F., ; + COLUMN4.Text1.FontUnderline = .F., ; + COLUMN4.Text1.ForeColor = 0,0,0, ; + COLUMN4.Text1.Name = "Text1", ; + COLUMN4.Text1.ReadOnly = .F., ; + COLUMN4.Text1.RightToLeft = .F., ; + COLUMN4.Text1.Visible = .T., ; + COLUMN4.Visible = .T., ; + COLUMN4.Width = 50, ; + COLUMN5.Alignment = 2, ; + COLUMN5.BackColor = 255,255,217, ; + COLUMN5.ControlSource = "c_ProgrChg", ; + COLUMN5.DynamicBackColor = 'ICASE( c_ProgrChg="S", RGB(0,255,0), c_ProgrChg="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN5.DynamicForeColor = 'ICASE( c_ProgrChg="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN5.Enabled = .T., ; + COLUMN5.FontBold = .F., ; + COLUMN5.FontCharSet = 0, ; + COLUMN5.FontCondense = .F., ; + COLUMN5.FontExtend = .F., ; + COLUMN5.FontItalic = .F., ; + COLUMN5.FontName = "Arial", ; + COLUMN5.FontOutline = .F., ; + COLUMN5.FontShadow = .F., ; + COLUMN5.FontSize = 9, ; + COLUMN5.FontStrikethru = .F., ; + COLUMN5.FontUnderline = .F., ; + COLUMN5.ForeColor = 0,0,0, ; + COLUMN5.Header1.Alignment = 2, ; + COLUMN5.Header1.Caption = "Prg.Chg", ; + COLUMN5.Header1.FontBold = .F., ; + COLUMN5.Header1.FontCharSet = 0, ; + COLUMN5.Header1.FontCondense = .F., ; + COLUMN5.Header1.FontExtend = .F., ; + COLUMN5.Header1.FontItalic = .F., ; + COLUMN5.Header1.FontName = "Arial", ; + COLUMN5.Header1.FontOutline = .F., ; + COLUMN5.Header1.FontShadow = .F., ; + COLUMN5.Header1.FontSize = 9, ; + COLUMN5.Header1.FontStrikethru = .F., ; + COLUMN5.Header1.FontUnderline = .F., ; + COLUMN5.Header1.Name = "Header1", ; + COLUMN5.Name = "COLUMN5", ; + COLUMN5.ReadOnly = .F., ; + COLUMN5.Text1.Alignment = 2, ; + COLUMN5.Text1.BackColor = 255,255,217, ; + COLUMN5.Text1.Enabled = .T., ; + COLUMN5.Text1.FontBold = .F., ; + COLUMN5.Text1.FontCharSet = 0, ; + COLUMN5.Text1.FontCondense = .F., ; + COLUMN5.Text1.FontExtend = .F., ; + COLUMN5.Text1.FontItalic = .F., ; + COLUMN5.Text1.FontName = "Arial", ; + COLUMN5.Text1.FontOutline = .F., ; + COLUMN5.Text1.FontShadow = .F., ; + COLUMN5.Text1.FontSize = 9, ; + COLUMN5.Text1.FontStrikethru = .F., ; + COLUMN5.Text1.FontUnderline = .F., ; + COLUMN5.Text1.ForeColor = 0,0,0, ; + COLUMN5.Text1.Name = "Text1", ; + COLUMN5.Text1.ReadOnly = .F., ; + COLUMN5.Text1.RightToLeft = .F., ; + COLUMN5.Text1.Visible = .T., ; + COLUMN5.Visible = .T., ; + COLUMN5.Width = 50, ; + Column6.Alignment = 2, ; + Column6.BackColor = 255,255,217, ; + Column6.ControlSource = "c_UI", ; + Column6.DynamicBackColor = 'ICASE( c_UI="S", RGB(0,255,0), c_UI="N", RGB(255,0,0), RGB(255,255,255) )', ; + Column6.DynamicForeColor = 'ICASE( c_UI="N", RGB(255,255,255), RGB(0,0,0) )', ; + Column6.Enabled = .T., ; + Column6.FontBold = .F., ; + Column6.FontCharSet = 0, ; + Column6.FontCondense = .F., ; + Column6.FontExtend = .F., ; + Column6.FontItalic = .F., ; + Column6.FontName = "Arial", ; + Column6.FontOutline = .F., ; + Column6.FontShadow = .F., ; + Column6.FontSize = 9, ; + Column6.FontStrikethru = .F., ; + Column6.FontUnderline = .F., ; + Column6.ForeColor = 0,0,0, ; + Column6.Name = "Column6", ; + Column6.ReadOnly = .F., ; + Column6.Visible = .T., ; + Column6.Width = 50 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> + + ADD OBJECT 'Cl_grid1.Column6.Header1' AS header WITH ; + Alignment = 2, ; + Caption = "UI", ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Cl_grid1.Column6.Text1' AS textbox WITH ; + Alignment = 2, ; + BackColor = 255,255,217, ; + BorderStyle = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + RightToLeft = .F., ; + Visible = .T. + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Cl_image1' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 255,0,0, ; + BorderStyle = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 104, ; + HelpContextID = 0, ; + Left = 764, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\vfpxlogo.bmp, ; + RotateFlip = 0, ; + StatusBarText = "", ; + Stretch = 0, ; + Tag = "", ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 284, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 212, ; + ZOrderSet = 0 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Image1' AS image WITH ; + BorderColor = 255,0,0, ; + BorderStyle = 1, ; + Enabled = .T., ; + Height = 104, ; + Left = 764, ; + Name = "Image1", ; + Picture = bmps\vfpxlogo.bmp, ; + Top = 180, ; + Width = 212 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'pgf' AS cl_pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = 384, ; + HelpContextID = 0, ; + Left = 12, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "pgf", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 2, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabIndex = 7, ; + TabOrientation = 1, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 0, ; + Tag = "", ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 268, ; + Page1.BackColor = 240,240,240, ; + Page1.Caption = "Page1", ; + Page1.ColorSource = 4, ; + Page1.Comment = "Sin comentarios", ; + Page1.DragIcon = ..\..\, ; + Page1.DragMode = 0, ; + Page1.Enabled = .T., ; + Page1.FontBold = .F., ; + Page1.FontCharSet = 0, ; + Page1.FontCondense = .F., ; + Page1.FontExtend = .F., ; + Page1.FontItalic = .F., ; + Page1.FontName = "Arial", ; + Page1.FontOutline = .F., ; + Page1.FontShadow = .F., ; + Page1.FontSize = 9, ; + Page1.FontStrikethru = .F., ; + Page1.FontUnderline = .F., ; + Page1.ForeColor = 0,0,0, ; + Page1.HelpContextID = 0, ; + Page1.MouseIcon = ..\..\, ; + Page1.MousePointer = 0, ; + Page1.Name = "Page1", ; + Page1.OLEDragMode = 0, ; + Page1.OLEDragPicture = ..\..\, ; + Page1.OLEDropEffects = 3, ; + Page1.OLEDropMode = 0, ; + Page1.PageOrder = 1, ; + Page1.Picture = ..\..\, ; + Page1.StatusBarText = "", ; + Page1.Tag = "", ; + Page1.ToolTipText = "", ; + Page1.WhatsThisHelpID = -1, ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2", ; + Page2.PageOrder = 2 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> + + ADD OBJECT 'pgf.Page1.checkbox' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Chk1", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (21), ; + HelpContextID = 0, ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "checkbox", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\treeview.bmp, ; + PictureMargin = 0, ; + PicturePosition = 4, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (8), ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (199), ; + WordWrap = .F., ; + ZOrderSet = 1 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'pgf.Page1.Cl_optiongroup1' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (46), ; + HelpContextID = 0, ; + Left = 123, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_optiongroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 231, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (112), ; + ZOrderSet = 20, ; + Option1.Alignment = 0, ; + Option1.Anchor = 0, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 192,192,192, ; + Option1.BackStyle = 1, ; + Option1.Caption = "Esta es la opc. 1", ; + Option1.ColorScheme = 1, ; + Option1.ColorSource = 4, ; + Option1.Comment = "", ; + Option1.ControlSource = "", ; + Option1.DisabledBackColor = 240,240,240, ; + Option1.DisabledForeColor = 109,109,109, ; + Option1.DisabledPicture = ..\..\, ; + Option1.DownPicture = ..\..\, ; + Option1.DragIcon = ..\..\, ; + Option1.DragMode = 0, ; + Option1.Enabled = .T., ; + Option1.FontBold = .F., ; + Option1.FontCondense = .F., ; + Option1.FontExtend = .F., ; + Option1.FontItalic = .F., ; + Option1.FontName = "Arial", ; + Option1.FontOutline = .F., ; + Option1.FontShadow = .F., ; + Option1.FontSize = 8, ; + Option1.FontStrikethru = .F., ; + Option1.FontUnderline = .F., ; + Option1.ForeColor = 0,0,0, ; + Option1.Height = 16, ; + Option1.HelpContextID = 0, ; + Option1.Left = 5, ; + Option1.MouseIcon = ..\..\, ; + Option1.MousePointer = 0, ; + Option1.Name = "Option1", ; + Option1.OLEDragMode = 0, ; + Option1.OLEDragPicture = ..\..\, ; + Option1.OLEDropEffects = 3, ; + Option1.OLEDropMode = 0, ; + Option1.Picture = bmps\scccheckout.bmp, ; + Option1.PictureMargin = 0, ; + Option1.PicturePosition = 4, ; + Option1.PictureSpacing = 0, ; + Option1.RightToLeft = .F., ; + Option1.SpecialEffect = 0, ; + Option1.StatusBarText = "", ; + Option1.Style = 0, ; + Option1.TabIndex = 1, ; + Option1.TabStop = .T., ; + Option1.Tag = "", ; + Option1.TerminateRead = .F., ; + Option1.Themes = .T., ; + Option1.ToolTipText = "", ; + Option1.Top = 5, ; + Option1.Value = 0, ; + Option1.Visible = .T., ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 98, ; + Option1.WordWrap = .F., ; + Option2.AutoSize = .F., ; + Option2.BackColor = 192,192,192, ; + Option2.Caption = "Esta es la opc. 2", ; + Option2.FontSize = 8, ; + Option2.Height = 16, ; + Option2.Left = 5, ; + Option2.Name = "Option2", ; + Option2.Picture = bmps\scccheckout.bmp, ; + Option2.PicturePosition = 4, ; + Option2.Style = 0, ; + Option2.Top = 24, ; + Option2.Value = 1, ; + Option2.Width = 102 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'pgf.Page1.collection' AS cl_collection WITH ; + Left = 218, ; + Name = "collection", ; + Top = 8 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="collection" /> + + ADD OBJECT 'pgf.Page1.combobox' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + BoundColumn = 1, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 0, ; + ColumnLines = .T., ; + ColumnWidths = "", ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DisplayValue = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (20), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = (7), ; + Margin = 0, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "combobox", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\treeview.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (35), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (196), ; + ZOrderSet = 3 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'pgf.Page1.commandbutton' AS cl_commandbutton WITH ; + AutoSize = .F., ; + Caption = "Comando", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + FontSize = 8, ; + Height = (25), ; + Left = (99), ; + Name = "commandbutton", ; + Picture = bmps\treeview.bmp, ; + PicturePosition = 4, ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (63), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (80), ; + WordWrap = .F., ; + ZOrderSet = 5 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandbutton" /> + + ADD OBJECT 'pgf.Page1.commandgroup' AS cl_commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (64), ; + HelpContextID = 0, ; + Left = (6), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "commandgroup", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 2, ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (60), ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (93), ; + ZOrderSet = 4, ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 192,192,192, ; + Command1.Cancel = .F., ; + Command1.Caption = "Comando1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 240,240,240, ; + Command1.DisabledForeColor = 109,109,109, ; + Command1.DisabledPicture = ..\..\, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 25, ; + Command1.HelpContextID = 0, ; + Command1.Left = 1, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabIndex = 1, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 90, ; + Command1.WordWrap = .F., ; + Command2.AutoSize = .F., ; + Command2.BackColor = 192,192,192, ; + Command2.Caption = "Comando2", ; + Command2.FontSize = 8, ; + Command2.Height = 25, ; + Command2.Left = 1, ; + Command2.Name = "Command2", ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PicturePosition = 4, ; + Command2.Top = 32, ; + Command2.Width = 90 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'pgf.Page1.container' AS cl_container WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = (24), ; + HelpContextID = 0, ; + Left = (227), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "container", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + SpecialEffect = 2, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 4, ; + TabStop = .T., ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (127), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (20), ; + ZOrderSet = 6 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" /> + + ADD OBJECT 'pgf.Page1.control' AS cl_control WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = (24), ; + HelpContextID = 0, ; + Left = (199), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "control", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + SpecialEffect = 2, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 5, ; + TabStop = .T., ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (127), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (20), ; + ZOrderSet = 7 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" /> + + ADD OBJECT 'pgf.Page1.editbox' AS cl_editbox WITH ; + AddLineFeeds = .F., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (41), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = (183), ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "editbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (60), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (68), ; + ZOrderSet = 8 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> + + ADD OBJECT 'pgf.Page1.hyperlink' AS cl_hyperlink WITH ; + Comment = "", ; + Left = 199, ; + Name = "hyperlink", ; + Tag = "", ; + test_aa = .F., ; + Top = 103 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="hyperlink" /> + + ADD OBJECT 'pgf.Page1.image' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 231, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "image", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\scccheckout.bmp, ; + RotateFlip = 0, ; + StatusBarText = "", ; + Stretch = 0, ; + Tag = "", ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 107, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16, ; + ZOrderSet = 10 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'pgf.Page1.label' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (17), ; + HelpContextID = 0, ; + Left = (6), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "label", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 7, ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (136), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (104), ; + WordWrap = .F., ; + ZOrderSet = 11 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'pgf.Page1.line' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 255,0,0, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .T., ; + Height = (8), ; + HelpContextID = 0, ; + Left = (121), ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "line", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (136), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (50), ; + ZOrderSet = 12 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'pgf.Page1.listbox' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 128,255,128, ; + BoundColumn = 1, ; + BoundTo = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + ColumnCount = 0, ; + ColumnLines = .T., ; + ColumnWidths = "", ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 255,255,255, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayValue = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = (60), ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "listbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (164), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (224), ; + ZOrderSet = 13 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'pgf.Page1.option' AS cl_option WITH ; + AutoSize = .F., ; + Caption = "Esta es la opción B", ; + DefHeight = , ; + DefWidth = , ; + FontSize = 8, ; + Height = (16), ; + Left = 11, ; + Name = "option", ; + Top = 283, ; + Width = (110), ; + ZOrderSet = 15 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optionbutton" /> + + ADD OBJECT 'pgf.Page1.optiongroup' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (46), ; + HelpContextID = 0, ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "optiongroup", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (232), ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (112), ; + ZOrderSet = 14, ; + Option1.Alignment = 0, ; + Option1.Anchor = 0, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 192,192,192, ; + Option1.BackStyle = 1, ; + Option1.Caption = "Esta es la opc. 1", ; + Option1.ColorScheme = 1, ; + Option1.ColorSource = 4, ; + Option1.Comment = "", ; + Option1.ControlSource = "", ; + Option1.DisabledBackColor = 240,240,240, ; + Option1.DisabledForeColor = 109,109,109, ; + Option1.DisabledPicture = ..\..\, ; + Option1.DownPicture = ..\..\, ; + Option1.DragIcon = ..\..\, ; + Option1.DragMode = 0, ; + Option1.Enabled = .T., ; + Option1.FontBold = .F., ; + Option1.FontCondense = .F., ; + Option1.FontExtend = .F., ; + Option1.FontItalic = .F., ; + Option1.FontName = "Arial", ; + Option1.FontOutline = .F., ; + Option1.FontShadow = .F., ; + Option1.FontSize = 8, ; + Option1.FontStrikethru = .F., ; + Option1.FontUnderline = .F., ; + Option1.ForeColor = 0,0,0, ; + Option1.Height = 41, ; + Option1.HelpContextID = 0, ; + Option1.Left = 5, ; + Option1.MouseIcon = ..\..\, ; + Option1.MousePointer = 0, ; + Option1.Name = "Option1", ; + Option1.OLEDragMode = 0, ; + Option1.OLEDragPicture = ..\..\, ; + Option1.OLEDropEffects = 3, ; + Option1.OLEDropMode = 0, ; + Option1.Picture = bmps\scccheckout.bmp, ; + Option1.PictureMargin = 0, ; + Option1.PicturePosition = 4, ; + Option1.PictureSpacing = 0, ; + Option1.RightToLeft = .F., ; + Option1.SpecialEffect = 0, ; + Option1.StatusBarText = "", ; + Option1.Style = 1, ; + Option1.TabIndex = 1, ; + Option1.TabStop = .T., ; + Option1.Tag = "", ; + Option1.TerminateRead = .F., ; + Option1.Themes = .T., ; + Option1.ToolTipText = "", ; + Option1.Top = 5, ; + Option1.Value = 0, ; + Option1.Visible = .T., ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 112, ; + Option1.WordWrap = .F., ; + Option2.AutoSize = .F., ; + Option2.BackColor = 192,192,192, ; + Option2.Caption = "Esta es la opc. 2", ; + Option2.FontSize = 8, ; + Option2.Height = 16, ; + Option2.Left = 5, ; + Option2.Name = "Option2", ; + Option2.Picture = bmps\scccheckout.bmp, ; + Option2.PicturePosition = 4, ; + Option2.Style = 1, ; + Option2.Top = 24, ; + Option2.Value = 1, ; + Option2.Width = 103 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'pgf.Page1.Pageframe1' AS pageframe WITH ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + ErasePage = .T., ; + Height = (61), ; + Left = (135), ; + MemberClass = "cl_page", ; + MemberClassLibrary = lib_controles.vcx, ; + Name = "Pageframe1", ; + PageCount = 2, ; + TabOrientation = 2, ; + Themes = .F., ; + Top = (284), ; + Width = (117), ; + ZOrderSet = 19, ; + Cl_page1.Caption = "Pg1", ; + Cl_page1.Name = "Cl_page1", ; + Cl_page2.BackColor = 255,193,132, ; + Cl_page2.Caption = "Pg2", ; + Cl_page2.Name = "Cl_page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'pgf.Page1.spinner' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (19), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 11, ; + Margin = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "spinner", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabIndex = 9, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 303, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (108), ; + ZOrderSet = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'pgf.Page1.textbox' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DefHeight = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (19), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 11, ; + Margin = 0, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "textbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 327, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (108), ; + ZOrderSet = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'pgf.Page1.timer' AS cl_timer WITH ; + Comment = "", ; + DefHeight = , ; + DefWidth = , ; + Enabled = .T., ; + Height = (23), ; + Interval = 0, ; + Left = 235, ; + Name = "timer", ; + Tag = "", ; + test_aa = .F., ; + Top = 255, ; + Width = (23) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="timer" /> + + PROCEDURE Activate + IF NOT THISFORM.l_activated + THISFORM.run_tests() + THISFORM.l_activated = .T. + ENDIF + + ENDPROC + + PROCEDURE add_control + LPARAMETERS toControl + + LOCAL lcCtlPath + + WITH THISFORM + lcCtlPath = SYS(1272, toControl) + + INSERT INTO C_TESTS ; + ( c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg, c_UI ) ; + VALUES ; + ( SUBSTR( lcCtlPath, LEN(.NAME) + 2), 'N', 'N', 'N', 'N', 'N' ) + ENDWITH + + ENDPROC + + PROCEDURE Load + CREATE CURSOR C_TESTS ( c_CtlName C(30), c_Access C(1), c_Assign C(1), c_Value C(1), c_ProgrChg C(1), c_UI C(1) ) + INDEX ON c_CtlName TAG c_CtlName + + ENDPROC + + PROCEDURE run_tests + TRY + LOCAL loEx AS Exception, loCtl + + WITH THISFORM AS Form + *-- c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg + THISFORM.pgf.page1.SETALL( "Tag", "" ) + THISFORM.pgf.ActivePage = 1 + + SCAN + *-- Test UI Enable + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + DO CASE + CASE NOT PEMSTATUS(loCtl, 'UIEnable',5) + REPLACE c_UI WITH "-" + CASE loCtl.Tag = "UI" + REPLACE c_UI WITH "S" + ENDCASE + ENDSCAN + + SCAN + *-- Test Access + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + loCtl.Tag = '' + IF loCtl.test_aa = "ACCESS_OK" + REPLACE c_Access WITH "S" + ENDIF + ENDSCAN + + SCAN + *-- Test Assign + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + loCtl.Tag = '' + loCtl.test_aa = "ASSIGN_OK" + IF loCtl.Tag = "ASSIGN_OK" + REPLACE c_Assign WITH "S" + ENDIF + ENDSCAN + + SCAN + *-- Test Valor/Activate + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + + DO CASE + CASE loCtl.Baseclass == 'Checkbox' + .valor = 1 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Combobox' + .valor = 3 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Commandgroup' + .valor = 2 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Editbox' + .valor = 'Texto editable' + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Listbox' + .valor = 3 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Optiongroup' + .valor = 2 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Optionbutton' + .valor = 2 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Spinner' + .valor = 123 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Textbox' + .valor = "Mi texto" + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Page' + loCtl.Parent.ActivePage = 2 + IF loCtl.Tag = 'AC' + REPLACE c_Value WITH "S" + ENDIF + + OTHERWISE + REPLACE c_Value WITH "-" + + ENDCASE + ENDSCAN + + SCAN + *-- Test ProgrammaticChange + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + .Tag = '' + DO CASE + CASE loCtl.Baseclass == 'Checkbox' + loCtl.Value = 0 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Combobox' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Commandgroup' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Editbox' + loCtl.Value = 'Editado!' + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Listbox' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Optiongroup' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Spinner' + loCtl.Value = 321 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Textbox' + loCtl.Value = 'Editado!' + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + OTHERWISE + REPLACE c_ProgrChg WITH "-" + + ENDCASE + + ENDSCAN + ENDWITH + + + CATCH TO loEx + THISFORM.edit1.Value = 'Error ' + TRANSFORM(loEx.ErrorNo) + CHR(13) ; + + loEx.Message + CHR(13) ; + + loEx.Procedure + ', Line ' + TRANSFORM(loEx.LineNo) + CHR(13) ; + + loEx.Details + + FINALLY + IF USED("C_TESTS") + SELECT C_TESTS + GO TOP + ENDIF + + ENDTRY + + ENDPROC + + PROCEDURE pgf.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.collection.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.collection.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.collection.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.combobox.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.combobox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.combobox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.combobox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.combobox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.container.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.container.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.container.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.container.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.control.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.control.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.control.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.control.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.editbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.editbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.editbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.editbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.editbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.image.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.image.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.image.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.image.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.label.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.label.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.label.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.label.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.line.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.line.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.line.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.line.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.listbox.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.listbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.listbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.listbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.listbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.option.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.option.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.option.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.option.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Activate + THIS.Tag = 'AC' + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Init + this.Cl_page2.Init() + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.UIEnable + LPARAMETERS lEnable + + IF lEnable + THISFORM.pgf.Tag = 'UI' + ENDIF + + + ENDPROC + + PROCEDURE pgf.Page1.spinner.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.spinner.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.spinner.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.spinner.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.spinner.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.textbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.textbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.textbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.textbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.textbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.timer.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.timer.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_form_aa.sc2 b/TESTS/DATOS_READONLY/f_form_aa.sc2 index 699fcbd..5ff9e05 100644 --- a/TESTS/DATOS_READONLY/f_form_aa.sc2 +++ b/TESTS/DATOS_READONLY/f_form_aa.sc2 @@ -4,2840 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_form_aa.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="2" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_form_aa" Baseclass="form" /> - DataSource = .NULL. - Name = "Dataenvironment" - TabStop = .F. - Visible = .F. - -ENDDEFINE - -DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_grid1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.checkbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.collection" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.combobox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.commandgroup" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.commandbutton" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.container" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.control" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.editbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.hyperlink" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.image" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.label" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.line" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.listbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.optiongroup" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.option" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.spinner" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.textbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.timer" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.Cl_optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" /> - - * - *m: add_control - *m: run_tests - *p: l_activated - *p: n_controles_count - *p: valor - *a: a_controles[1,0] - * - - AllowOutput = .T. - AlwaysOnBottom = .F. - AlwaysOnTop = .T. - AutoCenter = .F. - BackColor = 192,192,192 - BindControls = .T. - BorderStyle = 3 - BufferMode = 0 - Caption = "AllControls_Test" - ClipControls = .T. - Closable = .T. - ColorSource = 4 - Comment = "" - ContinuousScroll = .T. - ControlBox = .T. - c_testname = AllControls_Test - DataSession = 2 - DEClass = "cl_dataenvironment" - DEClassLibrary = lib_controles.vcx - DefHeight = - DefLeft = - DefOleLCID = 0 - DefTop = - DefWidth = - Desktop = .F. - Dockable = 0 - DoCreate = .T. - DrawMode = 13 - DrawStyle = 0 - DrawWidth = 1 - Enabled = .T. - FillColor = 0,0,0 - FillStyle = 1 - FontBold = .F. - FontCharSet = 0 - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 9 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - HalfHeightCaption = .F. - Height = (460) - HelpContextID = 0 - HScrollSmallChange = 10 - Icon = bmps\container.ico - KeyPreview = .F. - Left = (2) - LockScreen = .F. - l_activated = .F. - MacDesktop = 0 - MaxButton = .T. - MaxHeight = -1 - MaxLeft = -1 - MaxTop = -1 - MaxWidth = -1 - MDIForm = .F. - MinButton = .T. - MinHeight = -1 - MinWidth = -1 - MouseIcon = ..\..\ - MousePointer = 0 - Movable = .T. - Name = "f_form_aa" - n_controles_count = 0 - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - Picture = bmps\fondogris.bmp - RightToLeft = .F. - ScaleMode = 3 - ScrollBars = 3 - ShowInTaskBar = .T. - ShowTips = .F. - ShowWindow = 0 - SizeBox = .F. - TabIndex = 1 - TabStop = .T. - Tag = "" - Themes = .T. - TitleBar = 1 - Top = (4) - valor = .F. - Visible = .T. - VScrollSmallChange = 10 - WhatsThisButton = .F. - WhatsThisHelp = .F. - WhatsThisHelpID = -1 - Width = (998) - WindowState = 0 - WindowType = 0 - ZoomBox = .F. - Edit1.Height = 144 - Edit1.Left = 764 - Edit1.Name = "Edit1" - Edit1.RightToLeft = .F. - Edit1.Top = 32 - Edit1.Width = 212 - Label3.BackColor = 128,255,128 - Label3.Height = 17 - Label3.Left = 764 - Label3.Name = "Label3" - Label3.RightToLeft = .F. - Label3.Top = 8 - Label3.Width = 212 - cmdCapturar.Height = 27 - cmdCapturar.Left = 764 - cmdCapturar.Name = "cmdCapturar" - cmdCapturar.RightToLeft = .F. - cmdCapturar.Top = 392 - cmdCapturar.Width = 212 - Label1.BackColor = 128,255,128 - Label1.Caption = "CONTROLES" - Label1.Height = 17 - Label1.Left = 12 - Label1.Name = "Label1" - Label1.RightToLeft = .F. - Label1.Top = 8 - Label1.Width = 268 - Label2.BackColor = 128,255,128 - Label2.Caption = "TESTS" - Label2.Height = 17 - Label2.Left = 296 - Label2.Name = "Label2" - Label2.RightToLeft = .F. - Label2.Top = 8 - Label2.Width = 460 - - ADD OBJECT 'Cl_grid1' AS cl_grid WITH ; - AllowAddNew = .F., ; - AllowAutoColumnFit = 0, ; - AllowCellSelection = .T., ; - AllowHeaderSizing = .F., ; - AllowRowSizing = .F., ; - Anchor = 0, ; - BackColor = 255,255,217, ; - ChildOrder = "", ; - ColumnCount = 6, ; - Comment = "", ; - DeleteMark = .F., ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - GridLineColor = 0,0,0, ; - GridLines = 3, ; - GridLineWidth = 1, ; - HeaderHeight = 18, ; - Height = 424, ; - HelpContextID = 0, ; - Highlight = .T., ; - HighlightBackColor = 51,153,255, ; - HighlightForeColor = 255,255,255, ; - HighlightRow = .T., ; - HighlightRowLineWidth = 1, ; - HighlightStyle = 0, ; - Left = 296, ; - LinkMaster = "", ; - LockColumns = 0, ; - LockColumnsLeft = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_grid1", ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Optimize = .F., ; - Panel = 1, ; - PanelLink = .T., ; - Partition = 0, ; - ReadOnly = .F., ; - RecordMark = .T., ; - RecordSource = "C_TESTS", ; - RecordSourceType = 1, ; - RelationalExpr = "", ; - RightToLeft = .F., ; - RowHeight = 18, ; - ScrollBars = 2, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SplitBar = .F., ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 32, ; - Value = 0, ; - View = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 460, ; - COLUMN1.Alignment = 3, ; - COLUMN1.BackColor = 255,255,217, ; - COLUMN1.Bound = .T., ; - COLUMN1.ColumnOrder = 1, ; - COLUMN1.Comment = "", ; - COLUMN1.ControlSource = "c_ctlname", ; - COLUMN1.CurrentControl = "Text1", ; - COLUMN1.DynamicAlignment = "", ; - COLUMN1.DynamicBackColor = "", ; - COLUMN1.DynamicCurrentControl = "", ; - COLUMN1.DynamicFontBold = "", ; - COLUMN1.DynamicFontItalic = "", ; - COLUMN1.DynamicFontName = "", ; - COLUMN1.DynamicFontOutline = "", ; - COLUMN1.DynamicFontShadow = "", ; - COLUMN1.DynamicFontSize = "", ; - COLUMN1.DynamicFontStrikethru = "", ; - COLUMN1.DynamicFontUnderline = "", ; - COLUMN1.DynamicForeColor = "", ; - COLUMN1.DynamicInputMask = "", ; - COLUMN1.Enabled = .T., ; - COLUMN1.FontBold = .F., ; - COLUMN1.FontCharSet = 0, ; - COLUMN1.FontCondense = .F., ; - COLUMN1.FontExtend = .F., ; - COLUMN1.FontItalic = .F., ; - COLUMN1.FontName = "Arial", ; - COLUMN1.FontOutline = .F., ; - COLUMN1.FontShadow = .F., ; - COLUMN1.FontSize = 9, ; - COLUMN1.FontStrikethru = .F., ; - COLUMN1.FontUnderline = .F., ; - COLUMN1.ForeColor = 0,0,0, ; - COLUMN1.Format = "", ; - COLUMN1.Header1.Alignment = 0, ; - COLUMN1.Header1.BackColor = 240,240,240, ; - COLUMN1.Header1.Caption = "Control", ; - COLUMN1.Header1.Comment = "", ; - COLUMN1.Header1.FontBold = .F., ; - COLUMN1.Header1.FontCharSet = 0, ; - COLUMN1.Header1.FontCondense = .F., ; - COLUMN1.Header1.FontExtend = .F., ; - COLUMN1.Header1.FontItalic = .F., ; - COLUMN1.Header1.FontName = "Arial", ; - COLUMN1.Header1.FontOutline = .F., ; - COLUMN1.Header1.FontShadow = .F., ; - COLUMN1.Header1.FontSize = 9, ; - COLUMN1.Header1.FontStrikethru = .F., ; - COLUMN1.Header1.FontUnderline = .F., ; - COLUMN1.Header1.ForeColor = 0,0,0, ; - COLUMN1.Header1.MouseIcon = ..\..\, ; - COLUMN1.Header1.MousePointer = 0, ; - COLUMN1.Header1.Name = "Header1", ; - COLUMN1.Header1.Picture = ..\..\, ; - COLUMN1.Header1.StatusBarText = "", ; - COLUMN1.Header1.Tag = "", ; - COLUMN1.Header1.ToolTipText = "", ; - COLUMN1.Header1.WordWrap = .F., ; - COLUMN1.InputMask = "", ; - COLUMN1.MouseIcon = ..\..\, ; - COLUMN1.MousePointer = 0, ; - COLUMN1.Movable = .T., ; - COLUMN1.Name = "COLUMN1", ; - COLUMN1.ReadOnly = .F., ; - COLUMN1.Resizable = .T., ; - COLUMN1.SelectOnEntry = .T., ; - COLUMN1.Sparse = .T., ; - COLUMN1.StatusBarText = "", ; - COLUMN1.Tag = "", ; - COLUMN1.Text1.Alignment = 3, ; - COLUMN1.Text1.Anchor = 0, ; - COLUMN1.Text1.AutoComplete = 0, ; - COLUMN1.Text1.AutoCompSource = "", ; - COLUMN1.Text1.AutoCompTable = "", ; - COLUMN1.Text1.BackColor = 255,255,217, ; - COLUMN1.Text1.BackStyle = 1, ; - COLUMN1.Text1.BorderColor = 100,100,100, ; - COLUMN1.Text1.BorderStyle = 0, ; - COLUMN1.Text1.Century = 1, ; - COLUMN1.Text1.ColorScheme = 1, ; - COLUMN1.Text1.ColorSource = 4, ; - COLUMN1.Text1.Comment = "", ; - COLUMN1.Text1.DateFormat = 0, ; - COLUMN1.Text1.DateMark = "", ; - COLUMN1.Text1.DisabledBackColor = 255,255,255, ; - COLUMN1.Text1.DisabledForeColor = 109,109,109, ; - COLUMN1.Text1.DragIcon = ..\..\, ; - COLUMN1.Text1.DragMode = 0, ; - COLUMN1.Text1.Enabled = .T., ; - COLUMN1.Text1.EnableHyperlinks = .F., ; - COLUMN1.Text1.FontBold = .F., ; - COLUMN1.Text1.FontCharSet = 0, ; - COLUMN1.Text1.FontCondense = .F., ; - COLUMN1.Text1.FontExtend = .F., ; - COLUMN1.Text1.FontItalic = .F., ; - COLUMN1.Text1.FontName = "Arial", ; - COLUMN1.Text1.FontOutline = .F., ; - COLUMN1.Text1.FontShadow = .F., ; - COLUMN1.Text1.FontSize = 9, ; - COLUMN1.Text1.FontStrikethru = .F., ; - COLUMN1.Text1.FontUnderline = .F., ; - COLUMN1.Text1.ForeColor = 0,0,0, ; - COLUMN1.Text1.Format = "", ; - COLUMN1.Text1.HelpContextID = 0, ; - COLUMN1.Text1.HideSelection = .T., ; - COLUMN1.Text1.Hours = 0, ; - COLUMN1.Text1.IMEMode = 0, ; - COLUMN1.Text1.InputMask = "", ; - COLUMN1.Text1.IntegralHeight = .F., ; - COLUMN1.Text1.MemoWindow = "", ; - COLUMN1.Text1.MouseIcon = ..\..\, ; - COLUMN1.Text1.MousePointer = 0, ; - COLUMN1.Text1.Name = "Text1", ; - COLUMN1.Text1.NullDisplay = "", ; - COLUMN1.Text1.OLEDragMode = 0, ; - COLUMN1.Text1.OLEDragPicture = ..\..\, ; - COLUMN1.Text1.OLEDropEffects = 3, ; - COLUMN1.Text1.OLEDropMode = 0, ; - COLUMN1.Text1.OLEDropTextInsertion = 0, ; - COLUMN1.Text1.OpenWindow = .F., ; - COLUMN1.Text1.PasswordChar = "", ; - COLUMN1.Text1.ReadOnly = .F., ; - COLUMN1.Text1.RightToLeft = .F., ; - COLUMN1.Text1.Seconds = 2, ; - COLUMN1.Text1.SelectedBackColor = 51,153,255, ; - COLUMN1.Text1.SelectedForeColor = 255,255,255, ; - COLUMN1.Text1.SelectOnEntry = .F., ; - COLUMN1.Text1.SpecialEffect = 0, ; - COLUMN1.Text1.StatusBarText = "", ; - COLUMN1.Text1.StrictDateEntry = 1, ; - COLUMN1.Text1.Style = 0, ; - COLUMN1.Text1.TabIndex = 1, ; - COLUMN1.Text1.TabStop = .T., ; - COLUMN1.Text1.Tag = "", ; - COLUMN1.Text1.TerminateRead = .F., ; - COLUMN1.Text1.Themes = .T., ; - COLUMN1.Text1.ToolTipText = "", ; - COLUMN1.Text1.Value = , ; - COLUMN1.Text1.Visible = .T., ; - COLUMN1.ToolTipText = "", ; - COLUMN1.Visible = .T., ; - COLUMN1.Width = 170, ; - COLUMN2.Alignment = 2, ; - COLUMN2.BackColor = 255,255,217, ; - COLUMN2.ControlSource = "c_Access", ; - COLUMN2.DynamicBackColor = 'ICASE( c_access="S", RGB(0,255,0), c_access="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN2.DynamicForeColor = 'ICASE( c_access="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN2.Enabled = .T., ; - COLUMN2.FontBold = .F., ; - COLUMN2.FontCharSet = 0, ; - COLUMN2.FontCondense = .F., ; - COLUMN2.FontExtend = .F., ; - COLUMN2.FontItalic = .F., ; - COLUMN2.FontName = "Arial", ; - COLUMN2.FontOutline = .F., ; - COLUMN2.FontShadow = .F., ; - COLUMN2.FontSize = 9, ; - COLUMN2.FontStrikethru = .F., ; - COLUMN2.FontUnderline = .F., ; - COLUMN2.ForeColor = 0,0,0, ; - COLUMN2.Header1.Alignment = 2, ; - COLUMN2.Header1.BackColor = 240,240,240, ; - COLUMN2.Header1.Caption = "Access", ; - COLUMN2.Header1.FontBold = .F., ; - COLUMN2.Header1.FontCharSet = 0, ; - COLUMN2.Header1.FontCondense = .F., ; - COLUMN2.Header1.FontExtend = .F., ; - COLUMN2.Header1.FontItalic = .F., ; - COLUMN2.Header1.FontName = "Arial", ; - COLUMN2.Header1.FontOutline = .F., ; - COLUMN2.Header1.FontShadow = .F., ; - COLUMN2.Header1.FontSize = 9, ; - COLUMN2.Header1.FontStrikethru = .F., ; - COLUMN2.Header1.FontUnderline = .F., ; - COLUMN2.Header1.Name = "Header1", ; - COLUMN2.Name = "COLUMN2", ; - COLUMN2.ReadOnly = .F., ; - COLUMN2.Text1.Alignment = 2, ; - COLUMN2.Text1.BackColor = 255,255,217, ; - COLUMN2.Text1.Enabled = .T., ; - COLUMN2.Text1.FontBold = .F., ; - COLUMN2.Text1.FontCharSet = 0, ; - COLUMN2.Text1.FontCondense = .F., ; - COLUMN2.Text1.FontExtend = .F., ; - COLUMN2.Text1.FontItalic = .F., ; - COLUMN2.Text1.FontName = "Arial", ; - COLUMN2.Text1.FontOutline = .F., ; - COLUMN2.Text1.FontShadow = .F., ; - COLUMN2.Text1.FontSize = 9, ; - COLUMN2.Text1.FontStrikethru = .F., ; - COLUMN2.Text1.FontUnderline = .F., ; - COLUMN2.Text1.ForeColor = 0,0,0, ; - COLUMN2.Text1.Name = "Text1", ; - COLUMN2.Text1.ReadOnly = .F., ; - COLUMN2.Text1.RightToLeft = .F., ; - COLUMN2.Text1.Visible = .T., ; - COLUMN2.Visible = .T., ; - COLUMN2.Width = 50, ; - COLUMN3.Alignment = 2, ; - COLUMN3.BackColor = 255,255,217, ; - COLUMN3.ControlSource = "c_Assign", ; - COLUMN3.DynamicBackColor = 'ICASE( c_assign="S", RGB(0,255,0), c_assign="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN3.DynamicForeColor = 'ICASE( c_assign="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN3.Enabled = .T., ; - COLUMN3.FontBold = .F., ; - COLUMN3.FontCharSet = 0, ; - COLUMN3.FontCondense = .F., ; - COLUMN3.FontExtend = .F., ; - COLUMN3.FontItalic = .F., ; - COLUMN3.FontName = "Arial", ; - COLUMN3.FontOutline = .F., ; - COLUMN3.FontShadow = .F., ; - COLUMN3.FontSize = 9, ; - COLUMN3.FontStrikethru = .F., ; - COLUMN3.FontUnderline = .F., ; - COLUMN3.ForeColor = 0,0,0, ; - COLUMN3.Header1.Alignment = 2, ; - COLUMN3.Header1.Caption = "Assign", ; - COLUMN3.Header1.FontBold = .F., ; - COLUMN3.Header1.FontCharSet = 0, ; - COLUMN3.Header1.FontCondense = .F., ; - COLUMN3.Header1.FontExtend = .F., ; - COLUMN3.Header1.FontItalic = .F., ; - COLUMN3.Header1.FontName = "Arial", ; - COLUMN3.Header1.FontOutline = .F., ; - COLUMN3.Header1.FontShadow = .F., ; - COLUMN3.Header1.FontSize = 9, ; - COLUMN3.Header1.FontStrikethru = .F., ; - COLUMN3.Header1.FontUnderline = .F., ; - COLUMN3.Header1.Name = "Header1", ; - COLUMN3.Name = "COLUMN3", ; - COLUMN3.ReadOnly = .F., ; - COLUMN3.Text1.Alignment = 2, ; - COLUMN3.Text1.BackColor = 255,255,217, ; - COLUMN3.Text1.Enabled = .T., ; - COLUMN3.Text1.FontBold = .F., ; - COLUMN3.Text1.FontCharSet = 0, ; - COLUMN3.Text1.FontCondense = .F., ; - COLUMN3.Text1.FontExtend = .F., ; - COLUMN3.Text1.FontItalic = .F., ; - COLUMN3.Text1.FontName = "Arial", ; - COLUMN3.Text1.FontOutline = .F., ; - COLUMN3.Text1.FontShadow = .F., ; - COLUMN3.Text1.FontSize = 9, ; - COLUMN3.Text1.FontStrikethru = .F., ; - COLUMN3.Text1.FontUnderline = .F., ; - COLUMN3.Text1.ForeColor = 0,0,0, ; - COLUMN3.Text1.Name = "Text1", ; - COLUMN3.Text1.ReadOnly = .F., ; - COLUMN3.Text1.RightToLeft = .F., ; - COLUMN3.Text1.Visible = .T., ; - COLUMN3.Visible = .T., ; - COLUMN3.Width = 50, ; - COLUMN4.Alignment = 2, ; - COLUMN4.BackColor = 255,255,217, ; - COLUMN4.ControlSource = "c_Value", ; - COLUMN4.DynamicBackColor = 'ICASE( c_value="S", RGB(0,255,0), c_value="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN4.DynamicForeColor = 'ICASE( c_value="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN4.Enabled = .T., ; - COLUMN4.FontBold = .F., ; - COLUMN4.FontCharSet = 0, ; - COLUMN4.FontCondense = .F., ; - COLUMN4.FontExtend = .F., ; - COLUMN4.FontItalic = .F., ; - COLUMN4.FontName = "Arial", ; - COLUMN4.FontOutline = .F., ; - COLUMN4.FontShadow = .F., ; - COLUMN4.FontSize = 9, ; - COLUMN4.FontStrikethru = .F., ; - COLUMN4.FontUnderline = .F., ; - COLUMN4.ForeColor = 0,0,0, ; - COLUMN4.Header1.Alignment = 2, ; - COLUMN4.Header1.Caption = "Value/Act", ; - COLUMN4.Header1.FontBold = .F., ; - COLUMN4.Header1.FontCharSet = 0, ; - COLUMN4.Header1.FontCondense = .F., ; - COLUMN4.Header1.FontExtend = .F., ; - COLUMN4.Header1.FontItalic = .F., ; - COLUMN4.Header1.FontName = "Arial", ; - COLUMN4.Header1.FontOutline = .F., ; - COLUMN4.Header1.FontShadow = .F., ; - COLUMN4.Header1.FontSize = 9, ; - COLUMN4.Header1.FontStrikethru = .F., ; - COLUMN4.Header1.FontUnderline = .F., ; - COLUMN4.Header1.Name = "Header1", ; - COLUMN4.Name = "COLUMN4", ; - COLUMN4.ReadOnly = .F., ; - COLUMN4.Text1.Alignment = 2, ; - COLUMN4.Text1.BackColor = 255,255,217, ; - COLUMN4.Text1.Enabled = .T., ; - COLUMN4.Text1.FontBold = .F., ; - COLUMN4.Text1.FontCharSet = 0, ; - COLUMN4.Text1.FontCondense = .F., ; - COLUMN4.Text1.FontExtend = .F., ; - COLUMN4.Text1.FontItalic = .F., ; - COLUMN4.Text1.FontName = "Arial", ; - COLUMN4.Text1.FontOutline = .F., ; - COLUMN4.Text1.FontShadow = .F., ; - COLUMN4.Text1.FontSize = 9, ; - COLUMN4.Text1.FontStrikethru = .F., ; - COLUMN4.Text1.FontUnderline = .F., ; - COLUMN4.Text1.ForeColor = 0,0,0, ; - COLUMN4.Text1.Name = "Text1", ; - COLUMN4.Text1.ReadOnly = .F., ; - COLUMN4.Text1.RightToLeft = .F., ; - COLUMN4.Text1.Visible = .T., ; - COLUMN4.Visible = .T., ; - COLUMN4.Width = 50, ; - COLUMN5.Alignment = 2, ; - COLUMN5.BackColor = 255,255,217, ; - COLUMN5.ControlSource = "c_ProgrChg", ; - COLUMN5.DynamicBackColor = 'ICASE( c_ProgrChg="S", RGB(0,255,0), c_ProgrChg="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN5.DynamicForeColor = 'ICASE( c_ProgrChg="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN5.Enabled = .T., ; - COLUMN5.FontBold = .F., ; - COLUMN5.FontCharSet = 0, ; - COLUMN5.FontCondense = .F., ; - COLUMN5.FontExtend = .F., ; - COLUMN5.FontItalic = .F., ; - COLUMN5.FontName = "Arial", ; - COLUMN5.FontOutline = .F., ; - COLUMN5.FontShadow = .F., ; - COLUMN5.FontSize = 9, ; - COLUMN5.FontStrikethru = .F., ; - COLUMN5.FontUnderline = .F., ; - COLUMN5.ForeColor = 0,0,0, ; - COLUMN5.Header1.Alignment = 2, ; - COLUMN5.Header1.Caption = "Prg.Chg", ; - COLUMN5.Header1.FontBold = .F., ; - COLUMN5.Header1.FontCharSet = 0, ; - COLUMN5.Header1.FontCondense = .F., ; - COLUMN5.Header1.FontExtend = .F., ; - COLUMN5.Header1.FontItalic = .F., ; - COLUMN5.Header1.FontName = "Arial", ; - COLUMN5.Header1.FontOutline = .F., ; - COLUMN5.Header1.FontShadow = .F., ; - COLUMN5.Header1.FontSize = 9, ; - COLUMN5.Header1.FontStrikethru = .F., ; - COLUMN5.Header1.FontUnderline = .F., ; - COLUMN5.Header1.Name = "Header1", ; - COLUMN5.Name = "COLUMN5", ; - COLUMN5.ReadOnly = .F., ; - COLUMN5.Text1.Alignment = 2, ; - COLUMN5.Text1.BackColor = 255,255,217, ; - COLUMN5.Text1.Enabled = .T., ; - COLUMN5.Text1.FontBold = .F., ; - COLUMN5.Text1.FontCharSet = 0, ; - COLUMN5.Text1.FontCondense = .F., ; - COLUMN5.Text1.FontExtend = .F., ; - COLUMN5.Text1.FontItalic = .F., ; - COLUMN5.Text1.FontName = "Arial", ; - COLUMN5.Text1.FontOutline = .F., ; - COLUMN5.Text1.FontShadow = .F., ; - COLUMN5.Text1.FontSize = 9, ; - COLUMN5.Text1.FontStrikethru = .F., ; - COLUMN5.Text1.FontUnderline = .F., ; - COLUMN5.Text1.ForeColor = 0,0,0, ; - COLUMN5.Text1.Name = "Text1", ; - COLUMN5.Text1.ReadOnly = .F., ; - COLUMN5.Text1.RightToLeft = .F., ; - COLUMN5.Text1.Visible = .T., ; - COLUMN5.Visible = .T., ; - COLUMN5.Width = 50, ; - Column6.Alignment = 2, ; - Column6.BackColor = 255,255,217, ; - Column6.ControlSource = "c_UI", ; - Column6.DynamicBackColor = 'ICASE( c_UI="S", RGB(0,255,0), c_UI="N", RGB(255,0,0), RGB(255,255,255) )', ; - Column6.DynamicForeColor = 'ICASE( c_UI="N", RGB(255,255,255), RGB(0,0,0) )', ; - Column6.Enabled = .T., ; - Column6.FontBold = .F., ; - Column6.FontCharSet = 0, ; - Column6.FontCondense = .F., ; - Column6.FontExtend = .F., ; - Column6.FontItalic = .F., ; - Column6.FontName = "Arial", ; - Column6.FontOutline = .F., ; - Column6.FontShadow = .F., ; - Column6.FontSize = 9, ; - Column6.FontStrikethru = .F., ; - Column6.FontUnderline = .F., ; - Column6.ForeColor = 0,0,0, ; - Column6.Name = "Column6", ; - Column6.ReadOnly = .F., ; - Column6.Visible = .T., ; - Column6.Width = 50 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> - - ADD OBJECT 'Cl_grid1.Column6.Header1' AS header WITH ; - Alignment = 2, ; - Caption = "UI", ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Cl_grid1.Column6.Text1' AS textbox WITH ; - Alignment = 2, ; - BackColor = 255,255,217, ; - BorderStyle = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - RightToLeft = .F., ; - Visible = .T. - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Cl_image1' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 255,0,0, ; - BorderStyle = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 104, ; - HelpContextID = 0, ; - Left = 764, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\vfpxlogo.bmp, ; - RotateFlip = 0, ; - StatusBarText = "", ; - Stretch = 0, ; - Tag = "", ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 284, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 212, ; - ZOrderSet = 0 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Image1' AS image WITH ; - BorderColor = 255,0,0, ; - BorderStyle = 1, ; - Enabled = .T., ; - Height = 104, ; - Left = 764, ; - Name = "Image1", ; - Picture = bmps\vfpxlogo.bmp, ; - Top = 180, ; - Width = 212 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'pgf' AS cl_pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = 384, ; - HelpContextID = 0, ; - Left = 12, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "pgf", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 2, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabIndex = 7, ; - TabOrientation = 1, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 0, ; - Tag = "", ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 268, ; - Page1.BackColor = 240,240,240, ; - Page1.Caption = "Page1", ; - Page1.ColorSource = 4, ; - Page1.Comment = "Sin comentarios", ; - Page1.DragIcon = ..\..\, ; - Page1.DragMode = 0, ; - Page1.Enabled = .T., ; - Page1.FontBold = .F., ; - Page1.FontCharSet = 0, ; - Page1.FontCondense = .F., ; - Page1.FontExtend = .F., ; - Page1.FontItalic = .F., ; - Page1.FontName = "Arial", ; - Page1.FontOutline = .F., ; - Page1.FontShadow = .F., ; - Page1.FontSize = 9, ; - Page1.FontStrikethru = .F., ; - Page1.FontUnderline = .F., ; - Page1.ForeColor = 0,0,0, ; - Page1.HelpContextID = 0, ; - Page1.MouseIcon = ..\..\, ; - Page1.MousePointer = 0, ; - Page1.Name = "Page1", ; - Page1.OLEDragMode = 0, ; - Page1.OLEDragPicture = ..\..\, ; - Page1.OLEDropEffects = 3, ; - Page1.OLEDropMode = 0, ; - Page1.PageOrder = 1, ; - Page1.Picture = ..\..\, ; - Page1.StatusBarText = "", ; - Page1.Tag = "", ; - Page1.ToolTipText = "", ; - Page1.WhatsThisHelpID = -1, ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2", ; - Page2.PageOrder = 2 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> - - ADD OBJECT 'pgf.Page1.checkbox' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Chk1", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (21), ; - HelpContextID = 0, ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "checkbox", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\treeview.bmp, ; - PictureMargin = 0, ; - PicturePosition = 4, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (8), ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (199), ; - WordWrap = .F., ; - ZOrderSet = 1 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'pgf.Page1.Cl_optiongroup1' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (46), ; - HelpContextID = 0, ; - Left = 123, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_optiongroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 231, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (112), ; - ZOrderSet = 20, ; - Option1.Alignment = 0, ; - Option1.Anchor = 0, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 192,192,192, ; - Option1.BackStyle = 1, ; - Option1.Caption = "Esta es la opc. 1", ; - Option1.ColorScheme = 1, ; - Option1.ColorSource = 4, ; - Option1.Comment = "", ; - Option1.ControlSource = "", ; - Option1.DisabledBackColor = 240,240,240, ; - Option1.DisabledForeColor = 109,109,109, ; - Option1.DisabledPicture = ..\..\, ; - Option1.DownPicture = ..\..\, ; - Option1.DragIcon = ..\..\, ; - Option1.DragMode = 0, ; - Option1.Enabled = .T., ; - Option1.FontBold = .F., ; - Option1.FontCondense = .F., ; - Option1.FontExtend = .F., ; - Option1.FontItalic = .F., ; - Option1.FontName = "Arial", ; - Option1.FontOutline = .F., ; - Option1.FontShadow = .F., ; - Option1.FontSize = 8, ; - Option1.FontStrikethru = .F., ; - Option1.FontUnderline = .F., ; - Option1.ForeColor = 0,0,0, ; - Option1.Height = 16, ; - Option1.HelpContextID = 0, ; - Option1.Left = 5, ; - Option1.MouseIcon = ..\..\, ; - Option1.MousePointer = 0, ; - Option1.Name = "Option1", ; - Option1.OLEDragMode = 0, ; - Option1.OLEDragPicture = ..\..\, ; - Option1.OLEDropEffects = 3, ; - Option1.OLEDropMode = 0, ; - Option1.Picture = bmps\scccheckout.bmp, ; - Option1.PictureMargin = 0, ; - Option1.PicturePosition = 4, ; - Option1.PictureSpacing = 0, ; - Option1.RightToLeft = .F., ; - Option1.SpecialEffect = 0, ; - Option1.StatusBarText = "", ; - Option1.Style = 0, ; - Option1.TabIndex = 1, ; - Option1.TabStop = .T., ; - Option1.Tag = "", ; - Option1.TerminateRead = .F., ; - Option1.Themes = .T., ; - Option1.ToolTipText = "", ; - Option1.Top = 5, ; - Option1.Value = 0, ; - Option1.Visible = .T., ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 98, ; - Option1.WordWrap = .F., ; - Option2.AutoSize = .F., ; - Option2.BackColor = 192,192,192, ; - Option2.Caption = "Esta es la opc. 2", ; - Option2.FontSize = 8, ; - Option2.Height = 16, ; - Option2.Left = 5, ; - Option2.Name = "Option2", ; - Option2.Picture = bmps\scccheckout.bmp, ; - Option2.PicturePosition = 4, ; - Option2.Style = 0, ; - Option2.Top = 24, ; - Option2.Value = 1, ; - Option2.Width = 102 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'pgf.Page1.collection' AS cl_collection WITH ; - Left = 218, ; - Name = "collection", ; - Top = 8 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="collection" /> - - ADD OBJECT 'pgf.Page1.combobox' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - BoundColumn = 1, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 0, ; - ColumnLines = .T., ; - ColumnWidths = "", ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DisplayValue = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (20), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = (7), ; - Margin = 0, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "combobox", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\treeview.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (35), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (196), ; - ZOrderSet = 3 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'pgf.Page1.commandbutton' AS cl_commandbutton WITH ; - AutoSize = .F., ; - Caption = "Comando", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - FontSize = 8, ; - Height = (25), ; - Left = (99), ; - Name = "commandbutton", ; - Picture = bmps\treeview.bmp, ; - PicturePosition = 4, ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (63), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (80), ; - WordWrap = .F., ; - ZOrderSet = 5 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandbutton" /> - - ADD OBJECT 'pgf.Page1.commandgroup' AS cl_commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (64), ; - HelpContextID = 0, ; - Left = (6), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "commandgroup", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 2, ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (60), ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (93), ; - ZOrderSet = 4, ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 192,192,192, ; - Command1.Cancel = .F., ; - Command1.Caption = "Comando1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 240,240,240, ; - Command1.DisabledForeColor = 109,109,109, ; - Command1.DisabledPicture = ..\..\, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 25, ; - Command1.HelpContextID = 0, ; - Command1.Left = 1, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabIndex = 1, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 90, ; - Command1.WordWrap = .F., ; - Command2.AutoSize = .F., ; - Command2.BackColor = 192,192,192, ; - Command2.Caption = "Comando2", ; - Command2.FontSize = 8, ; - Command2.Height = 25, ; - Command2.Left = 1, ; - Command2.Name = "Command2", ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PicturePosition = 4, ; - Command2.Top = 32, ; - Command2.Width = 90 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'pgf.Page1.container' AS cl_container WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = (24), ; - HelpContextID = 0, ; - Left = (227), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "container", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - SpecialEffect = 2, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 4, ; - TabStop = .T., ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (127), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (20), ; - ZOrderSet = 6 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" /> - - ADD OBJECT 'pgf.Page1.control' AS cl_control WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = (24), ; - HelpContextID = 0, ; - Left = (199), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "control", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - SpecialEffect = 2, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 5, ; - TabStop = .T., ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (127), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (20), ; - ZOrderSet = 7 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" /> - - ADD OBJECT 'pgf.Page1.editbox' AS cl_editbox WITH ; - AddLineFeeds = .F., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (41), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = (183), ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "editbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (60), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (68), ; - ZOrderSet = 8 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> - - ADD OBJECT 'pgf.Page1.hyperlink' AS cl_hyperlink WITH ; - Comment = "", ; - Left = 199, ; - Name = "hyperlink", ; - Tag = "", ; - test_aa = .F., ; - Top = 103 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="hyperlink" /> - - ADD OBJECT 'pgf.Page1.image' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 231, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "image", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\scccheckout.bmp, ; - RotateFlip = 0, ; - StatusBarText = "", ; - Stretch = 0, ; - Tag = "", ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 107, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16, ; - ZOrderSet = 10 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'pgf.Page1.label' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (17), ; - HelpContextID = 0, ; - Left = (6), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "label", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 7, ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (136), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (104), ; - WordWrap = .F., ; - ZOrderSet = 11 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'pgf.Page1.line' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 255,0,0, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .T., ; - Height = (8), ; - HelpContextID = 0, ; - Left = (121), ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "line", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (136), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (50), ; - ZOrderSet = 12 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'pgf.Page1.listbox' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 128,255,128, ; - BoundColumn = 1, ; - BoundTo = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - ColumnCount = 0, ; - ColumnLines = .T., ; - ColumnWidths = "", ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 255,255,255, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayValue = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = (60), ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "listbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (164), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (224), ; - ZOrderSet = 13 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'pgf.Page1.option' AS cl_option WITH ; - AutoSize = .F., ; - Caption = "Esta es la opción B", ; - DefHeight = , ; - DefWidth = , ; - FontSize = 8, ; - Height = (16), ; - Left = 11, ; - Name = "option", ; - Top = 283, ; - Width = (110), ; - ZOrderSet = 15 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optionbutton" /> - - ADD OBJECT 'pgf.Page1.optiongroup' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (46), ; - HelpContextID = 0, ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "optiongroup", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (232), ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (112), ; - ZOrderSet = 14, ; - Option1.Alignment = 0, ; - Option1.Anchor = 0, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 192,192,192, ; - Option1.BackStyle = 1, ; - Option1.Caption = "Esta es la opc. 1", ; - Option1.ColorScheme = 1, ; - Option1.ColorSource = 4, ; - Option1.Comment = "", ; - Option1.ControlSource = "", ; - Option1.DisabledBackColor = 240,240,240, ; - Option1.DisabledForeColor = 109,109,109, ; - Option1.DisabledPicture = ..\..\, ; - Option1.DownPicture = ..\..\, ; - Option1.DragIcon = ..\..\, ; - Option1.DragMode = 0, ; - Option1.Enabled = .T., ; - Option1.FontBold = .F., ; - Option1.FontCondense = .F., ; - Option1.FontExtend = .F., ; - Option1.FontItalic = .F., ; - Option1.FontName = "Arial", ; - Option1.FontOutline = .F., ; - Option1.FontShadow = .F., ; - Option1.FontSize = 8, ; - Option1.FontStrikethru = .F., ; - Option1.FontUnderline = .F., ; - Option1.ForeColor = 0,0,0, ; - Option1.Height = 41, ; - Option1.HelpContextID = 0, ; - Option1.Left = 5, ; - Option1.MouseIcon = ..\..\, ; - Option1.MousePointer = 0, ; - Option1.Name = "Option1", ; - Option1.OLEDragMode = 0, ; - Option1.OLEDragPicture = ..\..\, ; - Option1.OLEDropEffects = 3, ; - Option1.OLEDropMode = 0, ; - Option1.Picture = bmps\scccheckout.bmp, ; - Option1.PictureMargin = 0, ; - Option1.PicturePosition = 4, ; - Option1.PictureSpacing = 0, ; - Option1.RightToLeft = .F., ; - Option1.SpecialEffect = 0, ; - Option1.StatusBarText = "", ; - Option1.Style = 1, ; - Option1.TabIndex = 1, ; - Option1.TabStop = .T., ; - Option1.Tag = "", ; - Option1.TerminateRead = .F., ; - Option1.Themes = .T., ; - Option1.ToolTipText = "", ; - Option1.Top = 5, ; - Option1.Value = 0, ; - Option1.Visible = .T., ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 112, ; - Option1.WordWrap = .F., ; - Option2.AutoSize = .F., ; - Option2.BackColor = 192,192,192, ; - Option2.Caption = "Esta es la opc. 2", ; - Option2.FontSize = 8, ; - Option2.Height = 16, ; - Option2.Left = 5, ; - Option2.Name = "Option2", ; - Option2.Picture = bmps\scccheckout.bmp, ; - Option2.PicturePosition = 4, ; - Option2.Style = 1, ; - Option2.Top = 24, ; - Option2.Value = 1, ; - Option2.Width = 103 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'pgf.Page1.Pageframe1' AS pageframe WITH ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - ErasePage = .T., ; - Height = (61), ; - Left = (135), ; - MemberClass = "cl_page", ; - MemberClassLibrary = lib_controles.vcx, ; - Name = "Pageframe1", ; - PageCount = 2, ; - TabOrientation = 2, ; - Themes = .F., ; - Top = (284), ; - Width = (117), ; - ZOrderSet = 19, ; - Cl_page1.Caption = "Pg1", ; - Cl_page1.Name = "Cl_page1", ; - Cl_page2.BackColor = 255,193,132, ; - Cl_page2.Caption = "Pg2", ; - Cl_page2.Name = "Cl_page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'pgf.Page1.spinner' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (19), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 11, ; - Margin = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "spinner", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabIndex = 9, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 303, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (108), ; - ZOrderSet = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'pgf.Page1.textbox' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DefHeight = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (19), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 11, ; - Margin = 0, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "textbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 327, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (108), ; - ZOrderSet = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'pgf.Page1.timer' AS cl_timer WITH ; - Comment = "", ; - DefHeight = , ; - DefWidth = , ; - Enabled = .T., ; - Height = (23), ; - Interval = 0, ; - Left = 235, ; - Name = "timer", ; - Tag = "", ; - test_aa = .F., ; - Top = 255, ; - Width = (23) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="timer" /> - - PROCEDURE Activate - IF NOT THISFORM.l_activated - THISFORM.run_tests() - THISFORM.l_activated = .T. - ENDIF - - ENDPROC - - PROCEDURE add_control - LPARAMETERS toControl - - LOCAL lcCtlPath - - WITH THISFORM - lcCtlPath = SYS(1272, toControl) - - INSERT INTO C_TESTS ; - ( c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg, c_UI ) ; - VALUES ; - ( SUBSTR( lcCtlPath, LEN(.NAME) + 2), 'N', 'N', 'N', 'N', 'N' ) - ENDWITH - - ENDPROC - - PROCEDURE Load - CREATE CURSOR C_TESTS ( c_CtlName C(30), c_Access C(1), c_Assign C(1), c_Value C(1), c_ProgrChg C(1), c_UI C(1) ) - INDEX ON c_CtlName TAG c_CtlName - - ENDPROC - - PROCEDURE run_tests - TRY - LOCAL loEx AS Exception, loCtl - - WITH THISFORM AS Form - *-- c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg - THISFORM.pgf.page1.SETALL( "Tag", "" ) - THISFORM.pgf.ActivePage = 1 - - SCAN - *-- Test UI Enable - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - DO CASE - CASE NOT PEMSTATUS(loCtl, 'UIEnable',5) - REPLACE c_UI WITH "-" - CASE loCtl.Tag = "UI" - REPLACE c_UI WITH "S" - ENDCASE - ENDSCAN - - SCAN - *-- Test Access - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - loCtl.Tag = '' - IF loCtl.test_aa = "ACCESS_OK" - REPLACE c_Access WITH "S" - ENDIF - ENDSCAN - - SCAN - *-- Test Assign - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - loCtl.Tag = '' - loCtl.test_aa = "ASSIGN_OK" - IF loCtl.Tag = "ASSIGN_OK" - REPLACE c_Assign WITH "S" - ENDIF - ENDSCAN - - SCAN - *-- Test Valor/Activate - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - - DO CASE - CASE loCtl.Baseclass == 'Checkbox' - .valor = 1 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Combobox' - .valor = 3 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Commandgroup' - .valor = 2 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Editbox' - .valor = 'Texto editable' - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Listbox' - .valor = 3 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Optiongroup' - .valor = 2 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Optionbutton' - .valor = 2 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Spinner' - .valor = 123 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Textbox' - .valor = "Mi texto" - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Page' - loCtl.Parent.ActivePage = 2 - IF loCtl.Tag = 'AC' - REPLACE c_Value WITH "S" - ENDIF - - OTHERWISE - REPLACE c_Value WITH "-" - - ENDCASE - ENDSCAN - - SCAN - *-- Test ProgrammaticChange - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - .Tag = '' - DO CASE - CASE loCtl.Baseclass == 'Checkbox' - loCtl.Value = 0 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Combobox' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Commandgroup' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Editbox' - loCtl.Value = 'Editado!' - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Listbox' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Optiongroup' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Spinner' - loCtl.Value = 321 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Textbox' - loCtl.Value = 'Editado!' - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - OTHERWISE - REPLACE c_ProgrChg WITH "-" - - ENDCASE - - ENDSCAN - ENDWITH - - - CATCH TO loEx - THISFORM.edit1.Value = 'Error ' + TRANSFORM(loEx.ErrorNo) + CHR(13) ; - + loEx.Message + CHR(13) ; - + loEx.Procedure + ', Line ' + TRANSFORM(loEx.LineNo) + CHR(13) ; - + loEx.Details - - FINALLY - IF USED("C_TESTS") - SELECT C_TESTS - GO TOP - ENDIF - - ENDTRY - - ENDPROC - - PROCEDURE pgf.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.collection.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.collection.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.collection.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.combobox.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.combobox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.combobox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.combobox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.combobox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.container.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.container.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.container.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.container.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.control.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.control.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.control.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.control.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.editbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.editbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.editbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.editbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.editbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.image.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.image.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.image.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.image.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.label.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.label.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.label.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.label.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.line.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.line.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.line.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.line.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.listbox.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.listbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.listbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.listbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.listbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.option.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.option.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.option.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.option.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Activate - THIS.Tag = 'AC' - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Init - this.Cl_page2.Init() - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.UIEnable - LPARAMETERS lEnable - - IF lEnable - THISFORM.pgf.Tag = 'UI' - ENDIF - - - ENDPROC - - PROCEDURE pgf.Page1.spinner.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.spinner.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.spinner.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.spinner.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.spinner.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.textbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.textbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.textbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.textbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.textbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.timer.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.timer.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_form_aa2.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_form_aa2.dataenvironment.sc2 new file mode 100644 index 0000000..721eec0 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_form_aa2.dataenvironment.sc2 @@ -0,0 +1,17 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_form_aa2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="2" /> + + * + DataSource = .NULL. + Name = "Dataenvironment" + TabStop = .F. + Visible = .F. + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_form_aa2.f_form_aa1.sc2 b/TESTS/DATOS_READONLY/f_form_aa2.f_form_aa1.sc2 new file mode 100644 index 0000000..ce5b6c2 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_form_aa2.f_form_aa1.sc2 @@ -0,0 +1,1322 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_form_aa2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_form_aa1 AS f_form_aa OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + * + AlwaysOnTop = .T. + DefHeight = + DefLeft = + DefTop = + DoCreate = .T. + Height = (460) + Left = (2) + Name = "F_form_aa1" + Top = (4) + Cl_image1.Height = 104 + Cl_image1.Name = "Cl_image1" + Cl_image1.Width = 212 + Edit1.Name = "Edit1" + Label3.Name = "Label3" + cmdCapturar.Name = "cmdCapturar" + Label1.Name = "Label1" + Label2.Name = "Label2" + Cl_grid1.AllowAddNew = .F. + Cl_grid1.AllowAutoColumnFit = 0 + Cl_grid1.AllowCellSelection = .T. + Cl_grid1.AllowHeaderSizing = .F. + Cl_grid1.AllowRowSizing = .F. + Cl_grid1.Anchor = 0 + Cl_grid1.BackColor = 255,255,217 + Cl_grid1.ChildOrder = "" + Cl_grid1.COLUMN1.Alignment = 3 + Cl_grid1.COLUMN1.BackColor = 255,255,217 + Cl_grid1.COLUMN1.Bound = .T. + Cl_grid1.COLUMN1.ColumnOrder = 1 + Cl_grid1.COLUMN1.Comment = "" + Cl_grid1.COLUMN1.ControlSource = "" + Cl_grid1.COLUMN1.CurrentControl = "Text1" + Cl_grid1.COLUMN1.DynamicAlignment = "" + Cl_grid1.COLUMN1.DynamicBackColor = "" + Cl_grid1.COLUMN1.DynamicCurrentControl = "" + Cl_grid1.COLUMN1.DynamicFontBold = "" + Cl_grid1.COLUMN1.DynamicFontItalic = "" + Cl_grid1.COLUMN1.DynamicFontName = "" + Cl_grid1.COLUMN1.DynamicFontOutline = "" + Cl_grid1.COLUMN1.DynamicFontShadow = "" + Cl_grid1.COLUMN1.DynamicFontSize = "" + Cl_grid1.COLUMN1.DynamicFontStrikethru = "" + Cl_grid1.COLUMN1.DynamicFontUnderline = "" + Cl_grid1.COLUMN1.DynamicForeColor = "" + Cl_grid1.COLUMN1.DynamicInputMask = "" + Cl_grid1.COLUMN1.Enabled = .T. + Cl_grid1.COLUMN1.FontBold = .F. + Cl_grid1.COLUMN1.FontCondense = .F. + Cl_grid1.COLUMN1.FontExtend = .F. + Cl_grid1.COLUMN1.FontItalic = .F. + Cl_grid1.COLUMN1.FontName = "Arial" + Cl_grid1.COLUMN1.FontOutline = .F. + Cl_grid1.COLUMN1.FontShadow = .F. + Cl_grid1.COLUMN1.FontSize = 9 + Cl_grid1.COLUMN1.FontStrikethru = .F. + Cl_grid1.COLUMN1.FontUnderline = .F. + Cl_grid1.COLUMN1.ForeColor = 0,0,0 + Cl_grid1.COLUMN1.Format = "" + Cl_grid1.COLUMN1.Header1.Alignment = 0 + Cl_grid1.COLUMN1.Header1.BackColor = 240,240,240 + Cl_grid1.COLUMN1.Header1.Caption = "Control" + Cl_grid1.COLUMN1.Header1.Comment = "" + Cl_grid1.COLUMN1.Header1.FontBold = .F. + Cl_grid1.COLUMN1.Header1.FontCondense = .F. + Cl_grid1.COLUMN1.Header1.FontExtend = .F. + Cl_grid1.COLUMN1.Header1.FontItalic = .F. + Cl_grid1.COLUMN1.Header1.FontName = "Arial" + Cl_grid1.COLUMN1.Header1.FontOutline = .F. + Cl_grid1.COLUMN1.Header1.FontShadow = .F. + Cl_grid1.COLUMN1.Header1.FontSize = 9 + Cl_grid1.COLUMN1.Header1.FontStrikethru = .F. + Cl_grid1.COLUMN1.Header1.FontUnderline = .F. + Cl_grid1.COLUMN1.Header1.ForeColor = 0,0,0 + Cl_grid1.COLUMN1.Header1.MouseIcon = ..\..\ + Cl_grid1.COLUMN1.Header1.MousePointer = 0 + Cl_grid1.COLUMN1.Header1.Name = "Header1" + Cl_grid1.COLUMN1.Header1.Picture = ..\..\ + Cl_grid1.COLUMN1.Header1.StatusBarText = "" + Cl_grid1.COLUMN1.Header1.Tag = "" + Cl_grid1.COLUMN1.Header1.ToolTipText = "" + Cl_grid1.COLUMN1.Header1.WordWrap = .F. + Cl_grid1.COLUMN1.InputMask = "" + Cl_grid1.COLUMN1.MouseIcon = ..\..\ + Cl_grid1.COLUMN1.MousePointer = 0 + Cl_grid1.COLUMN1.Movable = .T. + Cl_grid1.COLUMN1.Name = "COLUMN1" + Cl_grid1.COLUMN1.ReadOnly = .F. + Cl_grid1.COLUMN1.Resizable = .T. + Cl_grid1.COLUMN1.SelectOnEntry = .T. + Cl_grid1.COLUMN1.Sparse = .T. + Cl_grid1.COLUMN1.Text1.Alignment = 3 + Cl_grid1.COLUMN1.Text1.BackColor = 255,255,217 + Cl_grid1.COLUMN1.Text1.Enabled = .T. + Cl_grid1.COLUMN1.Text1.FontBold = .F. + Cl_grid1.COLUMN1.Text1.FontCondense = .F. + Cl_grid1.COLUMN1.Text1.FontExtend = .F. + Cl_grid1.COLUMN1.Text1.FontItalic = .F. + Cl_grid1.COLUMN1.Text1.FontName = "Arial" + Cl_grid1.COLUMN1.Text1.FontOutline = .F. + Cl_grid1.COLUMN1.Text1.FontShadow = .F. + Cl_grid1.COLUMN1.Text1.FontSize = 9 + Cl_grid1.COLUMN1.Text1.FontStrikethru = .F. + Cl_grid1.COLUMN1.Text1.FontUnderline = .F. + Cl_grid1.COLUMN1.Text1.ForeColor = 0,0,0 + Cl_grid1.COLUMN1.Text1.Name = "Text1" + Cl_grid1.COLUMN1.Text1.ReadOnly = .F. + Cl_grid1.COLUMN1.Text1.Visible = .T. + Cl_grid1.COLUMN1.Visible = .T. + Cl_grid1.COLUMN1.Width = 170 + Cl_grid1.COLUMN2.BackColor = 255,255,217 + Cl_grid1.COLUMN2.ControlSource = "" + Cl_grid1.COLUMN2.Enabled = .T. + Cl_grid1.COLUMN2.FontBold = .F. + Cl_grid1.COLUMN2.FontCondense = .F. + Cl_grid1.COLUMN2.FontExtend = .F. + Cl_grid1.COLUMN2.FontItalic = .F. + Cl_grid1.COLUMN2.FontName = "Arial" + Cl_grid1.COLUMN2.FontOutline = .F. + Cl_grid1.COLUMN2.FontShadow = .F. + Cl_grid1.COLUMN2.FontSize = 9 + Cl_grid1.COLUMN2.FontStrikethru = .F. + Cl_grid1.COLUMN2.FontUnderline = .F. + Cl_grid1.COLUMN2.ForeColor = 0,0,0 + Cl_grid1.COLUMN2.Header1.FontBold = .F. + Cl_grid1.COLUMN2.Header1.FontCondense = .F. + Cl_grid1.COLUMN2.Header1.FontExtend = .F. + Cl_grid1.COLUMN2.Header1.FontItalic = .F. + Cl_grid1.COLUMN2.Header1.FontName = "Arial" + Cl_grid1.COLUMN2.Header1.FontOutline = .F. + Cl_grid1.COLUMN2.Header1.FontShadow = .F. + Cl_grid1.COLUMN2.Header1.FontSize = 9 + Cl_grid1.COLUMN2.Header1.FontStrikethru = .F. + Cl_grid1.COLUMN2.Header1.FontUnderline = .F. + Cl_grid1.COLUMN2.Header1.Name = "Header1" + Cl_grid1.COLUMN2.Name = "COLUMN2" + Cl_grid1.COLUMN2.ReadOnly = .F. + Cl_grid1.COLUMN2.Text1.BackColor = 255,255,217 + Cl_grid1.COLUMN2.Text1.Enabled = .T. + Cl_grid1.COLUMN2.Text1.FontBold = .F. + Cl_grid1.COLUMN2.Text1.FontCondense = .F. + Cl_grid1.COLUMN2.Text1.FontExtend = .F. + Cl_grid1.COLUMN2.Text1.FontItalic = .F. + Cl_grid1.COLUMN2.Text1.FontName = "Arial" + Cl_grid1.COLUMN2.Text1.FontOutline = .F. + Cl_grid1.COLUMN2.Text1.FontShadow = .F. + Cl_grid1.COLUMN2.Text1.FontSize = 9 + Cl_grid1.COLUMN2.Text1.FontStrikethru = .F. + Cl_grid1.COLUMN2.Text1.FontUnderline = .F. + Cl_grid1.COLUMN2.Text1.ForeColor = 0,0,0 + Cl_grid1.COLUMN2.Text1.Name = "Text1" + Cl_grid1.COLUMN2.Text1.ReadOnly = .F. + Cl_grid1.COLUMN2.Text1.Visible = .T. + Cl_grid1.COLUMN2.Visible = .T. + Cl_grid1.COLUMN3.BackColor = 255,255,217 + Cl_grid1.COLUMN3.ControlSource = "" + Cl_grid1.COLUMN3.Enabled = .T. + Cl_grid1.COLUMN3.FontBold = .F. + Cl_grid1.COLUMN3.FontCondense = .F. + Cl_grid1.COLUMN3.FontExtend = .F. + Cl_grid1.COLUMN3.FontItalic = .F. + Cl_grid1.COLUMN3.FontName = "Arial" + Cl_grid1.COLUMN3.FontOutline = .F. + Cl_grid1.COLUMN3.FontShadow = .F. + Cl_grid1.COLUMN3.FontSize = 9 + Cl_grid1.COLUMN3.FontStrikethru = .F. + Cl_grid1.COLUMN3.FontUnderline = .F. + Cl_grid1.COLUMN3.ForeColor = 0,0,0 + Cl_grid1.COLUMN3.Header1.FontBold = .F. + Cl_grid1.COLUMN3.Header1.FontCondense = .F. + Cl_grid1.COLUMN3.Header1.FontExtend = .F. + Cl_grid1.COLUMN3.Header1.FontItalic = .F. + Cl_grid1.COLUMN3.Header1.FontName = "Arial" + Cl_grid1.COLUMN3.Header1.FontOutline = .F. + Cl_grid1.COLUMN3.Header1.FontShadow = .F. + Cl_grid1.COLUMN3.Header1.FontSize = 9 + Cl_grid1.COLUMN3.Header1.FontStrikethru = .F. + Cl_grid1.COLUMN3.Header1.FontUnderline = .F. + Cl_grid1.COLUMN3.Header1.Name = "Header1" + Cl_grid1.COLUMN3.Name = "COLUMN3" + Cl_grid1.COLUMN3.ReadOnly = .F. + Cl_grid1.COLUMN3.Text1.BackColor = 255,255,217 + Cl_grid1.COLUMN3.Text1.Enabled = .T. + Cl_grid1.COLUMN3.Text1.FontBold = .F. + Cl_grid1.COLUMN3.Text1.FontCondense = .F. + Cl_grid1.COLUMN3.Text1.FontExtend = .F. + Cl_grid1.COLUMN3.Text1.FontItalic = .F. + Cl_grid1.COLUMN3.Text1.FontName = "Arial" + Cl_grid1.COLUMN3.Text1.FontOutline = .F. + Cl_grid1.COLUMN3.Text1.FontShadow = .F. + Cl_grid1.COLUMN3.Text1.FontSize = 9 + Cl_grid1.COLUMN3.Text1.FontStrikethru = .F. + Cl_grid1.COLUMN3.Text1.FontUnderline = .F. + Cl_grid1.COLUMN3.Text1.ForeColor = 0,0,0 + Cl_grid1.COLUMN3.Text1.Name = "Text1" + Cl_grid1.COLUMN3.Text1.ReadOnly = .F. + Cl_grid1.COLUMN3.Text1.Visible = .T. + Cl_grid1.COLUMN3.Visible = .T. + Cl_grid1.COLUMN4.BackColor = 255,255,217 + Cl_grid1.COLUMN4.ControlSource = "" + Cl_grid1.COLUMN4.Enabled = .T. + Cl_grid1.COLUMN4.FontBold = .F. + Cl_grid1.COLUMN4.FontCondense = .F. + Cl_grid1.COLUMN4.FontExtend = .F. + Cl_grid1.COLUMN4.FontItalic = .F. + Cl_grid1.COLUMN4.FontName = "Arial" + Cl_grid1.COLUMN4.FontOutline = .F. + Cl_grid1.COLUMN4.FontShadow = .F. + Cl_grid1.COLUMN4.FontSize = 9 + Cl_grid1.COLUMN4.FontStrikethru = .F. + Cl_grid1.COLUMN4.FontUnderline = .F. + Cl_grid1.COLUMN4.ForeColor = 0,0,0 + Cl_grid1.COLUMN4.Header1.FontBold = .F. + Cl_grid1.COLUMN4.Header1.FontCondense = .F. + Cl_grid1.COLUMN4.Header1.FontExtend = .F. + Cl_grid1.COLUMN4.Header1.FontItalic = .F. + Cl_grid1.COLUMN4.Header1.FontName = "Arial" + Cl_grid1.COLUMN4.Header1.FontOutline = .F. + Cl_grid1.COLUMN4.Header1.FontShadow = .F. + Cl_grid1.COLUMN4.Header1.FontSize = 9 + Cl_grid1.COLUMN4.Header1.FontStrikethru = .F. + Cl_grid1.COLUMN4.Header1.FontUnderline = .F. + Cl_grid1.COLUMN4.Header1.Name = "Header1" + Cl_grid1.COLUMN4.Name = "COLUMN4" + Cl_grid1.COLUMN4.ReadOnly = .F. + Cl_grid1.COLUMN4.Text1.BackColor = 255,255,217 + Cl_grid1.COLUMN4.Text1.Enabled = .T. + Cl_grid1.COLUMN4.Text1.FontBold = .F. + Cl_grid1.COLUMN4.Text1.FontCondense = .F. + Cl_grid1.COLUMN4.Text1.FontExtend = .F. + Cl_grid1.COLUMN4.Text1.FontItalic = .F. + Cl_grid1.COLUMN4.Text1.FontName = "Arial" + Cl_grid1.COLUMN4.Text1.FontOutline = .F. + Cl_grid1.COLUMN4.Text1.FontShadow = .F. + Cl_grid1.COLUMN4.Text1.FontSize = 9 + Cl_grid1.COLUMN4.Text1.FontStrikethru = .F. + Cl_grid1.COLUMN4.Text1.FontUnderline = .F. + Cl_grid1.COLUMN4.Text1.ForeColor = 0,0,0 + Cl_grid1.COLUMN4.Text1.Name = "Text1" + Cl_grid1.COLUMN4.Text1.ReadOnly = .F. + Cl_grid1.COLUMN4.Text1.Visible = .T. + Cl_grid1.COLUMN4.Visible = .T. + Cl_grid1.COLUMN5.BackColor = 255,255,217 + Cl_grid1.COLUMN5.ControlSource = "" + Cl_grid1.COLUMN5.Enabled = .T. + Cl_grid1.COLUMN5.FontBold = .F. + Cl_grid1.COLUMN5.FontCondense = .F. + Cl_grid1.COLUMN5.FontExtend = .F. + Cl_grid1.COLUMN5.FontItalic = .F. + Cl_grid1.COLUMN5.FontName = "Arial" + Cl_grid1.COLUMN5.FontOutline = .F. + Cl_grid1.COLUMN5.FontShadow = .F. + Cl_grid1.COLUMN5.FontSize = 9 + Cl_grid1.COLUMN5.FontStrikethru = .F. + Cl_grid1.COLUMN5.FontUnderline = .F. + Cl_grid1.COLUMN5.ForeColor = 0,0,0 + Cl_grid1.COLUMN5.Header1.FontBold = .F. + Cl_grid1.COLUMN5.Header1.FontCondense = .F. + Cl_grid1.COLUMN5.Header1.FontExtend = .F. + Cl_grid1.COLUMN5.Header1.FontItalic = .F. + Cl_grid1.COLUMN5.Header1.FontName = "Arial" + Cl_grid1.COLUMN5.Header1.FontOutline = .F. + Cl_grid1.COLUMN5.Header1.FontShadow = .F. + Cl_grid1.COLUMN5.Header1.FontSize = 9 + Cl_grid1.COLUMN5.Header1.FontStrikethru = .F. + Cl_grid1.COLUMN5.Header1.FontUnderline = .F. + Cl_grid1.COLUMN5.Header1.Name = "Header1" + Cl_grid1.COLUMN5.Name = "COLUMN5" + Cl_grid1.COLUMN5.ReadOnly = .F. + Cl_grid1.COLUMN5.Text1.BackColor = 255,255,217 + Cl_grid1.COLUMN5.Text1.Enabled = .T. + Cl_grid1.COLUMN5.Text1.FontBold = .F. + Cl_grid1.COLUMN5.Text1.FontCondense = .F. + Cl_grid1.COLUMN5.Text1.FontExtend = .F. + Cl_grid1.COLUMN5.Text1.FontItalic = .F. + Cl_grid1.COLUMN5.Text1.FontName = "Arial" + Cl_grid1.COLUMN5.Text1.FontOutline = .F. + Cl_grid1.COLUMN5.Text1.FontShadow = .F. + Cl_grid1.COLUMN5.Text1.FontSize = 9 + Cl_grid1.COLUMN5.Text1.FontStrikethru = .F. + Cl_grid1.COLUMN5.Text1.FontUnderline = .F. + Cl_grid1.COLUMN5.Text1.ForeColor = 0,0,0 + Cl_grid1.COLUMN5.Text1.Name = "Text1" + Cl_grid1.COLUMN5.Text1.ReadOnly = .F. + Cl_grid1.COLUMN5.Text1.Visible = .T. + Cl_grid1.COLUMN5.Visible = .T. + Cl_grid1.Column6.BackColor = 255,255,217 + Cl_grid1.Column6.ControlSource = "" + Cl_grid1.Column6.Enabled = .T. + Cl_grid1.Column6.FontBold = .F. + Cl_grid1.Column6.FontCondense = .F. + Cl_grid1.Column6.FontExtend = .F. + Cl_grid1.Column6.FontItalic = .F. + Cl_grid1.Column6.FontName = "Arial" + Cl_grid1.Column6.FontOutline = .F. + Cl_grid1.Column6.FontShadow = .F. + Cl_grid1.Column6.FontSize = 9 + Cl_grid1.Column6.FontStrikethru = .F. + Cl_grid1.Column6.FontUnderline = .F. + Cl_grid1.Column6.ForeColor = 0,0,0 + Cl_grid1.Column6.Header1.FontBold = .F. + Cl_grid1.Column6.Header1.FontCondense = .F. + Cl_grid1.Column6.Header1.FontExtend = .F. + Cl_grid1.Column6.Header1.FontItalic = .F. + Cl_grid1.Column6.Header1.FontName = "Arial" + Cl_grid1.Column6.Header1.FontOutline = .F. + Cl_grid1.Column6.Header1.FontShadow = .F. + Cl_grid1.Column6.Header1.FontSize = 9 + Cl_grid1.Column6.Header1.FontStrikethru = .F. + Cl_grid1.Column6.Header1.FontUnderline = .F. + Cl_grid1.Column6.Header1.Name = "Header1" + Cl_grid1.Column6.Name = "Column6" + Cl_grid1.Column6.ReadOnly = .F. + Cl_grid1.Column6.Text1.BackColor = 255,255,217 + Cl_grid1.Column6.Text1.Enabled = .T. + Cl_grid1.Column6.Text1.FontBold = .F. + Cl_grid1.Column6.Text1.FontCondense = .F. + Cl_grid1.Column6.Text1.FontExtend = .F. + Cl_grid1.Column6.Text1.FontItalic = .F. + Cl_grid1.Column6.Text1.FontName = "Arial" + Cl_grid1.Column6.Text1.FontOutline = .F. + Cl_grid1.Column6.Text1.FontShadow = .F. + Cl_grid1.Column6.Text1.FontSize = 9 + Cl_grid1.Column6.Text1.FontStrikethru = .F. + Cl_grid1.Column6.Text1.FontUnderline = .F. + Cl_grid1.Column6.Text1.ForeColor = 0,0,0 + Cl_grid1.Column6.Text1.Name = "Text1" + Cl_grid1.Column6.Text1.ReadOnly = .F. + Cl_grid1.Column6.Text1.Visible = .T. + Cl_grid1.Column6.Visible = .T. + Cl_grid1.ColumnCount = 6 + Cl_grid1.Comment = "" + Cl_grid1.DeleteMark = .F. + Cl_grid1.DragIcon = ..\..\ + Cl_grid1.DragMode = 0 + Cl_grid1.Enabled = .T. + Cl_grid1.FontBold = .F. + Cl_grid1.FontCondense = .F. + Cl_grid1.FontExtend = .F. + Cl_grid1.FontItalic = .F. + Cl_grid1.FontName = "Arial" + Cl_grid1.FontOutline = .F. + Cl_grid1.FontShadow = .F. + Cl_grid1.FontSize = 9 + Cl_grid1.FontStrikethru = .F. + Cl_grid1.FontUnderline = .F. + Cl_grid1.ForeColor = 0,0,0 + Cl_grid1.GridLineColor = 0,0,0 + Cl_grid1.GridLines = 3 + Cl_grid1.GridLineWidth = 1 + Cl_grid1.HeaderHeight = 18 + Cl_grid1.HelpContextID = 0 + Cl_grid1.Highlight = .T. + Cl_grid1.HighlightBackColor = 51,153,255 + Cl_grid1.HighlightForeColor = 255,255,255 + Cl_grid1.HighlightRow = .T. + Cl_grid1.HighlightRowLineWidth = 1 + Cl_grid1.HighlightStyle = 0 + Cl_grid1.Left = 296 + Cl_grid1.LinkMaster = "" + Cl_grid1.LockColumns = 0 + Cl_grid1.LockColumnsLeft = 0 + Cl_grid1.MouseIcon = ..\..\ + Cl_grid1.MousePointer = 0 + Cl_grid1.Name = "Cl_grid1" + Cl_grid1.OLEDragPicture = ..\..\ + Cl_grid1.OLEDropEffects = 3 + Cl_grid1.OLEDropMode = 0 + Cl_grid1.Optimize = .F. + Cl_grid1.Panel = 1 + Cl_grid1.PanelLink = .T. + Cl_grid1.Partition = 0 + Cl_grid1.ReadOnly = .F. + Cl_grid1.RecordMark = .T. + Cl_grid1.RecordSource = "C_TESTS" + Cl_grid1.RecordSourceType = 1 + Cl_grid1.RelationalExpr = "" + Cl_grid1.RightToLeft = .F. + Cl_grid1.RowHeight = 18 + Cl_grid1.ScrollBars = 2 + Cl_grid1.SelectedItemBackColor = 51,153,255 + Cl_grid1.SelectedItemForeColor = 255,255,255 + Cl_grid1.SplitBar = .F. + Cl_grid1.StatusBarText = "" + Cl_grid1.TabIndex = 6 + Cl_grid1.TabStop = .T. + Cl_grid1.Tag = "" + Cl_grid1.Themes = .T. + Cl_grid1.ToolTipText = "" + Cl_grid1.Top = 32 + Cl_grid1.Value = 0 + Cl_grid1.View = 0 + Cl_grid1.Visible = .T. + Cl_grid1.WhatsThisHelpID = -1 + pgf.ActivePage = 2 + pgf.Anchor = 0 + pgf.ColorSource = 4 + pgf.Comment = "" + pgf.DragIcon = ..\..\ + pgf.DragMode = 0 + pgf.Enabled = .T. + pgf.ErasePage = .T. + pgf.Height = 388 + pgf.HelpContextID = 0 + pgf.Left = 12 + pgf.MouseIcon = ..\..\ + pgf.MousePointer = 0 + pgf.Name = "pgf" + pgf.OLEDragMode = 0 + pgf.OLEDragPicture = ..\..\ + pgf.OLEDropEffects = 3 + pgf.OLEDropMode = 0 + pgf.Page1.Checkbox.Alignment = 0 + pgf.Page1.Checkbox.Anchor = 0 + pgf.Page1.Checkbox.AutoSize = .F. + pgf.Page1.Checkbox.BackColor = 240,240,240 + pgf.Page1.Checkbox.BackStyle = 1 + pgf.Page1.Checkbox.Caption = "Chk1" + pgf.Page1.Checkbox.Centered = .F. + pgf.Page1.Checkbox.ColorScheme = 1 + pgf.Page1.Checkbox.ColorSource = 4 + pgf.Page1.Checkbox.Comment = "" + pgf.Page1.Checkbox.ControlSource = "" + pgf.Page1.Checkbox.DefHeight = + pgf.Page1.Checkbox.DefLeft = + pgf.Page1.Checkbox.DefTop = + pgf.Page1.Checkbox.DefWidth = + pgf.Page1.Checkbox.DisabledBackColor = 240,240,240 + pgf.Page1.Checkbox.DisabledForeColor = 109,109,109 + pgf.Page1.Checkbox.DisabledPicture = ..\..\ + pgf.Page1.Checkbox.DownPicture = ..\..\ + pgf.Page1.Checkbox.DragIcon = ..\..\ + pgf.Page1.Checkbox.DragMode = 0 + pgf.Page1.Checkbox.Enabled = .T. + pgf.Page1.Checkbox.FontBold = .F. + pgf.Page1.Checkbox.FontCondense = .F. + pgf.Page1.Checkbox.FontExtend = .F. + pgf.Page1.Checkbox.FontItalic = .F. + pgf.Page1.Checkbox.FontName = "Arial" + pgf.Page1.Checkbox.FontOutline = .F. + pgf.Page1.Checkbox.FontShadow = .F. + pgf.Page1.Checkbox.FontSize = 8 + pgf.Page1.Checkbox.FontStrikethru = .F. + pgf.Page1.Checkbox.FontUnderline = .F. + pgf.Page1.Checkbox.ForeColor = 0,0,0 + pgf.Page1.Checkbox.Height = (21) + pgf.Page1.Checkbox.HelpContextID = 0 + pgf.Page1.Checkbox.Left = (7) + pgf.Page1.Checkbox.MouseIcon = ..\..\ + pgf.Page1.Checkbox.MousePointer = 0 + pgf.Page1.Checkbox.Name = "Checkbox" + pgf.Page1.Checkbox.OLEDragMode = 0 + pgf.Page1.Checkbox.OLEDragPicture = ..\..\ + pgf.Page1.Checkbox.OLEDropEffects = 3 + pgf.Page1.Checkbox.OLEDropMode = 0 + pgf.Page1.Checkbox.Picture = bmps\treeview.bmp + pgf.Page1.Checkbox.PictureMargin = 0 + pgf.Page1.Checkbox.PicturePosition = 4 + pgf.Page1.Checkbox.PictureSpacing = 0 + pgf.Page1.Checkbox.ReadOnly = .F. + pgf.Page1.Checkbox.RightToLeft = .F. + pgf.Page1.Checkbox.SpecialEffect = 0 + pgf.Page1.Checkbox.StatusBarText = "" + pgf.Page1.Checkbox.Style = 1 + pgf.Page1.Checkbox.TabIndex = 1 + pgf.Page1.Checkbox.TabStop = .T. + pgf.Page1.Checkbox.Tag = "" + pgf.Page1.Checkbox.TerminateRead = .F. + pgf.Page1.Checkbox.test_aa = .F. + pgf.Page1.Checkbox.Themes = .T. + pgf.Page1.Checkbox.ToolTipText = "" + pgf.Page1.Checkbox.Top = (8) + pgf.Page1.Checkbox.Value = 0 + pgf.Page1.Checkbox.Visible = .T. + pgf.Page1.Checkbox.WhatsThisHelpID = -1 + pgf.Page1.Checkbox.Width = (199) + pgf.Page1.Checkbox.WordWrap = .F. + pgf.Page1.Cl_optiongroup1.DefHeight = + pgf.Page1.Cl_optiongroup1.DefWidth = + pgf.Page1.Cl_optiongroup1.Name = "Cl_optiongroup1" + pgf.Page1.Cl_optiongroup1.Option1.Left = 5 + pgf.Page1.Cl_optiongroup1.Option1.Name = "Option1" + pgf.Page1.Cl_optiongroup1.Option1.Top = 5 + pgf.Page1.Cl_optiongroup1.Option2.Left = 5 + pgf.Page1.Cl_optiongroup1.Option2.Name = "Option2" + pgf.Page1.Cl_optiongroup1.Option2.Top = 24 + pgf.Page1.Collection.Comment = "" + pgf.Page1.Collection.KeySort = 0 + pgf.Page1.Collection.Name = "Collection" + pgf.Page1.Collection.Tag = "" + pgf.Page1.Collection.test_aa = .F. + pgf.Page1.ComboBox.Alignment = 0 + pgf.Page1.ComboBox.Anchor = 0 + pgf.Page1.ComboBox.BackColor = 255,255,255 + pgf.Page1.ComboBox.BorderColor = 128,255,128 + pgf.Page1.ComboBox.BorderStyle = 1 + pgf.Page1.ComboBox.BoundColumn = 1 + pgf.Page1.ComboBox.BoundTo = .F. + pgf.Page1.ComboBox.ColorScheme = 2 + pgf.Page1.ComboBox.ColorSource = 4 + pgf.Page1.ComboBox.ColumnCount = 0 + pgf.Page1.ComboBox.ColumnLines = .T. + pgf.Page1.ComboBox.ColumnWidths = "" + pgf.Page1.ComboBox.Comment = "" + pgf.Page1.ComboBox.ControlSource = "" + pgf.Page1.ComboBox.DefHeight = + pgf.Page1.ComboBox.DefLeft = + pgf.Page1.ComboBox.DefTop = + pgf.Page1.ComboBox.DefWidth = + pgf.Page1.ComboBox.DisabledBackColor = 240,240,240 + pgf.Page1.ComboBox.DisabledForeColor = 109,109,109 + pgf.Page1.ComboBox.DisabledItemBackColor = 255,255,255 + pgf.Page1.ComboBox.DisabledItemForeColor = 109,109,109 + pgf.Page1.ComboBox.DisplayCount = 0 + pgf.Page1.ComboBox.DisplayValue = + pgf.Page1.ComboBox.DragIcon = ..\..\ + pgf.Page1.ComboBox.DragMode = 0 + pgf.Page1.ComboBox.Enabled = .T. + pgf.Page1.ComboBox.FirstElement = 1 + pgf.Page1.ComboBox.FontBold = .F. + pgf.Page1.ComboBox.FontCondense = .F. + pgf.Page1.ComboBox.FontExtend = .F. + pgf.Page1.ComboBox.FontItalic = .F. + pgf.Page1.ComboBox.FontName = "Arial" + pgf.Page1.ComboBox.FontOutline = .F. + pgf.Page1.ComboBox.FontShadow = .F. + pgf.Page1.ComboBox.FontSize = 8 + pgf.Page1.ComboBox.FontStrikethru = .F. + pgf.Page1.ComboBox.FontUnderline = .F. + pgf.Page1.ComboBox.ForeColor = 0,0,0 + pgf.Page1.ComboBox.Format = "" + pgf.Page1.ComboBox.Height = (20) + pgf.Page1.ComboBox.HelpContextID = 0 + pgf.Page1.ComboBox.HideSelection = .T. + pgf.Page1.ComboBox.IMEMode = 0 + pgf.Page1.ComboBox.IncrementalSearch = .T. + pgf.Page1.ComboBox.InputMask = "" + pgf.Page1.ComboBox.ItemBackColor = 255,255,255 + pgf.Page1.ComboBox.ItemForeColor = 0,0,0 + pgf.Page1.ComboBox.ItemTips = .F. + pgf.Page1.ComboBox.Left = (7) + pgf.Page1.ComboBox.Margin = 0 + pgf.Page1.ComboBox.MaxLength = 0 + pgf.Page1.ComboBox.MouseIcon = ..\..\ + pgf.Page1.ComboBox.MousePointer = 0 + pgf.Page1.ComboBox.Name = "ComboBox" + pgf.Page1.ComboBox.NullDisplay = "" + pgf.Page1.ComboBox.NumberOfElements = 0 + pgf.Page1.ComboBox.OLEDragMode = 0 + pgf.Page1.ComboBox.OLEDragPicture = ..\..\ + pgf.Page1.ComboBox.OLEDropEffects = 3 + pgf.Page1.ComboBox.OLEDropMode = 0 + pgf.Page1.ComboBox.OLEDropTextInsertion = 0 + pgf.Page1.ComboBox.Picture = bmps\treeview.bmp + pgf.Page1.ComboBox.PictureSelectionDisplay = 0 + pgf.Page1.ComboBox.ReadOnly = .F. + pgf.Page1.ComboBox.RightToLeft = .F. + pgf.Page1.ComboBox.RowSource = "" + pgf.Page1.ComboBox.RowSourceType = 0 + pgf.Page1.ComboBox.SelectedBackColor = 51,153,255 + pgf.Page1.ComboBox.SelectedForeColor = 255,255,255 + pgf.Page1.ComboBox.SelectedItemBackColor = 51,153,255 + pgf.Page1.ComboBox.SelectedItemForeColor = 255,255,255 + pgf.Page1.ComboBox.SelectOnEntry = .F. + pgf.Page1.ComboBox.Sorted = .F. + pgf.Page1.ComboBox.SpecialEffect = 1 + pgf.Page1.ComboBox.StatusBarText = "" + pgf.Page1.ComboBox.Style = 0 + pgf.Page1.ComboBox.TabIndex = 1 + pgf.Page1.ComboBox.TabStop = .T. + pgf.Page1.ComboBox.Tag = "" + pgf.Page1.ComboBox.TerminateRead = .F. + pgf.Page1.ComboBox.test_aa = .F. + pgf.Page1.ComboBox.Themes = .T. + pgf.Page1.ComboBox.ToolTipText = "" + pgf.Page1.ComboBox.Top = (35) + pgf.Page1.ComboBox.Value = + pgf.Page1.ComboBox.Visible = .T. + pgf.Page1.ComboBox.WhatsThisHelpID = -1 + pgf.Page1.ComboBox.Width = (196) + pgf.Page1.CommandButton.Alignment = 2 + pgf.Page1.CommandButton.Anchor = 0 + pgf.Page1.CommandButton.AutoSize = .F. + pgf.Page1.CommandButton.BackColor = 240,240,240 + pgf.Page1.CommandButton.Cancel = .F. + pgf.Page1.CommandButton.Caption = "Comando" + pgf.Page1.CommandButton.ColorScheme = 1 + pgf.Page1.CommandButton.ColorSource = 4 + pgf.Page1.CommandButton.Comment = "" + pgf.Page1.CommandButton.Default = .F. + pgf.Page1.CommandButton.DefHeight = + pgf.Page1.CommandButton.DefLeft = + pgf.Page1.CommandButton.DefTop = + pgf.Page1.CommandButton.DefWidth = + pgf.Page1.CommandButton.DisabledBackColor = 240,240,240 + pgf.Page1.CommandButton.DisabledForeColor = 109,109,109 + pgf.Page1.CommandButton.DisabledPicture = ..\..\ + pgf.Page1.CommandButton.DownPicture = ..\..\ + pgf.Page1.CommandButton.DragIcon = ..\..\ + pgf.Page1.CommandButton.DragMode = 0 + pgf.Page1.CommandButton.Enabled = .T. + pgf.Page1.CommandButton.FontBold = .F. + pgf.Page1.CommandButton.FontCondense = .F. + pgf.Page1.CommandButton.FontExtend = .F. + pgf.Page1.CommandButton.FontItalic = .F. + pgf.Page1.CommandButton.FontName = "Arial" + pgf.Page1.CommandButton.FontOutline = .F. + pgf.Page1.CommandButton.FontShadow = .F. + pgf.Page1.CommandButton.FontSize = 8 + pgf.Page1.CommandButton.FontStrikethru = .F. + pgf.Page1.CommandButton.FontUnderline = .F. + pgf.Page1.CommandButton.ForeColor = 0,0,0 + pgf.Page1.CommandButton.Height = (25) + pgf.Page1.CommandButton.HelpContextID = 0 + pgf.Page1.CommandButton.Left = (99) + pgf.Page1.CommandButton.MouseIcon = ..\..\ + pgf.Page1.CommandButton.MousePointer = 0 + pgf.Page1.CommandButton.Name = "CommandButton" + pgf.Page1.CommandButton.OLEDragMode = 0 + pgf.Page1.CommandButton.OLEDragPicture = ..\..\ + pgf.Page1.CommandButton.OLEDropEffects = 3 + pgf.Page1.CommandButton.OLEDropMode = 0 + pgf.Page1.CommandButton.Picture = bmps\treeview.bmp + pgf.Page1.CommandButton.PictureMargin = 0 + pgf.Page1.CommandButton.PicturePosition = 4 + pgf.Page1.CommandButton.PictureSpacing = 0 + pgf.Page1.CommandButton.RightToLeft = .F. + pgf.Page1.CommandButton.SpecialEffect = 0 + pgf.Page1.CommandButton.StatusBarText = "" + pgf.Page1.CommandButton.Style = 0 + pgf.Page1.CommandButton.TabIndex = 3 + pgf.Page1.CommandButton.TabStop = .T. + pgf.Page1.CommandButton.Tag = "" + pgf.Page1.CommandButton.TerminateRead = .F. + pgf.Page1.CommandButton.test_aa = .F. + pgf.Page1.CommandButton.Themes = .T. + pgf.Page1.CommandButton.ToolTipText = "" + pgf.Page1.CommandButton.Top = (63) + pgf.Page1.CommandButton.Visible = .T. + pgf.Page1.CommandButton.WhatsThisHelpID = -1 + pgf.Page1.CommandButton.Width = (80) + pgf.Page1.CommandButton.WordWrap = .F. + pgf.Page1.CommandGroup.Anchor = 0 + pgf.Page1.CommandGroup.AutoSize = .F. + pgf.Page1.CommandGroup.BackColor = 240,240,240 + pgf.Page1.CommandGroup.BackStyle = 1 + pgf.Page1.CommandGroup.BorderColor = 100,100,100 + pgf.Page1.CommandGroup.BorderStyle = 1 + pgf.Page1.CommandGroup.ButtonCount = 2 + pgf.Page1.CommandGroup.ColorSource = 4 + pgf.Page1.CommandGroup.Command1.Left = 1 + pgf.Page1.CommandGroup.Command1.Name = "Command1" + pgf.Page1.CommandGroup.Command1.Top = 4 + pgf.Page1.CommandGroup.Command2.Left = 1 + pgf.Page1.CommandGroup.Command2.Name = "Command2" + pgf.Page1.CommandGroup.Command2.Top = 32 + pgf.Page1.CommandGroup.Comment = "" + pgf.Page1.CommandGroup.ControlSource = "" + pgf.Page1.CommandGroup.DefHeight = + pgf.Page1.CommandGroup.DefLeft = + pgf.Page1.CommandGroup.DefTop = + pgf.Page1.CommandGroup.DefWidth = + pgf.Page1.CommandGroup.DragIcon = ..\..\ + pgf.Page1.CommandGroup.DragMode = 0 + pgf.Page1.CommandGroup.Enabled = .T. + pgf.Page1.CommandGroup.Height = (64) + pgf.Page1.CommandGroup.HelpContextID = 0 + pgf.Page1.CommandGroup.Left = (6) + pgf.Page1.CommandGroup.MouseIcon = ..\..\ + pgf.Page1.CommandGroup.MousePointer = 0 + pgf.Page1.CommandGroup.Name = "CommandGroup" + pgf.Page1.CommandGroup.OLEDragMode = 0 + pgf.Page1.CommandGroup.OLEDragPicture = ..\..\ + pgf.Page1.CommandGroup.OLEDropEffects = 3 + pgf.Page1.CommandGroup.OLEDropMode = 0 + pgf.Page1.CommandGroup.SpecialEffect = 0 + pgf.Page1.CommandGroup.StatusBarText = "" + pgf.Page1.CommandGroup.TabIndex = 2 + pgf.Page1.CommandGroup.Tag = "" + pgf.Page1.CommandGroup.TerminateRead = .F. + pgf.Page1.CommandGroup.test_aa = .F. + pgf.Page1.CommandGroup.Themes = .T. + pgf.Page1.CommandGroup.ToolTipText = "" + pgf.Page1.CommandGroup.Top = (60) + pgf.Page1.CommandGroup.Value = 1 + pgf.Page1.CommandGroup.Visible = .T. + pgf.Page1.CommandGroup.WhatsThisHelpID = -1 + pgf.Page1.CommandGroup.Width = (93) + pgf.Page1.Container.Anchor = 0 + pgf.Page1.Container.BackColor = 240,240,240 + pgf.Page1.Container.BackStyle = 1 + pgf.Page1.Container.BorderColor = 100,100,100 + pgf.Page1.Container.BorderWidth = 1 + pgf.Page1.Container.ColorSource = 4 + pgf.Page1.Container.Comment = "" + pgf.Page1.Container.DefHeight = + pgf.Page1.Container.DefLeft = + pgf.Page1.Container.DefTop = + pgf.Page1.Container.DefWidth = + pgf.Page1.Container.DragIcon = ..\..\ + pgf.Page1.Container.DragMode = 0 + pgf.Page1.Container.Enabled = .T. + pgf.Page1.Container.ForeColor = 0,0,0 + pgf.Page1.Container.Height = (24) + pgf.Page1.Container.HelpContextID = 0 + pgf.Page1.Container.Left = (227) + pgf.Page1.Container.MouseIcon = ..\..\ + pgf.Page1.Container.MousePointer = 0 + pgf.Page1.Container.Name = "Container" + pgf.Page1.Container.OLEDragMode = 0 + pgf.Page1.Container.OLEDragPicture = ..\..\ + pgf.Page1.Container.OLEDropEffects = 3 + pgf.Page1.Container.OLEDropMode = 0 + pgf.Page1.Container.SpecialEffect = 2 + pgf.Page1.Container.StatusBarText = "" + pgf.Page1.Container.Style = 0 + pgf.Page1.Container.TabIndex = 4 + pgf.Page1.Container.TabStop = .T. + pgf.Page1.Container.Tag = "" + pgf.Page1.Container.test_aa = .F. + pgf.Page1.Container.ToolTipText = "" + pgf.Page1.Container.Top = (127) + pgf.Page1.Container.Visible = .T. + pgf.Page1.Container.WhatsThisHelpID = -1 + pgf.Page1.Container.Width = (20) + pgf.Page1.Control.Anchor = 0 + pgf.Page1.Control.BackColor = 240,240,240 + pgf.Page1.Control.BackStyle = 1 + pgf.Page1.Control.BorderColor = 100,100,100 + pgf.Page1.Control.BorderWidth = 1 + pgf.Page1.Control.ColorSource = 4 + pgf.Page1.Control.Comment = "" + pgf.Page1.Control.DefHeight = + pgf.Page1.Control.DefLeft = + pgf.Page1.Control.DefTop = + pgf.Page1.Control.DefWidth = + pgf.Page1.Control.DragIcon = ..\..\ + pgf.Page1.Control.DragMode = 0 + pgf.Page1.Control.Enabled = .T. + pgf.Page1.Control.ForeColor = 0,0,0 + pgf.Page1.Control.Height = (24) + pgf.Page1.Control.HelpContextID = 0 + pgf.Page1.Control.Left = (199) + pgf.Page1.Control.MouseIcon = ..\..\ + pgf.Page1.Control.MousePointer = 0 + pgf.Page1.Control.Name = "Control" + pgf.Page1.Control.OLEDragMode = 0 + pgf.Page1.Control.OLEDragPicture = ..\..\ + pgf.Page1.Control.OLEDropEffects = 3 + pgf.Page1.Control.OLEDropMode = 0 + pgf.Page1.Control.SpecialEffect = 2 + pgf.Page1.Control.StatusBarText = "" + pgf.Page1.Control.Style = 0 + pgf.Page1.Control.TabIndex = 5 + pgf.Page1.Control.TabStop = .T. + pgf.Page1.Control.Tag = "" + pgf.Page1.Control.test_aa = .F. + pgf.Page1.Control.ToolTipText = "" + pgf.Page1.Control.Top = (127) + pgf.Page1.Control.Visible = .T. + pgf.Page1.Control.WhatsThisHelpID = -1 + pgf.Page1.Control.Width = (20) + pgf.Page1.EditBox.DefHeight = + pgf.Page1.EditBox.DefLeft = + pgf.Page1.EditBox.DefTop = + pgf.Page1.EditBox.DefWidth = + pgf.Page1.EditBox.Name = "EditBox" + pgf.Page1.HyperLink.Comment = "" + pgf.Page1.HyperLink.Name = "HyperLink" + pgf.Page1.HyperLink.Tag = "" + pgf.Page1.HyperLink.test_aa = .F. + pgf.Page1.Image.Anchor = 0 + pgf.Page1.Image.BackStyle = 1 + pgf.Page1.Image.BorderColor = 100,100,100 + pgf.Page1.Image.BorderStyle = 0 + pgf.Page1.Image.ColorSource = 4 + pgf.Page1.Image.Comment = "" + pgf.Page1.Image.DefHeight = + pgf.Page1.Image.DefLeft = + pgf.Page1.Image.DragIcon = ..\..\ + pgf.Page1.Image.DragMode = 0 + pgf.Page1.Image.Enabled = .T. + pgf.Page1.Image.Height = (16) + pgf.Page1.Image.HelpContextID = 0 + pgf.Page1.Image.Left = (231) + pgf.Page1.Image.MouseIcon = ..\..\ + pgf.Page1.Image.MousePointer = 0 + pgf.Page1.Image.Name = "Image" + pgf.Page1.Image.OLEDragMode = 0 + pgf.Page1.Image.OLEDragPicture = ..\..\ + pgf.Page1.Image.OLEDropEffects = 3 + pgf.Page1.Image.OLEDropMode = 0 + pgf.Page1.Image.Picture = bmps\scccheckout.bmp + pgf.Page1.Image.RotateFlip = 0 + pgf.Page1.Image.StatusBarText = "" + pgf.Page1.Image.Stretch = 0 + pgf.Page1.Image.Tag = "" + pgf.Page1.Image.test_aa = .F. + pgf.Page1.Image.Themes = .T. + pgf.Page1.Image.ToolTipText = "" + pgf.Page1.Image.Top = 107 + pgf.Page1.Image.Visible = .T. + pgf.Page1.Image.WhatsThisHelpID = -1 + pgf.Page1.Image.Width = 16 + pgf.Page1.Label.Alignment = 0 + pgf.Page1.Label.Anchor = 0 + pgf.Page1.Label.AutoSize = .F. + pgf.Page1.Label.BackColor = 240,240,240 + pgf.Page1.Label.BackStyle = 1 + pgf.Page1.Label.BorderStyle = 0 + pgf.Page1.Label.Caption = "Label4" + pgf.Page1.Label.ColorScheme = 1 + pgf.Page1.Label.ColorSource = 4 + pgf.Page1.Label.Comment = "" + pgf.Page1.Label.DefHeight = + pgf.Page1.Label.DefLeft = + pgf.Page1.Label.DefTop = + pgf.Page1.Label.DefWidth = + pgf.Page1.Label.DisabledBackColor = 240,240,240 + pgf.Page1.Label.DisabledForeColor = 109,109,109 + pgf.Page1.Label.DragIcon = ..\..\ + pgf.Page1.Label.DragMode = 0 + pgf.Page1.Label.Enabled = .T. + pgf.Page1.Label.FontBold = .F. + pgf.Page1.Label.FontCondense = .F. + pgf.Page1.Label.FontExtend = .F. + pgf.Page1.Label.FontItalic = .F. + pgf.Page1.Label.FontName = "Arial" + pgf.Page1.Label.FontOutline = .F. + pgf.Page1.Label.FontShadow = .F. + pgf.Page1.Label.FontSize = 8 + pgf.Page1.Label.FontStrikethru = .F. + pgf.Page1.Label.FontUnderline = .F. + pgf.Page1.Label.ForeColor = 0,0,0 + pgf.Page1.Label.Height = (17) + pgf.Page1.Label.HelpContextID = 0 + pgf.Page1.Label.Left = (6) + pgf.Page1.Label.MouseIcon = ..\..\ + pgf.Page1.Label.MousePointer = 0 + pgf.Page1.Label.Name = "Label" + pgf.Page1.Label.OLEDragMode = 0 + pgf.Page1.Label.OLEDragPicture = ..\..\ + pgf.Page1.Label.OLEDropEffects = 3 + pgf.Page1.Label.OLEDropMode = 0 + pgf.Page1.Label.RightToLeft = .F. + pgf.Page1.Label.Rotation = 0 + pgf.Page1.Label.StatusBarText = "" + pgf.Page1.Label.Style = 0 + pgf.Page1.Label.TabIndex = 7 + pgf.Page1.Label.Tag = "" + pgf.Page1.Label.test_aa = .F. + pgf.Page1.Label.ToolTipText = "" + pgf.Page1.Label.Top = (136) + pgf.Page1.Label.Visible = .T. + pgf.Page1.Label.WhatsThisHelpID = -1 + pgf.Page1.Label.Width = (104) + pgf.Page1.Label.WordWrap = .F. + pgf.Page1.Line.Anchor = 0 + pgf.Page1.Line.BorderColor = 255,0,0 + pgf.Page1.Line.BorderStyle = 1 + pgf.Page1.Line.BorderWidth = 1 + pgf.Page1.Line.ColorSource = 4 + pgf.Page1.Line.Comment = "" + pgf.Page1.Line.DefHeight = + pgf.Page1.Line.DefLeft = + pgf.Page1.Line.DefTop = + pgf.Page1.Line.DefWidth = + pgf.Page1.Line.DragIcon = ..\..\ + pgf.Page1.Line.DragMode = 0 + pgf.Page1.Line.DrawMode = 13 + pgf.Page1.Line.Enabled = .T. + pgf.Page1.Line.Height = (8) + pgf.Page1.Line.HelpContextID = 0 + pgf.Page1.Line.Left = (121) + pgf.Page1.Line.LineSlant = "\" + pgf.Page1.Line.MouseIcon = ..\..\ + pgf.Page1.Line.MousePointer = 0 + pgf.Page1.Line.Name = "Line" + pgf.Page1.Line.OLEDragMode = 0 + pgf.Page1.Line.OLEDragPicture = ..\..\ + pgf.Page1.Line.OLEDropEffects = 3 + pgf.Page1.Line.OLEDropMode = 0 + pgf.Page1.Line.PolyPoints = "" + pgf.Page1.Line.Rotation = 0 + pgf.Page1.Line.StatusBarText = "" + pgf.Page1.Line.Tag = "" + pgf.Page1.Line.test_aa = .F. + pgf.Page1.Line.ToolTipText = "" + pgf.Page1.Line.Top = (136) + pgf.Page1.Line.Visible = .T. + pgf.Page1.Line.WhatsThisHelpID = -1 + pgf.Page1.Line.Width = (50) + pgf.Page1.ListBox.Anchor = 0 + pgf.Page1.ListBox.AutoHideScrollbar = 0 + pgf.Page1.ListBox.BorderColor = 128,255,128 + pgf.Page1.ListBox.BoundColumn = 1 + pgf.Page1.ListBox.BoundTo = .F. + pgf.Page1.ListBox.ColorScheme = 1 + pgf.Page1.ListBox.ColorSource = 4 + pgf.Page1.ListBox.ColumnCount = 0 + pgf.Page1.ListBox.ColumnLines = .T. + pgf.Page1.ListBox.ColumnWidths = "" + pgf.Page1.ListBox.Comment = "" + pgf.Page1.ListBox.ControlSource = "" + pgf.Page1.ListBox.DefHeight = + pgf.Page1.ListBox.DefLeft = + pgf.Page1.ListBox.DefTop = + pgf.Page1.ListBox.DefWidth = + pgf.Page1.ListBox.DisabledBackColor = 255,255,255 + pgf.Page1.ListBox.DisabledForeColor = 109,109,109 + pgf.Page1.ListBox.DisabledItemBackColor = 255,255,255 + pgf.Page1.ListBox.DisabledItemForeColor = 109,109,109 + pgf.Page1.ListBox.DisplayValue = + pgf.Page1.ListBox.DragIcon = ..\..\ + pgf.Page1.ListBox.DragMode = 0 + pgf.Page1.ListBox.Enabled = .T. + pgf.Page1.ListBox.FirstElement = 1 + pgf.Page1.ListBox.FontBold = .F. + pgf.Page1.ListBox.FontCondense = .F. + pgf.Page1.ListBox.FontExtend = .F. + pgf.Page1.ListBox.FontItalic = .F. + pgf.Page1.ListBox.FontName = "Arial" + pgf.Page1.ListBox.FontOutline = .F. + pgf.Page1.ListBox.FontShadow = .F. + pgf.Page1.ListBox.FontSize = 8 + pgf.Page1.ListBox.FontStrikethru = .F. + pgf.Page1.ListBox.FontUnderline = .F. + pgf.Page1.ListBox.Height = (60) + pgf.Page1.ListBox.HelpContextID = 0 + pgf.Page1.ListBox.IncrementalSearch = .T. + pgf.Page1.ListBox.IntegralHeight = .F. + pgf.Page1.ListBox.ItemBackColor = 255,255,255 + pgf.Page1.ListBox.ItemForeColor = 0,0,0 + pgf.Page1.ListBox.ItemTips = .F. + pgf.Page1.ListBox.Left = (7) + pgf.Page1.ListBox.MouseIcon = ..\..\ + pgf.Page1.ListBox.MousePointer = 0 + pgf.Page1.ListBox.MoverBars = .F. + pgf.Page1.ListBox.MultiSelect = .F. + pgf.Page1.ListBox.Name = "ListBox" + pgf.Page1.ListBox.NullDisplay = "" + pgf.Page1.ListBox.OLEDragMode = 0 + pgf.Page1.ListBox.OLEDragPicture = ..\..\ + pgf.Page1.ListBox.OLEDropEffects = 3 + pgf.Page1.ListBox.OLEDropMode = 0 + pgf.Page1.ListBox.Picture = ..\..\ + pgf.Page1.ListBox.RightToLeft = .F. + pgf.Page1.ListBox.RowSource = "" + pgf.Page1.ListBox.RowSourceType = 0 + pgf.Page1.ListBox.SelectedItemBackColor = 51,153,255 + pgf.Page1.ListBox.SelectedItemForeColor = 255,255,255 + pgf.Page1.ListBox.Sorted = .F. + pgf.Page1.ListBox.SpecialEffect = 1 + pgf.Page1.ListBox.StatusBarText = "" + pgf.Page1.ListBox.TabIndex = 8 + pgf.Page1.ListBox.TabStop = .T. + pgf.Page1.ListBox.Tag = "" + pgf.Page1.ListBox.TerminateRead = .F. + pgf.Page1.ListBox.test_aa = .F. + pgf.Page1.ListBox.Themes = .T. + pgf.Page1.ListBox.ToolTipText = "" + pgf.Page1.ListBox.Top = (164) + pgf.Page1.ListBox.Value = + pgf.Page1.ListBox.Visible = .T. + pgf.Page1.ListBox.WhatsThisHelpID = -1 + pgf.Page1.ListBox.Width = (224) + pgf.Page1.Name = "Page1" + pgf.Page1.option.Alignment = 0 + pgf.Page1.option.Anchor = 0 + pgf.Page1.option.AutoSize = .F. + pgf.Page1.option.BackColor = 240,240,240 + pgf.Page1.option.BackStyle = 1 + pgf.Page1.option.Caption = "Esta es la opción B" + pgf.Page1.option.ColorScheme = 1 + pgf.Page1.option.ColorSource = 4 + pgf.Page1.option.Comment = "" + pgf.Page1.option.ControlSource = "" + pgf.Page1.option.DefHeight = + pgf.Page1.option.DefLeft = + pgf.Page1.option.DefTop = + pgf.Page1.option.DefWidth = + pgf.Page1.option.DisabledBackColor = 240,240,240 + pgf.Page1.option.DisabledForeColor = 109,109,109 + pgf.Page1.option.DisabledPicture = ..\..\ + pgf.Page1.option.DownPicture = ..\..\ + pgf.Page1.option.DragIcon = ..\..\ + pgf.Page1.option.DragMode = 0 + pgf.Page1.option.Enabled = .T. + pgf.Page1.option.FontBold = .F. + pgf.Page1.option.FontCharSet = 0 + pgf.Page1.option.FontCondense = .F. + pgf.Page1.option.FontExtend = .F. + pgf.Page1.option.FontItalic = .F. + pgf.Page1.option.FontName = "Arial" + pgf.Page1.option.FontOutline = .F. + pgf.Page1.option.FontShadow = .F. + pgf.Page1.option.FontSize = 8 + pgf.Page1.option.FontStrikethru = .F. + pgf.Page1.option.FontUnderline = .F. + pgf.Page1.option.ForeColor = 0,0,0 + pgf.Page1.option.Height = (16) + pgf.Page1.option.HelpContextID = 0 + pgf.Page1.option.Left = (123) + pgf.Page1.option.MouseIcon = ..\..\ + pgf.Page1.option.MousePointer = 0 + pgf.Page1.option.Name = "option" + pgf.Page1.option.OLEDragMode = 0 + pgf.Page1.option.OLEDragPicture = ..\..\ + pgf.Page1.option.OLEDropEffects = 3 + pgf.Page1.option.OLEDropMode = 0 + pgf.Page1.option.Picture = ..\..\ + pgf.Page1.option.PictureMargin = 0 + pgf.Page1.option.PicturePosition = 13 + pgf.Page1.option.PictureSpacing = 0 + pgf.Page1.option.RightToLeft = .F. + pgf.Page1.option.SpecialEffect = 0 + pgf.Page1.option.StatusBarText = "" + pgf.Page1.option.Style = 0 + pgf.Page1.option.TabIndex = 1 + pgf.Page1.option.TabStop = .T. + pgf.Page1.option.Tag = "" + pgf.Page1.option.TerminateRead = .F. + pgf.Page1.option.test_aa = .F. + pgf.Page1.option.Themes = .T. + pgf.Page1.option.ToolTipText = "" + pgf.Page1.option.Top = (232) + pgf.Page1.option.Value = 0 + pgf.Page1.option.Visible = .T. + pgf.Page1.option.WhatsThisHelpID = -1 + pgf.Page1.option.Width = (110) + pgf.Page1.option.WordWrap = .F. + pgf.Page1.OptionGroup.Anchor = 0 + pgf.Page1.OptionGroup.AutoSize = .F. + pgf.Page1.OptionGroup.BackColor = 240,240,240 + pgf.Page1.OptionGroup.BackStyle = 1 + pgf.Page1.OptionGroup.BorderColor = 100,100,100 + pgf.Page1.OptionGroup.BorderStyle = 1 + pgf.Page1.OptionGroup.ButtonCount = 2 + pgf.Page1.OptionGroup.ColorSource = 4 + pgf.Page1.OptionGroup.Comment = "" + pgf.Page1.OptionGroup.ControlSource = "" + pgf.Page1.OptionGroup.DefHeight = + pgf.Page1.OptionGroup.DefLeft = + pgf.Page1.OptionGroup.DefTop = + pgf.Page1.OptionGroup.DefWidth = + pgf.Page1.OptionGroup.DragIcon = ..\..\ + pgf.Page1.OptionGroup.DragMode = 0 + pgf.Page1.OptionGroup.Enabled = .T. + pgf.Page1.OptionGroup.Height = (46) + pgf.Page1.OptionGroup.HelpContextID = 0 + pgf.Page1.OptionGroup.Left = (7) + pgf.Page1.OptionGroup.MemberClassLibrary = ..\..\ + pgf.Page1.OptionGroup.MouseIcon = ..\..\ + pgf.Page1.OptionGroup.MousePointer = 0 + pgf.Page1.OptionGroup.Name = "OptionGroup" + pgf.Page1.OptionGroup.OLEDragMode = 0 + pgf.Page1.OptionGroup.OLEDragPicture = ..\..\ + pgf.Page1.OptionGroup.OLEDropEffects = 3 + pgf.Page1.OptionGroup.OLEDropMode = 0 + pgf.Page1.OptionGroup.Option1.Height = 16 + pgf.Page1.OptionGroup.Option1.Left = 5 + pgf.Page1.OptionGroup.Option1.Name = "Option1" + pgf.Page1.OptionGroup.Option1.Top = 5 + pgf.Page1.OptionGroup.Option1.Width = 103 + pgf.Page1.OptionGroup.Option2.Height = 16 + pgf.Page1.OptionGroup.Option2.Left = 5 + pgf.Page1.OptionGroup.Option2.Name = "Option2" + pgf.Page1.OptionGroup.Option2.Top = 24 + pgf.Page1.OptionGroup.Option2.Value = 0 + pgf.Page1.OptionGroup.Option2.Width = 103 + pgf.Page1.OptionGroup.SpecialEffect = 0 + pgf.Page1.OptionGroup.StatusBarText = "" + pgf.Page1.OptionGroup.TabIndex = 1 + pgf.Page1.OptionGroup.Tag = "" + pgf.Page1.OptionGroup.TerminateRead = .F. + pgf.Page1.OptionGroup.test_aa = .F. + pgf.Page1.OptionGroup.Themes = .T. + pgf.Page1.OptionGroup.ToolTipText = "" + pgf.Page1.OptionGroup.Top = (232) + pgf.Page1.OptionGroup.Value = 0 + pgf.Page1.OptionGroup.Visible = .T. + pgf.Page1.OptionGroup.WhatsThisHelpID = -1 + pgf.Page1.OptionGroup.Width = (112) + pgf.Page1.Pageframe1.ActivePage = 1 + pgf.Page1.Pageframe1.Anchor = 0 + pgf.Page1.Pageframe1.Cl_page1.Name = "Cl_page1" + pgf.Page1.Pageframe1.Cl_page2.Name = "Cl_page2" + pgf.Page1.Pageframe1.ColorSource = 4 + pgf.Page1.Pageframe1.Comment = "" + pgf.Page1.Pageframe1.DefHeight = + pgf.Page1.Pageframe1.DefLeft = + pgf.Page1.Pageframe1.DefTop = + pgf.Page1.Pageframe1.DefWidth = + pgf.Page1.Pageframe1.DragIcon = ..\..\ + pgf.Page1.Pageframe1.DragMode = 0 + pgf.Page1.Pageframe1.Enabled = .T. + pgf.Page1.Pageframe1.ErasePage = .T. + pgf.Page1.Pageframe1.Height = (61) + pgf.Page1.Pageframe1.HelpContextID = 0 + pgf.Page1.Pageframe1.Left = (135) + pgf.Page1.Pageframe1.MemberClassLibrary = lib_controles.vcx + pgf.Page1.Pageframe1.MouseIcon = ..\..\ + pgf.Page1.Pageframe1.MousePointer = 0 + pgf.Page1.Pageframe1.Name = "Pageframe1" + pgf.Page1.Pageframe1.OLEDragMode = 0 + pgf.Page1.Pageframe1.OLEDragPicture = ..\..\ + pgf.Page1.Pageframe1.OLEDropEffects = 3 + pgf.Page1.Pageframe1.OLEDropMode = 0 + pgf.Page1.Pageframe1.PageCount = 2 + pgf.Page1.Pageframe1.RightToLeft = .F. + pgf.Page1.Pageframe1.StatusBarText = "" + pgf.Page1.Pageframe1.TabIndex = 10 + pgf.Page1.Pageframe1.TabOrientation = 2 + pgf.Page1.Pageframe1.Tabs = .T. + pgf.Page1.Pageframe1.TabStop = .T. + pgf.Page1.Pageframe1.TabStretch = 1 + pgf.Page1.Pageframe1.TabStyle = 0 + pgf.Page1.Pageframe1.Tag = "" + pgf.Page1.Pageframe1.Themes = .F. + pgf.Page1.Pageframe1.ToolTipText = "" + pgf.Page1.Pageframe1.Top = (284) + pgf.Page1.Pageframe1.Visible = .T. + pgf.Page1.Pageframe1.WhatsThisHelpID = -1 + pgf.Page1.Pageframe1.Width = (117) + pgf.Page1.PageOrder = 1 + pgf.Page1.Spinner.Alignment = 1 + pgf.Page1.Spinner.Anchor = 0 + pgf.Page1.Spinner.BackColor = 255,255,255 + pgf.Page1.Spinner.BorderColor = 128,255,128 + pgf.Page1.Spinner.BorderStyle = 1 + pgf.Page1.Spinner.ColorScheme = 1 + pgf.Page1.Spinner.ColorSource = 4 + pgf.Page1.Spinner.Comment = "" + pgf.Page1.Spinner.ControlSource = "" + pgf.Page1.Spinner.DefHeight = + pgf.Page1.Spinner.DefLeft = + pgf.Page1.Spinner.DefTop = + pgf.Page1.Spinner.DefWidth = + pgf.Page1.Spinner.DisabledBackColor = 240,240,240 + pgf.Page1.Spinner.DisabledForeColor = 109,109,109 + pgf.Page1.Spinner.DragIcon = ..\..\ + pgf.Page1.Spinner.DragMode = 0 + pgf.Page1.Spinner.Enabled = .T. + pgf.Page1.Spinner.FontBold = .F. + pgf.Page1.Spinner.FontCondense = .F. + pgf.Page1.Spinner.FontExtend = .F. + pgf.Page1.Spinner.FontItalic = .F. + pgf.Page1.Spinner.FontName = "Arial" + pgf.Page1.Spinner.FontOutline = .F. + pgf.Page1.Spinner.FontShadow = .F. + pgf.Page1.Spinner.FontSize = 8 + pgf.Page1.Spinner.FontStrikethru = .F. + pgf.Page1.Spinner.FontUnderline = .F. + pgf.Page1.Spinner.ForeColor = 0,0,0 + pgf.Page1.Spinner.Format = "" + pgf.Page1.Spinner.Height = (19) + pgf.Page1.Spinner.HelpContextID = 0 + pgf.Page1.Spinner.HideSelection = .T. + pgf.Page1.Spinner.Increment = 1.00 + pgf.Page1.Spinner.InputMask = "" + pgf.Page1.Spinner.KeyboardHighValue = 2147483647 + pgf.Page1.Spinner.KeyboardLowValue = -2147483647 + pgf.Page1.Spinner.Left = (11) + pgf.Page1.Spinner.Margin = 0 + pgf.Page1.Spinner.MouseIcon = ..\..\ + pgf.Page1.Spinner.MousePointer = 0 + pgf.Page1.Spinner.Name = "Spinner" + pgf.Page1.Spinner.NullDisplay = "" + pgf.Page1.Spinner.OLEDragMode = 0 + pgf.Page1.Spinner.OLEDragPicture = ..\..\ + pgf.Page1.Spinner.OLEDropEffects = 3 + pgf.Page1.Spinner.OLEDropMode = 0 + pgf.Page1.Spinner.OLEDropTextInsertion = 0 + pgf.Page1.Spinner.ReadOnly = .F. + pgf.Page1.Spinner.RightToLeft = .F. + pgf.Page1.Spinner.SelectedBackColor = 51,153,255 + pgf.Page1.Spinner.SelectedForeColor = 255,255,255 + pgf.Page1.Spinner.SelectOnEntry = .F. + pgf.Page1.Spinner.SpecialEffect = 1 + pgf.Page1.Spinner.SpinnerHighValue = 2147483647.00 + pgf.Page1.Spinner.SpinnerLowValue = -2147483647.00 + pgf.Page1.Spinner.StatusBarText = "" + pgf.Page1.Spinner.TabIndex = 9 + pgf.Page1.Spinner.TabStop = .T. + pgf.Page1.Spinner.Tag = "" + pgf.Page1.Spinner.TerminateRead = .F. + pgf.Page1.Spinner.test_aa = .F. + pgf.Page1.Spinner.Themes = .T. + pgf.Page1.Spinner.ToolTipText = "" + pgf.Page1.Spinner.Top = (292) + pgf.Page1.Spinner.Value = 0 + pgf.Page1.Spinner.Visible = .T. + pgf.Page1.Spinner.WhatsThisHelpID = -1 + pgf.Page1.Spinner.Width = (108) + pgf.Page1.TextBox.Alignment = 3 + pgf.Page1.TextBox.Anchor = 0 + pgf.Page1.TextBox.AutoComplete = 0 + pgf.Page1.TextBox.AutoCompSource = "" + pgf.Page1.TextBox.AutoCompTable = "" + pgf.Page1.TextBox.BackColor = 255,255,255 + pgf.Page1.TextBox.BackStyle = 1 + pgf.Page1.TextBox.BorderColor = 128,255,128 + pgf.Page1.TextBox.BorderStyle = 1 + pgf.Page1.TextBox.Century = 1 + pgf.Page1.TextBox.ColorScheme = 1 + pgf.Page1.TextBox.ColorSource = 4 + pgf.Page1.TextBox.Comment = "" + pgf.Page1.TextBox.ControlSource = "" + pgf.Page1.TextBox.DateFormat = 0 + pgf.Page1.TextBox.DateMark = "" + pgf.Page1.TextBox.DefHeight = + pgf.Page1.TextBox.DefLeft = + pgf.Page1.TextBox.DefTop = + pgf.Page1.TextBox.DefWidth = + pgf.Page1.TextBox.DisabledBackColor = 240,240,240 + pgf.Page1.TextBox.DisabledForeColor = 109,109,109 + pgf.Page1.TextBox.DragIcon = ..\..\ + pgf.Page1.TextBox.DragMode = 0 + pgf.Page1.TextBox.Enabled = .T. + pgf.Page1.TextBox.EnableHyperlinks = .F. + pgf.Page1.TextBox.FontBold = .F. + pgf.Page1.TextBox.FontCondense = .F. + pgf.Page1.TextBox.FontExtend = .F. + pgf.Page1.TextBox.FontItalic = .F. + pgf.Page1.TextBox.FontName = "Arial" + pgf.Page1.TextBox.FontOutline = .F. + pgf.Page1.TextBox.FontShadow = .F. + pgf.Page1.TextBox.FontSize = 8 + pgf.Page1.TextBox.FontStrikethru = .F. + pgf.Page1.TextBox.FontUnderline = .F. + pgf.Page1.TextBox.ForeColor = 0,0,0 + pgf.Page1.TextBox.Format = "" + pgf.Page1.TextBox.Height = (19) + pgf.Page1.TextBox.HelpContextID = 0 + pgf.Page1.TextBox.HideSelection = .T. + pgf.Page1.TextBox.Hours = 0 + pgf.Page1.TextBox.IMEMode = 0 + pgf.Page1.TextBox.InputMask = "" + pgf.Page1.TextBox.IntegralHeight = .F. + pgf.Page1.TextBox.Left = (11) + pgf.Page1.TextBox.Margin = 0 + pgf.Page1.TextBox.MaxLength = 0 + pgf.Page1.TextBox.MemoWindow = "" + pgf.Page1.TextBox.MouseIcon = ..\..\ + pgf.Page1.TextBox.MousePointer = 0 + pgf.Page1.TextBox.Name = "TextBox" + pgf.Page1.TextBox.NullDisplay = "" + pgf.Page1.TextBox.OLEDragMode = 0 + pgf.Page1.TextBox.OLEDragPicture = ..\..\ + pgf.Page1.TextBox.OLEDropEffects = 3 + pgf.Page1.TextBox.OLEDropMode = 0 + pgf.Page1.TextBox.OLEDropTextInsertion = 0 + pgf.Page1.TextBox.OpenWindow = .F. + pgf.Page1.TextBox.PasswordChar = "" + pgf.Page1.TextBox.ReadOnly = .F. + pgf.Page1.TextBox.RightToLeft = .F. + pgf.Page1.TextBox.Seconds = 2 + pgf.Page1.TextBox.SelectedBackColor = 51,153,255 + pgf.Page1.TextBox.SelectedForeColor = 255,255,255 + pgf.Page1.TextBox.SelectOnEntry = .F. + pgf.Page1.TextBox.SpecialEffect = 1 + pgf.Page1.TextBox.StatusBarText = "" + pgf.Page1.TextBox.StrictDateEntry = 1 + pgf.Page1.TextBox.Style = 0 + pgf.Page1.TextBox.TabIndex = 1 + pgf.Page1.TextBox.TabStop = .T. + pgf.Page1.TextBox.Tag = "" + pgf.Page1.TextBox.TerminateRead = .F. + pgf.Page1.TextBox.test_aa = .F. + pgf.Page1.TextBox.Themes = .T. + pgf.Page1.TextBox.ToolTipText = "" + pgf.Page1.TextBox.Top = (320) + pgf.Page1.TextBox.Value = + pgf.Page1.TextBox.Visible = .T. + pgf.Page1.TextBox.WhatsThisHelpID = -1 + pgf.Page1.TextBox.Width = (108) + pgf.Page1.Timer.Comment = "no comment" + pgf.Page1.Timer.DefHeight = + pgf.Page1.Timer.DefLeft = + pgf.Page1.Timer.DefTop = + pgf.Page1.Timer.DefWidth = + pgf.Page1.Timer.Enabled = .T. + pgf.Page1.Timer.Height = (23) + pgf.Page1.Timer.Interval = 0 + pgf.Page1.Timer.Left = (207) + pgf.Page1.Timer.Name = "Timer" + pgf.Page1.Timer.test_aa = .F. + pgf.Page1.Timer.Top = (252) + pgf.Page1.Timer.Width = (23) + pgf.Page2.Name = "Page2" + pgf.Page2.PageOrder = 2 + pgf.PageCount = 2 + pgf.RightToLeft = .F. + pgf.TabIndex = 7 + pgf.TabOrientation = 1 + pgf.Tabs = .T. + pgf.TabStop = .T. + pgf.TabStretch = 1 + pgf.TabStyle = 0 + pgf.Tag = "" + pgf.test_aa = .F. + pgf.Themes = .T. + pgf.ToolTipText = "" + pgf.Top = 28 + pgf.Visible = .T. + pgf.WhatsThisHelpID = -1 + pgf.Width = 268 + Image1.Height = 104 + Image1.Name = "Image1" + Image1.Width = 212 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_form_aa2.sc2 b/TESTS/DATOS_READONLY/f_form_aa2.sc2 index e175f1f..9a2245e 100644 --- a/TESTS/DATOS_READONLY/f_form_aa2.sc2 +++ b/TESTS/DATOS_READONLY/f_form_aa2.sc2 @@ -4,1328 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_form_aa2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="2" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_form_aa1" Baseclass="form" /> - DataSource = .NULL. - Name = "Dataenvironment" - TabStop = .F. - Visible = .F. - -ENDDEFINE - -DEFINE CLASS f_form_aa1 AS f_form_aa OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - AlwaysOnTop = .T. - DefHeight = - DefLeft = - DefTop = - DoCreate = .T. - Height = (460) - Left = (2) - Name = "F_form_aa1" - Top = (4) - Cl_image1.Height = 104 - Cl_image1.Name = "Cl_image1" - Cl_image1.Width = 212 - Edit1.Name = "Edit1" - Label3.Name = "Label3" - cmdCapturar.Name = "cmdCapturar" - Label1.Name = "Label1" - Label2.Name = "Label2" - Cl_grid1.AllowAddNew = .F. - Cl_grid1.AllowAutoColumnFit = 0 - Cl_grid1.AllowCellSelection = .T. - Cl_grid1.AllowHeaderSizing = .F. - Cl_grid1.AllowRowSizing = .F. - Cl_grid1.Anchor = 0 - Cl_grid1.BackColor = 255,255,217 - Cl_grid1.ChildOrder = "" - Cl_grid1.COLUMN1.Alignment = 3 - Cl_grid1.COLUMN1.BackColor = 255,255,217 - Cl_grid1.COLUMN1.Bound = .T. - Cl_grid1.COLUMN1.ColumnOrder = 1 - Cl_grid1.COLUMN1.Comment = "" - Cl_grid1.COLUMN1.ControlSource = "" - Cl_grid1.COLUMN1.CurrentControl = "Text1" - Cl_grid1.COLUMN1.DynamicAlignment = "" - Cl_grid1.COLUMN1.DynamicBackColor = "" - Cl_grid1.COLUMN1.DynamicCurrentControl = "" - Cl_grid1.COLUMN1.DynamicFontBold = "" - Cl_grid1.COLUMN1.DynamicFontItalic = "" - Cl_grid1.COLUMN1.DynamicFontName = "" - Cl_grid1.COLUMN1.DynamicFontOutline = "" - Cl_grid1.COLUMN1.DynamicFontShadow = "" - Cl_grid1.COLUMN1.DynamicFontSize = "" - Cl_grid1.COLUMN1.DynamicFontStrikethru = "" - Cl_grid1.COLUMN1.DynamicFontUnderline = "" - Cl_grid1.COLUMN1.DynamicForeColor = "" - Cl_grid1.COLUMN1.DynamicInputMask = "" - Cl_grid1.COLUMN1.Enabled = .T. - Cl_grid1.COLUMN1.FontBold = .F. - Cl_grid1.COLUMN1.FontCondense = .F. - Cl_grid1.COLUMN1.FontExtend = .F. - Cl_grid1.COLUMN1.FontItalic = .F. - Cl_grid1.COLUMN1.FontName = "Arial" - Cl_grid1.COLUMN1.FontOutline = .F. - Cl_grid1.COLUMN1.FontShadow = .F. - Cl_grid1.COLUMN1.FontSize = 9 - Cl_grid1.COLUMN1.FontStrikethru = .F. - Cl_grid1.COLUMN1.FontUnderline = .F. - Cl_grid1.COLUMN1.ForeColor = 0,0,0 - Cl_grid1.COLUMN1.Format = "" - Cl_grid1.COLUMN1.Header1.Alignment = 0 - Cl_grid1.COLUMN1.Header1.BackColor = 240,240,240 - Cl_grid1.COLUMN1.Header1.Caption = "Control" - Cl_grid1.COLUMN1.Header1.Comment = "" - Cl_grid1.COLUMN1.Header1.FontBold = .F. - Cl_grid1.COLUMN1.Header1.FontCondense = .F. - Cl_grid1.COLUMN1.Header1.FontExtend = .F. - Cl_grid1.COLUMN1.Header1.FontItalic = .F. - Cl_grid1.COLUMN1.Header1.FontName = "Arial" - Cl_grid1.COLUMN1.Header1.FontOutline = .F. - Cl_grid1.COLUMN1.Header1.FontShadow = .F. - Cl_grid1.COLUMN1.Header1.FontSize = 9 - Cl_grid1.COLUMN1.Header1.FontStrikethru = .F. - Cl_grid1.COLUMN1.Header1.FontUnderline = .F. - Cl_grid1.COLUMN1.Header1.ForeColor = 0,0,0 - Cl_grid1.COLUMN1.Header1.MouseIcon = ..\..\ - Cl_grid1.COLUMN1.Header1.MousePointer = 0 - Cl_grid1.COLUMN1.Header1.Name = "Header1" - Cl_grid1.COLUMN1.Header1.Picture = ..\..\ - Cl_grid1.COLUMN1.Header1.StatusBarText = "" - Cl_grid1.COLUMN1.Header1.Tag = "" - Cl_grid1.COLUMN1.Header1.ToolTipText = "" - Cl_grid1.COLUMN1.Header1.WordWrap = .F. - Cl_grid1.COLUMN1.InputMask = "" - Cl_grid1.COLUMN1.MouseIcon = ..\..\ - Cl_grid1.COLUMN1.MousePointer = 0 - Cl_grid1.COLUMN1.Movable = .T. - Cl_grid1.COLUMN1.Name = "COLUMN1" - Cl_grid1.COLUMN1.ReadOnly = .F. - Cl_grid1.COLUMN1.Resizable = .T. - Cl_grid1.COLUMN1.SelectOnEntry = .T. - Cl_grid1.COLUMN1.Sparse = .T. - Cl_grid1.COLUMN1.Text1.Alignment = 3 - Cl_grid1.COLUMN1.Text1.BackColor = 255,255,217 - Cl_grid1.COLUMN1.Text1.Enabled = .T. - Cl_grid1.COLUMN1.Text1.FontBold = .F. - Cl_grid1.COLUMN1.Text1.FontCondense = .F. - Cl_grid1.COLUMN1.Text1.FontExtend = .F. - Cl_grid1.COLUMN1.Text1.FontItalic = .F. - Cl_grid1.COLUMN1.Text1.FontName = "Arial" - Cl_grid1.COLUMN1.Text1.FontOutline = .F. - Cl_grid1.COLUMN1.Text1.FontShadow = .F. - Cl_grid1.COLUMN1.Text1.FontSize = 9 - Cl_grid1.COLUMN1.Text1.FontStrikethru = .F. - Cl_grid1.COLUMN1.Text1.FontUnderline = .F. - Cl_grid1.COLUMN1.Text1.ForeColor = 0,0,0 - Cl_grid1.COLUMN1.Text1.Name = "Text1" - Cl_grid1.COLUMN1.Text1.ReadOnly = .F. - Cl_grid1.COLUMN1.Text1.Visible = .T. - Cl_grid1.COLUMN1.Visible = .T. - Cl_grid1.COLUMN1.Width = 170 - Cl_grid1.COLUMN2.BackColor = 255,255,217 - Cl_grid1.COLUMN2.ControlSource = "" - Cl_grid1.COLUMN2.Enabled = .T. - Cl_grid1.COLUMN2.FontBold = .F. - Cl_grid1.COLUMN2.FontCondense = .F. - Cl_grid1.COLUMN2.FontExtend = .F. - Cl_grid1.COLUMN2.FontItalic = .F. - Cl_grid1.COLUMN2.FontName = "Arial" - Cl_grid1.COLUMN2.FontOutline = .F. - Cl_grid1.COLUMN2.FontShadow = .F. - Cl_grid1.COLUMN2.FontSize = 9 - Cl_grid1.COLUMN2.FontStrikethru = .F. - Cl_grid1.COLUMN2.FontUnderline = .F. - Cl_grid1.COLUMN2.ForeColor = 0,0,0 - Cl_grid1.COLUMN2.Header1.FontBold = .F. - Cl_grid1.COLUMN2.Header1.FontCondense = .F. - Cl_grid1.COLUMN2.Header1.FontExtend = .F. - Cl_grid1.COLUMN2.Header1.FontItalic = .F. - Cl_grid1.COLUMN2.Header1.FontName = "Arial" - Cl_grid1.COLUMN2.Header1.FontOutline = .F. - Cl_grid1.COLUMN2.Header1.FontShadow = .F. - Cl_grid1.COLUMN2.Header1.FontSize = 9 - Cl_grid1.COLUMN2.Header1.FontStrikethru = .F. - Cl_grid1.COLUMN2.Header1.FontUnderline = .F. - Cl_grid1.COLUMN2.Header1.Name = "Header1" - Cl_grid1.COLUMN2.Name = "COLUMN2" - Cl_grid1.COLUMN2.ReadOnly = .F. - Cl_grid1.COLUMN2.Text1.BackColor = 255,255,217 - Cl_grid1.COLUMN2.Text1.Enabled = .T. - Cl_grid1.COLUMN2.Text1.FontBold = .F. - Cl_grid1.COLUMN2.Text1.FontCondense = .F. - Cl_grid1.COLUMN2.Text1.FontExtend = .F. - Cl_grid1.COLUMN2.Text1.FontItalic = .F. - Cl_grid1.COLUMN2.Text1.FontName = "Arial" - Cl_grid1.COLUMN2.Text1.FontOutline = .F. - Cl_grid1.COLUMN2.Text1.FontShadow = .F. - Cl_grid1.COLUMN2.Text1.FontSize = 9 - Cl_grid1.COLUMN2.Text1.FontStrikethru = .F. - Cl_grid1.COLUMN2.Text1.FontUnderline = .F. - Cl_grid1.COLUMN2.Text1.ForeColor = 0,0,0 - Cl_grid1.COLUMN2.Text1.Name = "Text1" - Cl_grid1.COLUMN2.Text1.ReadOnly = .F. - Cl_grid1.COLUMN2.Text1.Visible = .T. - Cl_grid1.COLUMN2.Visible = .T. - Cl_grid1.COLUMN3.BackColor = 255,255,217 - Cl_grid1.COLUMN3.ControlSource = "" - Cl_grid1.COLUMN3.Enabled = .T. - Cl_grid1.COLUMN3.FontBold = .F. - Cl_grid1.COLUMN3.FontCondense = .F. - Cl_grid1.COLUMN3.FontExtend = .F. - Cl_grid1.COLUMN3.FontItalic = .F. - Cl_grid1.COLUMN3.FontName = "Arial" - Cl_grid1.COLUMN3.FontOutline = .F. - Cl_grid1.COLUMN3.FontShadow = .F. - Cl_grid1.COLUMN3.FontSize = 9 - Cl_grid1.COLUMN3.FontStrikethru = .F. - Cl_grid1.COLUMN3.FontUnderline = .F. - Cl_grid1.COLUMN3.ForeColor = 0,0,0 - Cl_grid1.COLUMN3.Header1.FontBold = .F. - Cl_grid1.COLUMN3.Header1.FontCondense = .F. - Cl_grid1.COLUMN3.Header1.FontExtend = .F. - Cl_grid1.COLUMN3.Header1.FontItalic = .F. - Cl_grid1.COLUMN3.Header1.FontName = "Arial" - Cl_grid1.COLUMN3.Header1.FontOutline = .F. - Cl_grid1.COLUMN3.Header1.FontShadow = .F. - Cl_grid1.COLUMN3.Header1.FontSize = 9 - Cl_grid1.COLUMN3.Header1.FontStrikethru = .F. - Cl_grid1.COLUMN3.Header1.FontUnderline = .F. - Cl_grid1.COLUMN3.Header1.Name = "Header1" - Cl_grid1.COLUMN3.Name = "COLUMN3" - Cl_grid1.COLUMN3.ReadOnly = .F. - Cl_grid1.COLUMN3.Text1.BackColor = 255,255,217 - Cl_grid1.COLUMN3.Text1.Enabled = .T. - Cl_grid1.COLUMN3.Text1.FontBold = .F. - Cl_grid1.COLUMN3.Text1.FontCondense = .F. - Cl_grid1.COLUMN3.Text1.FontExtend = .F. - Cl_grid1.COLUMN3.Text1.FontItalic = .F. - Cl_grid1.COLUMN3.Text1.FontName = "Arial" - Cl_grid1.COLUMN3.Text1.FontOutline = .F. - Cl_grid1.COLUMN3.Text1.FontShadow = .F. - Cl_grid1.COLUMN3.Text1.FontSize = 9 - Cl_grid1.COLUMN3.Text1.FontStrikethru = .F. - Cl_grid1.COLUMN3.Text1.FontUnderline = .F. - Cl_grid1.COLUMN3.Text1.ForeColor = 0,0,0 - Cl_grid1.COLUMN3.Text1.Name = "Text1" - Cl_grid1.COLUMN3.Text1.ReadOnly = .F. - Cl_grid1.COLUMN3.Text1.Visible = .T. - Cl_grid1.COLUMN3.Visible = .T. - Cl_grid1.COLUMN4.BackColor = 255,255,217 - Cl_grid1.COLUMN4.ControlSource = "" - Cl_grid1.COLUMN4.Enabled = .T. - Cl_grid1.COLUMN4.FontBold = .F. - Cl_grid1.COLUMN4.FontCondense = .F. - Cl_grid1.COLUMN4.FontExtend = .F. - Cl_grid1.COLUMN4.FontItalic = .F. - Cl_grid1.COLUMN4.FontName = "Arial" - Cl_grid1.COLUMN4.FontOutline = .F. - Cl_grid1.COLUMN4.FontShadow = .F. - Cl_grid1.COLUMN4.FontSize = 9 - Cl_grid1.COLUMN4.FontStrikethru = .F. - Cl_grid1.COLUMN4.FontUnderline = .F. - Cl_grid1.COLUMN4.ForeColor = 0,0,0 - Cl_grid1.COLUMN4.Header1.FontBold = .F. - Cl_grid1.COLUMN4.Header1.FontCondense = .F. - Cl_grid1.COLUMN4.Header1.FontExtend = .F. - Cl_grid1.COLUMN4.Header1.FontItalic = .F. - Cl_grid1.COLUMN4.Header1.FontName = "Arial" - Cl_grid1.COLUMN4.Header1.FontOutline = .F. - Cl_grid1.COLUMN4.Header1.FontShadow = .F. - Cl_grid1.COLUMN4.Header1.FontSize = 9 - Cl_grid1.COLUMN4.Header1.FontStrikethru = .F. - Cl_grid1.COLUMN4.Header1.FontUnderline = .F. - Cl_grid1.COLUMN4.Header1.Name = "Header1" - Cl_grid1.COLUMN4.Name = "COLUMN4" - Cl_grid1.COLUMN4.ReadOnly = .F. - Cl_grid1.COLUMN4.Text1.BackColor = 255,255,217 - Cl_grid1.COLUMN4.Text1.Enabled = .T. - Cl_grid1.COLUMN4.Text1.FontBold = .F. - Cl_grid1.COLUMN4.Text1.FontCondense = .F. - Cl_grid1.COLUMN4.Text1.FontExtend = .F. - Cl_grid1.COLUMN4.Text1.FontItalic = .F. - Cl_grid1.COLUMN4.Text1.FontName = "Arial" - Cl_grid1.COLUMN4.Text1.FontOutline = .F. - Cl_grid1.COLUMN4.Text1.FontShadow = .F. - Cl_grid1.COLUMN4.Text1.FontSize = 9 - Cl_grid1.COLUMN4.Text1.FontStrikethru = .F. - Cl_grid1.COLUMN4.Text1.FontUnderline = .F. - Cl_grid1.COLUMN4.Text1.ForeColor = 0,0,0 - Cl_grid1.COLUMN4.Text1.Name = "Text1" - Cl_grid1.COLUMN4.Text1.ReadOnly = .F. - Cl_grid1.COLUMN4.Text1.Visible = .T. - Cl_grid1.COLUMN4.Visible = .T. - Cl_grid1.COLUMN5.BackColor = 255,255,217 - Cl_grid1.COLUMN5.ControlSource = "" - Cl_grid1.COLUMN5.Enabled = .T. - Cl_grid1.COLUMN5.FontBold = .F. - Cl_grid1.COLUMN5.FontCondense = .F. - Cl_grid1.COLUMN5.FontExtend = .F. - Cl_grid1.COLUMN5.FontItalic = .F. - Cl_grid1.COLUMN5.FontName = "Arial" - Cl_grid1.COLUMN5.FontOutline = .F. - Cl_grid1.COLUMN5.FontShadow = .F. - Cl_grid1.COLUMN5.FontSize = 9 - Cl_grid1.COLUMN5.FontStrikethru = .F. - Cl_grid1.COLUMN5.FontUnderline = .F. - Cl_grid1.COLUMN5.ForeColor = 0,0,0 - Cl_grid1.COLUMN5.Header1.FontBold = .F. - Cl_grid1.COLUMN5.Header1.FontCondense = .F. - Cl_grid1.COLUMN5.Header1.FontExtend = .F. - Cl_grid1.COLUMN5.Header1.FontItalic = .F. - Cl_grid1.COLUMN5.Header1.FontName = "Arial" - Cl_grid1.COLUMN5.Header1.FontOutline = .F. - Cl_grid1.COLUMN5.Header1.FontShadow = .F. - Cl_grid1.COLUMN5.Header1.FontSize = 9 - Cl_grid1.COLUMN5.Header1.FontStrikethru = .F. - Cl_grid1.COLUMN5.Header1.FontUnderline = .F. - Cl_grid1.COLUMN5.Header1.Name = "Header1" - Cl_grid1.COLUMN5.Name = "COLUMN5" - Cl_grid1.COLUMN5.ReadOnly = .F. - Cl_grid1.COLUMN5.Text1.BackColor = 255,255,217 - Cl_grid1.COLUMN5.Text1.Enabled = .T. - Cl_grid1.COLUMN5.Text1.FontBold = .F. - Cl_grid1.COLUMN5.Text1.FontCondense = .F. - Cl_grid1.COLUMN5.Text1.FontExtend = .F. - Cl_grid1.COLUMN5.Text1.FontItalic = .F. - Cl_grid1.COLUMN5.Text1.FontName = "Arial" - Cl_grid1.COLUMN5.Text1.FontOutline = .F. - Cl_grid1.COLUMN5.Text1.FontShadow = .F. - Cl_grid1.COLUMN5.Text1.FontSize = 9 - Cl_grid1.COLUMN5.Text1.FontStrikethru = .F. - Cl_grid1.COLUMN5.Text1.FontUnderline = .F. - Cl_grid1.COLUMN5.Text1.ForeColor = 0,0,0 - Cl_grid1.COLUMN5.Text1.Name = "Text1" - Cl_grid1.COLUMN5.Text1.ReadOnly = .F. - Cl_grid1.COLUMN5.Text1.Visible = .T. - Cl_grid1.COLUMN5.Visible = .T. - Cl_grid1.Column6.BackColor = 255,255,217 - Cl_grid1.Column6.ControlSource = "" - Cl_grid1.Column6.Enabled = .T. - Cl_grid1.Column6.FontBold = .F. - Cl_grid1.Column6.FontCondense = .F. - Cl_grid1.Column6.FontExtend = .F. - Cl_grid1.Column6.FontItalic = .F. - Cl_grid1.Column6.FontName = "Arial" - Cl_grid1.Column6.FontOutline = .F. - Cl_grid1.Column6.FontShadow = .F. - Cl_grid1.Column6.FontSize = 9 - Cl_grid1.Column6.FontStrikethru = .F. - Cl_grid1.Column6.FontUnderline = .F. - Cl_grid1.Column6.ForeColor = 0,0,0 - Cl_grid1.Column6.Header1.FontBold = .F. - Cl_grid1.Column6.Header1.FontCondense = .F. - Cl_grid1.Column6.Header1.FontExtend = .F. - Cl_grid1.Column6.Header1.FontItalic = .F. - Cl_grid1.Column6.Header1.FontName = "Arial" - Cl_grid1.Column6.Header1.FontOutline = .F. - Cl_grid1.Column6.Header1.FontShadow = .F. - Cl_grid1.Column6.Header1.FontSize = 9 - Cl_grid1.Column6.Header1.FontStrikethru = .F. - Cl_grid1.Column6.Header1.FontUnderline = .F. - Cl_grid1.Column6.Header1.Name = "Header1" - Cl_grid1.Column6.Name = "Column6" - Cl_grid1.Column6.ReadOnly = .F. - Cl_grid1.Column6.Text1.BackColor = 255,255,217 - Cl_grid1.Column6.Text1.Enabled = .T. - Cl_grid1.Column6.Text1.FontBold = .F. - Cl_grid1.Column6.Text1.FontCondense = .F. - Cl_grid1.Column6.Text1.FontExtend = .F. - Cl_grid1.Column6.Text1.FontItalic = .F. - Cl_grid1.Column6.Text1.FontName = "Arial" - Cl_grid1.Column6.Text1.FontOutline = .F. - Cl_grid1.Column6.Text1.FontShadow = .F. - Cl_grid1.Column6.Text1.FontSize = 9 - Cl_grid1.Column6.Text1.FontStrikethru = .F. - Cl_grid1.Column6.Text1.FontUnderline = .F. - Cl_grid1.Column6.Text1.ForeColor = 0,0,0 - Cl_grid1.Column6.Text1.Name = "Text1" - Cl_grid1.Column6.Text1.ReadOnly = .F. - Cl_grid1.Column6.Text1.Visible = .T. - Cl_grid1.Column6.Visible = .T. - Cl_grid1.ColumnCount = 6 - Cl_grid1.Comment = "" - Cl_grid1.DeleteMark = .F. - Cl_grid1.DragIcon = ..\..\ - Cl_grid1.DragMode = 0 - Cl_grid1.Enabled = .T. - Cl_grid1.FontBold = .F. - Cl_grid1.FontCondense = .F. - Cl_grid1.FontExtend = .F. - Cl_grid1.FontItalic = .F. - Cl_grid1.FontName = "Arial" - Cl_grid1.FontOutline = .F. - Cl_grid1.FontShadow = .F. - Cl_grid1.FontSize = 9 - Cl_grid1.FontStrikethru = .F. - Cl_grid1.FontUnderline = .F. - Cl_grid1.ForeColor = 0,0,0 - Cl_grid1.GridLineColor = 0,0,0 - Cl_grid1.GridLines = 3 - Cl_grid1.GridLineWidth = 1 - Cl_grid1.HeaderHeight = 18 - Cl_grid1.HelpContextID = 0 - Cl_grid1.Highlight = .T. - Cl_grid1.HighlightBackColor = 51,153,255 - Cl_grid1.HighlightForeColor = 255,255,255 - Cl_grid1.HighlightRow = .T. - Cl_grid1.HighlightRowLineWidth = 1 - Cl_grid1.HighlightStyle = 0 - Cl_grid1.Left = 296 - Cl_grid1.LinkMaster = "" - Cl_grid1.LockColumns = 0 - Cl_grid1.LockColumnsLeft = 0 - Cl_grid1.MouseIcon = ..\..\ - Cl_grid1.MousePointer = 0 - Cl_grid1.Name = "Cl_grid1" - Cl_grid1.OLEDragPicture = ..\..\ - Cl_grid1.OLEDropEffects = 3 - Cl_grid1.OLEDropMode = 0 - Cl_grid1.Optimize = .F. - Cl_grid1.Panel = 1 - Cl_grid1.PanelLink = .T. - Cl_grid1.Partition = 0 - Cl_grid1.ReadOnly = .F. - Cl_grid1.RecordMark = .T. - Cl_grid1.RecordSource = "C_TESTS" - Cl_grid1.RecordSourceType = 1 - Cl_grid1.RelationalExpr = "" - Cl_grid1.RightToLeft = .F. - Cl_grid1.RowHeight = 18 - Cl_grid1.ScrollBars = 2 - Cl_grid1.SelectedItemBackColor = 51,153,255 - Cl_grid1.SelectedItemForeColor = 255,255,255 - Cl_grid1.SplitBar = .F. - Cl_grid1.StatusBarText = "" - Cl_grid1.TabIndex = 6 - Cl_grid1.TabStop = .T. - Cl_grid1.Tag = "" - Cl_grid1.Themes = .T. - Cl_grid1.ToolTipText = "" - Cl_grid1.Top = 32 - Cl_grid1.Value = 0 - Cl_grid1.View = 0 - Cl_grid1.Visible = .T. - Cl_grid1.WhatsThisHelpID = -1 - pgf.ActivePage = 2 - pgf.Anchor = 0 - pgf.ColorSource = 4 - pgf.Comment = "" - pgf.DragIcon = ..\..\ - pgf.DragMode = 0 - pgf.Enabled = .T. - pgf.ErasePage = .T. - pgf.Height = 388 - pgf.HelpContextID = 0 - pgf.Left = 12 - pgf.MouseIcon = ..\..\ - pgf.MousePointer = 0 - pgf.Name = "pgf" - pgf.OLEDragMode = 0 - pgf.OLEDragPicture = ..\..\ - pgf.OLEDropEffects = 3 - pgf.OLEDropMode = 0 - pgf.Page1.Checkbox.Alignment = 0 - pgf.Page1.Checkbox.Anchor = 0 - pgf.Page1.Checkbox.AutoSize = .F. - pgf.Page1.Checkbox.BackColor = 240,240,240 - pgf.Page1.Checkbox.BackStyle = 1 - pgf.Page1.Checkbox.Caption = "Chk1" - pgf.Page1.Checkbox.Centered = .F. - pgf.Page1.Checkbox.ColorScheme = 1 - pgf.Page1.Checkbox.ColorSource = 4 - pgf.Page1.Checkbox.Comment = "" - pgf.Page1.Checkbox.ControlSource = "" - pgf.Page1.Checkbox.DefHeight = - pgf.Page1.Checkbox.DefLeft = - pgf.Page1.Checkbox.DefTop = - pgf.Page1.Checkbox.DefWidth = - pgf.Page1.Checkbox.DisabledBackColor = 240,240,240 - pgf.Page1.Checkbox.DisabledForeColor = 109,109,109 - pgf.Page1.Checkbox.DisabledPicture = ..\..\ - pgf.Page1.Checkbox.DownPicture = ..\..\ - pgf.Page1.Checkbox.DragIcon = ..\..\ - pgf.Page1.Checkbox.DragMode = 0 - pgf.Page1.Checkbox.Enabled = .T. - pgf.Page1.Checkbox.FontBold = .F. - pgf.Page1.Checkbox.FontCondense = .F. - pgf.Page1.Checkbox.FontExtend = .F. - pgf.Page1.Checkbox.FontItalic = .F. - pgf.Page1.Checkbox.FontName = "Arial" - pgf.Page1.Checkbox.FontOutline = .F. - pgf.Page1.Checkbox.FontShadow = .F. - pgf.Page1.Checkbox.FontSize = 8 - pgf.Page1.Checkbox.FontStrikethru = .F. - pgf.Page1.Checkbox.FontUnderline = .F. - pgf.Page1.Checkbox.ForeColor = 0,0,0 - pgf.Page1.Checkbox.Height = (21) - pgf.Page1.Checkbox.HelpContextID = 0 - pgf.Page1.Checkbox.Left = (7) - pgf.Page1.Checkbox.MouseIcon = ..\..\ - pgf.Page1.Checkbox.MousePointer = 0 - pgf.Page1.Checkbox.Name = "Checkbox" - pgf.Page1.Checkbox.OLEDragMode = 0 - pgf.Page1.Checkbox.OLEDragPicture = ..\..\ - pgf.Page1.Checkbox.OLEDropEffects = 3 - pgf.Page1.Checkbox.OLEDropMode = 0 - pgf.Page1.Checkbox.Picture = bmps\treeview.bmp - pgf.Page1.Checkbox.PictureMargin = 0 - pgf.Page1.Checkbox.PicturePosition = 4 - pgf.Page1.Checkbox.PictureSpacing = 0 - pgf.Page1.Checkbox.ReadOnly = .F. - pgf.Page1.Checkbox.RightToLeft = .F. - pgf.Page1.Checkbox.SpecialEffect = 0 - pgf.Page1.Checkbox.StatusBarText = "" - pgf.Page1.Checkbox.Style = 1 - pgf.Page1.Checkbox.TabIndex = 1 - pgf.Page1.Checkbox.TabStop = .T. - pgf.Page1.Checkbox.Tag = "" - pgf.Page1.Checkbox.TerminateRead = .F. - pgf.Page1.Checkbox.test_aa = .F. - pgf.Page1.Checkbox.Themes = .T. - pgf.Page1.Checkbox.ToolTipText = "" - pgf.Page1.Checkbox.Top = (8) - pgf.Page1.Checkbox.Value = 0 - pgf.Page1.Checkbox.Visible = .T. - pgf.Page1.Checkbox.WhatsThisHelpID = -1 - pgf.Page1.Checkbox.Width = (199) - pgf.Page1.Checkbox.WordWrap = .F. - pgf.Page1.Cl_optiongroup1.DefHeight = - pgf.Page1.Cl_optiongroup1.DefWidth = - pgf.Page1.Cl_optiongroup1.Name = "Cl_optiongroup1" - pgf.Page1.Cl_optiongroup1.Option1.Left = 5 - pgf.Page1.Cl_optiongroup1.Option1.Name = "Option1" - pgf.Page1.Cl_optiongroup1.Option1.Top = 5 - pgf.Page1.Cl_optiongroup1.Option2.Left = 5 - pgf.Page1.Cl_optiongroup1.Option2.Name = "Option2" - pgf.Page1.Cl_optiongroup1.Option2.Top = 24 - pgf.Page1.Collection.Comment = "" - pgf.Page1.Collection.KeySort = 0 - pgf.Page1.Collection.Name = "Collection" - pgf.Page1.Collection.Tag = "" - pgf.Page1.Collection.test_aa = .F. - pgf.Page1.ComboBox.Alignment = 0 - pgf.Page1.ComboBox.Anchor = 0 - pgf.Page1.ComboBox.BackColor = 255,255,255 - pgf.Page1.ComboBox.BorderColor = 128,255,128 - pgf.Page1.ComboBox.BorderStyle = 1 - pgf.Page1.ComboBox.BoundColumn = 1 - pgf.Page1.ComboBox.BoundTo = .F. - pgf.Page1.ComboBox.ColorScheme = 2 - pgf.Page1.ComboBox.ColorSource = 4 - pgf.Page1.ComboBox.ColumnCount = 0 - pgf.Page1.ComboBox.ColumnLines = .T. - pgf.Page1.ComboBox.ColumnWidths = "" - pgf.Page1.ComboBox.Comment = "" - pgf.Page1.ComboBox.ControlSource = "" - pgf.Page1.ComboBox.DefHeight = - pgf.Page1.ComboBox.DefLeft = - pgf.Page1.ComboBox.DefTop = - pgf.Page1.ComboBox.DefWidth = - pgf.Page1.ComboBox.DisabledBackColor = 240,240,240 - pgf.Page1.ComboBox.DisabledForeColor = 109,109,109 - pgf.Page1.ComboBox.DisabledItemBackColor = 255,255,255 - pgf.Page1.ComboBox.DisabledItemForeColor = 109,109,109 - pgf.Page1.ComboBox.DisplayCount = 0 - pgf.Page1.ComboBox.DisplayValue = - pgf.Page1.ComboBox.DragIcon = ..\..\ - pgf.Page1.ComboBox.DragMode = 0 - pgf.Page1.ComboBox.Enabled = .T. - pgf.Page1.ComboBox.FirstElement = 1 - pgf.Page1.ComboBox.FontBold = .F. - pgf.Page1.ComboBox.FontCondense = .F. - pgf.Page1.ComboBox.FontExtend = .F. - pgf.Page1.ComboBox.FontItalic = .F. - pgf.Page1.ComboBox.FontName = "Arial" - pgf.Page1.ComboBox.FontOutline = .F. - pgf.Page1.ComboBox.FontShadow = .F. - pgf.Page1.ComboBox.FontSize = 8 - pgf.Page1.ComboBox.FontStrikethru = .F. - pgf.Page1.ComboBox.FontUnderline = .F. - pgf.Page1.ComboBox.ForeColor = 0,0,0 - pgf.Page1.ComboBox.Format = "" - pgf.Page1.ComboBox.Height = (20) - pgf.Page1.ComboBox.HelpContextID = 0 - pgf.Page1.ComboBox.HideSelection = .T. - pgf.Page1.ComboBox.IMEMode = 0 - pgf.Page1.ComboBox.IncrementalSearch = .T. - pgf.Page1.ComboBox.InputMask = "" - pgf.Page1.ComboBox.ItemBackColor = 255,255,255 - pgf.Page1.ComboBox.ItemForeColor = 0,0,0 - pgf.Page1.ComboBox.ItemTips = .F. - pgf.Page1.ComboBox.Left = (7) - pgf.Page1.ComboBox.Margin = 0 - pgf.Page1.ComboBox.MaxLength = 0 - pgf.Page1.ComboBox.MouseIcon = ..\..\ - pgf.Page1.ComboBox.MousePointer = 0 - pgf.Page1.ComboBox.Name = "ComboBox" - pgf.Page1.ComboBox.NullDisplay = "" - pgf.Page1.ComboBox.NumberOfElements = 0 - pgf.Page1.ComboBox.OLEDragMode = 0 - pgf.Page1.ComboBox.OLEDragPicture = ..\..\ - pgf.Page1.ComboBox.OLEDropEffects = 3 - pgf.Page1.ComboBox.OLEDropMode = 0 - pgf.Page1.ComboBox.OLEDropTextInsertion = 0 - pgf.Page1.ComboBox.Picture = bmps\treeview.bmp - pgf.Page1.ComboBox.PictureSelectionDisplay = 0 - pgf.Page1.ComboBox.ReadOnly = .F. - pgf.Page1.ComboBox.RightToLeft = .F. - pgf.Page1.ComboBox.RowSource = "" - pgf.Page1.ComboBox.RowSourceType = 0 - pgf.Page1.ComboBox.SelectedBackColor = 51,153,255 - pgf.Page1.ComboBox.SelectedForeColor = 255,255,255 - pgf.Page1.ComboBox.SelectedItemBackColor = 51,153,255 - pgf.Page1.ComboBox.SelectedItemForeColor = 255,255,255 - pgf.Page1.ComboBox.SelectOnEntry = .F. - pgf.Page1.ComboBox.Sorted = .F. - pgf.Page1.ComboBox.SpecialEffect = 1 - pgf.Page1.ComboBox.StatusBarText = "" - pgf.Page1.ComboBox.Style = 0 - pgf.Page1.ComboBox.TabIndex = 1 - pgf.Page1.ComboBox.TabStop = .T. - pgf.Page1.ComboBox.Tag = "" - pgf.Page1.ComboBox.TerminateRead = .F. - pgf.Page1.ComboBox.test_aa = .F. - pgf.Page1.ComboBox.Themes = .T. - pgf.Page1.ComboBox.ToolTipText = "" - pgf.Page1.ComboBox.Top = (35) - pgf.Page1.ComboBox.Value = - pgf.Page1.ComboBox.Visible = .T. - pgf.Page1.ComboBox.WhatsThisHelpID = -1 - pgf.Page1.ComboBox.Width = (196) - pgf.Page1.CommandButton.Alignment = 2 - pgf.Page1.CommandButton.Anchor = 0 - pgf.Page1.CommandButton.AutoSize = .F. - pgf.Page1.CommandButton.BackColor = 240,240,240 - pgf.Page1.CommandButton.Cancel = .F. - pgf.Page1.CommandButton.Caption = "Comando" - pgf.Page1.CommandButton.ColorScheme = 1 - pgf.Page1.CommandButton.ColorSource = 4 - pgf.Page1.CommandButton.Comment = "" - pgf.Page1.CommandButton.Default = .F. - pgf.Page1.CommandButton.DefHeight = - pgf.Page1.CommandButton.DefLeft = - pgf.Page1.CommandButton.DefTop = - pgf.Page1.CommandButton.DefWidth = - pgf.Page1.CommandButton.DisabledBackColor = 240,240,240 - pgf.Page1.CommandButton.DisabledForeColor = 109,109,109 - pgf.Page1.CommandButton.DisabledPicture = ..\..\ - pgf.Page1.CommandButton.DownPicture = ..\..\ - pgf.Page1.CommandButton.DragIcon = ..\..\ - pgf.Page1.CommandButton.DragMode = 0 - pgf.Page1.CommandButton.Enabled = .T. - pgf.Page1.CommandButton.FontBold = .F. - pgf.Page1.CommandButton.FontCondense = .F. - pgf.Page1.CommandButton.FontExtend = .F. - pgf.Page1.CommandButton.FontItalic = .F. - pgf.Page1.CommandButton.FontName = "Arial" - pgf.Page1.CommandButton.FontOutline = .F. - pgf.Page1.CommandButton.FontShadow = .F. - pgf.Page1.CommandButton.FontSize = 8 - pgf.Page1.CommandButton.FontStrikethru = .F. - pgf.Page1.CommandButton.FontUnderline = .F. - pgf.Page1.CommandButton.ForeColor = 0,0,0 - pgf.Page1.CommandButton.Height = (25) - pgf.Page1.CommandButton.HelpContextID = 0 - pgf.Page1.CommandButton.Left = (99) - pgf.Page1.CommandButton.MouseIcon = ..\..\ - pgf.Page1.CommandButton.MousePointer = 0 - pgf.Page1.CommandButton.Name = "CommandButton" - pgf.Page1.CommandButton.OLEDragMode = 0 - pgf.Page1.CommandButton.OLEDragPicture = ..\..\ - pgf.Page1.CommandButton.OLEDropEffects = 3 - pgf.Page1.CommandButton.OLEDropMode = 0 - pgf.Page1.CommandButton.Picture = bmps\treeview.bmp - pgf.Page1.CommandButton.PictureMargin = 0 - pgf.Page1.CommandButton.PicturePosition = 4 - pgf.Page1.CommandButton.PictureSpacing = 0 - pgf.Page1.CommandButton.RightToLeft = .F. - pgf.Page1.CommandButton.SpecialEffect = 0 - pgf.Page1.CommandButton.StatusBarText = "" - pgf.Page1.CommandButton.Style = 0 - pgf.Page1.CommandButton.TabIndex = 3 - pgf.Page1.CommandButton.TabStop = .T. - pgf.Page1.CommandButton.Tag = "" - pgf.Page1.CommandButton.TerminateRead = .F. - pgf.Page1.CommandButton.test_aa = .F. - pgf.Page1.CommandButton.Themes = .T. - pgf.Page1.CommandButton.ToolTipText = "" - pgf.Page1.CommandButton.Top = (63) - pgf.Page1.CommandButton.Visible = .T. - pgf.Page1.CommandButton.WhatsThisHelpID = -1 - pgf.Page1.CommandButton.Width = (80) - pgf.Page1.CommandButton.WordWrap = .F. - pgf.Page1.CommandGroup.Anchor = 0 - pgf.Page1.CommandGroup.AutoSize = .F. - pgf.Page1.CommandGroup.BackColor = 240,240,240 - pgf.Page1.CommandGroup.BackStyle = 1 - pgf.Page1.CommandGroup.BorderColor = 100,100,100 - pgf.Page1.CommandGroup.BorderStyle = 1 - pgf.Page1.CommandGroup.ButtonCount = 2 - pgf.Page1.CommandGroup.ColorSource = 4 - pgf.Page1.CommandGroup.Command1.Left = 1 - pgf.Page1.CommandGroup.Command1.Name = "Command1" - pgf.Page1.CommandGroup.Command1.Top = 4 - pgf.Page1.CommandGroup.Command2.Left = 1 - pgf.Page1.CommandGroup.Command2.Name = "Command2" - pgf.Page1.CommandGroup.Command2.Top = 32 - pgf.Page1.CommandGroup.Comment = "" - pgf.Page1.CommandGroup.ControlSource = "" - pgf.Page1.CommandGroup.DefHeight = - pgf.Page1.CommandGroup.DefLeft = - pgf.Page1.CommandGroup.DefTop = - pgf.Page1.CommandGroup.DefWidth = - pgf.Page1.CommandGroup.DragIcon = ..\..\ - pgf.Page1.CommandGroup.DragMode = 0 - pgf.Page1.CommandGroup.Enabled = .T. - pgf.Page1.CommandGroup.Height = (64) - pgf.Page1.CommandGroup.HelpContextID = 0 - pgf.Page1.CommandGroup.Left = (6) - pgf.Page1.CommandGroup.MouseIcon = ..\..\ - pgf.Page1.CommandGroup.MousePointer = 0 - pgf.Page1.CommandGroup.Name = "CommandGroup" - pgf.Page1.CommandGroup.OLEDragMode = 0 - pgf.Page1.CommandGroup.OLEDragPicture = ..\..\ - pgf.Page1.CommandGroup.OLEDropEffects = 3 - pgf.Page1.CommandGroup.OLEDropMode = 0 - pgf.Page1.CommandGroup.SpecialEffect = 0 - pgf.Page1.CommandGroup.StatusBarText = "" - pgf.Page1.CommandGroup.TabIndex = 2 - pgf.Page1.CommandGroup.Tag = "" - pgf.Page1.CommandGroup.TerminateRead = .F. - pgf.Page1.CommandGroup.test_aa = .F. - pgf.Page1.CommandGroup.Themes = .T. - pgf.Page1.CommandGroup.ToolTipText = "" - pgf.Page1.CommandGroup.Top = (60) - pgf.Page1.CommandGroup.Value = 1 - pgf.Page1.CommandGroup.Visible = .T. - pgf.Page1.CommandGroup.WhatsThisHelpID = -1 - pgf.Page1.CommandGroup.Width = (93) - pgf.Page1.Container.Anchor = 0 - pgf.Page1.Container.BackColor = 240,240,240 - pgf.Page1.Container.BackStyle = 1 - pgf.Page1.Container.BorderColor = 100,100,100 - pgf.Page1.Container.BorderWidth = 1 - pgf.Page1.Container.ColorSource = 4 - pgf.Page1.Container.Comment = "" - pgf.Page1.Container.DefHeight = - pgf.Page1.Container.DefLeft = - pgf.Page1.Container.DefTop = - pgf.Page1.Container.DefWidth = - pgf.Page1.Container.DragIcon = ..\..\ - pgf.Page1.Container.DragMode = 0 - pgf.Page1.Container.Enabled = .T. - pgf.Page1.Container.ForeColor = 0,0,0 - pgf.Page1.Container.Height = (24) - pgf.Page1.Container.HelpContextID = 0 - pgf.Page1.Container.Left = (227) - pgf.Page1.Container.MouseIcon = ..\..\ - pgf.Page1.Container.MousePointer = 0 - pgf.Page1.Container.Name = "Container" - pgf.Page1.Container.OLEDragMode = 0 - pgf.Page1.Container.OLEDragPicture = ..\..\ - pgf.Page1.Container.OLEDropEffects = 3 - pgf.Page1.Container.OLEDropMode = 0 - pgf.Page1.Container.SpecialEffect = 2 - pgf.Page1.Container.StatusBarText = "" - pgf.Page1.Container.Style = 0 - pgf.Page1.Container.TabIndex = 4 - pgf.Page1.Container.TabStop = .T. - pgf.Page1.Container.Tag = "" - pgf.Page1.Container.test_aa = .F. - pgf.Page1.Container.ToolTipText = "" - pgf.Page1.Container.Top = (127) - pgf.Page1.Container.Visible = .T. - pgf.Page1.Container.WhatsThisHelpID = -1 - pgf.Page1.Container.Width = (20) - pgf.Page1.Control.Anchor = 0 - pgf.Page1.Control.BackColor = 240,240,240 - pgf.Page1.Control.BackStyle = 1 - pgf.Page1.Control.BorderColor = 100,100,100 - pgf.Page1.Control.BorderWidth = 1 - pgf.Page1.Control.ColorSource = 4 - pgf.Page1.Control.Comment = "" - pgf.Page1.Control.DefHeight = - pgf.Page1.Control.DefLeft = - pgf.Page1.Control.DefTop = - pgf.Page1.Control.DefWidth = - pgf.Page1.Control.DragIcon = ..\..\ - pgf.Page1.Control.DragMode = 0 - pgf.Page1.Control.Enabled = .T. - pgf.Page1.Control.ForeColor = 0,0,0 - pgf.Page1.Control.Height = (24) - pgf.Page1.Control.HelpContextID = 0 - pgf.Page1.Control.Left = (199) - pgf.Page1.Control.MouseIcon = ..\..\ - pgf.Page1.Control.MousePointer = 0 - pgf.Page1.Control.Name = "Control" - pgf.Page1.Control.OLEDragMode = 0 - pgf.Page1.Control.OLEDragPicture = ..\..\ - pgf.Page1.Control.OLEDropEffects = 3 - pgf.Page1.Control.OLEDropMode = 0 - pgf.Page1.Control.SpecialEffect = 2 - pgf.Page1.Control.StatusBarText = "" - pgf.Page1.Control.Style = 0 - pgf.Page1.Control.TabIndex = 5 - pgf.Page1.Control.TabStop = .T. - pgf.Page1.Control.Tag = "" - pgf.Page1.Control.test_aa = .F. - pgf.Page1.Control.ToolTipText = "" - pgf.Page1.Control.Top = (127) - pgf.Page1.Control.Visible = .T. - pgf.Page1.Control.WhatsThisHelpID = -1 - pgf.Page1.Control.Width = (20) - pgf.Page1.EditBox.DefHeight = - pgf.Page1.EditBox.DefLeft = - pgf.Page1.EditBox.DefTop = - pgf.Page1.EditBox.DefWidth = - pgf.Page1.EditBox.Name = "EditBox" - pgf.Page1.HyperLink.Comment = "" - pgf.Page1.HyperLink.Name = "HyperLink" - pgf.Page1.HyperLink.Tag = "" - pgf.Page1.HyperLink.test_aa = .F. - pgf.Page1.Image.Anchor = 0 - pgf.Page1.Image.BackStyle = 1 - pgf.Page1.Image.BorderColor = 100,100,100 - pgf.Page1.Image.BorderStyle = 0 - pgf.Page1.Image.ColorSource = 4 - pgf.Page1.Image.Comment = "" - pgf.Page1.Image.DefHeight = - pgf.Page1.Image.DefLeft = - pgf.Page1.Image.DragIcon = ..\..\ - pgf.Page1.Image.DragMode = 0 - pgf.Page1.Image.Enabled = .T. - pgf.Page1.Image.Height = (16) - pgf.Page1.Image.HelpContextID = 0 - pgf.Page1.Image.Left = (231) - pgf.Page1.Image.MouseIcon = ..\..\ - pgf.Page1.Image.MousePointer = 0 - pgf.Page1.Image.Name = "Image" - pgf.Page1.Image.OLEDragMode = 0 - pgf.Page1.Image.OLEDragPicture = ..\..\ - pgf.Page1.Image.OLEDropEffects = 3 - pgf.Page1.Image.OLEDropMode = 0 - pgf.Page1.Image.Picture = bmps\scccheckout.bmp - pgf.Page1.Image.RotateFlip = 0 - pgf.Page1.Image.StatusBarText = "" - pgf.Page1.Image.Stretch = 0 - pgf.Page1.Image.Tag = "" - pgf.Page1.Image.test_aa = .F. - pgf.Page1.Image.Themes = .T. - pgf.Page1.Image.ToolTipText = "" - pgf.Page1.Image.Top = 107 - pgf.Page1.Image.Visible = .T. - pgf.Page1.Image.WhatsThisHelpID = -1 - pgf.Page1.Image.Width = 16 - pgf.Page1.Label.Alignment = 0 - pgf.Page1.Label.Anchor = 0 - pgf.Page1.Label.AutoSize = .F. - pgf.Page1.Label.BackColor = 240,240,240 - pgf.Page1.Label.BackStyle = 1 - pgf.Page1.Label.BorderStyle = 0 - pgf.Page1.Label.Caption = "Label4" - pgf.Page1.Label.ColorScheme = 1 - pgf.Page1.Label.ColorSource = 4 - pgf.Page1.Label.Comment = "" - pgf.Page1.Label.DefHeight = - pgf.Page1.Label.DefLeft = - pgf.Page1.Label.DefTop = - pgf.Page1.Label.DefWidth = - pgf.Page1.Label.DisabledBackColor = 240,240,240 - pgf.Page1.Label.DisabledForeColor = 109,109,109 - pgf.Page1.Label.DragIcon = ..\..\ - pgf.Page1.Label.DragMode = 0 - pgf.Page1.Label.Enabled = .T. - pgf.Page1.Label.FontBold = .F. - pgf.Page1.Label.FontCondense = .F. - pgf.Page1.Label.FontExtend = .F. - pgf.Page1.Label.FontItalic = .F. - pgf.Page1.Label.FontName = "Arial" - pgf.Page1.Label.FontOutline = .F. - pgf.Page1.Label.FontShadow = .F. - pgf.Page1.Label.FontSize = 8 - pgf.Page1.Label.FontStrikethru = .F. - pgf.Page1.Label.FontUnderline = .F. - pgf.Page1.Label.ForeColor = 0,0,0 - pgf.Page1.Label.Height = (17) - pgf.Page1.Label.HelpContextID = 0 - pgf.Page1.Label.Left = (6) - pgf.Page1.Label.MouseIcon = ..\..\ - pgf.Page1.Label.MousePointer = 0 - pgf.Page1.Label.Name = "Label" - pgf.Page1.Label.OLEDragMode = 0 - pgf.Page1.Label.OLEDragPicture = ..\..\ - pgf.Page1.Label.OLEDropEffects = 3 - pgf.Page1.Label.OLEDropMode = 0 - pgf.Page1.Label.RightToLeft = .F. - pgf.Page1.Label.Rotation = 0 - pgf.Page1.Label.StatusBarText = "" - pgf.Page1.Label.Style = 0 - pgf.Page1.Label.TabIndex = 7 - pgf.Page1.Label.Tag = "" - pgf.Page1.Label.test_aa = .F. - pgf.Page1.Label.ToolTipText = "" - pgf.Page1.Label.Top = (136) - pgf.Page1.Label.Visible = .T. - pgf.Page1.Label.WhatsThisHelpID = -1 - pgf.Page1.Label.Width = (104) - pgf.Page1.Label.WordWrap = .F. - pgf.Page1.Line.Anchor = 0 - pgf.Page1.Line.BorderColor = 255,0,0 - pgf.Page1.Line.BorderStyle = 1 - pgf.Page1.Line.BorderWidth = 1 - pgf.Page1.Line.ColorSource = 4 - pgf.Page1.Line.Comment = "" - pgf.Page1.Line.DefHeight = - pgf.Page1.Line.DefLeft = - pgf.Page1.Line.DefTop = - pgf.Page1.Line.DefWidth = - pgf.Page1.Line.DragIcon = ..\..\ - pgf.Page1.Line.DragMode = 0 - pgf.Page1.Line.DrawMode = 13 - pgf.Page1.Line.Enabled = .T. - pgf.Page1.Line.Height = (8) - pgf.Page1.Line.HelpContextID = 0 - pgf.Page1.Line.Left = (121) - pgf.Page1.Line.LineSlant = "\" - pgf.Page1.Line.MouseIcon = ..\..\ - pgf.Page1.Line.MousePointer = 0 - pgf.Page1.Line.Name = "Line" - pgf.Page1.Line.OLEDragMode = 0 - pgf.Page1.Line.OLEDragPicture = ..\..\ - pgf.Page1.Line.OLEDropEffects = 3 - pgf.Page1.Line.OLEDropMode = 0 - pgf.Page1.Line.PolyPoints = "" - pgf.Page1.Line.Rotation = 0 - pgf.Page1.Line.StatusBarText = "" - pgf.Page1.Line.Tag = "" - pgf.Page1.Line.test_aa = .F. - pgf.Page1.Line.ToolTipText = "" - pgf.Page1.Line.Top = (136) - pgf.Page1.Line.Visible = .T. - pgf.Page1.Line.WhatsThisHelpID = -1 - pgf.Page1.Line.Width = (50) - pgf.Page1.ListBox.Anchor = 0 - pgf.Page1.ListBox.AutoHideScrollbar = 0 - pgf.Page1.ListBox.BorderColor = 128,255,128 - pgf.Page1.ListBox.BoundColumn = 1 - pgf.Page1.ListBox.BoundTo = .F. - pgf.Page1.ListBox.ColorScheme = 1 - pgf.Page1.ListBox.ColorSource = 4 - pgf.Page1.ListBox.ColumnCount = 0 - pgf.Page1.ListBox.ColumnLines = .T. - pgf.Page1.ListBox.ColumnWidths = "" - pgf.Page1.ListBox.Comment = "" - pgf.Page1.ListBox.ControlSource = "" - pgf.Page1.ListBox.DefHeight = - pgf.Page1.ListBox.DefLeft = - pgf.Page1.ListBox.DefTop = - pgf.Page1.ListBox.DefWidth = - pgf.Page1.ListBox.DisabledBackColor = 255,255,255 - pgf.Page1.ListBox.DisabledForeColor = 109,109,109 - pgf.Page1.ListBox.DisabledItemBackColor = 255,255,255 - pgf.Page1.ListBox.DisabledItemForeColor = 109,109,109 - pgf.Page1.ListBox.DisplayValue = - pgf.Page1.ListBox.DragIcon = ..\..\ - pgf.Page1.ListBox.DragMode = 0 - pgf.Page1.ListBox.Enabled = .T. - pgf.Page1.ListBox.FirstElement = 1 - pgf.Page1.ListBox.FontBold = .F. - pgf.Page1.ListBox.FontCondense = .F. - pgf.Page1.ListBox.FontExtend = .F. - pgf.Page1.ListBox.FontItalic = .F. - pgf.Page1.ListBox.FontName = "Arial" - pgf.Page1.ListBox.FontOutline = .F. - pgf.Page1.ListBox.FontShadow = .F. - pgf.Page1.ListBox.FontSize = 8 - pgf.Page1.ListBox.FontStrikethru = .F. - pgf.Page1.ListBox.FontUnderline = .F. - pgf.Page1.ListBox.Height = (60) - pgf.Page1.ListBox.HelpContextID = 0 - pgf.Page1.ListBox.IncrementalSearch = .T. - pgf.Page1.ListBox.IntegralHeight = .F. - pgf.Page1.ListBox.ItemBackColor = 255,255,255 - pgf.Page1.ListBox.ItemForeColor = 0,0,0 - pgf.Page1.ListBox.ItemTips = .F. - pgf.Page1.ListBox.Left = (7) - pgf.Page1.ListBox.MouseIcon = ..\..\ - pgf.Page1.ListBox.MousePointer = 0 - pgf.Page1.ListBox.MoverBars = .F. - pgf.Page1.ListBox.MultiSelect = .F. - pgf.Page1.ListBox.Name = "ListBox" - pgf.Page1.ListBox.NullDisplay = "" - pgf.Page1.ListBox.OLEDragMode = 0 - pgf.Page1.ListBox.OLEDragPicture = ..\..\ - pgf.Page1.ListBox.OLEDropEffects = 3 - pgf.Page1.ListBox.OLEDropMode = 0 - pgf.Page1.ListBox.Picture = ..\..\ - pgf.Page1.ListBox.RightToLeft = .F. - pgf.Page1.ListBox.RowSource = "" - pgf.Page1.ListBox.RowSourceType = 0 - pgf.Page1.ListBox.SelectedItemBackColor = 51,153,255 - pgf.Page1.ListBox.SelectedItemForeColor = 255,255,255 - pgf.Page1.ListBox.Sorted = .F. - pgf.Page1.ListBox.SpecialEffect = 1 - pgf.Page1.ListBox.StatusBarText = "" - pgf.Page1.ListBox.TabIndex = 8 - pgf.Page1.ListBox.TabStop = .T. - pgf.Page1.ListBox.Tag = "" - pgf.Page1.ListBox.TerminateRead = .F. - pgf.Page1.ListBox.test_aa = .F. - pgf.Page1.ListBox.Themes = .T. - pgf.Page1.ListBox.ToolTipText = "" - pgf.Page1.ListBox.Top = (164) - pgf.Page1.ListBox.Value = - pgf.Page1.ListBox.Visible = .T. - pgf.Page1.ListBox.WhatsThisHelpID = -1 - pgf.Page1.ListBox.Width = (224) - pgf.Page1.Name = "Page1" - pgf.Page1.option.Alignment = 0 - pgf.Page1.option.Anchor = 0 - pgf.Page1.option.AutoSize = .F. - pgf.Page1.option.BackColor = 240,240,240 - pgf.Page1.option.BackStyle = 1 - pgf.Page1.option.Caption = "Esta es la opción B" - pgf.Page1.option.ColorScheme = 1 - pgf.Page1.option.ColorSource = 4 - pgf.Page1.option.Comment = "" - pgf.Page1.option.ControlSource = "" - pgf.Page1.option.DefHeight = - pgf.Page1.option.DefLeft = - pgf.Page1.option.DefTop = - pgf.Page1.option.DefWidth = - pgf.Page1.option.DisabledBackColor = 240,240,240 - pgf.Page1.option.DisabledForeColor = 109,109,109 - pgf.Page1.option.DisabledPicture = ..\..\ - pgf.Page1.option.DownPicture = ..\..\ - pgf.Page1.option.DragIcon = ..\..\ - pgf.Page1.option.DragMode = 0 - pgf.Page1.option.Enabled = .T. - pgf.Page1.option.FontBold = .F. - pgf.Page1.option.FontCharSet = 0 - pgf.Page1.option.FontCondense = .F. - pgf.Page1.option.FontExtend = .F. - pgf.Page1.option.FontItalic = .F. - pgf.Page1.option.FontName = "Arial" - pgf.Page1.option.FontOutline = .F. - pgf.Page1.option.FontShadow = .F. - pgf.Page1.option.FontSize = 8 - pgf.Page1.option.FontStrikethru = .F. - pgf.Page1.option.FontUnderline = .F. - pgf.Page1.option.ForeColor = 0,0,0 - pgf.Page1.option.Height = (16) - pgf.Page1.option.HelpContextID = 0 - pgf.Page1.option.Left = (123) - pgf.Page1.option.MouseIcon = ..\..\ - pgf.Page1.option.MousePointer = 0 - pgf.Page1.option.Name = "option" - pgf.Page1.option.OLEDragMode = 0 - pgf.Page1.option.OLEDragPicture = ..\..\ - pgf.Page1.option.OLEDropEffects = 3 - pgf.Page1.option.OLEDropMode = 0 - pgf.Page1.option.Picture = ..\..\ - pgf.Page1.option.PictureMargin = 0 - pgf.Page1.option.PicturePosition = 13 - pgf.Page1.option.PictureSpacing = 0 - pgf.Page1.option.RightToLeft = .F. - pgf.Page1.option.SpecialEffect = 0 - pgf.Page1.option.StatusBarText = "" - pgf.Page1.option.Style = 0 - pgf.Page1.option.TabIndex = 1 - pgf.Page1.option.TabStop = .T. - pgf.Page1.option.Tag = "" - pgf.Page1.option.TerminateRead = .F. - pgf.Page1.option.test_aa = .F. - pgf.Page1.option.Themes = .T. - pgf.Page1.option.ToolTipText = "" - pgf.Page1.option.Top = (232) - pgf.Page1.option.Value = 0 - pgf.Page1.option.Visible = .T. - pgf.Page1.option.WhatsThisHelpID = -1 - pgf.Page1.option.Width = (110) - pgf.Page1.option.WordWrap = .F. - pgf.Page1.OptionGroup.Anchor = 0 - pgf.Page1.OptionGroup.AutoSize = .F. - pgf.Page1.OptionGroup.BackColor = 240,240,240 - pgf.Page1.OptionGroup.BackStyle = 1 - pgf.Page1.OptionGroup.BorderColor = 100,100,100 - pgf.Page1.OptionGroup.BorderStyle = 1 - pgf.Page1.OptionGroup.ButtonCount = 2 - pgf.Page1.OptionGroup.ColorSource = 4 - pgf.Page1.OptionGroup.Comment = "" - pgf.Page1.OptionGroup.ControlSource = "" - pgf.Page1.OptionGroup.DefHeight = - pgf.Page1.OptionGroup.DefLeft = - pgf.Page1.OptionGroup.DefTop = - pgf.Page1.OptionGroup.DefWidth = - pgf.Page1.OptionGroup.DragIcon = ..\..\ - pgf.Page1.OptionGroup.DragMode = 0 - pgf.Page1.OptionGroup.Enabled = .T. - pgf.Page1.OptionGroup.Height = (46) - pgf.Page1.OptionGroup.HelpContextID = 0 - pgf.Page1.OptionGroup.Left = (7) - pgf.Page1.OptionGroup.MemberClassLibrary = ..\..\ - pgf.Page1.OptionGroup.MouseIcon = ..\..\ - pgf.Page1.OptionGroup.MousePointer = 0 - pgf.Page1.OptionGroup.Name = "OptionGroup" - pgf.Page1.OptionGroup.OLEDragMode = 0 - pgf.Page1.OptionGroup.OLEDragPicture = ..\..\ - pgf.Page1.OptionGroup.OLEDropEffects = 3 - pgf.Page1.OptionGroup.OLEDropMode = 0 - pgf.Page1.OptionGroup.Option1.Height = 16 - pgf.Page1.OptionGroup.Option1.Left = 5 - pgf.Page1.OptionGroup.Option1.Name = "Option1" - pgf.Page1.OptionGroup.Option1.Top = 5 - pgf.Page1.OptionGroup.Option1.Width = 103 - pgf.Page1.OptionGroup.Option2.Height = 16 - pgf.Page1.OptionGroup.Option2.Left = 5 - pgf.Page1.OptionGroup.Option2.Name = "Option2" - pgf.Page1.OptionGroup.Option2.Top = 24 - pgf.Page1.OptionGroup.Option2.Value = 0 - pgf.Page1.OptionGroup.Option2.Width = 103 - pgf.Page1.OptionGroup.SpecialEffect = 0 - pgf.Page1.OptionGroup.StatusBarText = "" - pgf.Page1.OptionGroup.TabIndex = 1 - pgf.Page1.OptionGroup.Tag = "" - pgf.Page1.OptionGroup.TerminateRead = .F. - pgf.Page1.OptionGroup.test_aa = .F. - pgf.Page1.OptionGroup.Themes = .T. - pgf.Page1.OptionGroup.ToolTipText = "" - pgf.Page1.OptionGroup.Top = (232) - pgf.Page1.OptionGroup.Value = 0 - pgf.Page1.OptionGroup.Visible = .T. - pgf.Page1.OptionGroup.WhatsThisHelpID = -1 - pgf.Page1.OptionGroup.Width = (112) - pgf.Page1.Pageframe1.ActivePage = 1 - pgf.Page1.Pageframe1.Anchor = 0 - pgf.Page1.Pageframe1.Cl_page1.Name = "Cl_page1" - pgf.Page1.Pageframe1.Cl_page2.Name = "Cl_page2" - pgf.Page1.Pageframe1.ColorSource = 4 - pgf.Page1.Pageframe1.Comment = "" - pgf.Page1.Pageframe1.DefHeight = - pgf.Page1.Pageframe1.DefLeft = - pgf.Page1.Pageframe1.DefTop = - pgf.Page1.Pageframe1.DefWidth = - pgf.Page1.Pageframe1.DragIcon = ..\..\ - pgf.Page1.Pageframe1.DragMode = 0 - pgf.Page1.Pageframe1.Enabled = .T. - pgf.Page1.Pageframe1.ErasePage = .T. - pgf.Page1.Pageframe1.Height = (61) - pgf.Page1.Pageframe1.HelpContextID = 0 - pgf.Page1.Pageframe1.Left = (135) - pgf.Page1.Pageframe1.MemberClassLibrary = lib_controles.vcx - pgf.Page1.Pageframe1.MouseIcon = ..\..\ - pgf.Page1.Pageframe1.MousePointer = 0 - pgf.Page1.Pageframe1.Name = "Pageframe1" - pgf.Page1.Pageframe1.OLEDragMode = 0 - pgf.Page1.Pageframe1.OLEDragPicture = ..\..\ - pgf.Page1.Pageframe1.OLEDropEffects = 3 - pgf.Page1.Pageframe1.OLEDropMode = 0 - pgf.Page1.Pageframe1.PageCount = 2 - pgf.Page1.Pageframe1.RightToLeft = .F. - pgf.Page1.Pageframe1.StatusBarText = "" - pgf.Page1.Pageframe1.TabIndex = 10 - pgf.Page1.Pageframe1.TabOrientation = 2 - pgf.Page1.Pageframe1.Tabs = .T. - pgf.Page1.Pageframe1.TabStop = .T. - pgf.Page1.Pageframe1.TabStretch = 1 - pgf.Page1.Pageframe1.TabStyle = 0 - pgf.Page1.Pageframe1.Tag = "" - pgf.Page1.Pageframe1.Themes = .F. - pgf.Page1.Pageframe1.ToolTipText = "" - pgf.Page1.Pageframe1.Top = (284) - pgf.Page1.Pageframe1.Visible = .T. - pgf.Page1.Pageframe1.WhatsThisHelpID = -1 - pgf.Page1.Pageframe1.Width = (117) - pgf.Page1.PageOrder = 1 - pgf.Page1.Spinner.Alignment = 1 - pgf.Page1.Spinner.Anchor = 0 - pgf.Page1.Spinner.BackColor = 255,255,255 - pgf.Page1.Spinner.BorderColor = 128,255,128 - pgf.Page1.Spinner.BorderStyle = 1 - pgf.Page1.Spinner.ColorScheme = 1 - pgf.Page1.Spinner.ColorSource = 4 - pgf.Page1.Spinner.Comment = "" - pgf.Page1.Spinner.ControlSource = "" - pgf.Page1.Spinner.DefHeight = - pgf.Page1.Spinner.DefLeft = - pgf.Page1.Spinner.DefTop = - pgf.Page1.Spinner.DefWidth = - pgf.Page1.Spinner.DisabledBackColor = 240,240,240 - pgf.Page1.Spinner.DisabledForeColor = 109,109,109 - pgf.Page1.Spinner.DragIcon = ..\..\ - pgf.Page1.Spinner.DragMode = 0 - pgf.Page1.Spinner.Enabled = .T. - pgf.Page1.Spinner.FontBold = .F. - pgf.Page1.Spinner.FontCondense = .F. - pgf.Page1.Spinner.FontExtend = .F. - pgf.Page1.Spinner.FontItalic = .F. - pgf.Page1.Spinner.FontName = "Arial" - pgf.Page1.Spinner.FontOutline = .F. - pgf.Page1.Spinner.FontShadow = .F. - pgf.Page1.Spinner.FontSize = 8 - pgf.Page1.Spinner.FontStrikethru = .F. - pgf.Page1.Spinner.FontUnderline = .F. - pgf.Page1.Spinner.ForeColor = 0,0,0 - pgf.Page1.Spinner.Format = "" - pgf.Page1.Spinner.Height = (19) - pgf.Page1.Spinner.HelpContextID = 0 - pgf.Page1.Spinner.HideSelection = .T. - pgf.Page1.Spinner.Increment = 1.00 - pgf.Page1.Spinner.InputMask = "" - pgf.Page1.Spinner.KeyboardHighValue = 2147483647 - pgf.Page1.Spinner.KeyboardLowValue = -2147483647 - pgf.Page1.Spinner.Left = (11) - pgf.Page1.Spinner.Margin = 0 - pgf.Page1.Spinner.MouseIcon = ..\..\ - pgf.Page1.Spinner.MousePointer = 0 - pgf.Page1.Spinner.Name = "Spinner" - pgf.Page1.Spinner.NullDisplay = "" - pgf.Page1.Spinner.OLEDragMode = 0 - pgf.Page1.Spinner.OLEDragPicture = ..\..\ - pgf.Page1.Spinner.OLEDropEffects = 3 - pgf.Page1.Spinner.OLEDropMode = 0 - pgf.Page1.Spinner.OLEDropTextInsertion = 0 - pgf.Page1.Spinner.ReadOnly = .F. - pgf.Page1.Spinner.RightToLeft = .F. - pgf.Page1.Spinner.SelectedBackColor = 51,153,255 - pgf.Page1.Spinner.SelectedForeColor = 255,255,255 - pgf.Page1.Spinner.SelectOnEntry = .F. - pgf.Page1.Spinner.SpecialEffect = 1 - pgf.Page1.Spinner.SpinnerHighValue = 2147483647.00 - pgf.Page1.Spinner.SpinnerLowValue = -2147483647.00 - pgf.Page1.Spinner.StatusBarText = "" - pgf.Page1.Spinner.TabIndex = 9 - pgf.Page1.Spinner.TabStop = .T. - pgf.Page1.Spinner.Tag = "" - pgf.Page1.Spinner.TerminateRead = .F. - pgf.Page1.Spinner.test_aa = .F. - pgf.Page1.Spinner.Themes = .T. - pgf.Page1.Spinner.ToolTipText = "" - pgf.Page1.Spinner.Top = (292) - pgf.Page1.Spinner.Value = 0 - pgf.Page1.Spinner.Visible = .T. - pgf.Page1.Spinner.WhatsThisHelpID = -1 - pgf.Page1.Spinner.Width = (108) - pgf.Page1.TextBox.Alignment = 3 - pgf.Page1.TextBox.Anchor = 0 - pgf.Page1.TextBox.AutoComplete = 0 - pgf.Page1.TextBox.AutoCompSource = "" - pgf.Page1.TextBox.AutoCompTable = "" - pgf.Page1.TextBox.BackColor = 255,255,255 - pgf.Page1.TextBox.BackStyle = 1 - pgf.Page1.TextBox.BorderColor = 128,255,128 - pgf.Page1.TextBox.BorderStyle = 1 - pgf.Page1.TextBox.Century = 1 - pgf.Page1.TextBox.ColorScheme = 1 - pgf.Page1.TextBox.ColorSource = 4 - pgf.Page1.TextBox.Comment = "" - pgf.Page1.TextBox.ControlSource = "" - pgf.Page1.TextBox.DateFormat = 0 - pgf.Page1.TextBox.DateMark = "" - pgf.Page1.TextBox.DefHeight = - pgf.Page1.TextBox.DefLeft = - pgf.Page1.TextBox.DefTop = - pgf.Page1.TextBox.DefWidth = - pgf.Page1.TextBox.DisabledBackColor = 240,240,240 - pgf.Page1.TextBox.DisabledForeColor = 109,109,109 - pgf.Page1.TextBox.DragIcon = ..\..\ - pgf.Page1.TextBox.DragMode = 0 - pgf.Page1.TextBox.Enabled = .T. - pgf.Page1.TextBox.EnableHyperlinks = .F. - pgf.Page1.TextBox.FontBold = .F. - pgf.Page1.TextBox.FontCondense = .F. - pgf.Page1.TextBox.FontExtend = .F. - pgf.Page1.TextBox.FontItalic = .F. - pgf.Page1.TextBox.FontName = "Arial" - pgf.Page1.TextBox.FontOutline = .F. - pgf.Page1.TextBox.FontShadow = .F. - pgf.Page1.TextBox.FontSize = 8 - pgf.Page1.TextBox.FontStrikethru = .F. - pgf.Page1.TextBox.FontUnderline = .F. - pgf.Page1.TextBox.ForeColor = 0,0,0 - pgf.Page1.TextBox.Format = "" - pgf.Page1.TextBox.Height = (19) - pgf.Page1.TextBox.HelpContextID = 0 - pgf.Page1.TextBox.HideSelection = .T. - pgf.Page1.TextBox.Hours = 0 - pgf.Page1.TextBox.IMEMode = 0 - pgf.Page1.TextBox.InputMask = "" - pgf.Page1.TextBox.IntegralHeight = .F. - pgf.Page1.TextBox.Left = (11) - pgf.Page1.TextBox.Margin = 0 - pgf.Page1.TextBox.MaxLength = 0 - pgf.Page1.TextBox.MemoWindow = "" - pgf.Page1.TextBox.MouseIcon = ..\..\ - pgf.Page1.TextBox.MousePointer = 0 - pgf.Page1.TextBox.Name = "TextBox" - pgf.Page1.TextBox.NullDisplay = "" - pgf.Page1.TextBox.OLEDragMode = 0 - pgf.Page1.TextBox.OLEDragPicture = ..\..\ - pgf.Page1.TextBox.OLEDropEffects = 3 - pgf.Page1.TextBox.OLEDropMode = 0 - pgf.Page1.TextBox.OLEDropTextInsertion = 0 - pgf.Page1.TextBox.OpenWindow = .F. - pgf.Page1.TextBox.PasswordChar = "" - pgf.Page1.TextBox.ReadOnly = .F. - pgf.Page1.TextBox.RightToLeft = .F. - pgf.Page1.TextBox.Seconds = 2 - pgf.Page1.TextBox.SelectedBackColor = 51,153,255 - pgf.Page1.TextBox.SelectedForeColor = 255,255,255 - pgf.Page1.TextBox.SelectOnEntry = .F. - pgf.Page1.TextBox.SpecialEffect = 1 - pgf.Page1.TextBox.StatusBarText = "" - pgf.Page1.TextBox.StrictDateEntry = 1 - pgf.Page1.TextBox.Style = 0 - pgf.Page1.TextBox.TabIndex = 1 - pgf.Page1.TextBox.TabStop = .T. - pgf.Page1.TextBox.Tag = "" - pgf.Page1.TextBox.TerminateRead = .F. - pgf.Page1.TextBox.test_aa = .F. - pgf.Page1.TextBox.Themes = .T. - pgf.Page1.TextBox.ToolTipText = "" - pgf.Page1.TextBox.Top = (320) - pgf.Page1.TextBox.Value = - pgf.Page1.TextBox.Visible = .T. - pgf.Page1.TextBox.WhatsThisHelpID = -1 - pgf.Page1.TextBox.Width = (108) - pgf.Page1.Timer.Comment = "no comment" - pgf.Page1.Timer.DefHeight = - pgf.Page1.Timer.DefLeft = - pgf.Page1.Timer.DefTop = - pgf.Page1.Timer.DefWidth = - pgf.Page1.Timer.Enabled = .T. - pgf.Page1.Timer.Height = (23) - pgf.Page1.Timer.Interval = 0 - pgf.Page1.Timer.Left = (207) - pgf.Page1.Timer.Name = "Timer" - pgf.Page1.Timer.test_aa = .F. - pgf.Page1.Timer.Top = (252) - pgf.Page1.Timer.Width = (23) - pgf.Page2.Name = "Page2" - pgf.Page2.PageOrder = 2 - pgf.PageCount = 2 - pgf.RightToLeft = .F. - pgf.TabIndex = 7 - pgf.TabOrientation = 1 - pgf.Tabs = .T. - pgf.TabStop = .T. - pgf.TabStretch = 1 - pgf.TabStyle = 0 - pgf.Tag = "" - pgf.test_aa = .F. - pgf.Themes = .T. - pgf.ToolTipText = "" - pgf.Top = 28 - pgf.Visible = .T. - pgf.WhatsThisHelpID = -1 - pgf.Width = 268 - Image1.Height = 104 - Image1.Name = "Image1" - Image1.Width = 212 - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_form_controles.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_form_controles.dataenvironment.sc2 new file mode 100644 index 0000000..29b3fcb --- /dev/null +++ b/TESTS/DATOS_READONLY/f_form_controles.dataenvironment.sc2 @@ -0,0 +1,17 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_form_controles.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Name = "Dataenvironment" + TabStop = .F. + Visible = .F. + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_form_controles.f_base1.sc2 b/TESTS/DATOS_READONLY/f_form_controles.f_base1.sc2 new file mode 100644 index 0000000..1a5ace2 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_form_controles.f_base1.sc2 @@ -0,0 +1,3128 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_form_controles.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Label4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Line1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Label4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Line1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Spinner1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Label5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Shape2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Line2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image7" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image8" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image9" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image10" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Spinner2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Spinner1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Label5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Shape2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Line2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image7" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image8" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image9" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image10" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Spinner2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Label4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Line1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Spinner1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Label5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Shape2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Line2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image7" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image8" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image9" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image10" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Spinner2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_label1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_line1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_spinner1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_label2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_shape2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_line2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image7" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image8" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image9" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image10" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_spinner2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Timer1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_timer1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Hyperlink1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_hyperlink1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_collection1" UniqueID="" Timestamp="" /> + + * + AllowOutput = .T. + AlwaysOnBottom = .F. + AlwaysOnTop = .T. + AutoCenter = .F. + BackColor = 192,192,192 + BindControls = .T. + BorderStyle = 3 + BufferMode = 0 + Caption = "Form_y_Controles_Varios_Test" + ClipControls = .T. + Closable = .T. + ColorSource = 4 + Comment = "" + ContinuousScroll = .T. + ControlBox = .T. + DataSession = 1 + DEClass = "cl_dataenvironment" + DEClassLibrary = lib_controles.vcx + DefHeight = + DefLeft = + DefOleLCID = 0 + DefTop = + DefWidth = + Desktop = .F. + Dockable = 0 + DoCreate = .T. + DrawMode = 13 + DrawStyle = 0 + DrawWidth = 1 + Enabled = .T. + FillColor = 0,0,0 + FillStyle = 1 + FontBold = .F. + FontCharSet = 0 + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 8 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + HalfHeightCaption = .F. + Height = (424) + HelpContextID = 0 + HScrollSmallChange = 10 + Icon = bmps\container.ico + KeyPreview = .F. + Left = (2) + LockScreen = .F. + MacDesktop = 0 + MaxButton = .T. + MaxHeight = -1 + MaxLeft = -1 + MaxTop = -1 + MaxWidth = -1 + MDIForm = .F. + MinButton = .T. + MinHeight = -1 + MinWidth = -1 + MouseIcon = ..\..\ + MousePointer = 0 + Movable = .T. + Name = "F_base1" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + Picture = bmps\fondogris.bmp + RightToLeft = .F. + ScaleMode = 3 + ScrollBars = 0 + ShowInTaskBar = .T. + ShowTips = .F. + ShowWindow = 0 + SizeBox = .F. + TabIndex = 1 + TabStop = .T. + Tag = "" + Themes = .T. + TitleBar = 1 + Top = (3) + Visible = .T. + VScrollSmallChange = 10 + WhatsThisButton = .F. + WhatsThisHelp = .F. + WhatsThisHelpID = -1 + Width = (819) + WindowState = 0 + WindowType = 0 + ZoomBox = .F. + Edit1.Name = "Edit1" + Edit1.RightToLeft = .F. + Label3.Name = "Label3" + Label3.RightToLeft = .F. + cmdCapturar.Name = "cmdCapturar" + cmdCapturar.RightToLeft = .F. + Label1.Caption = "CONTROL NORMAL" + Label1.Name = "Label1" + Label1.RightToLeft = .F. + Label2.Caption = "CONTROL SUBCLASADOS" + Label2.Name = "Label2" + Label2.RightToLeft = .F. + * + + ADD OBJECT 'Cl_collection1' AS cl_collection WITH ; + Left = 325, ; + Name = "Cl_collection1", ; + Top = 390 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="collection" /> + + ADD OBJECT 'Cl_hyperlink1' AS cl_hyperlink WITH ; + Comment = "", ; + Left = 362, ; + Name = "Cl_hyperlink1", ; + Tag = "", ; + Top = 390 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="hyperlink" /> + + ADD OBJECT 'Cl_image1' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 16, ; + HelpContextID = 0, ; + Left = 312, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image10' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 496, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image10", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 132, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image2' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 32, ; + HelpContextID = 0, ; + Left = 312, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image3' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 388, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image4' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 52, ; + HelpContextID = 0, ; + Left = 348, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image5' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 388, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 132, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image6' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 420, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image7' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 32, ; + HelpContextID = 0, ; + Left = 420, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image7", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image8' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 496, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image8", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image9' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 52, ; + HelpContextID = 0, ; + Left = 456, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image9", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_label1' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 312, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_label1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 40, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'Cl_label2' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 420, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_label2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 40, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'Cl_line1' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Height = 8, ; + HelpContextID = 0, ; + Left = 312, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_line1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 80, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'Cl_line2' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + Height = 8, ; + HelpContextID = 0, ; + Left = 420, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_line2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 80, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'Cl_pageframe1' AS cl_pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = 188, ; + HelpContextID = 0, ; + Left = 292, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_pageframe1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 3, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabOrientation = 0, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 200, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 256, ; + Page1.Name = "Page1", ; + Page2.Name = "Page2", ; + Page3.Caption = "Page3", ; + Page3.Name = "Page3" + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image1' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 16, ; + HelpContextID = 0, ; + Left = 19, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image10' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 203, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image10", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image2' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 32, ; + HelpContextID = 0, ; + Left = 19, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 88, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image3' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 95, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image4' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 52, ; + HelpContextID = 0, ; + Left = 55, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image5' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 95, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image6' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 127, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image7' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 32, ; + HelpContextID = 0, ; + Left = 127, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image7", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 88, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image8' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 203, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image8", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image9' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 52, ; + HelpContextID = 0, ; + Left = 163, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image9", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Label4' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 19, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 8, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Label5' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 127, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 8, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Line1' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Height = 8, ; + HelpContextID = 0, ; + Left = 19, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 48, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Line2' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + Height = 8, ; + HelpContextID = 0, ; + Left = 127, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 48, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Shape1' AS cl_shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 19, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Shape2' AS cl_shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 127, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Spinner1' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 19, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 128, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Spinner2' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 127, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 128, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'Cl_shape1' AS cl_shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 312, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 60, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> + + ADD OBJECT 'Cl_shape2' AS cl_shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 420, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_shape2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 60, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> + + ADD OBJECT 'Cl_spinner1' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 312, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_spinner1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 160, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'Cl_spinner2' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 420, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_spinner2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 160, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'Cl_timer1' AS cl_timer WITH ; + Comment = "", ; + Enabled = .T., ; + Height = 23, ; + Interval = 0, ; + Left = 292, ; + Name = "Cl_timer1", ; + Tag = "", ; + Top = 392, ; + Width = 23 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="timer" /> + + ADD OBJECT 'Hyperlink1' AS hyperlink WITH ; + Comment = "", ; + Height = 23, ; + Left = 72, ; + Name = "Hyperlink1", ; + Tag = "", ; + Top = 392, ; + Width = 23 + *< END OBJECT: BaseClass="hyperlink" /> + + ADD OBJECT 'Image1' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = (16), ; + HelpContextID = 0, ; + Left = (44), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = (100), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (17) + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image10' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 228, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image10", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 132, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image2' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 32, ; + HelpContextID = 0, ; + Left = 44, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image3' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 120, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image4' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 52, ; + HelpContextID = 0, ; + Left = 80, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image5' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 120, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 132, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image6' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 152, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image7' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 32, ; + HelpContextID = 0, ; + Left = 152, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image7", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image8' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 228, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image8", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image9' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 52, ; + HelpContextID = 0, ; + Left = 188, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image9", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Label4' AS label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (17), ; + HelpContextID = 0, ; + Left = (44), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = (40), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (104), ; + WordWrap = .F. + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Label5' AS label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 152, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 40, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Line1' AS line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Height = (8), ; + HelpContextID = 0, ; + Left = (44), ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = (80), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (104) + *< END OBJECT: BaseClass="line" /> + + ADD OBJECT 'Line2' AS line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + Height = 8, ; + HelpContextID = 0, ; + Left = 152, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 80, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="line" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = (189), ; + HelpContextID = 0, ; + Left = (20), ; + MemberClass = "cl_page", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Pageframe1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 3, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabOrientation = 0, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = (200), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (256), ; + Cl_page1.Name = "Cl_page1", ; + Cl_page2.Name = "Cl_page2", ; + Cl_page3.Name = "Cl_page3" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image1' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 16, ; + HelpContextID = 0, ; + Left = 23, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image10' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 207, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image10", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image2' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 32, ; + HelpContextID = 0, ; + Left = 23, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 88, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image3' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 99, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image4' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 52, ; + HelpContextID = 0, ; + Left = 59, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image5' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 99, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image6' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 131, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image7' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 32, ; + HelpContextID = 0, ; + Left = 131, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image7", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 88, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image8' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 207, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image8", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image9' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 52, ; + HelpContextID = 0, ; + Left = 167, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image9", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Label4' AS label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 23, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 8, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Label5' AS label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 131, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 8, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Line1' AS line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Height = 8, ; + HelpContextID = 0, ; + Left = 23, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 48, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="line" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Line2' AS line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + Height = 8, ; + HelpContextID = 0, ; + Left = 131, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 48, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="line" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Shape1' AS shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 23, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Shape2' AS shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 131, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Spinner1' AS spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 23, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 128, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="spinner" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Spinner2' AS spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 131, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 128, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="spinner" /> + + ADD OBJECT 'Shape1' AS shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = (17), ; + HelpContextID = 0, ; + Left = (44), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = (60), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (105) + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'Shape2' AS shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 152, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 60, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'Spinner1' AS spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (24), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = (44), ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (160), ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (104) + *< END OBJECT: BaseClass="spinner" /> + + ADD OBJECT 'Spinner2' AS spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 152, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 160, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="spinner" /> + + ADD OBJECT 'Timer1' AS timer WITH ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + Enabled = .T., ; + Height = (23), ; + Interval = 0, ; + Left = (24), ; + Name = "Timer1", ; + Tag = "", ; + Top = (392), ; + Width = (23) + *< END OBJECT: BaseClass="timer" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_form_controles.sc2 b/TESTS/DATOS_READONLY/f_form_controles.sc2 index a90be08..6bada67 100644 --- a/TESTS/DATOS_READONLY/f_form_controles.sc2 +++ b/TESTS/DATOS_READONLY/f_form_controles.sc2 @@ -4,3134 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_form_controles.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_base1" Baseclass="form" /> - DataSource = .NULL. - Name = "Dataenvironment" - TabStop = .F. - Visible = .F. - -ENDDEFINE - -DEFINE CLASS f_base1 AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Label4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Line1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Label4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Line1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Spinner1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Label5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Shape2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Line2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image7" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image8" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image9" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image10" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Spinner2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Spinner1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Label5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Shape2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Line2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image7" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image8" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image9" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image10" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Spinner2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Label4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Line1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Spinner1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Label5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Shape2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Line2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image7" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image8" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image9" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image10" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Spinner2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_label1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_line1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_spinner1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_label2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_shape2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_line2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image7" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image8" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image9" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image10" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_spinner2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Timer1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_timer1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Hyperlink1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_hyperlink1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_collection1" UniqueID="" Timestamp="" /> - - AllowOutput = .T. - AlwaysOnBottom = .F. - AlwaysOnTop = .T. - AutoCenter = .F. - BackColor = 192,192,192 - BindControls = .T. - BorderStyle = 3 - BufferMode = 0 - Caption = "Form_y_Controles_Varios_Test" - ClipControls = .T. - Closable = .T. - ColorSource = 4 - Comment = "" - ContinuousScroll = .T. - ControlBox = .T. - DataSession = 1 - DEClass = "cl_dataenvironment" - DEClassLibrary = lib_controles.vcx - DefHeight = - DefLeft = - DefOleLCID = 0 - DefTop = - DefWidth = - Desktop = .F. - Dockable = 0 - DoCreate = .T. - DrawMode = 13 - DrawStyle = 0 - DrawWidth = 1 - Enabled = .T. - FillColor = 0,0,0 - FillStyle = 1 - FontBold = .F. - FontCharSet = 0 - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 8 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - HalfHeightCaption = .F. - Height = (424) - HelpContextID = 0 - HScrollSmallChange = 10 - Icon = bmps\container.ico - KeyPreview = .F. - Left = (2) - LockScreen = .F. - MacDesktop = 0 - MaxButton = .T. - MaxHeight = -1 - MaxLeft = -1 - MaxTop = -1 - MaxWidth = -1 - MDIForm = .F. - MinButton = .T. - MinHeight = -1 - MinWidth = -1 - MouseIcon = ..\..\ - MousePointer = 0 - Movable = .T. - Name = "F_base1" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - Picture = bmps\fondogris.bmp - RightToLeft = .F. - ScaleMode = 3 - ScrollBars = 0 - ShowInTaskBar = .T. - ShowTips = .F. - ShowWindow = 0 - SizeBox = .F. - TabIndex = 1 - TabStop = .T. - Tag = "" - Themes = .T. - TitleBar = 1 - Top = (3) - Visible = .T. - VScrollSmallChange = 10 - WhatsThisButton = .F. - WhatsThisHelp = .F. - WhatsThisHelpID = -1 - Width = (819) - WindowState = 0 - WindowType = 0 - ZoomBox = .F. - Edit1.Name = "Edit1" - Edit1.RightToLeft = .F. - Label3.Name = "Label3" - Label3.RightToLeft = .F. - cmdCapturar.Name = "cmdCapturar" - cmdCapturar.RightToLeft = .F. - Label1.Caption = "CONTROL NORMAL" - Label1.Name = "Label1" - Label1.RightToLeft = .F. - Label2.Caption = "CONTROL SUBCLASADOS" - Label2.Name = "Label2" - Label2.RightToLeft = .F. - - ADD OBJECT 'Cl_collection1' AS cl_collection WITH ; - Left = 325, ; - Name = "Cl_collection1", ; - Top = 390 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="collection" /> - - ADD OBJECT 'Cl_hyperlink1' AS cl_hyperlink WITH ; - Comment = "", ; - Left = 362, ; - Name = "Cl_hyperlink1", ; - Tag = "", ; - Top = 390 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="hyperlink" /> - - ADD OBJECT 'Cl_image1' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 16, ; - HelpContextID = 0, ; - Left = 312, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image10' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 496, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image10", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 132, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image2' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 32, ; - HelpContextID = 0, ; - Left = 312, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image3' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 388, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image4' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 52, ; - HelpContextID = 0, ; - Left = 348, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image5' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 388, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 132, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image6' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 420, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image7' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 32, ; - HelpContextID = 0, ; - Left = 420, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image7", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image8' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 496, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image8", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image9' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 52, ; - HelpContextID = 0, ; - Left = 456, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image9", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_label1' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 312, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_label1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 40, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'Cl_label2' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 420, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_label2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 40, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'Cl_line1' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Height = 8, ; - HelpContextID = 0, ; - Left = 312, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_line1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 80, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'Cl_line2' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - Height = 8, ; - HelpContextID = 0, ; - Left = 420, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_line2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 80, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'Cl_pageframe1' AS cl_pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = 188, ; - HelpContextID = 0, ; - Left = 292, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_pageframe1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 3, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabOrientation = 0, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 200, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 256, ; - Page1.Name = "Page1", ; - Page2.Name = "Page2", ; - Page3.Caption = "Page3", ; - Page3.Name = "Page3" - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image1' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 16, ; - HelpContextID = 0, ; - Left = 19, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image10' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 203, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image10", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image2' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 32, ; - HelpContextID = 0, ; - Left = 19, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 88, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image3' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 95, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image4' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 52, ; - HelpContextID = 0, ; - Left = 55, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image5' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 95, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image6' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 127, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image7' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 32, ; - HelpContextID = 0, ; - Left = 127, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image7", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 88, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image8' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 203, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image8", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image9' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 52, ; - HelpContextID = 0, ; - Left = 163, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image9", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Label4' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 19, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 8, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Label5' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 127, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 8, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Line1' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Height = 8, ; - HelpContextID = 0, ; - Left = 19, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 48, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Line2' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - Height = 8, ; - HelpContextID = 0, ; - Left = 127, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 48, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Shape1' AS cl_shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 19, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Shape2' AS cl_shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 127, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Spinner1' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 19, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 128, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Spinner2' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 127, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 128, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'Cl_shape1' AS cl_shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 312, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 60, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> - - ADD OBJECT 'Cl_shape2' AS cl_shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 420, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_shape2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 60, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> - - ADD OBJECT 'Cl_spinner1' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 312, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_spinner1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 160, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'Cl_spinner2' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 420, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_spinner2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 160, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'Cl_timer1' AS cl_timer WITH ; - Comment = "", ; - Enabled = .T., ; - Height = 23, ; - Interval = 0, ; - Left = 292, ; - Name = "Cl_timer1", ; - Tag = "", ; - Top = 392, ; - Width = 23 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="timer" /> - - ADD OBJECT 'Hyperlink1' AS hyperlink WITH ; - Comment = "", ; - Height = 23, ; - Left = 72, ; - Name = "Hyperlink1", ; - Tag = "", ; - Top = 392, ; - Width = 23 - *< END OBJECT: BaseClass="hyperlink" /> - - ADD OBJECT 'Image1' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = (16), ; - HelpContextID = 0, ; - Left = (44), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = (100), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (17) - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image10' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 228, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image10", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 132, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image2' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 32, ; - HelpContextID = 0, ; - Left = 44, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image3' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 120, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image4' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 52, ; - HelpContextID = 0, ; - Left = 80, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image5' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 120, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 132, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image6' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 152, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image7' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 32, ; - HelpContextID = 0, ; - Left = 152, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image7", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image8' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 228, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image8", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image9' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 52, ; - HelpContextID = 0, ; - Left = 188, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image9", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Label4' AS label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (17), ; - HelpContextID = 0, ; - Left = (44), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = (40), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (104), ; - WordWrap = .F. - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Label5' AS label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 152, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 40, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Line1' AS line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Height = (8), ; - HelpContextID = 0, ; - Left = (44), ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = (80), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (104) - *< END OBJECT: BaseClass="line" /> - - ADD OBJECT 'Line2' AS line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - Height = 8, ; - HelpContextID = 0, ; - Left = 152, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 80, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="line" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = (189), ; - HelpContextID = 0, ; - Left = (20), ; - MemberClass = "cl_page", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Pageframe1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 3, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabOrientation = 0, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = (200), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (256), ; - Cl_page1.Name = "Cl_page1", ; - Cl_page2.Name = "Cl_page2", ; - Cl_page3.Name = "Cl_page3" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image1' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 16, ; - HelpContextID = 0, ; - Left = 23, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image10' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 207, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image10", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image2' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 32, ; - HelpContextID = 0, ; - Left = 23, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 88, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image3' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 99, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image4' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 52, ; - HelpContextID = 0, ; - Left = 59, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image5' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 99, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image6' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 131, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image7' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 32, ; - HelpContextID = 0, ; - Left = 131, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image7", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 88, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image8' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 207, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image8", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image9' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 52, ; - HelpContextID = 0, ; - Left = 167, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image9", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Label4' AS label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 23, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 8, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Label5' AS label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 131, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 8, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Line1' AS line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Height = 8, ; - HelpContextID = 0, ; - Left = 23, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 48, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="line" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Line2' AS line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - Height = 8, ; - HelpContextID = 0, ; - Left = 131, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 48, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="line" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Shape1' AS shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 23, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Shape2' AS shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 131, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Spinner1' AS spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 23, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 128, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="spinner" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Spinner2' AS spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 131, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 128, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="spinner" /> - - ADD OBJECT 'Shape1' AS shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = (17), ; - HelpContextID = 0, ; - Left = (44), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = (60), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (105) - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'Shape2' AS shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 152, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 60, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'Spinner1' AS spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (24), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = (44), ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (160), ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (104) - *< END OBJECT: BaseClass="spinner" /> - - ADD OBJECT 'Spinner2' AS spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 152, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 160, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="spinner" /> - - ADD OBJECT 'Timer1' AS timer WITH ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - Enabled = .T., ; - Height = (23), ; - Interval = 0, ; - Left = (24), ; - Name = "Timer1", ; - Tag = "", ; - Top = (392), ; - Width = (23) - *< END OBJECT: BaseClass="timer" /> - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_formset.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_formset.dataenvironment.sc2 new file mode 100644 index 0000000..a5eac1f --- /dev/null +++ b/TESTS/DATOS_READONLY/f_formset.dataenvironment.sc2 @@ -0,0 +1,48 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_formset.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="2" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" /> + + * + AutoCloseTables = .T. + AutoOpenTables = .T. + Comment = "" + DataSource = .NULL. + DataSourceType = "" + Height = 200 + InitialSelectedAlias = "" + Left = 1 + Name = "Dataenvironment" + OpenViews = 0 + Tag = "" + Top = 220 + Width = 520 + * + + ADD OBJECT 'Cursor1' AS cursor WITH ; + Alias = "encuestas", ; + BufferModeOverride = 1, ; + Comment = "", ; + CursorSource = encuestas.dbf, ; + Exclusive = .F., ; + Filter = "", ; + Height = 90, ; + Left = 10, ; + Name = "Cursor1", ; + NoDataOnLoad = .F., ; + Order = "", ; + OrderDirection = 0, ; + ReadOnly = .F., ; + Tag = "", ; + Top = 20, ; + Width = 90 + *< END OBJECT: BaseClass="cursor" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_formset.formset.sc2 b/TESTS/DATOS_READONLY/f_formset.formset.sc2 new file mode 100644 index 0000000..50da59d --- /dev/null +++ b/TESTS/DATOS_READONLY/f_formset.formset.sc2 @@ -0,0 +1,931 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_formset.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS formset AS formset + *< CLASSDATA: Baseclass="formset" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="F_base1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column1.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column1.Cl_header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column2.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column2.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column3.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column3.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column4.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column4.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column5.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column5.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Cl_grid1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column1.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column1.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column2.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column2.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column3.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column3.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column4.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column4.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column5.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column5.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.Cl_grid1" UniqueID="" Timestamp="" /> + + * + *p: c_testname + * + + * + AutoRelease = .T. + BufferMode = 0 + Comment = "" + c_testname = Formset_Test + DataSession = 2 + Name = "Formset" + ReadCycle = .T. + ReadLock = .T. + ReadMouse = .T. + ReadSave = .F. + ReadTimeout = 0 + Tag = "" + Visible = .T. + WindowList = "" + WindowType = 0 + * + + ADD OBJECT 'F_base1' AS f_base WITH ; + AllowOutput = .T., ; + AlwaysOnBottom = .F., ; + AlwaysOnTop = .T., ; + AutoCenter = .F., ; + BackColor = 192,192,192, ; + BindControls = .T., ; + BorderStyle = 3, ; + ClipControls = .T., ; + Closable = .T., ; + ColorSource = 4, ; + Comment = "", ; + ContinuousScroll = .T., ; + ControlBox = .T., ; + c_testname = Formset_Test, ; + DefHeight = , ; + DefLeft = , ; + DefOleLCID = 0, ; + DefTop = , ; + DefWidth = , ; + Desktop = .F., ; + Dockable = 0, ; + DoCreate = .T., ; + DrawMode = 13, ; + DrawStyle = 0, ; + DrawWidth = 1, ; + Enabled = .T., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + HalfHeightCaption = .F., ; + Height = (424), ; + HelpContextID = 0, ; + HScrollSmallChange = 10, ; + Icon = ..\..\, ; + KeyPreview = .F., ; + Left = (2), ; + LockScreen = .F., ; + MacDesktop = 0, ; + MaxButton = .T., ; + MaxHeight = -1, ; + MaxLeft = -1, ; + MaxTop = -1, ; + MaxWidth = -1, ; + MDIForm = .F., ; + MinButton = .T., ; + MinHeight = -1, ; + MinWidth = -1, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Movable = .T., ; + Name = "F_base1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + RightToLeft = .F., ; + ScaleMode = 3, ; + ScrollBars = 0, ; + ShowInTaskBar = .T., ; + ShowTips = .F., ; + ShowWindow = 0, ; + SizeBox = .F., ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + Themes = .T., ; + TitleBar = 1, ; + Top = (4), ; + Visible = .T., ; + VScrollSmallChange = 10, ; + WhatsThisButton = .F., ; + WhatsThisHelp = .F., ; + WhatsThisHelpID = -1, ; + Width = (819), ; + WindowState = 0, ; + WindowType = 0, ; + ZoomBox = .F., ; + Edit1.Name = "Edit1", ; + Edit1.RightToLeft = .F., ; + Label3.Name = "Label3", ; + Label3.RightToLeft = .F., ; + cmdCapturar.Name = "cmdCapturar", ; + cmdCapturar.RightToLeft = .F., ; + Label1.Name = "Label1", ; + Label1.RightToLeft = .F., ; + Label2.Name = "Label2", ; + Label2.RightToLeft = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="form" /> + + ADD OBJECT 'F_base1.Cl_grid1' AS cl_grid WITH ; + AllowAddNew = .F., ; + AllowAutoColumnFit = 0, ; + AllowCellSelection = .T., ; + AllowHeaderSizing = .T., ; + AllowRowSizing = .T., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + ChildOrder = "", ; + ColumnCount = 5, ; + Comment = "", ; + DeleteMark = .T., ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + GridLineColor = 0,0,0, ; + GridLines = 3, ; + GridLineWidth = 1, ; + HeaderHeight = 17, ; + Height = 160, ; + HelpContextID = 0, ; + Highlight = .T., ; + HighlightBackColor = 51,153,255, ; + HighlightForeColor = 255,255,255, ; + HighlightRow = .T., ; + HighlightRowLineWidth = 1, ; + HighlightStyle = 0, ; + Left = 308, ; + LinkMaster = "", ; + LockColumns = 0, ; + LockColumnsLeft = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_grid1", ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Optimize = .F., ; + Panel = 1, ; + PanelLink = .T., ; + Partition = 0, ; + ReadOnly = .F., ; + RecordMark = .T., ; + RecordSource = "encuestas", ; + RecordSourceType = 1, ; + RelationalExpr = "", ; + RightToLeft = .F., ; + RowHeight = 17, ; + ScrollBars = 3, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SplitBar = .T., ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 32, ; + Value = 0, ; + View = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Column1.BackColor = 255,255,255, ; + Column1.ControlSource = "", ; + Column1.Enabled = .T., ; + Column1.FontBold = .F., ; + Column1.FontCharSet = 0, ; + Column1.FontCondense = .F., ; + Column1.FontExtend = .F., ; + Column1.FontItalic = .F., ; + Column1.FontName = "Arial", ; + Column1.FontOutline = .F., ; + Column1.FontShadow = .F., ; + Column1.FontSize = 8, ; + Column1.FontStrikethru = .F., ; + Column1.FontUnderline = .F., ; + Column1.ForeColor = 0,0,0, ; + Column1.Header1.FontBold = .F., ; + Column1.Header1.FontCharSet = 0, ; + Column1.Header1.FontCondense = .F., ; + Column1.Header1.FontExtend = .F., ; + Column1.Header1.FontItalic = .F., ; + Column1.Header1.FontName = "Arial", ; + Column1.Header1.FontOutline = .F., ; + Column1.Header1.FontShadow = .F., ; + Column1.Header1.FontSize = 8, ; + Column1.Header1.FontStrikethru = .F., ; + Column1.Header1.FontUnderline = .F., ; + Column1.Header1.Name = "Header1", ; + Column1.Name = "Column1", ; + Column1.ReadOnly = .F., ; + Column1.Text1.BackColor = 255,255,255, ; + Column1.Text1.Enabled = .T., ; + Column1.Text1.FontBold = .F., ; + Column1.Text1.FontCharSet = 0, ; + Column1.Text1.FontCondense = .F., ; + Column1.Text1.FontExtend = .F., ; + Column1.Text1.FontItalic = .F., ; + Column1.Text1.FontName = "Arial", ; + Column1.Text1.FontOutline = .F., ; + Column1.Text1.FontShadow = .F., ; + Column1.Text1.FontSize = 8, ; + Column1.Text1.FontStrikethru = .F., ; + Column1.Text1.FontUnderline = .F., ; + Column1.Text1.ForeColor = 0,0,0, ; + Column1.Text1.Name = "Text1", ; + Column1.Text1.ReadOnly = .F., ; + Column1.Text1.Visible = .T., ; + Column1.Visible = .T., ; + Column2.BackColor = 255,255,255, ; + Column2.ControlSource = "", ; + Column2.Enabled = .T., ; + Column2.FontBold = .F., ; + Column2.FontCharSet = 0, ; + Column2.FontCondense = .F., ; + Column2.FontExtend = .F., ; + Column2.FontItalic = .F., ; + Column2.FontName = "Arial", ; + Column2.FontOutline = .F., ; + Column2.FontShadow = .F., ; + Column2.FontSize = 8, ; + Column2.FontStrikethru = .F., ; + Column2.FontUnderline = .F., ; + Column2.ForeColor = 0,0,0, ; + Column2.Header1.FontBold = .F., ; + Column2.Header1.FontCharSet = 0, ; + Column2.Header1.FontCondense = .F., ; + Column2.Header1.FontExtend = .F., ; + Column2.Header1.FontItalic = .F., ; + Column2.Header1.FontName = "Arial", ; + Column2.Header1.FontOutline = .F., ; + Column2.Header1.FontShadow = .F., ; + Column2.Header1.FontSize = 8, ; + Column2.Header1.FontStrikethru = .F., ; + Column2.Header1.FontUnderline = .F., ; + Column2.Header1.Name = "Header1", ; + Column2.Name = "Column2", ; + Column2.ReadOnly = .F., ; + Column2.Text1.BackColor = 255,255,255, ; + Column2.Text1.Enabled = .T., ; + Column2.Text1.FontBold = .F., ; + Column2.Text1.FontCharSet = 0, ; + Column2.Text1.FontCondense = .F., ; + Column2.Text1.FontExtend = .F., ; + Column2.Text1.FontItalic = .F., ; + Column2.Text1.FontName = "Arial", ; + Column2.Text1.FontOutline = .F., ; + Column2.Text1.FontShadow = .F., ; + Column2.Text1.FontSize = 8, ; + Column2.Text1.FontStrikethru = .F., ; + Column2.Text1.FontUnderline = .F., ; + Column2.Text1.ForeColor = 0,0,0, ; + Column2.Text1.Name = "Text1", ; + Column2.Text1.ReadOnly = .F., ; + Column2.Text1.Visible = .T., ; + Column2.Visible = .T., ; + Column3.BackColor = 255,255,255, ; + Column3.ControlSource = "", ; + Column3.Enabled = .T., ; + Column3.FontBold = .F., ; + Column3.FontCharSet = 0, ; + Column3.FontCondense = .F., ; + Column3.FontExtend = .F., ; + Column3.FontItalic = .F., ; + Column3.FontName = "Arial", ; + Column3.FontOutline = .F., ; + Column3.FontShadow = .F., ; + Column3.FontSize = 8, ; + Column3.FontStrikethru = .F., ; + Column3.FontUnderline = .F., ; + Column3.ForeColor = 0,0,0, ; + Column3.Header1.FontBold = .F., ; + Column3.Header1.FontCharSet = 0, ; + Column3.Header1.FontCondense = .F., ; + Column3.Header1.FontExtend = .F., ; + Column3.Header1.FontItalic = .F., ; + Column3.Header1.FontName = "Arial", ; + Column3.Header1.FontOutline = .F., ; + Column3.Header1.FontShadow = .F., ; + Column3.Header1.FontSize = 8, ; + Column3.Header1.FontStrikethru = .F., ; + Column3.Header1.FontUnderline = .F., ; + Column3.Header1.Name = "Header1", ; + Column3.Name = "Column3", ; + Column3.ReadOnly = .F., ; + Column3.Text1.BackColor = 255,255,255, ; + Column3.Text1.Enabled = .T., ; + Column3.Text1.FontBold = .F., ; + Column3.Text1.FontCharSet = 0, ; + Column3.Text1.FontCondense = .F., ; + Column3.Text1.FontExtend = .F., ; + Column3.Text1.FontItalic = .F., ; + Column3.Text1.FontName = "Arial", ; + Column3.Text1.FontOutline = .F., ; + Column3.Text1.FontShadow = .F., ; + Column3.Text1.FontSize = 8, ; + Column3.Text1.FontStrikethru = .F., ; + Column3.Text1.FontUnderline = .F., ; + Column3.Text1.ForeColor = 0,0,0, ; + Column3.Text1.Name = "Text1", ; + Column3.Text1.ReadOnly = .F., ; + Column3.Text1.Visible = .T., ; + Column3.Visible = .T., ; + Column4.BackColor = 255,255,255, ; + Column4.ControlSource = "", ; + Column4.Enabled = .T., ; + Column4.FontBold = .F., ; + Column4.FontCharSet = 0, ; + Column4.FontCondense = .F., ; + Column4.FontExtend = .F., ; + Column4.FontItalic = .F., ; + Column4.FontName = "Arial", ; + Column4.FontOutline = .F., ; + Column4.FontShadow = .F., ; + Column4.FontSize = 8, ; + Column4.FontStrikethru = .F., ; + Column4.FontUnderline = .F., ; + Column4.ForeColor = 0,0,0, ; + Column4.Header1.FontBold = .F., ; + Column4.Header1.FontCharSet = 0, ; + Column4.Header1.FontCondense = .F., ; + Column4.Header1.FontExtend = .F., ; + Column4.Header1.FontItalic = .F., ; + Column4.Header1.FontName = "Arial", ; + Column4.Header1.FontOutline = .F., ; + Column4.Header1.FontShadow = .F., ; + Column4.Header1.FontSize = 8, ; + Column4.Header1.FontStrikethru = .F., ; + Column4.Header1.FontUnderline = .F., ; + Column4.Header1.Name = "Header1", ; + Column4.Name = "Column4", ; + Column4.ReadOnly = .F., ; + Column4.Text1.BackColor = 255,255,255, ; + Column4.Text1.Enabled = .T., ; + Column4.Text1.FontBold = .F., ; + Column4.Text1.FontCharSet = 0, ; + Column4.Text1.FontCondense = .F., ; + Column4.Text1.FontExtend = .F., ; + Column4.Text1.FontItalic = .F., ; + Column4.Text1.FontName = "Arial", ; + Column4.Text1.FontOutline = .F., ; + Column4.Text1.FontShadow = .F., ; + Column4.Text1.FontSize = 8, ; + Column4.Text1.FontStrikethru = .F., ; + Column4.Text1.FontUnderline = .F., ; + Column4.Text1.ForeColor = 0,0,0, ; + Column4.Text1.Name = "Text1", ; + Column4.Text1.ReadOnly = .F., ; + Column4.Text1.Visible = .T., ; + Column4.Visible = .T., ; + Column5.BackColor = 255,255,255, ; + Column5.ControlSource = "", ; + Column5.Enabled = .T., ; + Column5.FontBold = .F., ; + Column5.FontCharSet = 0, ; + Column5.FontCondense = .F., ; + Column5.FontExtend = .F., ; + Column5.FontItalic = .F., ; + Column5.FontName = "Arial", ; + Column5.FontOutline = .F., ; + Column5.FontShadow = .F., ; + Column5.FontSize = 8, ; + Column5.FontStrikethru = .F., ; + Column5.FontUnderline = .F., ; + Column5.ForeColor = 0,0,0, ; + Column5.Header1.FontBold = .F., ; + Column5.Header1.FontCharSet = 0, ; + Column5.Header1.FontCondense = .F., ; + Column5.Header1.FontExtend = .F., ; + Column5.Header1.FontItalic = .F., ; + Column5.Header1.FontName = "Arial", ; + Column5.Header1.FontOutline = .F., ; + Column5.Header1.FontShadow = .F., ; + Column5.Header1.FontSize = 8, ; + Column5.Header1.FontStrikethru = .F., ; + Column5.Header1.FontUnderline = .F., ; + Column5.Header1.Name = "Header1", ; + Column5.Name = "Column5", ; + Column5.ReadOnly = .F., ; + Column5.Text1.BackColor = 255,255,255, ; + Column5.Text1.Enabled = .T., ; + Column5.Text1.FontBold = .F., ; + Column5.Text1.FontCharSet = 0, ; + Column5.Text1.FontCondense = .F., ; + Column5.Text1.FontExtend = .F., ; + Column5.Text1.FontItalic = .F., ; + Column5.Text1.FontName = "Arial", ; + Column5.Text1.FontOutline = .F., ; + Column5.Text1.FontShadow = .F., ; + Column5.Text1.FontSize = 8, ; + Column5.Text1.FontStrikethru = .F., ; + Column5.Text1.FontUnderline = .F., ; + Column5.Text1.ForeColor = 0,0,0, ; + Column5.Text1.Name = "Text1", ; + Column5.Text1.ReadOnly = .F., ; + Column5.Text1.Visible = .T., ; + Column5.Visible = .T. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> + + ADD OBJECT 'F_base1.grdEncuestas' AS grid WITH ; + AllowAddNew = .F., ; + AllowAutoColumnFit = 0, ; + AllowCellSelection = .T., ; + AllowHeaderSizing = .T., ; + AllowRowSizing = .T., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + ChildOrder = "", ; + ColumnCount = 5, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DeleteMark = .T., ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + GridLineColor = 0,0,0, ; + GridLines = 3, ; + GridLineWidth = 1, ; + HeaderHeight = 17, ; + Height = (160), ; + HelpContextID = 0, ; + Highlight = .T., ; + HighlightBackColor = 51,153,255, ; + HighlightForeColor = 255,255,255, ; + HighlightRow = .T., ; + HighlightRowLineWidth = 1, ; + HighlightStyle = 0, ; + Left = (40), ; + LinkMaster = "", ; + LockColumns = 0, ; + LockColumnsLeft = 0, ; + MemberClass = "cl_Column", ; + MemberClassLibrary = ..\fxu_lib_objetos_y_funciones_de_soporte.prg, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "grdEncuestas", ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Optimize = .F., ; + Panel = 1, ; + PanelLink = .T., ; + Partition = 0, ; + ReadOnly = .F., ; + RecordMark = .T., ; + RecordSource = "encuestas", ; + RecordSourceType = 1, ; + RelationalExpr = "", ; + RightToLeft = .F., ; + RowHeight = 17, ; + ScrollBars = 3, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SplitBar = .T., ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = (32), ; + Value = 0, ; + View = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (228), ; + Cl_column1.Alignment = 3, ; + Cl_column1.BackColor = 255,255,255, ; + Cl_column1.Bound = .T., ; + Cl_column1.ColumnOrder = 1, ; + Cl_column1.Comment = "Ver este Column", ; + Cl_column1.ControlSource = "promotor", ; + Cl_column1.CurrentControl = "Text1", ; + Cl_column1.DynamicAlignment = "", ; + Cl_column1.DynamicBackColor = "", ; + Cl_column1.DynamicCurrentControl = "", ; + Cl_column1.DynamicFontBold = "", ; + Cl_column1.DynamicFontItalic = "", ; + Cl_column1.DynamicFontName = "", ; + Cl_column1.DynamicFontOutline = "", ; + Cl_column1.DynamicFontShadow = "", ; + Cl_column1.DynamicFontSize = "", ; + Cl_column1.DynamicFontStrikethru = "", ; + Cl_column1.DynamicFontUnderline = "", ; + Cl_column1.DynamicForeColor = "", ; + Cl_column1.DynamicInputMask = "", ; + Cl_column1.Enabled = .T., ; + Cl_column1.FontBold = .F., ; + Cl_column1.FontCharSet = 0, ; + Cl_column1.FontCondense = .F., ; + Cl_column1.FontExtend = .F., ; + Cl_column1.FontItalic = .F., ; + Cl_column1.FontName = "Arial", ; + Cl_column1.FontOutline = .F., ; + Cl_column1.FontShadow = .F., ; + Cl_column1.FontSize = 8, ; + Cl_column1.FontStrikethru = .F., ; + Cl_column1.FontUnderline = .F., ; + Cl_column1.ForeColor = 0,0,0, ; + Cl_column1.Format = "", ; + Cl_column1.HeaderClass = "cl_Header", ; + Cl_column1.HeaderClassLibrary = ..\fxu_lib_objetos_y_funciones_de_soporte.prg, ; + Cl_column1.InputMask = "", ; + Cl_column1.MouseIcon = ..\..\, ; + Cl_column1.MousePointer = 0, ; + Cl_column1.Movable = .T., ; + Cl_column1.Name = "Cl_column1", ; + Cl_column1.ReadOnly = .F., ; + Cl_column1.Resizable = .T., ; + Cl_column1.SelectOnEntry = .T., ; + Cl_column1.Sparse = .T., ; + Cl_column1.StatusBarText = "", ; + Cl_column1.Tag = "", ; + Cl_column1.ToolTipText = "", ; + Cl_column1.Visible = .T., ; + Cl_column1.Width = 75, ; + Cl_column2.BackColor = 255,255,255, ; + Cl_column2.Enabled = .T., ; + Cl_column2.FontBold = .F., ; + Cl_column2.FontCharSet = 0, ; + Cl_column2.FontCondense = .F., ; + Cl_column2.FontExtend = .F., ; + Cl_column2.FontItalic = .F., ; + Cl_column2.FontName = "Arial", ; + Cl_column2.FontOutline = .F., ; + Cl_column2.FontShadow = .F., ; + Cl_column2.FontSize = 8, ; + Cl_column2.FontStrikethru = .F., ; + Cl_column2.FontUnderline = .F., ; + Cl_column2.ForeColor = 0,0,0, ; + Cl_column2.Name = "Cl_column2", ; + Cl_column2.ReadOnly = .F., ; + Cl_column2.Visible = .T., ; + Cl_column3.BackColor = 255,255,255, ; + Cl_column3.Enabled = .T., ; + Cl_column3.FontBold = .F., ; + Cl_column3.FontCharSet = 0, ; + Cl_column3.FontCondense = .F., ; + Cl_column3.FontExtend = .F., ; + Cl_column3.FontItalic = .F., ; + Cl_column3.FontName = "Arial", ; + Cl_column3.FontOutline = .F., ; + Cl_column3.FontShadow = .F., ; + Cl_column3.FontSize = 8, ; + Cl_column3.FontStrikethru = .F., ; + Cl_column3.FontUnderline = .F., ; + Cl_column3.ForeColor = 0,0,0, ; + Cl_column3.Name = "Cl_column3", ; + Cl_column3.ReadOnly = .F., ; + Cl_column3.Visible = .T., ; + Cl_column4.BackColor = 255,255,255, ; + Cl_column4.Enabled = .T., ; + Cl_column4.FontBold = .F., ; + Cl_column4.FontCharSet = 0, ; + Cl_column4.FontCondense = .F., ; + Cl_column4.FontExtend = .F., ; + Cl_column4.FontItalic = .F., ; + Cl_column4.FontName = "Arial", ; + Cl_column4.FontOutline = .F., ; + Cl_column4.FontShadow = .F., ; + Cl_column4.FontSize = 8, ; + Cl_column4.FontStrikethru = .F., ; + Cl_column4.FontUnderline = .F., ; + Cl_column4.ForeColor = 0,0,0, ; + Cl_column4.Name = "Cl_column4", ; + Cl_column4.ReadOnly = .F., ; + Cl_column4.Visible = .T., ; + Cl_column5.BackColor = 255,255,255, ; + Cl_column5.Enabled = .T., ; + Cl_column5.FontBold = .F., ; + Cl_column5.FontCharSet = 0, ; + Cl_column5.FontCondense = .F., ; + Cl_column5.FontExtend = .F., ; + Cl_column5.FontItalic = .F., ; + Cl_column5.FontName = "Arial", ; + Cl_column5.FontOutline = .F., ; + Cl_column5.FontShadow = .F., ; + Cl_column5.FontSize = 8, ; + Cl_column5.FontStrikethru = .F., ; + Cl_column5.FontUnderline = .F., ; + Cl_column5.ForeColor = 0,0,0, ; + Cl_column5.Name = "Cl_column5", ; + Cl_column5.ReadOnly = .F., ; + Cl_column5.Visible = .T. + *< END OBJECT: BaseClass="grid" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column1.Cl_header1' AS cl_header WITH ; + Alignment = 0, ; + BackColor = 240,240,240, ; + Caption = "promotor", ; + Comment = "", ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_header1", ; + Picture = ..\..\, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + WordWrap = .F. + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column1.Text1' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + FontName = "Arial", ; + FontSize = 8, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column2.Header1' AS header WITH ; + Caption = "idenc", ; + FontName = "Arial", ; + FontSize = 8, ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column2.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + FontName = "Arial", ; + FontSize = 8, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column3.Header1' AS header WITH ; + Caption = "calific", ; + FontName = "Arial", ; + FontSize = 8, ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column3.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + FontName = "Arial", ; + FontSize = 8, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column4.Header1' AS header WITH ; + Caption = "fecha", ; + FontName = "Arial", ; + FontSize = 8, ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column4.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + FontName = "Arial", ; + FontSize = 8, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column5.Header1' AS header WITH ; + Caption = "resultado", ; + FontName = "Arial", ; + FontSize = 8, ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.grdEncuestas.Cl_column5.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + FontName = "Arial", ; + FontSize = 8, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 213, ; + Left = 28, ; + Name = "Pageframe1", ; + PageCount = 2, ; + Top = 200, ; + Width = 517, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.Cl_grid1' AS cl_grid WITH ; + Left = 279, ; + Name = "Cl_grid1", ; + Top = 8, ; + Column1.Header1.Name = "Header1", ; + Column1.Name = "Column1", ; + Column1.Text1.Name = "Text1", ; + Column2.Header1.Name = "Header1", ; + Column2.Name = "Column2", ; + Column2.Text1.Name = "Text1", ; + Column3.Header1.Name = "Header1", ; + Column3.Name = "Column3", ; + Column3.Text1.Name = "Text1", ; + Column4.Header1.Name = "Header1", ; + Column4.Name = "Column4", ; + Column4.Text1.Name = "Text1", ; + Column5.Header1.Name = "Header1", ; + Column5.Name = "Column5", ; + Column5.Text1.Name = "Text1" + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas' AS grid WITH ; + ColumnCount = 5, ; + Height = 160, ; + Left = 11, ; + Name = "grdEncuestas", ; + RecordSource = "encuestas", ; + RecordSourceType = 1, ; + Top = 8, ; + Width = 228, ; + Column1.ControlSource = "encuestas.promotor", ; + Column1.Name = "Column1", ; + Column2.ControlSource = "encuestas.idenc", ; + Column2.Name = "Column2", ; + Column3.ControlSource = "encuestas.calific", ; + Column3.Name = "Column3", ; + Column4.ControlSource = "encuestas.fecha", ; + Column4.Name = "Column4", ; + Column5.ControlSource = "encuestas.resultado", ; + Column5.Name = "Column5" + *< END OBJECT: BaseClass="grid" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column1.Header1' AS header WITH ; + Caption = "promotor", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column1.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column2.Header1' AS header WITH ; + Caption = "idenc", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column2.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column3.Header1' AS header WITH ; + Caption = "calific", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column3.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column4.Header1' AS header WITH ; + Caption = "fecha", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column4.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column5.Header1' AS header WITH ; + Caption = "resultado", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column5.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + PROCEDURE Refresh + DOEVENTS FORCE + THISFORMSET.Forms(1).c_testname = THISFORMSET.c_testname + THISFORMSET.Forms(1).REFRESH() + + ENDPROC + + PROCEDURE F_base1.Cl_grid1.Init + this.AutoFit() + + ENDPROC + + PROCEDURE F_base1.grdEncuestas.Init + this.AutoFit() + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_formset.sc2 b/TESTS/DATOS_READONLY/f_formset.sc2 index 2482016..67f478f 100644 --- a/TESTS/DATOS_READONLY/f_formset.sc2 +++ b/TESTS/DATOS_READONLY/f_formset.sc2 @@ -4,968 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_formset.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="2" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="formset" Baseclass="formset" /> - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" /> - - AutoCloseTables = .T. - AutoOpenTables = .T. - Comment = "" - DataSource = .NULL. - DataSourceType = "" - Height = 200 - InitialSelectedAlias = "" - Left = 1 - Name = "Dataenvironment" - OpenViews = 0 - Tag = "" - Top = 220 - Width = 520 - - ADD OBJECT 'Cursor1' AS cursor WITH ; - Alias = "encuestas", ; - BufferModeOverride = 1, ; - Comment = "", ; - CursorSource = encuestas.dbf, ; - Exclusive = .F., ; - Filter = "", ; - Height = 90, ; - Left = 10, ; - Name = "Cursor1", ; - NoDataOnLoad = .F., ; - Order = "", ; - OrderDirection = 0, ; - ReadOnly = .F., ; - Tag = "", ; - Top = 20, ; - Width = 90 - *< END OBJECT: BaseClass="cursor" /> - -ENDDEFINE - -DEFINE CLASS formset AS formset - *< CLASSDATA: Baseclass="formset" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="F_base1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column1.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column1.Cl_header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column2.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column2.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column3.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column3.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column4.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column4.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column5.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.grdEncuestas.Cl_column5.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Cl_grid1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column1.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column1.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column2.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column2.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column3.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column3.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column4.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column4.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column5.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.grdEncuestas.Column5.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="F_base1.Pageframe1.Page1.Cl_grid1" UniqueID="" Timestamp="" /> - - * - *p: c_testname - * - - AutoRelease = .T. - BufferMode = 0 - Comment = "" - c_testname = Formset_Test - DataSession = 2 - Name = "Formset" - ReadCycle = .T. - ReadLock = .T. - ReadMouse = .T. - ReadSave = .F. - ReadTimeout = 0 - Tag = "" - Visible = .T. - WindowList = "" - WindowType = 0 - - ADD OBJECT 'F_base1' AS f_base WITH ; - AllowOutput = .T., ; - AlwaysOnBottom = .F., ; - AlwaysOnTop = .T., ; - AutoCenter = .F., ; - BackColor = 192,192,192, ; - BindControls = .T., ; - BorderStyle = 3, ; - ClipControls = .T., ; - Closable = .T., ; - ColorSource = 4, ; - Comment = "", ; - ContinuousScroll = .T., ; - ControlBox = .T., ; - c_testname = Formset_Test, ; - DefHeight = , ; - DefLeft = , ; - DefOleLCID = 0, ; - DefTop = , ; - DefWidth = , ; - Desktop = .F., ; - Dockable = 0, ; - DoCreate = .T., ; - DrawMode = 13, ; - DrawStyle = 0, ; - DrawWidth = 1, ; - Enabled = .T., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - HalfHeightCaption = .F., ; - Height = (424), ; - HelpContextID = 0, ; - HScrollSmallChange = 10, ; - Icon = ..\..\, ; - KeyPreview = .F., ; - Left = (2), ; - LockScreen = .F., ; - MacDesktop = 0, ; - MaxButton = .T., ; - MaxHeight = -1, ; - MaxLeft = -1, ; - MaxTop = -1, ; - MaxWidth = -1, ; - MDIForm = .F., ; - MinButton = .T., ; - MinHeight = -1, ; - MinWidth = -1, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Movable = .T., ; - Name = "F_base1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - RightToLeft = .F., ; - ScaleMode = 3, ; - ScrollBars = 0, ; - ShowInTaskBar = .T., ; - ShowTips = .F., ; - ShowWindow = 0, ; - SizeBox = .F., ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - Themes = .T., ; - TitleBar = 1, ; - Top = (4), ; - Visible = .T., ; - VScrollSmallChange = 10, ; - WhatsThisButton = .F., ; - WhatsThisHelp = .F., ; - WhatsThisHelpID = -1, ; - Width = (819), ; - WindowState = 0, ; - WindowType = 0, ; - ZoomBox = .F., ; - Edit1.Name = "Edit1", ; - Edit1.RightToLeft = .F., ; - Label3.Name = "Label3", ; - Label3.RightToLeft = .F., ; - cmdCapturar.Name = "cmdCapturar", ; - cmdCapturar.RightToLeft = .F., ; - Label1.Name = "Label1", ; - Label1.RightToLeft = .F., ; - Label2.Name = "Label2", ; - Label2.RightToLeft = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="form" /> - - ADD OBJECT 'F_base1.Cl_grid1' AS cl_grid WITH ; - AllowAddNew = .F., ; - AllowAutoColumnFit = 0, ; - AllowCellSelection = .T., ; - AllowHeaderSizing = .T., ; - AllowRowSizing = .T., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - ChildOrder = "", ; - ColumnCount = 5, ; - Comment = "", ; - DeleteMark = .T., ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - GridLineColor = 0,0,0, ; - GridLines = 3, ; - GridLineWidth = 1, ; - HeaderHeight = 17, ; - Height = 160, ; - HelpContextID = 0, ; - Highlight = .T., ; - HighlightBackColor = 51,153,255, ; - HighlightForeColor = 255,255,255, ; - HighlightRow = .T., ; - HighlightRowLineWidth = 1, ; - HighlightStyle = 0, ; - Left = 308, ; - LinkMaster = "", ; - LockColumns = 0, ; - LockColumnsLeft = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_grid1", ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Optimize = .F., ; - Panel = 1, ; - PanelLink = .T., ; - Partition = 0, ; - ReadOnly = .F., ; - RecordMark = .T., ; - RecordSource = "encuestas", ; - RecordSourceType = 1, ; - RelationalExpr = "", ; - RightToLeft = .F., ; - RowHeight = 17, ; - ScrollBars = 3, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SplitBar = .T., ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 32, ; - Value = 0, ; - View = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Column1.BackColor = 255,255,255, ; - Column1.ControlSource = "", ; - Column1.Enabled = .T., ; - Column1.FontBold = .F., ; - Column1.FontCharSet = 0, ; - Column1.FontCondense = .F., ; - Column1.FontExtend = .F., ; - Column1.FontItalic = .F., ; - Column1.FontName = "Arial", ; - Column1.FontOutline = .F., ; - Column1.FontShadow = .F., ; - Column1.FontSize = 8, ; - Column1.FontStrikethru = .F., ; - Column1.FontUnderline = .F., ; - Column1.ForeColor = 0,0,0, ; - Column1.Header1.FontBold = .F., ; - Column1.Header1.FontCharSet = 0, ; - Column1.Header1.FontCondense = .F., ; - Column1.Header1.FontExtend = .F., ; - Column1.Header1.FontItalic = .F., ; - Column1.Header1.FontName = "Arial", ; - Column1.Header1.FontOutline = .F., ; - Column1.Header1.FontShadow = .F., ; - Column1.Header1.FontSize = 8, ; - Column1.Header1.FontStrikethru = .F., ; - Column1.Header1.FontUnderline = .F., ; - Column1.Header1.Name = "Header1", ; - Column1.Name = "Column1", ; - Column1.ReadOnly = .F., ; - Column1.Text1.BackColor = 255,255,255, ; - Column1.Text1.Enabled = .T., ; - Column1.Text1.FontBold = .F., ; - Column1.Text1.FontCharSet = 0, ; - Column1.Text1.FontCondense = .F., ; - Column1.Text1.FontExtend = .F., ; - Column1.Text1.FontItalic = .F., ; - Column1.Text1.FontName = "Arial", ; - Column1.Text1.FontOutline = .F., ; - Column1.Text1.FontShadow = .F., ; - Column1.Text1.FontSize = 8, ; - Column1.Text1.FontStrikethru = .F., ; - Column1.Text1.FontUnderline = .F., ; - Column1.Text1.ForeColor = 0,0,0, ; - Column1.Text1.Name = "Text1", ; - Column1.Text1.ReadOnly = .F., ; - Column1.Text1.Visible = .T., ; - Column1.Visible = .T., ; - Column2.BackColor = 255,255,255, ; - Column2.ControlSource = "", ; - Column2.Enabled = .T., ; - Column2.FontBold = .F., ; - Column2.FontCharSet = 0, ; - Column2.FontCondense = .F., ; - Column2.FontExtend = .F., ; - Column2.FontItalic = .F., ; - Column2.FontName = "Arial", ; - Column2.FontOutline = .F., ; - Column2.FontShadow = .F., ; - Column2.FontSize = 8, ; - Column2.FontStrikethru = .F., ; - Column2.FontUnderline = .F., ; - Column2.ForeColor = 0,0,0, ; - Column2.Header1.FontBold = .F., ; - Column2.Header1.FontCharSet = 0, ; - Column2.Header1.FontCondense = .F., ; - Column2.Header1.FontExtend = .F., ; - Column2.Header1.FontItalic = .F., ; - Column2.Header1.FontName = "Arial", ; - Column2.Header1.FontOutline = .F., ; - Column2.Header1.FontShadow = .F., ; - Column2.Header1.FontSize = 8, ; - Column2.Header1.FontStrikethru = .F., ; - Column2.Header1.FontUnderline = .F., ; - Column2.Header1.Name = "Header1", ; - Column2.Name = "Column2", ; - Column2.ReadOnly = .F., ; - Column2.Text1.BackColor = 255,255,255, ; - Column2.Text1.Enabled = .T., ; - Column2.Text1.FontBold = .F., ; - Column2.Text1.FontCharSet = 0, ; - Column2.Text1.FontCondense = .F., ; - Column2.Text1.FontExtend = .F., ; - Column2.Text1.FontItalic = .F., ; - Column2.Text1.FontName = "Arial", ; - Column2.Text1.FontOutline = .F., ; - Column2.Text1.FontShadow = .F., ; - Column2.Text1.FontSize = 8, ; - Column2.Text1.FontStrikethru = .F., ; - Column2.Text1.FontUnderline = .F., ; - Column2.Text1.ForeColor = 0,0,0, ; - Column2.Text1.Name = "Text1", ; - Column2.Text1.ReadOnly = .F., ; - Column2.Text1.Visible = .T., ; - Column2.Visible = .T., ; - Column3.BackColor = 255,255,255, ; - Column3.ControlSource = "", ; - Column3.Enabled = .T., ; - Column3.FontBold = .F., ; - Column3.FontCharSet = 0, ; - Column3.FontCondense = .F., ; - Column3.FontExtend = .F., ; - Column3.FontItalic = .F., ; - Column3.FontName = "Arial", ; - Column3.FontOutline = .F., ; - Column3.FontShadow = .F., ; - Column3.FontSize = 8, ; - Column3.FontStrikethru = .F., ; - Column3.FontUnderline = .F., ; - Column3.ForeColor = 0,0,0, ; - Column3.Header1.FontBold = .F., ; - Column3.Header1.FontCharSet = 0, ; - Column3.Header1.FontCondense = .F., ; - Column3.Header1.FontExtend = .F., ; - Column3.Header1.FontItalic = .F., ; - Column3.Header1.FontName = "Arial", ; - Column3.Header1.FontOutline = .F., ; - Column3.Header1.FontShadow = .F., ; - Column3.Header1.FontSize = 8, ; - Column3.Header1.FontStrikethru = .F., ; - Column3.Header1.FontUnderline = .F., ; - Column3.Header1.Name = "Header1", ; - Column3.Name = "Column3", ; - Column3.ReadOnly = .F., ; - Column3.Text1.BackColor = 255,255,255, ; - Column3.Text1.Enabled = .T., ; - Column3.Text1.FontBold = .F., ; - Column3.Text1.FontCharSet = 0, ; - Column3.Text1.FontCondense = .F., ; - Column3.Text1.FontExtend = .F., ; - Column3.Text1.FontItalic = .F., ; - Column3.Text1.FontName = "Arial", ; - Column3.Text1.FontOutline = .F., ; - Column3.Text1.FontShadow = .F., ; - Column3.Text1.FontSize = 8, ; - Column3.Text1.FontStrikethru = .F., ; - Column3.Text1.FontUnderline = .F., ; - Column3.Text1.ForeColor = 0,0,0, ; - Column3.Text1.Name = "Text1", ; - Column3.Text1.ReadOnly = .F., ; - Column3.Text1.Visible = .T., ; - Column3.Visible = .T., ; - Column4.BackColor = 255,255,255, ; - Column4.ControlSource = "", ; - Column4.Enabled = .T., ; - Column4.FontBold = .F., ; - Column4.FontCharSet = 0, ; - Column4.FontCondense = .F., ; - Column4.FontExtend = .F., ; - Column4.FontItalic = .F., ; - Column4.FontName = "Arial", ; - Column4.FontOutline = .F., ; - Column4.FontShadow = .F., ; - Column4.FontSize = 8, ; - Column4.FontStrikethru = .F., ; - Column4.FontUnderline = .F., ; - Column4.ForeColor = 0,0,0, ; - Column4.Header1.FontBold = .F., ; - Column4.Header1.FontCharSet = 0, ; - Column4.Header1.FontCondense = .F., ; - Column4.Header1.FontExtend = .F., ; - Column4.Header1.FontItalic = .F., ; - Column4.Header1.FontName = "Arial", ; - Column4.Header1.FontOutline = .F., ; - Column4.Header1.FontShadow = .F., ; - Column4.Header1.FontSize = 8, ; - Column4.Header1.FontStrikethru = .F., ; - Column4.Header1.FontUnderline = .F., ; - Column4.Header1.Name = "Header1", ; - Column4.Name = "Column4", ; - Column4.ReadOnly = .F., ; - Column4.Text1.BackColor = 255,255,255, ; - Column4.Text1.Enabled = .T., ; - Column4.Text1.FontBold = .F., ; - Column4.Text1.FontCharSet = 0, ; - Column4.Text1.FontCondense = .F., ; - Column4.Text1.FontExtend = .F., ; - Column4.Text1.FontItalic = .F., ; - Column4.Text1.FontName = "Arial", ; - Column4.Text1.FontOutline = .F., ; - Column4.Text1.FontShadow = .F., ; - Column4.Text1.FontSize = 8, ; - Column4.Text1.FontStrikethru = .F., ; - Column4.Text1.FontUnderline = .F., ; - Column4.Text1.ForeColor = 0,0,0, ; - Column4.Text1.Name = "Text1", ; - Column4.Text1.ReadOnly = .F., ; - Column4.Text1.Visible = .T., ; - Column4.Visible = .T., ; - Column5.BackColor = 255,255,255, ; - Column5.ControlSource = "", ; - Column5.Enabled = .T., ; - Column5.FontBold = .F., ; - Column5.FontCharSet = 0, ; - Column5.FontCondense = .F., ; - Column5.FontExtend = .F., ; - Column5.FontItalic = .F., ; - Column5.FontName = "Arial", ; - Column5.FontOutline = .F., ; - Column5.FontShadow = .F., ; - Column5.FontSize = 8, ; - Column5.FontStrikethru = .F., ; - Column5.FontUnderline = .F., ; - Column5.ForeColor = 0,0,0, ; - Column5.Header1.FontBold = .F., ; - Column5.Header1.FontCharSet = 0, ; - Column5.Header1.FontCondense = .F., ; - Column5.Header1.FontExtend = .F., ; - Column5.Header1.FontItalic = .F., ; - Column5.Header1.FontName = "Arial", ; - Column5.Header1.FontOutline = .F., ; - Column5.Header1.FontShadow = .F., ; - Column5.Header1.FontSize = 8, ; - Column5.Header1.FontStrikethru = .F., ; - Column5.Header1.FontUnderline = .F., ; - Column5.Header1.Name = "Header1", ; - Column5.Name = "Column5", ; - Column5.ReadOnly = .F., ; - Column5.Text1.BackColor = 255,255,255, ; - Column5.Text1.Enabled = .T., ; - Column5.Text1.FontBold = .F., ; - Column5.Text1.FontCharSet = 0, ; - Column5.Text1.FontCondense = .F., ; - Column5.Text1.FontExtend = .F., ; - Column5.Text1.FontItalic = .F., ; - Column5.Text1.FontName = "Arial", ; - Column5.Text1.FontOutline = .F., ; - Column5.Text1.FontShadow = .F., ; - Column5.Text1.FontSize = 8, ; - Column5.Text1.FontStrikethru = .F., ; - Column5.Text1.FontUnderline = .F., ; - Column5.Text1.ForeColor = 0,0,0, ; - Column5.Text1.Name = "Text1", ; - Column5.Text1.ReadOnly = .F., ; - Column5.Text1.Visible = .T., ; - Column5.Visible = .T. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> - - ADD OBJECT 'F_base1.grdEncuestas' AS grid WITH ; - AllowAddNew = .F., ; - AllowAutoColumnFit = 0, ; - AllowCellSelection = .T., ; - AllowHeaderSizing = .T., ; - AllowRowSizing = .T., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - ChildOrder = "", ; - ColumnCount = 5, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DeleteMark = .T., ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - GridLineColor = 0,0,0, ; - GridLines = 3, ; - GridLineWidth = 1, ; - HeaderHeight = 17, ; - Height = (160), ; - HelpContextID = 0, ; - Highlight = .T., ; - HighlightBackColor = 51,153,255, ; - HighlightForeColor = 255,255,255, ; - HighlightRow = .T., ; - HighlightRowLineWidth = 1, ; - HighlightStyle = 0, ; - Left = (40), ; - LinkMaster = "", ; - LockColumns = 0, ; - LockColumnsLeft = 0, ; - MemberClass = "cl_Column", ; - MemberClassLibrary = ..\fxu_lib_objetos_y_funciones_de_soporte.prg, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "grdEncuestas", ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Optimize = .F., ; - Panel = 1, ; - PanelLink = .T., ; - Partition = 0, ; - ReadOnly = .F., ; - RecordMark = .T., ; - RecordSource = "encuestas", ; - RecordSourceType = 1, ; - RelationalExpr = "", ; - RightToLeft = .F., ; - RowHeight = 17, ; - ScrollBars = 3, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SplitBar = .T., ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = (32), ; - Value = 0, ; - View = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (228), ; - Cl_column1.Alignment = 3, ; - Cl_column1.BackColor = 255,255,255, ; - Cl_column1.Bound = .T., ; - Cl_column1.ColumnOrder = 1, ; - Cl_column1.Comment = "Ver este Column", ; - Cl_column1.ControlSource = "promotor", ; - Cl_column1.CurrentControl = "Text1", ; - Cl_column1.DynamicAlignment = "", ; - Cl_column1.DynamicBackColor = "", ; - Cl_column1.DynamicCurrentControl = "", ; - Cl_column1.DynamicFontBold = "", ; - Cl_column1.DynamicFontItalic = "", ; - Cl_column1.DynamicFontName = "", ; - Cl_column1.DynamicFontOutline = "", ; - Cl_column1.DynamicFontShadow = "", ; - Cl_column1.DynamicFontSize = "", ; - Cl_column1.DynamicFontStrikethru = "", ; - Cl_column1.DynamicFontUnderline = "", ; - Cl_column1.DynamicForeColor = "", ; - Cl_column1.DynamicInputMask = "", ; - Cl_column1.Enabled = .T., ; - Cl_column1.FontBold = .F., ; - Cl_column1.FontCharSet = 0, ; - Cl_column1.FontCondense = .F., ; - Cl_column1.FontExtend = .F., ; - Cl_column1.FontItalic = .F., ; - Cl_column1.FontName = "Arial", ; - Cl_column1.FontOutline = .F., ; - Cl_column1.FontShadow = .F., ; - Cl_column1.FontSize = 8, ; - Cl_column1.FontStrikethru = .F., ; - Cl_column1.FontUnderline = .F., ; - Cl_column1.ForeColor = 0,0,0, ; - Cl_column1.Format = "", ; - Cl_column1.HeaderClass = "cl_Header", ; - Cl_column1.HeaderClassLibrary = ..\fxu_lib_objetos_y_funciones_de_soporte.prg, ; - Cl_column1.InputMask = "", ; - Cl_column1.MouseIcon = ..\..\, ; - Cl_column1.MousePointer = 0, ; - Cl_column1.Movable = .T., ; - Cl_column1.Name = "Cl_column1", ; - Cl_column1.ReadOnly = .F., ; - Cl_column1.Resizable = .T., ; - Cl_column1.SelectOnEntry = .T., ; - Cl_column1.Sparse = .T., ; - Cl_column1.StatusBarText = "", ; - Cl_column1.Tag = "", ; - Cl_column1.ToolTipText = "", ; - Cl_column1.Visible = .T., ; - Cl_column1.Width = 75, ; - Cl_column2.BackColor = 255,255,255, ; - Cl_column2.Enabled = .T., ; - Cl_column2.FontBold = .F., ; - Cl_column2.FontCharSet = 0, ; - Cl_column2.FontCondense = .F., ; - Cl_column2.FontExtend = .F., ; - Cl_column2.FontItalic = .F., ; - Cl_column2.FontName = "Arial", ; - Cl_column2.FontOutline = .F., ; - Cl_column2.FontShadow = .F., ; - Cl_column2.FontSize = 8, ; - Cl_column2.FontStrikethru = .F., ; - Cl_column2.FontUnderline = .F., ; - Cl_column2.ForeColor = 0,0,0, ; - Cl_column2.Name = "Cl_column2", ; - Cl_column2.ReadOnly = .F., ; - Cl_column2.Visible = .T., ; - Cl_column3.BackColor = 255,255,255, ; - Cl_column3.Enabled = .T., ; - Cl_column3.FontBold = .F., ; - Cl_column3.FontCharSet = 0, ; - Cl_column3.FontCondense = .F., ; - Cl_column3.FontExtend = .F., ; - Cl_column3.FontItalic = .F., ; - Cl_column3.FontName = "Arial", ; - Cl_column3.FontOutline = .F., ; - Cl_column3.FontShadow = .F., ; - Cl_column3.FontSize = 8, ; - Cl_column3.FontStrikethru = .F., ; - Cl_column3.FontUnderline = .F., ; - Cl_column3.ForeColor = 0,0,0, ; - Cl_column3.Name = "Cl_column3", ; - Cl_column3.ReadOnly = .F., ; - Cl_column3.Visible = .T., ; - Cl_column4.BackColor = 255,255,255, ; - Cl_column4.Enabled = .T., ; - Cl_column4.FontBold = .F., ; - Cl_column4.FontCharSet = 0, ; - Cl_column4.FontCondense = .F., ; - Cl_column4.FontExtend = .F., ; - Cl_column4.FontItalic = .F., ; - Cl_column4.FontName = "Arial", ; - Cl_column4.FontOutline = .F., ; - Cl_column4.FontShadow = .F., ; - Cl_column4.FontSize = 8, ; - Cl_column4.FontStrikethru = .F., ; - Cl_column4.FontUnderline = .F., ; - Cl_column4.ForeColor = 0,0,0, ; - Cl_column4.Name = "Cl_column4", ; - Cl_column4.ReadOnly = .F., ; - Cl_column4.Visible = .T., ; - Cl_column5.BackColor = 255,255,255, ; - Cl_column5.Enabled = .T., ; - Cl_column5.FontBold = .F., ; - Cl_column5.FontCharSet = 0, ; - Cl_column5.FontCondense = .F., ; - Cl_column5.FontExtend = .F., ; - Cl_column5.FontItalic = .F., ; - Cl_column5.FontName = "Arial", ; - Cl_column5.FontOutline = .F., ; - Cl_column5.FontShadow = .F., ; - Cl_column5.FontSize = 8, ; - Cl_column5.FontStrikethru = .F., ; - Cl_column5.FontUnderline = .F., ; - Cl_column5.ForeColor = 0,0,0, ; - Cl_column5.Name = "Cl_column5", ; - Cl_column5.ReadOnly = .F., ; - Cl_column5.Visible = .T. - *< END OBJECT: BaseClass="grid" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column1.Cl_header1' AS cl_header WITH ; - Alignment = 0, ; - BackColor = 240,240,240, ; - Caption = "promotor", ; - Comment = "", ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_header1", ; - Picture = ..\..\, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - WordWrap = .F. - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column1.Text1' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - FontName = "Arial", ; - FontSize = 8, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column2.Header1' AS header WITH ; - Caption = "idenc", ; - FontName = "Arial", ; - FontSize = 8, ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column2.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - FontName = "Arial", ; - FontSize = 8, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column3.Header1' AS header WITH ; - Caption = "calific", ; - FontName = "Arial", ; - FontSize = 8, ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column3.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - FontName = "Arial", ; - FontSize = 8, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column4.Header1' AS header WITH ; - Caption = "fecha", ; - FontName = "Arial", ; - FontSize = 8, ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column4.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - FontName = "Arial", ; - FontSize = 8, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column5.Header1' AS header WITH ; - Caption = "resultado", ; - FontName = "Arial", ; - FontSize = 8, ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.grdEncuestas.Cl_column5.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - FontName = "Arial", ; - FontSize = 8, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 213, ; - Left = 28, ; - Name = "Pageframe1", ; - PageCount = 2, ; - Top = 200, ; - Width = 517, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.Cl_grid1' AS cl_grid WITH ; - Left = 279, ; - Name = "Cl_grid1", ; - Top = 8, ; - Column1.Header1.Name = "Header1", ; - Column1.Name = "Column1", ; - Column1.Text1.Name = "Text1", ; - Column2.Header1.Name = "Header1", ; - Column2.Name = "Column2", ; - Column2.Text1.Name = "Text1", ; - Column3.Header1.Name = "Header1", ; - Column3.Name = "Column3", ; - Column3.Text1.Name = "Text1", ; - Column4.Header1.Name = "Header1", ; - Column4.Name = "Column4", ; - Column4.Text1.Name = "Text1", ; - Column5.Header1.Name = "Header1", ; - Column5.Name = "Column5", ; - Column5.Text1.Name = "Text1" - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas' AS grid WITH ; - ColumnCount = 5, ; - Height = 160, ; - Left = 11, ; - Name = "grdEncuestas", ; - RecordSource = "encuestas", ; - RecordSourceType = 1, ; - Top = 8, ; - Width = 228, ; - Column1.ControlSource = "encuestas.promotor", ; - Column1.Name = "Column1", ; - Column2.ControlSource = "encuestas.idenc", ; - Column2.Name = "Column2", ; - Column3.ControlSource = "encuestas.calific", ; - Column3.Name = "Column3", ; - Column4.ControlSource = "encuestas.fecha", ; - Column4.Name = "Column4", ; - Column5.ControlSource = "encuestas.resultado", ; - Column5.Name = "Column5" - *< END OBJECT: BaseClass="grid" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column1.Header1' AS header WITH ; - Caption = "promotor", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column1.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column2.Header1' AS header WITH ; - Caption = "idenc", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column2.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column3.Header1' AS header WITH ; - Caption = "calific", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column3.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column4.Header1' AS header WITH ; - Caption = "fecha", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column4.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column5.Header1' AS header WITH ; - Caption = "resultado", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'F_base1.Pageframe1.Page1.grdEncuestas.Column5.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - PROCEDURE Refresh - DOEVENTS FORCE - THISFORMSET.Forms(1).c_testname = THISFORMSET.c_testname - THISFORMSET.Forms(1).REFRESH() - - ENDPROC - - PROCEDURE F_base1.Cl_grid1.Init - this.AutoFit() - - ENDPROC - - PROCEDURE F_base1.grdEncuestas.Init - this.AutoFit() - - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_listbox.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_listbox.dataenvironment.sc2 new file mode 100644 index 0000000..66c492c --- /dev/null +++ b/TESTS/DATOS_READONLY/f_listbox.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_listbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_listbox.f_listbox_test.sc2 b/TESTS/DATOS_READONLY/f_listbox.f_listbox_test.sc2 new file mode 100644 index 0000000..0a37302 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_listbox.f_listbox_test.sc2 @@ -0,0 +1,567 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_listbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_listbox_test AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="ListBox1" UniqueID="" Timestamp="" /> + + * + c_testname = Listbox_Test + DoCreate = .T. + Left = 0 + Name = "F_Listbox_Test" + Top = 0 + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "LISTBOX NORMAL" + Label1.Name = "Label1" + Label2.Caption = "LISTBOX SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_ListBox1' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 308, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "Cl_ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 97, ; + Left = 28, ; + Name = "Container1", ; + TabIndex = 9, ; + Top = 128, ; + Width = 512 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Cl_ListBox1' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 280, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "Cl_ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'Container1.ListBox1' AS listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 8, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: BaseClass="listbox" /> + + ADD OBJECT 'ListBox1' AS listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = (60), ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = (36), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (44), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (224) + *< END OBJECT: BaseClass="listbox" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 137, ; + Left = 28, ; + Name = "Pageframe1", ; + PageCount = 2, ; + TabIndex = 10, ; + Top = 252, ; + Width = 513, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_ListBox1' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 279, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "Cl_ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'Pageframe1.Page1.ListBox1' AS listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 7, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: BaseClass="listbox" /> + + PROCEDURE Cl_ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.Cl_ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.Cl_ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_listbox.sc2 b/TESTS/DATOS_READONLY/f_listbox.sc2 index 4454467..fab5cc8 100644 --- a/TESTS/DATOS_READONLY/f_listbox.sc2 +++ b/TESTS/DATOS_READONLY/f_listbox.sc2 @@ -4,575 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_listbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_listbox_test" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS f_listbox_test AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="ListBox1" UniqueID="" Timestamp="" /> - - c_testname = Listbox_Test - DoCreate = .T. - Left = 0 - Name = "F_Listbox_Test" - Top = 0 - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "LISTBOX NORMAL" - Label1.Name = "Label1" - Label2.Caption = "LISTBOX SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_ListBox1' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 308, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "Cl_ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 97, ; - Left = 28, ; - Name = "Container1", ; - TabIndex = 9, ; - Top = 128, ; - Width = 512 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Cl_ListBox1' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 280, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "Cl_ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'Container1.ListBox1' AS listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 8, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: BaseClass="listbox" /> - - ADD OBJECT 'ListBox1' AS listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = (60), ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = (36), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (44), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (224) - *< END OBJECT: BaseClass="listbox" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 137, ; - Left = 28, ; - Name = "Pageframe1", ; - PageCount = 2, ; - TabIndex = 10, ; - Top = 252, ; - Width = 513, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_ListBox1' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 279, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "Cl_ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'Pageframe1.Page1.ListBox1' AS listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 7, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: BaseClass="listbox" /> - - PROCEDURE Cl_ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.Cl_ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.Cl_ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_nullchars_incode.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_nullchars_incode.dataenvironment.sc2 new file mode 100644 index 0000000..1e266b4 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_nullchars_incode.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_nullchars_incode.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_nullchars_incode.form1.sc2 b/TESTS/DATOS_READONLY/f_nullchars_incode.form1.sc2 new file mode 100644 index 0000000..75fffd2 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_nullchars_incode.form1.sc2 @@ -0,0 +1,28 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_nullchars_incode.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS form1 AS form + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + * + Caption = "Form1" + DoCreate = .T. + Height = 79 + Left = 0 + Name = "Form1" + Top = 0 + Width = 394 + * + + PROCEDURE Click + LPARAMETERS p1, p2, p3 + ENDPROC + + PROCEDURE Load + LPARAMETERS p1, p2, p3 + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_nullchars_incode.sc2 b/TESTS/DATOS_READONLY/f_nullchars_incode.sc2 index 4c7ace6..57bd1f2 100644 --- a/TESTS/DATOS_READONLY/f_nullchars_incode.sc2 +++ b/TESTS/DATOS_READONLY/f_nullchars_incode.sc2 @@ -4,36 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_nullchars_incode.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="form1" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS form1 AS form - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - Caption = "Form1" - DoCreate = .T. - Height = 79 - Left = 0 - Name = "Form1" - Top = 0 - Width = 394 - - PROCEDURE Click - LPARAMETERS p1, p2, p3 - ENDPROC - - PROCEDURE Load - LPARAMETERS p1, p2, p3 - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_optiongroup.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_optiongroup.dataenvironment.sc2 new file mode 100644 index 0000000..67a63e4 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_optiongroup.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_optiongroup.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_optiongroup.f_optiongroup_test.sc2 b/TESTS/DATOS_READONLY/f_optiongroup.f_optiongroup_test.sc2 new file mode 100644 index 0000000..6fbf4bd --- /dev/null +++ b/TESTS/DATOS_READONLY/f_optiongroup.f_optiongroup_test.sc2 @@ -0,0 +1,1427 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_optiongroup.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_optiongroup_test AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_optiongroup2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_optiongroup2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Optiongroup2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Optiongroup2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_option1" UniqueID="" Timestamp="" /> + + * + BackColor = 192,192,192 + Caption = "OptionGroup_Test" + c_testname = OptionGroup_Test + DoCreate = .T. + Height = 448 + Left = 0 + Name = "F_OptionGroup_Test" + Top = 0 + Width = 819 + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "OPTIONGROUP NORMAL" + Label1.Name = "Label1" + Label2.Caption = "OPTIONGROUP SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_option1' AS cl_option WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 128,255,255, ; + BackStyle = 1, ; + Caption = "La opción separada es larga también", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 16, ; + HelpContextID = 0, ; + Left = 304, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_option1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureMargin = 0, ; + PicturePosition = 4, ; + PictureSpacing = 0, ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (424), ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (220), ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optionbutton" /> + + ADD OBJECT 'Cl_optiongroup1' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackStyle = 0, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ControlSource = "", ; + Height = 76, ; + Left = 296, ; + Name = "Cl_optiongroup1", ; + Top = 28, ; + Value = 2, ; + Width = 248, ; + Option1.Alignment = 0, ; + Option1.Anchor = 0, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 240,240,240, ; + Option1.Caption = "La Opción 1", ; + Option1.ColorScheme = 1, ; + Option1.ColorSource = 4, ; + Option1.Comment = "", ; + Option1.ControlSource = "", ; + Option1.DisabledBackColor = 240,240,240, ; + Option1.DisabledForeColor = 109,109,109, ; + Option1.DisabledPicture = ..\..\, ; + Option1.DownPicture = ..\..\, ; + Option1.DragIcon = ..\..\, ; + Option1.DragMode = 0, ; + Option1.Enabled = .T., ; + Option1.FontBold = .F., ; + Option1.FontCharSet = 0, ; + Option1.FontCondense = .F., ; + Option1.FontExtend = .F., ; + Option1.FontItalic = .F., ; + Option1.FontName = "Arial", ; + Option1.FontOutline = .F., ; + Option1.FontShadow = .F., ; + Option1.FontStrikethru = .F., ; + Option1.FontUnderline = .F., ; + Option1.ForeColor = 0,0,0, ; + Option1.Height = 17, ; + Option1.HelpContextID = 0, ; + Option1.Left = 8, ; + Option1.MouseIcon = ..\..\, ; + Option1.MousePointer = 0, ; + Option1.Name = "Option1", ; + Option1.OLEDragMode = 0, ; + Option1.OLEDragPicture = ..\..\, ; + Option1.OLEDropEffects = 3, ; + Option1.OLEDropMode = 0, ; + Option1.Picture = ..\..\, ; + Option1.PictureMargin = 0, ; + Option1.PicturePosition = 13, ; + Option1.PictureSpacing = 0, ; + Option1.RightToLeft = .F., ; + Option1.SpecialEffect = 0, ; + Option1.StatusBarText = "", ; + Option1.Style = 0, ; + Option1.TabStop = .T., ; + Option1.Tag = "", ; + Option1.TerminateRead = .F., ; + Option1.Themes = .T., ; + Option1.ToolTipText = "", ; + Option1.Top = 4, ; + Option1.Value = 0, ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 84, ; + Option1.WordWrap = .F., ; + Option2.Alignment = 0, ; + Option2.Anchor = 0, ; + Option2.AutoSize = .F., ; + Option2.BackColor = 240,240,240, ; + Option2.Caption = "La opción 2 es más larga", ; + Option2.ColorScheme = 1, ; + Option2.ColorSource = 4, ; + Option2.Comment = "", ; + Option2.ControlSource = "", ; + Option2.DisabledBackColor = 240,240,240, ; + Option2.DisabledForeColor = 109,109,109, ; + Option2.DisabledPicture = ..\..\, ; + Option2.DownPicture = ..\..\, ; + Option2.DragIcon = ..\..\, ; + Option2.DragMode = 0, ; + Option2.Enabled = .T., ; + Option2.FontBold = .F., ; + Option2.FontCharSet = 0, ; + Option2.FontCondense = .F., ; + Option2.FontExtend = .F., ; + Option2.FontItalic = .F., ; + Option2.FontName = "Arial", ; + Option2.FontOutline = .F., ; + Option2.FontShadow = .F., ; + Option2.FontStrikethru = .F., ; + Option2.FontUnderline = .F., ; + Option2.ForeColor = 0,0,0, ; + Option2.Height = 17, ; + Option2.HelpContextID = 0, ; + Option2.Left = 8, ; + Option2.MouseIcon = ..\..\, ; + Option2.MousePointer = 0, ; + Option2.Name = "Option2", ; + Option2.OLEDragMode = 0, ; + Option2.OLEDragPicture = ..\..\, ; + Option2.OLEDropEffects = 3, ; + Option2.OLEDropMode = 0, ; + Option2.Picture = ..\..\, ; + Option2.PictureMargin = 0, ; + Option2.PicturePosition = 13, ; + Option2.PictureSpacing = 0, ; + Option2.RightToLeft = .F., ; + Option2.SpecialEffect = 0, ; + Option2.StatusBarText = "", ; + Option2.Style = 0, ; + Option2.TabStop = .T., ; + Option2.Tag = "", ; + Option2.TerminateRead = .F., ; + Option2.Themes = .T., ; + Option2.ToolTipText = "", ; + Option2.Top = 28, ; + Option2.Value = 1, ; + Option2.WhatsThisHelpID = -1, ; + Option2.Width = 158, ; + Option2.WordWrap = .F., ; + Option3.Alignment = 0, ; + Option3.Anchor = 0, ; + Option3.BackColor = 128,255,128, ; + Option3.Caption = "La opción 3 es la más larga de todas", ; + Option3.ColorScheme = 1, ; + Option3.ColorSource = 4, ; + Option3.Comment = "", ; + Option3.ControlSource = "", ; + Option3.DisabledBackColor = 240,240,240, ; + Option3.DisabledForeColor = 109,109,109, ; + Option3.DisabledPicture = ..\..\, ; + Option3.DownPicture = ..\..\, ; + Option3.DragIcon = ..\..\, ; + Option3.DragMode = 0, ; + Option3.Enabled = .T., ; + Option3.FontBold = .F., ; + Option3.FontCharSet = 0, ; + Option3.FontCondense = .F., ; + Option3.FontExtend = .F., ; + Option3.FontItalic = .F., ; + Option3.FontName = "Arial", ; + Option3.FontOutline = .F., ; + Option3.FontShadow = .F., ; + Option3.FontStrikethru = .F., ; + Option3.FontUnderline = .F., ; + Option3.ForeColor = 0,0,0, ; + Option3.Height = 17, ; + Option3.HelpContextID = 0, ; + Option3.Left = 8, ; + Option3.MouseIcon = ..\..\, ; + Option3.MousePointer = 0, ; + Option3.Name = "Option3", ; + Option3.OLEDragMode = 0, ; + Option3.OLEDragPicture = ..\..\, ; + Option3.OLEDropEffects = 3, ; + Option3.OLEDropMode = 0, ; + Option3.Picture = ..\..\, ; + Option3.PictureMargin = 0, ; + Option3.PicturePosition = 13, ; + Option3.PictureSpacing = 0, ; + Option3.RightToLeft = .F., ; + Option3.SpecialEffect = 0, ; + Option3.StatusBarText = "", ; + Option3.Style = 0, ; + Option3.TabStop = .T., ; + Option3.Tag = "", ; + Option3.TerminateRead = .F., ; + Option3.Themes = .T., ; + Option3.ToolTipText = "", ; + Option3.Top = 52, ; + Option3.Value = 0, ; + Option3.WhatsThisHelpID = -1, ; + Option3.Width = 222, ; + Option3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'Cl_optiongroup2' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackStyle = 1, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ControlSource = "", ; + Height = 76, ; + Left = 296, ; + Name = "Cl_optiongroup2", ; + Top = 112, ; + Value = 2, ; + Width = 248, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 240,240,240, ; + Option1.Caption = "La Opción 1", ; + Option1.FontBold = .F., ; + Option1.Height = 27, ; + Option1.Left = 8, ; + Option1.Name = "Option1", ; + Option1.SpecialEffect = 0, ; + Option1.Style = 1, ; + Option1.Top = 4, ; + Option1.Value = 0, ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 84, ; + Option2.AutoSize = .F., ; + Option2.BackColor = 240,240,240, ; + Option2.Caption = "La opción 2 es más larga", ; + Option2.FontBold = .F., ; + Option2.Height = 27, ; + Option2.Left = 8, ; + Option2.Name = "Option2", ; + Option2.SpecialEffect = 0, ; + Option2.Style = 1, ; + Option2.Top = 28, ; + Option2.Value = 1, ; + Option2.WhatsThisHelpID = -1, ; + Option2.Width = 158, ; + Option3.AutoSize = .F., ; + Option3.BackColor = 128,255,128, ; + Option3.Caption = "La opción 3 es la más larga de todas", ; + Option3.FontBold = .F., ; + Option3.Height = 21, ; + Option3.Left = 8, ; + Option3.Name = "Option3", ; + Option3.SpecialEffect = 0, ; + Option3.Style = 1, ; + Option3.Top = 52, ; + Option3.WhatsThisHelpID = -1, ; + Option3.Width = 222 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'Optiongroup1' AS optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (76), ; + HelpContextID = 0, ; + Left = (24), ; + MemberClass = "cl_option", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Optiongroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (24), ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (248), ; + Cl_option1.Alignment = 0, ; + Cl_option1.Anchor = 0, ; + Cl_option1.AutoSize = .F., ; + Cl_option1.BackColor = 240,240,240, ; + Cl_option1.BackStyle = 1, ; + Cl_option1.Caption = "La opción 1", ; + Cl_option1.ColorScheme = 1, ; + Cl_option1.ColorSource = 4, ; + Cl_option1.Comment = "", ; + Cl_option1.ControlSource = "", ; + Cl_option1.DisabledBackColor = 0,128,192, ; + Cl_option1.DisabledForeColor = 128,0,255, ; + Cl_option1.DisabledPicture = bmps\treeview.bmp, ; + Cl_option1.DownPicture = ..\..\, ; + Cl_option1.DragIcon = ..\..\, ; + Cl_option1.DragMode = 0, ; + Cl_option1.Enabled = .T., ; + Cl_option1.FontBold = .F., ; + Cl_option1.FontCharSet = 0, ; + Cl_option1.FontCondense = .F., ; + Cl_option1.FontExtend = .F., ; + Cl_option1.FontItalic = .F., ; + Cl_option1.FontName = "Arial", ; + Cl_option1.FontOutline = .F., ; + Cl_option1.FontShadow = .F., ; + Cl_option1.FontSize = 8, ; + Cl_option1.FontStrikethru = .F., ; + Cl_option1.FontUnderline = .F., ; + Cl_option1.ForeColor = 0,0,0, ; + Cl_option1.Height = 16, ; + Cl_option1.HelpContextID = 0, ; + Cl_option1.Left = 16, ; + Cl_option1.MouseIcon = ..\..\, ; + Cl_option1.MousePointer = 0, ; + Cl_option1.Name = "Cl_option1", ; + Cl_option1.OLEDragMode = 0, ; + Cl_option1.OLEDragPicture = ..\..\, ; + Cl_option1.OLEDropEffects = 3, ; + Cl_option1.OLEDropMode = 0, ; + Cl_option1.Picture = bmps\sobrepostal.bmp, ; + Cl_option1.PictureMargin = 0, ; + Cl_option1.PicturePosition = 4, ; + Cl_option1.PictureSpacing = 0, ; + Cl_option1.RightToLeft = .F., ; + Cl_option1.SpecialEffect = 0, ; + Cl_option1.StatusBarText = "", ; + Cl_option1.Style = 0, ; + Cl_option1.TabStop = .T., ; + Cl_option1.Tag = "", ; + Cl_option1.TerminateRead = .F., ; + Cl_option1.Themes = .T., ; + Cl_option1.ToolTipText = "", ; + Cl_option1.Top = 4, ; + Cl_option1.Visible = .T., ; + Cl_option1.WhatsThisHelpID = -1, ; + Cl_option1.Width = 74, ; + Cl_option1.WordWrap = .F., ; + Cl_option2.Alignment = 0, ; + Cl_option2.Anchor = 0, ; + Cl_option2.BackColor = 240,240,240, ; + Cl_option2.BackStyle = 1, ; + Cl_option2.Caption = "La opción 2 es más larga", ; + Cl_option2.ColorScheme = 1, ; + Cl_option2.ColorSource = 4, ; + Cl_option2.Comment = "", ; + Cl_option2.ControlSource = "", ; + Cl_option2.DisabledBackColor = 0,128,192, ; + Cl_option2.DisabledForeColor = 128,0,255, ; + Cl_option2.DisabledPicture = bmps\treeview.bmp, ; + Cl_option2.DownPicture = ..\..\, ; + Cl_option2.DragIcon = ..\..\, ; + Cl_option2.DragMode = 0, ; + Cl_option2.Enabled = .T., ; + Cl_option2.FontBold = .F., ; + Cl_option2.FontCharSet = 0, ; + Cl_option2.FontCondense = .F., ; + Cl_option2.FontExtend = .F., ; + Cl_option2.FontItalic = .F., ; + Cl_option2.FontName = "Arial", ; + Cl_option2.FontOutline = .F., ; + Cl_option2.FontShadow = .F., ; + Cl_option2.FontSize = 8, ; + Cl_option2.FontStrikethru = .F., ; + Cl_option2.FontUnderline = .F., ; + Cl_option2.ForeColor = 0,0,0, ; + Cl_option2.HelpContextID = 0, ; + Cl_option2.Left = 16, ; + Cl_option2.MouseIcon = ..\..\, ; + Cl_option2.MousePointer = 0, ; + Cl_option2.Name = "Cl_option2", ; + Cl_option2.OLEDragMode = 0, ; + Cl_option2.OLEDragPicture = ..\..\, ; + Cl_option2.OLEDropEffects = 3, ; + Cl_option2.OLEDropMode = 0, ; + Cl_option2.Picture = bmps\sobrepostal.bmp, ; + Cl_option2.PictureMargin = 0, ; + Cl_option2.PicturePosition = 4, ; + Cl_option2.PictureSpacing = 0, ; + Cl_option2.RightToLeft = .F., ; + Cl_option2.SpecialEffect = 0, ; + Cl_option2.StatusBarText = "", ; + Cl_option2.Style = 0, ; + Cl_option2.TabStop = .T., ; + Cl_option2.Tag = "", ; + Cl_option2.TerminateRead = .F., ; + Cl_option2.Themes = .T., ; + Cl_option2.ToolTipText = "", ; + Cl_option2.Top = 28, ; + Cl_option2.Value = 1, ; + Cl_option2.Visible = .T., ; + Cl_option2.WhatsThisHelpID = -1, ; + Cl_option2.WordWrap = .F., ; + Cl_option3.Alignment = 0, ; + Cl_option3.Anchor = 0, ; + Cl_option3.AutoSize = .F., ; + Cl_option3.BackColor = 240,240,240, ; + Cl_option3.BackStyle = 1, ; + Cl_option3.Caption = "La opción 3 es la más larga de todas", ; + Cl_option3.ColorScheme = 1, ; + Cl_option3.ColorSource = 4, ; + Cl_option3.Comment = "", ; + Cl_option3.ControlSource = "", ; + Cl_option3.DefWidth = , ; + Cl_option3.DisabledBackColor = 213,233,255, ; + Cl_option3.DisabledForeColor = 128,0,255, ; + Cl_option3.DisabledPicture = bmps\treeview.bmp, ; + Cl_option3.DownPicture = ..\..\, ; + Cl_option3.DragIcon = ..\..\, ; + Cl_option3.DragMode = 0, ; + Cl_option3.Enabled = .F., ; + Cl_option3.FontBold = .F., ; + Cl_option3.FontCharSet = 0, ; + Cl_option3.FontCondense = .F., ; + Cl_option3.FontExtend = .F., ; + Cl_option3.FontItalic = .F., ; + Cl_option3.FontName = "Arial", ; + Cl_option3.FontOutline = .F., ; + Cl_option3.FontShadow = .F., ; + Cl_option3.FontSize = 8, ; + Cl_option3.FontStrikethru = .F., ; + Cl_option3.FontUnderline = .F., ; + Cl_option3.ForeColor = 0,0,0, ; + Cl_option3.HelpContextID = 0, ; + Cl_option3.Left = 16, ; + Cl_option3.MouseIcon = ..\..\, ; + Cl_option3.MousePointer = 0, ; + Cl_option3.Name = "Cl_option3", ; + Cl_option3.OLEDragMode = 0, ; + Cl_option3.OLEDragPicture = ..\..\, ; + Cl_option3.OLEDropEffects = 3, ; + Cl_option3.OLEDropMode = 0, ; + Cl_option3.Picture = bmps\sobrepostal.bmp, ; + Cl_option3.PictureMargin = 0, ; + Cl_option3.PicturePosition = 4, ; + Cl_option3.PictureSpacing = 0, ; + Cl_option3.RightToLeft = .F., ; + Cl_option3.SpecialEffect = 0, ; + Cl_option3.StatusBarText = "", ; + Cl_option3.Style = 0, ; + Cl_option3.TabStop = .T., ; + Cl_option3.Tag = "", ; + Cl_option3.TerminateRead = .F., ; + Cl_option3.Themes = .T., ; + Cl_option3.ToolTipText = "", ; + Cl_option3.Top = 52, ; + Cl_option3.Visible = .T., ; + Cl_option3.WhatsThisHelpID = -1, ; + Cl_option3.Width = (195), ; + Cl_option3.WordWrap = .F. + *< END OBJECT: BaseClass="optiongroup" /> + + ADD OBJECT 'Optiongroup2' AS optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 24, ; + MemberClass = "cl_option", ; + MemberClassLibrary = lib_controles.vcx, ; + MousePointer = 0, ; + Name = "Optiongroup2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 112, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 248, ; + Cl_option1.Alignment = 0, ; + Cl_option1.Anchor = 0, ; + Cl_option1.AutoSize = .F., ; + Cl_option1.BackColor = 240,240,240, ; + Cl_option1.BackStyle = 1, ; + Cl_option1.Caption = "La opción 1", ; + Cl_option1.ColorScheme = 1, ; + Cl_option1.ColorSource = 4, ; + Cl_option1.Comment = "", ; + Cl_option1.ControlSource = "", ; + Cl_option1.DisabledBackColor = 0,128,192, ; + Cl_option1.DisabledForeColor = 128,0,255, ; + Cl_option1.DisabledPicture = bmps\treeview.bmp, ; + Cl_option1.DownPicture = ..\..\, ; + Cl_option1.DragIcon = ..\..\, ; + Cl_option1.DragMode = 0, ; + Cl_option1.Enabled = .T., ; + Cl_option1.FontBold = .F., ; + Cl_option1.FontCharSet = 0, ; + Cl_option1.FontCondense = .F., ; + Cl_option1.FontExtend = .F., ; + Cl_option1.FontItalic = .F., ; + Cl_option1.FontName = "Arial", ; + Cl_option1.FontOutline = .F., ; + Cl_option1.FontShadow = .F., ; + Cl_option1.FontSize = 8, ; + Cl_option1.FontStrikethru = .F., ; + Cl_option1.FontUnderline = .F., ; + Cl_option1.ForeColor = 0,0,0, ; + Cl_option1.Height = 42, ; + Cl_option1.HelpContextID = 0, ; + Cl_option1.Left = 16, ; + Cl_option1.MouseIcon = ..\..\, ; + Cl_option1.MousePointer = 0, ; + Cl_option1.Name = "Cl_option1", ; + Cl_option1.OLEDragMode = 0, ; + Cl_option1.OLEDragPicture = ..\..\, ; + Cl_option1.OLEDropEffects = 3, ; + Cl_option1.OLEDropMode = 0, ; + Cl_option1.Picture = bmps\sobrepostal.bmp, ; + Cl_option1.PictureMargin = 0, ; + Cl_option1.PicturePosition = 4, ; + Cl_option1.PictureSpacing = 0, ; + Cl_option1.RightToLeft = .F., ; + Cl_option1.SpecialEffect = 0, ; + Cl_option1.StatusBarText = "", ; + Cl_option1.Style = 1, ; + Cl_option1.TabStop = .T., ; + Cl_option1.Tag = "", ; + Cl_option1.TerminateRead = .F., ; + Cl_option1.Themes = .T., ; + Cl_option1.ToolTipText = "", ; + Cl_option1.Top = 4, ; + Cl_option1.Visible = .T., ; + Cl_option1.WhatsThisHelpID = -1, ; + Cl_option1.Width = 88, ; + Cl_option1.WordWrap = .F., ; + Cl_option2.Alignment = 0, ; + Cl_option2.Anchor = 0, ; + Cl_option2.BackColor = 240,240,240, ; + Cl_option2.BackStyle = 1, ; + Cl_option2.Caption = "La opción 2 es más larga", ; + Cl_option2.ColorScheme = 1, ; + Cl_option2.ColorSource = 4, ; + Cl_option2.Comment = "", ; + Cl_option2.ControlSource = "", ; + Cl_option2.DefHeight = , ; + Cl_option2.DisabledBackColor = 0,128,192, ; + Cl_option2.DisabledForeColor = 128,0,255, ; + Cl_option2.DisabledPicture = bmps\treeview.bmp, ; + Cl_option2.DownPicture = ..\..\, ; + Cl_option2.DragIcon = ..\..\, ; + Cl_option2.DragMode = 0, ; + Cl_option2.Enabled = .T., ; + Cl_option2.FontBold = .F., ; + Cl_option2.FontCharSet = 0, ; + Cl_option2.FontCondense = .F., ; + Cl_option2.FontExtend = .F., ; + Cl_option2.FontItalic = .F., ; + Cl_option2.FontName = "Arial", ; + Cl_option2.FontOutline = .F., ; + Cl_option2.FontShadow = .F., ; + Cl_option2.FontSize = 8, ; + Cl_option2.FontStrikethru = .F., ; + Cl_option2.FontUnderline = .F., ; + Cl_option2.ForeColor = 0,0,0, ; + Cl_option2.Height = (21), ; + Cl_option2.HelpContextID = 0, ; + Cl_option2.Left = 16, ; + Cl_option2.MouseIcon = ..\..\, ; + Cl_option2.MousePointer = 0, ; + Cl_option2.Name = "Cl_option2", ; + Cl_option2.OLEDragMode = 0, ; + Cl_option2.OLEDragPicture = ..\..\, ; + Cl_option2.OLEDropEffects = 3, ; + Cl_option2.OLEDropMode = 0, ; + Cl_option2.Picture = bmps\sobrepostal.bmp, ; + Cl_option2.PictureMargin = 0, ; + Cl_option2.PicturePosition = 4, ; + Cl_option2.PictureSpacing = 0, ; + Cl_option2.RightToLeft = .F., ; + Cl_option2.SpecialEffect = 0, ; + Cl_option2.StatusBarText = "", ; + Cl_option2.Style = 1, ; + Cl_option2.TabStop = .T., ; + Cl_option2.Tag = "", ; + Cl_option2.TerminateRead = .F., ; + Cl_option2.Themes = .T., ; + Cl_option2.ToolTipText = "", ; + Cl_option2.Top = 28, ; + Cl_option2.Value = 1, ; + Cl_option2.Visible = .T., ; + Cl_option2.WhatsThisHelpID = -1, ; + Cl_option2.WordWrap = .F., ; + Cl_option3.Alignment = 0, ; + Cl_option3.Anchor = 0, ; + Cl_option3.AutoSize = .F., ; + Cl_option3.BackColor = 240,240,240, ; + Cl_option3.BackStyle = 1, ; + Cl_option3.Caption = "La opción 3 es la más larga de todas", ; + Cl_option3.ColorScheme = 1, ; + Cl_option3.ColorSource = 4, ; + Cl_option3.Comment = "", ; + Cl_option3.ControlSource = "", ; + Cl_option3.DefHeight = , ; + Cl_option3.DisabledBackColor = 0,128,192, ; + Cl_option3.DisabledForeColor = 128,0,255, ; + Cl_option3.DisabledPicture = bmps\treeview.bmp, ; + Cl_option3.DownPicture = ..\..\, ; + Cl_option3.DragIcon = ..\..\, ; + Cl_option3.DragMode = 0, ; + Cl_option3.Enabled = .F., ; + Cl_option3.FontBold = .F., ; + Cl_option3.FontCharSet = 0, ; + Cl_option3.FontCondense = .F., ; + Cl_option3.FontExtend = .F., ; + Cl_option3.FontItalic = .F., ; + Cl_option3.FontName = "Arial", ; + Cl_option3.FontOutline = .F., ; + Cl_option3.FontShadow = .F., ; + Cl_option3.FontSize = 8, ; + Cl_option3.FontStrikethru = .F., ; + Cl_option3.FontUnderline = .F., ; + Cl_option3.ForeColor = 0,0,0, ; + Cl_option3.Height = (21), ; + Cl_option3.HelpContextID = 0, ; + Cl_option3.Left = 16, ; + Cl_option3.MouseIcon = ..\..\, ; + Cl_option3.MousePointer = 0, ; + Cl_option3.Name = "Cl_option3", ; + Cl_option3.OLEDragMode = 0, ; + Cl_option3.OLEDragPicture = ..\..\, ; + Cl_option3.OLEDropEffects = 3, ; + Cl_option3.OLEDropMode = 0, ; + Cl_option3.Picture = bmps\sobrepostal.bmp, ; + Cl_option3.PictureMargin = 0, ; + Cl_option3.PicturePosition = 4, ; + Cl_option3.PictureSpacing = 0, ; + Cl_option3.RightToLeft = .F., ; + Cl_option3.SpecialEffect = 0, ; + Cl_option3.StatusBarText = "", ; + Cl_option3.Style = 1, ; + Cl_option3.TabStop = .T., ; + Cl_option3.Tag = "", ; + Cl_option3.TerminateRead = .F., ; + Cl_option3.Themes = .T., ; + Cl_option3.ToolTipText = "", ; + Cl_option3.Top = 52, ; + Cl_option3.Visible = .T., ; + Cl_option3.WhatsThisHelpID = -1, ; + Cl_option3.Width = 209, ; + Cl_option3.WordWrap = .F. + *< END OBJECT: BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 224, ; + Left = 8, ; + Name = "Pageframe1", ; + PageCount = 2, ; + Top = 196, ; + Width = 553, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_optiongroup1' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackStyle = 0, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ControlSource = "", ; + Height = 76, ; + Left = 287, ; + Name = "Cl_optiongroup1", ; + Top = 12, ; + Value = 2, ; + Width = 248, ; + Option1.Alignment = 0, ; + Option1.Anchor = 0, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 240,240,240, ; + Option1.Caption = "La Opción 1", ; + Option1.ColorScheme = 1, ; + Option1.ColorSource = 4, ; + Option1.Comment = "", ; + Option1.ControlSource = "", ; + Option1.DisabledBackColor = 240,240,240, ; + Option1.DisabledForeColor = 109,109,109, ; + Option1.DisabledPicture = ..\..\, ; + Option1.DownPicture = ..\..\, ; + Option1.DragIcon = ..\..\, ; + Option1.DragMode = 0, ; + Option1.Enabled = .T., ; + Option1.FontBold = .F., ; + Option1.FontCharSet = 0, ; + Option1.FontCondense = .F., ; + Option1.FontExtend = .F., ; + Option1.FontItalic = .F., ; + Option1.FontName = "Arial", ; + Option1.FontOutline = .F., ; + Option1.FontShadow = .F., ; + Option1.FontStrikethru = .F., ; + Option1.FontUnderline = .F., ; + Option1.ForeColor = 0,0,0, ; + Option1.Height = 17, ; + Option1.HelpContextID = 0, ; + Option1.Left = 8, ; + Option1.MouseIcon = ..\..\, ; + Option1.MousePointer = 0, ; + Option1.Name = "Option1", ; + Option1.OLEDragMode = 0, ; + Option1.OLEDragPicture = ..\..\, ; + Option1.OLEDropEffects = 3, ; + Option1.OLEDropMode = 0, ; + Option1.Picture = ..\..\, ; + Option1.PictureMargin = 0, ; + Option1.PicturePosition = 13, ; + Option1.PictureSpacing = 0, ; + Option1.RightToLeft = .F., ; + Option1.SpecialEffect = 0, ; + Option1.StatusBarText = "", ; + Option1.Style = 0, ; + Option1.TabStop = .T., ; + Option1.Tag = "", ; + Option1.TerminateRead = .F., ; + Option1.Themes = .T., ; + Option1.ToolTipText = "", ; + Option1.Top = 4, ; + Option1.Value = 0, ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 84, ; + Option1.WordWrap = .F., ; + Option2.Alignment = 0, ; + Option2.Anchor = 0, ; + Option2.AutoSize = .F., ; + Option2.BackColor = 240,240,240, ; + Option2.Caption = "La opción 2 es más larga", ; + Option2.ColorScheme = 1, ; + Option2.ColorSource = 4, ; + Option2.Comment = "", ; + Option2.ControlSource = "", ; + Option2.DisabledBackColor = 240,240,240, ; + Option2.DisabledForeColor = 109,109,109, ; + Option2.DisabledPicture = ..\..\, ; + Option2.DownPicture = ..\..\, ; + Option2.DragIcon = ..\..\, ; + Option2.DragMode = 0, ; + Option2.Enabled = .T., ; + Option2.FontBold = .F., ; + Option2.FontCharSet = 0, ; + Option2.FontCondense = .F., ; + Option2.FontExtend = .F., ; + Option2.FontItalic = .F., ; + Option2.FontName = "Arial", ; + Option2.FontOutline = .F., ; + Option2.FontShadow = .F., ; + Option2.FontStrikethru = .F., ; + Option2.FontUnderline = .F., ; + Option2.ForeColor = 0,0,0, ; + Option2.Height = 17, ; + Option2.HelpContextID = 0, ; + Option2.Left = 8, ; + Option2.MouseIcon = ..\..\, ; + Option2.MousePointer = 0, ; + Option2.Name = "Option2", ; + Option2.OLEDragMode = 0, ; + Option2.OLEDragPicture = ..\..\, ; + Option2.OLEDropEffects = 3, ; + Option2.OLEDropMode = 0, ; + Option2.Picture = ..\..\, ; + Option2.PictureMargin = 0, ; + Option2.PicturePosition = 13, ; + Option2.PictureSpacing = 0, ; + Option2.RightToLeft = .F., ; + Option2.SpecialEffect = 0, ; + Option2.StatusBarText = "", ; + Option2.Style = 0, ; + Option2.TabStop = .T., ; + Option2.Tag = "", ; + Option2.TerminateRead = .F., ; + Option2.Themes = .T., ; + Option2.ToolTipText = "", ; + Option2.Top = 28, ; + Option2.Value = 1, ; + Option2.WhatsThisHelpID = -1, ; + Option2.Width = 158, ; + Option2.WordWrap = .F., ; + Option3.Alignment = 0, ; + Option3.Anchor = 0, ; + Option3.BackColor = 128,255,128, ; + Option3.Caption = "La opción 3 es la más larga de todas", ; + Option3.ColorScheme = 1, ; + Option3.ColorSource = 4, ; + Option3.Comment = "", ; + Option3.ControlSource = "", ; + Option3.DisabledBackColor = 240,240,240, ; + Option3.DisabledForeColor = 109,109,109, ; + Option3.DisabledPicture = ..\..\, ; + Option3.DownPicture = ..\..\, ; + Option3.DragIcon = ..\..\, ; + Option3.DragMode = 0, ; + Option3.Enabled = .T., ; + Option3.FontBold = .F., ; + Option3.FontCharSet = 0, ; + Option3.FontCondense = .F., ; + Option3.FontExtend = .F., ; + Option3.FontItalic = .F., ; + Option3.FontName = "Arial", ; + Option3.FontOutline = .F., ; + Option3.FontShadow = .F., ; + Option3.FontStrikethru = .F., ; + Option3.FontUnderline = .F., ; + Option3.ForeColor = 0,0,0, ; + Option3.Height = 17, ; + Option3.HelpContextID = 0, ; + Option3.Left = 8, ; + Option3.MouseIcon = ..\..\, ; + Option3.MousePointer = 0, ; + Option3.Name = "Option3", ; + Option3.OLEDragMode = 0, ; + Option3.OLEDragPicture = ..\..\, ; + Option3.OLEDropEffects = 3, ; + Option3.OLEDropMode = 0, ; + Option3.Picture = ..\..\, ; + Option3.PictureMargin = 0, ; + Option3.PicturePosition = 13, ; + Option3.PictureSpacing = 0, ; + Option3.RightToLeft = .F., ; + Option3.SpecialEffect = 0, ; + Option3.StatusBarText = "", ; + Option3.Style = 0, ; + Option3.TabStop = .T., ; + Option3.Tag = "", ; + Option3.TerminateRead = .F., ; + Option3.Themes = .T., ; + Option3.ToolTipText = "", ; + Option3.Top = 52, ; + Option3.Value = 0, ; + Option3.WhatsThisHelpID = -1, ; + Option3.Width = 222, ; + Option3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_optiongroup2' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackStyle = 1, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ControlSource = "", ; + Height = 76, ; + Left = 287, ; + Name = "Cl_optiongroup2", ; + Top = 96, ; + Value = 2, ; + Width = 248, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 240,240,240, ; + Option1.Caption = "La Opción 1", ; + Option1.FontBold = .F., ; + Option1.Height = 27, ; + Option1.Left = 8, ; + Option1.Name = "Option1", ; + Option1.SpecialEffect = 0, ; + Option1.Style = 1, ; + Option1.Top = 4, ; + Option1.Value = 0, ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 84, ; + Option2.AutoSize = .F., ; + Option2.BackColor = 240,240,240, ; + Option2.Caption = "La opción 2 es más larga", ; + Option2.FontBold = .F., ; + Option2.Height = 27, ; + Option2.Left = 8, ; + Option2.Name = "Option2", ; + Option2.SpecialEffect = 0, ; + Option2.Style = 1, ; + Option2.Top = 28, ; + Option2.Value = 1, ; + Option2.WhatsThisHelpID = -1, ; + Option2.Width = 158, ; + Option3.AutoSize = .F., ; + Option3.BackColor = 128,255,128, ; + Option3.Caption = "La opción 3 es la más larga de todas", ; + Option3.FontBold = .F., ; + Option3.Height = 21, ; + Option3.Left = 8, ; + Option3.Name = "Option3", ; + Option3.SpecialEffect = 0, ; + Option3.Style = 1, ; + Option3.Top = 52, ; + Option3.WhatsThisHelpID = -1, ; + Option3.Width = 222 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1.Page1.Optiongroup1' AS optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (76), ; + HelpContextID = 0, ; + Left = 15, ; + MemberClass = "cl_option", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Optiongroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (248), ; + Cl_option1.Alignment = 0, ; + Cl_option1.Anchor = 0, ; + Cl_option1.AutoSize = .F., ; + Cl_option1.BackColor = 240,240,240, ; + Cl_option1.BackStyle = 1, ; + Cl_option1.Caption = "La opción 1", ; + Cl_option1.ColorScheme = 1, ; + Cl_option1.ColorSource = 4, ; + Cl_option1.Comment = "", ; + Cl_option1.ControlSource = "", ; + Cl_option1.DisabledBackColor = 0,128,192, ; + Cl_option1.DisabledForeColor = 128,0,255, ; + Cl_option1.DisabledPicture = bmps\treeview.bmp, ; + Cl_option1.DownPicture = ..\..\, ; + Cl_option1.DragIcon = ..\..\, ; + Cl_option1.DragMode = 0, ; + Cl_option1.Enabled = .T., ; + Cl_option1.FontBold = .F., ; + Cl_option1.FontCharSet = 0, ; + Cl_option1.FontCondense = .F., ; + Cl_option1.FontExtend = .F., ; + Cl_option1.FontItalic = .F., ; + Cl_option1.FontName = "Arial", ; + Cl_option1.FontOutline = .F., ; + Cl_option1.FontShadow = .F., ; + Cl_option1.FontSize = 8, ; + Cl_option1.FontStrikethru = .F., ; + Cl_option1.FontUnderline = .F., ; + Cl_option1.ForeColor = 0,0,0, ; + Cl_option1.Height = 16, ; + Cl_option1.HelpContextID = 0, ; + Cl_option1.Left = 16, ; + Cl_option1.MouseIcon = ..\..\, ; + Cl_option1.MousePointer = 0, ; + Cl_option1.Name = "Cl_option1", ; + Cl_option1.OLEDragMode = 0, ; + Cl_option1.OLEDragPicture = ..\..\, ; + Cl_option1.OLEDropEffects = 3, ; + Cl_option1.OLEDropMode = 0, ; + Cl_option1.Picture = bmps\sobrepostal.bmp, ; + Cl_option1.PictureMargin = 0, ; + Cl_option1.PicturePosition = 4, ; + Cl_option1.PictureSpacing = 0, ; + Cl_option1.RightToLeft = .F., ; + Cl_option1.SpecialEffect = 0, ; + Cl_option1.StatusBarText = "", ; + Cl_option1.Style = 0, ; + Cl_option1.TabStop = .T., ; + Cl_option1.Tag = "", ; + Cl_option1.TerminateRead = .F., ; + Cl_option1.Themes = .T., ; + Cl_option1.ToolTipText = "", ; + Cl_option1.Top = 4, ; + Cl_option1.Visible = .T., ; + Cl_option1.WhatsThisHelpID = -1, ; + Cl_option1.Width = 74, ; + Cl_option1.WordWrap = .F., ; + Cl_option2.Alignment = 0, ; + Cl_option2.Anchor = 0, ; + Cl_option2.BackColor = 240,240,240, ; + Cl_option2.BackStyle = 1, ; + Cl_option2.Caption = "La opción 2 es más larga", ; + Cl_option2.ColorScheme = 1, ; + Cl_option2.ColorSource = 4, ; + Cl_option2.Comment = "", ; + Cl_option2.ControlSource = "", ; + Cl_option2.DisabledBackColor = 0,128,192, ; + Cl_option2.DisabledForeColor = 128,0,255, ; + Cl_option2.DisabledPicture = bmps\treeview.bmp, ; + Cl_option2.DownPicture = ..\..\, ; + Cl_option2.DragIcon = ..\..\, ; + Cl_option2.DragMode = 0, ; + Cl_option2.Enabled = .T., ; + Cl_option2.FontBold = .F., ; + Cl_option2.FontCharSet = 0, ; + Cl_option2.FontCondense = .F., ; + Cl_option2.FontExtend = .F., ; + Cl_option2.FontItalic = .F., ; + Cl_option2.FontName = "Arial", ; + Cl_option2.FontOutline = .F., ; + Cl_option2.FontShadow = .F., ; + Cl_option2.FontSize = 8, ; + Cl_option2.FontStrikethru = .F., ; + Cl_option2.FontUnderline = .F., ; + Cl_option2.ForeColor = 0,0,0, ; + Cl_option2.HelpContextID = 0, ; + Cl_option2.Left = 16, ; + Cl_option2.MouseIcon = ..\..\, ; + Cl_option2.MousePointer = 0, ; + Cl_option2.Name = "Cl_option2", ; + Cl_option2.OLEDragMode = 0, ; + Cl_option2.OLEDragPicture = ..\..\, ; + Cl_option2.OLEDropEffects = 3, ; + Cl_option2.OLEDropMode = 0, ; + Cl_option2.Picture = bmps\sobrepostal.bmp, ; + Cl_option2.PictureMargin = 0, ; + Cl_option2.PicturePosition = 4, ; + Cl_option2.PictureSpacing = 0, ; + Cl_option2.RightToLeft = .F., ; + Cl_option2.SpecialEffect = 0, ; + Cl_option2.StatusBarText = "", ; + Cl_option2.Style = 0, ; + Cl_option2.TabStop = .T., ; + Cl_option2.Tag = "", ; + Cl_option2.TerminateRead = .F., ; + Cl_option2.Themes = .T., ; + Cl_option2.ToolTipText = "", ; + Cl_option2.Top = 28, ; + Cl_option2.Value = 1, ; + Cl_option2.Visible = .T., ; + Cl_option2.WhatsThisHelpID = -1, ; + Cl_option2.WordWrap = .F., ; + Cl_option3.Alignment = 0, ; + Cl_option3.Anchor = 0, ; + Cl_option3.AutoSize = .F., ; + Cl_option3.BackColor = 240,240,240, ; + Cl_option3.BackStyle = 1, ; + Cl_option3.Caption = "La opción 3 es la más larga de todas", ; + Cl_option3.ColorScheme = 1, ; + Cl_option3.ColorSource = 4, ; + Cl_option3.Comment = "", ; + Cl_option3.ControlSource = "", ; + Cl_option3.DefWidth = , ; + Cl_option3.DisabledBackColor = 213,233,255, ; + Cl_option3.DisabledForeColor = 128,0,255, ; + Cl_option3.DisabledPicture = bmps\treeview.bmp, ; + Cl_option3.DownPicture = ..\..\, ; + Cl_option3.DragIcon = ..\..\, ; + Cl_option3.DragMode = 0, ; + Cl_option3.Enabled = .F., ; + Cl_option3.FontBold = .F., ; + Cl_option3.FontCharSet = 0, ; + Cl_option3.FontCondense = .F., ; + Cl_option3.FontExtend = .F., ; + Cl_option3.FontItalic = .F., ; + Cl_option3.FontName = "Arial", ; + Cl_option3.FontOutline = .F., ; + Cl_option3.FontShadow = .F., ; + Cl_option3.FontSize = 8, ; + Cl_option3.FontStrikethru = .F., ; + Cl_option3.FontUnderline = .F., ; + Cl_option3.ForeColor = 0,0,0, ; + Cl_option3.HelpContextID = 0, ; + Cl_option3.Left = 16, ; + Cl_option3.MouseIcon = ..\..\, ; + Cl_option3.MousePointer = 0, ; + Cl_option3.Name = "Cl_option3", ; + Cl_option3.OLEDragMode = 0, ; + Cl_option3.OLEDragPicture = ..\..\, ; + Cl_option3.OLEDropEffects = 3, ; + Cl_option3.OLEDropMode = 0, ; + Cl_option3.Picture = bmps\sobrepostal.bmp, ; + Cl_option3.PictureMargin = 0, ; + Cl_option3.PicturePosition = 4, ; + Cl_option3.PictureSpacing = 0, ; + Cl_option3.RightToLeft = .F., ; + Cl_option3.SpecialEffect = 0, ; + Cl_option3.StatusBarText = "", ; + Cl_option3.Style = 0, ; + Cl_option3.TabStop = .T., ; + Cl_option3.Tag = "", ; + Cl_option3.TerminateRead = .F., ; + Cl_option3.Themes = .T., ; + Cl_option3.ToolTipText = "", ; + Cl_option3.Top = 52, ; + Cl_option3.Visible = .T., ; + Cl_option3.WhatsThisHelpID = -1, ; + Cl_option3.Width = (195), ; + Cl_option3.WordWrap = .F. + *< END OBJECT: BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1.Page1.Optiongroup2' AS optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 15, ; + MemberClass = "cl_option", ; + MemberClassLibrary = lib_controles.vcx, ; + MousePointer = 0, ; + Name = "Optiongroup2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 96, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 248, ; + Cl_option1.Alignment = 0, ; + Cl_option1.Anchor = 0, ; + Cl_option1.AutoSize = .F., ; + Cl_option1.BackColor = 240,240,240, ; + Cl_option1.BackStyle = 1, ; + Cl_option1.Caption = "La opción 1", ; + Cl_option1.ColorScheme = 1, ; + Cl_option1.ColorSource = 4, ; + Cl_option1.Comment = "", ; + Cl_option1.ControlSource = "", ; + Cl_option1.DisabledBackColor = 0,128,192, ; + Cl_option1.DisabledForeColor = 128,0,255, ; + Cl_option1.DisabledPicture = bmps\treeview.bmp, ; + Cl_option1.DownPicture = ..\..\, ; + Cl_option1.DragIcon = ..\..\, ; + Cl_option1.DragMode = 0, ; + Cl_option1.Enabled = .T., ; + Cl_option1.FontBold = .F., ; + Cl_option1.FontCharSet = 0, ; + Cl_option1.FontCondense = .F., ; + Cl_option1.FontExtend = .F., ; + Cl_option1.FontItalic = .F., ; + Cl_option1.FontName = "Arial", ; + Cl_option1.FontOutline = .F., ; + Cl_option1.FontShadow = .F., ; + Cl_option1.FontSize = 8, ; + Cl_option1.FontStrikethru = .F., ; + Cl_option1.FontUnderline = .F., ; + Cl_option1.ForeColor = 0,0,0, ; + Cl_option1.Height = 42, ; + Cl_option1.HelpContextID = 0, ; + Cl_option1.Left = 16, ; + Cl_option1.MouseIcon = ..\..\, ; + Cl_option1.MousePointer = 0, ; + Cl_option1.Name = "Cl_option1", ; + Cl_option1.OLEDragMode = 0, ; + Cl_option1.OLEDragPicture = ..\..\, ; + Cl_option1.OLEDropEffects = 3, ; + Cl_option1.OLEDropMode = 0, ; + Cl_option1.Picture = bmps\sobrepostal.bmp, ; + Cl_option1.PictureMargin = 0, ; + Cl_option1.PicturePosition = 4, ; + Cl_option1.PictureSpacing = 0, ; + Cl_option1.RightToLeft = .F., ; + Cl_option1.SpecialEffect = 0, ; + Cl_option1.StatusBarText = "", ; + Cl_option1.Style = 1, ; + Cl_option1.TabStop = .T., ; + Cl_option1.Tag = "", ; + Cl_option1.TerminateRead = .F., ; + Cl_option1.Themes = .T., ; + Cl_option1.ToolTipText = "", ; + Cl_option1.Top = 4, ; + Cl_option1.Visible = .T., ; + Cl_option1.WhatsThisHelpID = -1, ; + Cl_option1.Width = 88, ; + Cl_option1.WordWrap = .F., ; + Cl_option2.Alignment = 0, ; + Cl_option2.Anchor = 0, ; + Cl_option2.BackColor = 240,240,240, ; + Cl_option2.BackStyle = 1, ; + Cl_option2.Caption = "La opción 2 es más larga", ; + Cl_option2.ColorScheme = 1, ; + Cl_option2.ColorSource = 4, ; + Cl_option2.Comment = "", ; + Cl_option2.ControlSource = "", ; + Cl_option2.DefHeight = , ; + Cl_option2.DisabledBackColor = 0,128,192, ; + Cl_option2.DisabledForeColor = 128,0,255, ; + Cl_option2.DisabledPicture = bmps\treeview.bmp, ; + Cl_option2.DownPicture = ..\..\, ; + Cl_option2.DragIcon = ..\..\, ; + Cl_option2.DragMode = 0, ; + Cl_option2.Enabled = .T., ; + Cl_option2.FontBold = .F., ; + Cl_option2.FontCharSet = 0, ; + Cl_option2.FontCondense = .F., ; + Cl_option2.FontExtend = .F., ; + Cl_option2.FontItalic = .F., ; + Cl_option2.FontName = "Arial", ; + Cl_option2.FontOutline = .F., ; + Cl_option2.FontShadow = .F., ; + Cl_option2.FontSize = 8, ; + Cl_option2.FontStrikethru = .F., ; + Cl_option2.FontUnderline = .F., ; + Cl_option2.ForeColor = 0,0,0, ; + Cl_option2.Height = (21), ; + Cl_option2.HelpContextID = 0, ; + Cl_option2.Left = 16, ; + Cl_option2.MouseIcon = ..\..\, ; + Cl_option2.MousePointer = 0, ; + Cl_option2.Name = "Cl_option2", ; + Cl_option2.OLEDragMode = 0, ; + Cl_option2.OLEDragPicture = ..\..\, ; + Cl_option2.OLEDropEffects = 3, ; + Cl_option2.OLEDropMode = 0, ; + Cl_option2.Picture = bmps\sobrepostal.bmp, ; + Cl_option2.PictureMargin = 0, ; + Cl_option2.PicturePosition = 4, ; + Cl_option2.PictureSpacing = 0, ; + Cl_option2.RightToLeft = .F., ; + Cl_option2.SpecialEffect = 0, ; + Cl_option2.StatusBarText = "", ; + Cl_option2.Style = 1, ; + Cl_option2.TabStop = .T., ; + Cl_option2.Tag = "", ; + Cl_option2.TerminateRead = .F., ; + Cl_option2.Themes = .T., ; + Cl_option2.ToolTipText = "", ; + Cl_option2.Top = 28, ; + Cl_option2.Value = 1, ; + Cl_option2.Visible = .T., ; + Cl_option2.WhatsThisHelpID = -1, ; + Cl_option2.WordWrap = .F., ; + Cl_option3.Alignment = 0, ; + Cl_option3.Anchor = 0, ; + Cl_option3.AutoSize = .F., ; + Cl_option3.BackColor = 240,240,240, ; + Cl_option3.BackStyle = 1, ; + Cl_option3.Caption = "La opción 3 es la más larga de todas", ; + Cl_option3.ColorScheme = 1, ; + Cl_option3.ColorSource = 4, ; + Cl_option3.Comment = "", ; + Cl_option3.ControlSource = "", ; + Cl_option3.DefHeight = , ; + Cl_option3.DisabledBackColor = 0,128,192, ; + Cl_option3.DisabledForeColor = 128,0,255, ; + Cl_option3.DisabledPicture = bmps\treeview.bmp, ; + Cl_option3.DownPicture = ..\..\, ; + Cl_option3.DragIcon = ..\..\, ; + Cl_option3.DragMode = 0, ; + Cl_option3.Enabled = .F., ; + Cl_option3.FontBold = .F., ; + Cl_option3.FontCharSet = 0, ; + Cl_option3.FontCondense = .F., ; + Cl_option3.FontExtend = .F., ; + Cl_option3.FontItalic = .F., ; + Cl_option3.FontName = "Arial", ; + Cl_option3.FontOutline = .F., ; + Cl_option3.FontShadow = .F., ; + Cl_option3.FontSize = 8, ; + Cl_option3.FontStrikethru = .F., ; + Cl_option3.FontUnderline = .F., ; + Cl_option3.ForeColor = 0,0,0, ; + Cl_option3.Height = (21), ; + Cl_option3.HelpContextID = 0, ; + Cl_option3.Left = 16, ; + Cl_option3.MouseIcon = ..\..\, ; + Cl_option3.MousePointer = 0, ; + Cl_option3.Name = "Cl_option3", ; + Cl_option3.OLEDragMode = 0, ; + Cl_option3.OLEDragPicture = ..\..\, ; + Cl_option3.OLEDropEffects = 3, ; + Cl_option3.OLEDropMode = 0, ; + Cl_option3.Picture = bmps\sobrepostal.bmp, ; + Cl_option3.PictureMargin = 0, ; + Cl_option3.PicturePosition = 4, ; + Cl_option3.PictureSpacing = 0, ; + Cl_option3.RightToLeft = .F., ; + Cl_option3.SpecialEffect = 0, ; + Cl_option3.StatusBarText = "", ; + Cl_option3.Style = 1, ; + Cl_option3.TabStop = .T., ; + Cl_option3.Tag = "", ; + Cl_option3.TerminateRead = .F., ; + Cl_option3.Themes = .T., ; + Cl_option3.ToolTipText = "", ; + Cl_option3.Top = 52, ; + Cl_option3.Visible = .T., ; + Cl_option3.WhatsThisHelpID = -1, ; + Cl_option3.Width = 209, ; + Cl_option3.WordWrap = .F. + *< END OBJECT: BaseClass="optiongroup" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_optiongroup.sc2 b/TESTS/DATOS_READONLY/f_optiongroup.sc2 index fd558c1..7f657a5 100644 --- a/TESTS/DATOS_READONLY/f_optiongroup.sc2 +++ b/TESTS/DATOS_READONLY/f_optiongroup.sc2 @@ -4,1435 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_optiongroup.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_optiongroup_test" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS f_optiongroup_test AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_optiongroup2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_optiongroup2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Optiongroup2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Optiongroup2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_option1" UniqueID="" Timestamp="" /> - - BackColor = 192,192,192 - Caption = "OptionGroup_Test" - c_testname = OptionGroup_Test - DoCreate = .T. - Height = 448 - Left = 0 - Name = "F_OptionGroup_Test" - Top = 0 - Width = 819 - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "OPTIONGROUP NORMAL" - Label1.Name = "Label1" - Label2.Caption = "OPTIONGROUP SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_option1' AS cl_option WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 128,255,255, ; - BackStyle = 1, ; - Caption = "La opción separada es larga también", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 16, ; - HelpContextID = 0, ; - Left = 304, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_option1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureMargin = 0, ; - PicturePosition = 4, ; - PictureSpacing = 0, ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (424), ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (220), ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optionbutton" /> - - ADD OBJECT 'Cl_optiongroup1' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackStyle = 0, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ControlSource = "", ; - Height = 76, ; - Left = 296, ; - Name = "Cl_optiongroup1", ; - Top = 28, ; - Value = 2, ; - Width = 248, ; - Option1.Alignment = 0, ; - Option1.Anchor = 0, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 240,240,240, ; - Option1.Caption = "La Opción 1", ; - Option1.ColorScheme = 1, ; - Option1.ColorSource = 4, ; - Option1.Comment = "", ; - Option1.ControlSource = "", ; - Option1.DisabledBackColor = 240,240,240, ; - Option1.DisabledForeColor = 109,109,109, ; - Option1.DisabledPicture = ..\..\, ; - Option1.DownPicture = ..\..\, ; - Option1.DragIcon = ..\..\, ; - Option1.DragMode = 0, ; - Option1.Enabled = .T., ; - Option1.FontBold = .F., ; - Option1.FontCharSet = 0, ; - Option1.FontCondense = .F., ; - Option1.FontExtend = .F., ; - Option1.FontItalic = .F., ; - Option1.FontName = "Arial", ; - Option1.FontOutline = .F., ; - Option1.FontShadow = .F., ; - Option1.FontStrikethru = .F., ; - Option1.FontUnderline = .F., ; - Option1.ForeColor = 0,0,0, ; - Option1.Height = 17, ; - Option1.HelpContextID = 0, ; - Option1.Left = 8, ; - Option1.MouseIcon = ..\..\, ; - Option1.MousePointer = 0, ; - Option1.Name = "Option1", ; - Option1.OLEDragMode = 0, ; - Option1.OLEDragPicture = ..\..\, ; - Option1.OLEDropEffects = 3, ; - Option1.OLEDropMode = 0, ; - Option1.Picture = ..\..\, ; - Option1.PictureMargin = 0, ; - Option1.PicturePosition = 13, ; - Option1.PictureSpacing = 0, ; - Option1.RightToLeft = .F., ; - Option1.SpecialEffect = 0, ; - Option1.StatusBarText = "", ; - Option1.Style = 0, ; - Option1.TabStop = .T., ; - Option1.Tag = "", ; - Option1.TerminateRead = .F., ; - Option1.Themes = .T., ; - Option1.ToolTipText = "", ; - Option1.Top = 4, ; - Option1.Value = 0, ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 84, ; - Option1.WordWrap = .F., ; - Option2.Alignment = 0, ; - Option2.Anchor = 0, ; - Option2.AutoSize = .F., ; - Option2.BackColor = 240,240,240, ; - Option2.Caption = "La opción 2 es más larga", ; - Option2.ColorScheme = 1, ; - Option2.ColorSource = 4, ; - Option2.Comment = "", ; - Option2.ControlSource = "", ; - Option2.DisabledBackColor = 240,240,240, ; - Option2.DisabledForeColor = 109,109,109, ; - Option2.DisabledPicture = ..\..\, ; - Option2.DownPicture = ..\..\, ; - Option2.DragIcon = ..\..\, ; - Option2.DragMode = 0, ; - Option2.Enabled = .T., ; - Option2.FontBold = .F., ; - Option2.FontCharSet = 0, ; - Option2.FontCondense = .F., ; - Option2.FontExtend = .F., ; - Option2.FontItalic = .F., ; - Option2.FontName = "Arial", ; - Option2.FontOutline = .F., ; - Option2.FontShadow = .F., ; - Option2.FontStrikethru = .F., ; - Option2.FontUnderline = .F., ; - Option2.ForeColor = 0,0,0, ; - Option2.Height = 17, ; - Option2.HelpContextID = 0, ; - Option2.Left = 8, ; - Option2.MouseIcon = ..\..\, ; - Option2.MousePointer = 0, ; - Option2.Name = "Option2", ; - Option2.OLEDragMode = 0, ; - Option2.OLEDragPicture = ..\..\, ; - Option2.OLEDropEffects = 3, ; - Option2.OLEDropMode = 0, ; - Option2.Picture = ..\..\, ; - Option2.PictureMargin = 0, ; - Option2.PicturePosition = 13, ; - Option2.PictureSpacing = 0, ; - Option2.RightToLeft = .F., ; - Option2.SpecialEffect = 0, ; - Option2.StatusBarText = "", ; - Option2.Style = 0, ; - Option2.TabStop = .T., ; - Option2.Tag = "", ; - Option2.TerminateRead = .F., ; - Option2.Themes = .T., ; - Option2.ToolTipText = "", ; - Option2.Top = 28, ; - Option2.Value = 1, ; - Option2.WhatsThisHelpID = -1, ; - Option2.Width = 158, ; - Option2.WordWrap = .F., ; - Option3.Alignment = 0, ; - Option3.Anchor = 0, ; - Option3.BackColor = 128,255,128, ; - Option3.Caption = "La opción 3 es la más larga de todas", ; - Option3.ColorScheme = 1, ; - Option3.ColorSource = 4, ; - Option3.Comment = "", ; - Option3.ControlSource = "", ; - Option3.DisabledBackColor = 240,240,240, ; - Option3.DisabledForeColor = 109,109,109, ; - Option3.DisabledPicture = ..\..\, ; - Option3.DownPicture = ..\..\, ; - Option3.DragIcon = ..\..\, ; - Option3.DragMode = 0, ; - Option3.Enabled = .T., ; - Option3.FontBold = .F., ; - Option3.FontCharSet = 0, ; - Option3.FontCondense = .F., ; - Option3.FontExtend = .F., ; - Option3.FontItalic = .F., ; - Option3.FontName = "Arial", ; - Option3.FontOutline = .F., ; - Option3.FontShadow = .F., ; - Option3.FontStrikethru = .F., ; - Option3.FontUnderline = .F., ; - Option3.ForeColor = 0,0,0, ; - Option3.Height = 17, ; - Option3.HelpContextID = 0, ; - Option3.Left = 8, ; - Option3.MouseIcon = ..\..\, ; - Option3.MousePointer = 0, ; - Option3.Name = "Option3", ; - Option3.OLEDragMode = 0, ; - Option3.OLEDragPicture = ..\..\, ; - Option3.OLEDropEffects = 3, ; - Option3.OLEDropMode = 0, ; - Option3.Picture = ..\..\, ; - Option3.PictureMargin = 0, ; - Option3.PicturePosition = 13, ; - Option3.PictureSpacing = 0, ; - Option3.RightToLeft = .F., ; - Option3.SpecialEffect = 0, ; - Option3.StatusBarText = "", ; - Option3.Style = 0, ; - Option3.TabStop = .T., ; - Option3.Tag = "", ; - Option3.TerminateRead = .F., ; - Option3.Themes = .T., ; - Option3.ToolTipText = "", ; - Option3.Top = 52, ; - Option3.Value = 0, ; - Option3.WhatsThisHelpID = -1, ; - Option3.Width = 222, ; - Option3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'Cl_optiongroup2' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackStyle = 1, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ControlSource = "", ; - Height = 76, ; - Left = 296, ; - Name = "Cl_optiongroup2", ; - Top = 112, ; - Value = 2, ; - Width = 248, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 240,240,240, ; - Option1.Caption = "La Opción 1", ; - Option1.FontBold = .F., ; - Option1.Height = 27, ; - Option1.Left = 8, ; - Option1.Name = "Option1", ; - Option1.SpecialEffect = 0, ; - Option1.Style = 1, ; - Option1.Top = 4, ; - Option1.Value = 0, ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 84, ; - Option2.AutoSize = .F., ; - Option2.BackColor = 240,240,240, ; - Option2.Caption = "La opción 2 es más larga", ; - Option2.FontBold = .F., ; - Option2.Height = 27, ; - Option2.Left = 8, ; - Option2.Name = "Option2", ; - Option2.SpecialEffect = 0, ; - Option2.Style = 1, ; - Option2.Top = 28, ; - Option2.Value = 1, ; - Option2.WhatsThisHelpID = -1, ; - Option2.Width = 158, ; - Option3.AutoSize = .F., ; - Option3.BackColor = 128,255,128, ; - Option3.Caption = "La opción 3 es la más larga de todas", ; - Option3.FontBold = .F., ; - Option3.Height = 21, ; - Option3.Left = 8, ; - Option3.Name = "Option3", ; - Option3.SpecialEffect = 0, ; - Option3.Style = 1, ; - Option3.Top = 52, ; - Option3.WhatsThisHelpID = -1, ; - Option3.Width = 222 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'Optiongroup1' AS optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (76), ; - HelpContextID = 0, ; - Left = (24), ; - MemberClass = "cl_option", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Optiongroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (24), ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (248), ; - Cl_option1.Alignment = 0, ; - Cl_option1.Anchor = 0, ; - Cl_option1.AutoSize = .F., ; - Cl_option1.BackColor = 240,240,240, ; - Cl_option1.BackStyle = 1, ; - Cl_option1.Caption = "La opción 1", ; - Cl_option1.ColorScheme = 1, ; - Cl_option1.ColorSource = 4, ; - Cl_option1.Comment = "", ; - Cl_option1.ControlSource = "", ; - Cl_option1.DisabledBackColor = 0,128,192, ; - Cl_option1.DisabledForeColor = 128,0,255, ; - Cl_option1.DisabledPicture = bmps\treeview.bmp, ; - Cl_option1.DownPicture = ..\..\, ; - Cl_option1.DragIcon = ..\..\, ; - Cl_option1.DragMode = 0, ; - Cl_option1.Enabled = .T., ; - Cl_option1.FontBold = .F., ; - Cl_option1.FontCharSet = 0, ; - Cl_option1.FontCondense = .F., ; - Cl_option1.FontExtend = .F., ; - Cl_option1.FontItalic = .F., ; - Cl_option1.FontName = "Arial", ; - Cl_option1.FontOutline = .F., ; - Cl_option1.FontShadow = .F., ; - Cl_option1.FontSize = 8, ; - Cl_option1.FontStrikethru = .F., ; - Cl_option1.FontUnderline = .F., ; - Cl_option1.ForeColor = 0,0,0, ; - Cl_option1.Height = 16, ; - Cl_option1.HelpContextID = 0, ; - Cl_option1.Left = 16, ; - Cl_option1.MouseIcon = ..\..\, ; - Cl_option1.MousePointer = 0, ; - Cl_option1.Name = "Cl_option1", ; - Cl_option1.OLEDragMode = 0, ; - Cl_option1.OLEDragPicture = ..\..\, ; - Cl_option1.OLEDropEffects = 3, ; - Cl_option1.OLEDropMode = 0, ; - Cl_option1.Picture = bmps\sobrepostal.bmp, ; - Cl_option1.PictureMargin = 0, ; - Cl_option1.PicturePosition = 4, ; - Cl_option1.PictureSpacing = 0, ; - Cl_option1.RightToLeft = .F., ; - Cl_option1.SpecialEffect = 0, ; - Cl_option1.StatusBarText = "", ; - Cl_option1.Style = 0, ; - Cl_option1.TabStop = .T., ; - Cl_option1.Tag = "", ; - Cl_option1.TerminateRead = .F., ; - Cl_option1.Themes = .T., ; - Cl_option1.ToolTipText = "", ; - Cl_option1.Top = 4, ; - Cl_option1.Visible = .T., ; - Cl_option1.WhatsThisHelpID = -1, ; - Cl_option1.Width = 74, ; - Cl_option1.WordWrap = .F., ; - Cl_option2.Alignment = 0, ; - Cl_option2.Anchor = 0, ; - Cl_option2.BackColor = 240,240,240, ; - Cl_option2.BackStyle = 1, ; - Cl_option2.Caption = "La opción 2 es más larga", ; - Cl_option2.ColorScheme = 1, ; - Cl_option2.ColorSource = 4, ; - Cl_option2.Comment = "", ; - Cl_option2.ControlSource = "", ; - Cl_option2.DisabledBackColor = 0,128,192, ; - Cl_option2.DisabledForeColor = 128,0,255, ; - Cl_option2.DisabledPicture = bmps\treeview.bmp, ; - Cl_option2.DownPicture = ..\..\, ; - Cl_option2.DragIcon = ..\..\, ; - Cl_option2.DragMode = 0, ; - Cl_option2.Enabled = .T., ; - Cl_option2.FontBold = .F., ; - Cl_option2.FontCharSet = 0, ; - Cl_option2.FontCondense = .F., ; - Cl_option2.FontExtend = .F., ; - Cl_option2.FontItalic = .F., ; - Cl_option2.FontName = "Arial", ; - Cl_option2.FontOutline = .F., ; - Cl_option2.FontShadow = .F., ; - Cl_option2.FontSize = 8, ; - Cl_option2.FontStrikethru = .F., ; - Cl_option2.FontUnderline = .F., ; - Cl_option2.ForeColor = 0,0,0, ; - Cl_option2.HelpContextID = 0, ; - Cl_option2.Left = 16, ; - Cl_option2.MouseIcon = ..\..\, ; - Cl_option2.MousePointer = 0, ; - Cl_option2.Name = "Cl_option2", ; - Cl_option2.OLEDragMode = 0, ; - Cl_option2.OLEDragPicture = ..\..\, ; - Cl_option2.OLEDropEffects = 3, ; - Cl_option2.OLEDropMode = 0, ; - Cl_option2.Picture = bmps\sobrepostal.bmp, ; - Cl_option2.PictureMargin = 0, ; - Cl_option2.PicturePosition = 4, ; - Cl_option2.PictureSpacing = 0, ; - Cl_option2.RightToLeft = .F., ; - Cl_option2.SpecialEffect = 0, ; - Cl_option2.StatusBarText = "", ; - Cl_option2.Style = 0, ; - Cl_option2.TabStop = .T., ; - Cl_option2.Tag = "", ; - Cl_option2.TerminateRead = .F., ; - Cl_option2.Themes = .T., ; - Cl_option2.ToolTipText = "", ; - Cl_option2.Top = 28, ; - Cl_option2.Value = 1, ; - Cl_option2.Visible = .T., ; - Cl_option2.WhatsThisHelpID = -1, ; - Cl_option2.WordWrap = .F., ; - Cl_option3.Alignment = 0, ; - Cl_option3.Anchor = 0, ; - Cl_option3.AutoSize = .F., ; - Cl_option3.BackColor = 240,240,240, ; - Cl_option3.BackStyle = 1, ; - Cl_option3.Caption = "La opción 3 es la más larga de todas", ; - Cl_option3.ColorScheme = 1, ; - Cl_option3.ColorSource = 4, ; - Cl_option3.Comment = "", ; - Cl_option3.ControlSource = "", ; - Cl_option3.DefWidth = , ; - Cl_option3.DisabledBackColor = 213,233,255, ; - Cl_option3.DisabledForeColor = 128,0,255, ; - Cl_option3.DisabledPicture = bmps\treeview.bmp, ; - Cl_option3.DownPicture = ..\..\, ; - Cl_option3.DragIcon = ..\..\, ; - Cl_option3.DragMode = 0, ; - Cl_option3.Enabled = .F., ; - Cl_option3.FontBold = .F., ; - Cl_option3.FontCharSet = 0, ; - Cl_option3.FontCondense = .F., ; - Cl_option3.FontExtend = .F., ; - Cl_option3.FontItalic = .F., ; - Cl_option3.FontName = "Arial", ; - Cl_option3.FontOutline = .F., ; - Cl_option3.FontShadow = .F., ; - Cl_option3.FontSize = 8, ; - Cl_option3.FontStrikethru = .F., ; - Cl_option3.FontUnderline = .F., ; - Cl_option3.ForeColor = 0,0,0, ; - Cl_option3.HelpContextID = 0, ; - Cl_option3.Left = 16, ; - Cl_option3.MouseIcon = ..\..\, ; - Cl_option3.MousePointer = 0, ; - Cl_option3.Name = "Cl_option3", ; - Cl_option3.OLEDragMode = 0, ; - Cl_option3.OLEDragPicture = ..\..\, ; - Cl_option3.OLEDropEffects = 3, ; - Cl_option3.OLEDropMode = 0, ; - Cl_option3.Picture = bmps\sobrepostal.bmp, ; - Cl_option3.PictureMargin = 0, ; - Cl_option3.PicturePosition = 4, ; - Cl_option3.PictureSpacing = 0, ; - Cl_option3.RightToLeft = .F., ; - Cl_option3.SpecialEffect = 0, ; - Cl_option3.StatusBarText = "", ; - Cl_option3.Style = 0, ; - Cl_option3.TabStop = .T., ; - Cl_option3.Tag = "", ; - Cl_option3.TerminateRead = .F., ; - Cl_option3.Themes = .T., ; - Cl_option3.ToolTipText = "", ; - Cl_option3.Top = 52, ; - Cl_option3.Visible = .T., ; - Cl_option3.WhatsThisHelpID = -1, ; - Cl_option3.Width = (195), ; - Cl_option3.WordWrap = .F. - *< END OBJECT: BaseClass="optiongroup" /> - - ADD OBJECT 'Optiongroup2' AS optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 24, ; - MemberClass = "cl_option", ; - MemberClassLibrary = lib_controles.vcx, ; - MousePointer = 0, ; - Name = "Optiongroup2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 112, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 248, ; - Cl_option1.Alignment = 0, ; - Cl_option1.Anchor = 0, ; - Cl_option1.AutoSize = .F., ; - Cl_option1.BackColor = 240,240,240, ; - Cl_option1.BackStyle = 1, ; - Cl_option1.Caption = "La opción 1", ; - Cl_option1.ColorScheme = 1, ; - Cl_option1.ColorSource = 4, ; - Cl_option1.Comment = "", ; - Cl_option1.ControlSource = "", ; - Cl_option1.DisabledBackColor = 0,128,192, ; - Cl_option1.DisabledForeColor = 128,0,255, ; - Cl_option1.DisabledPicture = bmps\treeview.bmp, ; - Cl_option1.DownPicture = ..\..\, ; - Cl_option1.DragIcon = ..\..\, ; - Cl_option1.DragMode = 0, ; - Cl_option1.Enabled = .T., ; - Cl_option1.FontBold = .F., ; - Cl_option1.FontCharSet = 0, ; - Cl_option1.FontCondense = .F., ; - Cl_option1.FontExtend = .F., ; - Cl_option1.FontItalic = .F., ; - Cl_option1.FontName = "Arial", ; - Cl_option1.FontOutline = .F., ; - Cl_option1.FontShadow = .F., ; - Cl_option1.FontSize = 8, ; - Cl_option1.FontStrikethru = .F., ; - Cl_option1.FontUnderline = .F., ; - Cl_option1.ForeColor = 0,0,0, ; - Cl_option1.Height = 42, ; - Cl_option1.HelpContextID = 0, ; - Cl_option1.Left = 16, ; - Cl_option1.MouseIcon = ..\..\, ; - Cl_option1.MousePointer = 0, ; - Cl_option1.Name = "Cl_option1", ; - Cl_option1.OLEDragMode = 0, ; - Cl_option1.OLEDragPicture = ..\..\, ; - Cl_option1.OLEDropEffects = 3, ; - Cl_option1.OLEDropMode = 0, ; - Cl_option1.Picture = bmps\sobrepostal.bmp, ; - Cl_option1.PictureMargin = 0, ; - Cl_option1.PicturePosition = 4, ; - Cl_option1.PictureSpacing = 0, ; - Cl_option1.RightToLeft = .F., ; - Cl_option1.SpecialEffect = 0, ; - Cl_option1.StatusBarText = "", ; - Cl_option1.Style = 1, ; - Cl_option1.TabStop = .T., ; - Cl_option1.Tag = "", ; - Cl_option1.TerminateRead = .F., ; - Cl_option1.Themes = .T., ; - Cl_option1.ToolTipText = "", ; - Cl_option1.Top = 4, ; - Cl_option1.Visible = .T., ; - Cl_option1.WhatsThisHelpID = -1, ; - Cl_option1.Width = 88, ; - Cl_option1.WordWrap = .F., ; - Cl_option2.Alignment = 0, ; - Cl_option2.Anchor = 0, ; - Cl_option2.BackColor = 240,240,240, ; - Cl_option2.BackStyle = 1, ; - Cl_option2.Caption = "La opción 2 es más larga", ; - Cl_option2.ColorScheme = 1, ; - Cl_option2.ColorSource = 4, ; - Cl_option2.Comment = "", ; - Cl_option2.ControlSource = "", ; - Cl_option2.DefHeight = , ; - Cl_option2.DisabledBackColor = 0,128,192, ; - Cl_option2.DisabledForeColor = 128,0,255, ; - Cl_option2.DisabledPicture = bmps\treeview.bmp, ; - Cl_option2.DownPicture = ..\..\, ; - Cl_option2.DragIcon = ..\..\, ; - Cl_option2.DragMode = 0, ; - Cl_option2.Enabled = .T., ; - Cl_option2.FontBold = .F., ; - Cl_option2.FontCharSet = 0, ; - Cl_option2.FontCondense = .F., ; - Cl_option2.FontExtend = .F., ; - Cl_option2.FontItalic = .F., ; - Cl_option2.FontName = "Arial", ; - Cl_option2.FontOutline = .F., ; - Cl_option2.FontShadow = .F., ; - Cl_option2.FontSize = 8, ; - Cl_option2.FontStrikethru = .F., ; - Cl_option2.FontUnderline = .F., ; - Cl_option2.ForeColor = 0,0,0, ; - Cl_option2.Height = (21), ; - Cl_option2.HelpContextID = 0, ; - Cl_option2.Left = 16, ; - Cl_option2.MouseIcon = ..\..\, ; - Cl_option2.MousePointer = 0, ; - Cl_option2.Name = "Cl_option2", ; - Cl_option2.OLEDragMode = 0, ; - Cl_option2.OLEDragPicture = ..\..\, ; - Cl_option2.OLEDropEffects = 3, ; - Cl_option2.OLEDropMode = 0, ; - Cl_option2.Picture = bmps\sobrepostal.bmp, ; - Cl_option2.PictureMargin = 0, ; - Cl_option2.PicturePosition = 4, ; - Cl_option2.PictureSpacing = 0, ; - Cl_option2.RightToLeft = .F., ; - Cl_option2.SpecialEffect = 0, ; - Cl_option2.StatusBarText = "", ; - Cl_option2.Style = 1, ; - Cl_option2.TabStop = .T., ; - Cl_option2.Tag = "", ; - Cl_option2.TerminateRead = .F., ; - Cl_option2.Themes = .T., ; - Cl_option2.ToolTipText = "", ; - Cl_option2.Top = 28, ; - Cl_option2.Value = 1, ; - Cl_option2.Visible = .T., ; - Cl_option2.WhatsThisHelpID = -1, ; - Cl_option2.WordWrap = .F., ; - Cl_option3.Alignment = 0, ; - Cl_option3.Anchor = 0, ; - Cl_option3.AutoSize = .F., ; - Cl_option3.BackColor = 240,240,240, ; - Cl_option3.BackStyle = 1, ; - Cl_option3.Caption = "La opción 3 es la más larga de todas", ; - Cl_option3.ColorScheme = 1, ; - Cl_option3.ColorSource = 4, ; - Cl_option3.Comment = "", ; - Cl_option3.ControlSource = "", ; - Cl_option3.DefHeight = , ; - Cl_option3.DisabledBackColor = 0,128,192, ; - Cl_option3.DisabledForeColor = 128,0,255, ; - Cl_option3.DisabledPicture = bmps\treeview.bmp, ; - Cl_option3.DownPicture = ..\..\, ; - Cl_option3.DragIcon = ..\..\, ; - Cl_option3.DragMode = 0, ; - Cl_option3.Enabled = .F., ; - Cl_option3.FontBold = .F., ; - Cl_option3.FontCharSet = 0, ; - Cl_option3.FontCondense = .F., ; - Cl_option3.FontExtend = .F., ; - Cl_option3.FontItalic = .F., ; - Cl_option3.FontName = "Arial", ; - Cl_option3.FontOutline = .F., ; - Cl_option3.FontShadow = .F., ; - Cl_option3.FontSize = 8, ; - Cl_option3.FontStrikethru = .F., ; - Cl_option3.FontUnderline = .F., ; - Cl_option3.ForeColor = 0,0,0, ; - Cl_option3.Height = (21), ; - Cl_option3.HelpContextID = 0, ; - Cl_option3.Left = 16, ; - Cl_option3.MouseIcon = ..\..\, ; - Cl_option3.MousePointer = 0, ; - Cl_option3.Name = "Cl_option3", ; - Cl_option3.OLEDragMode = 0, ; - Cl_option3.OLEDragPicture = ..\..\, ; - Cl_option3.OLEDropEffects = 3, ; - Cl_option3.OLEDropMode = 0, ; - Cl_option3.Picture = bmps\sobrepostal.bmp, ; - Cl_option3.PictureMargin = 0, ; - Cl_option3.PicturePosition = 4, ; - Cl_option3.PictureSpacing = 0, ; - Cl_option3.RightToLeft = .F., ; - Cl_option3.SpecialEffect = 0, ; - Cl_option3.StatusBarText = "", ; - Cl_option3.Style = 1, ; - Cl_option3.TabStop = .T., ; - Cl_option3.Tag = "", ; - Cl_option3.TerminateRead = .F., ; - Cl_option3.Themes = .T., ; - Cl_option3.ToolTipText = "", ; - Cl_option3.Top = 52, ; - Cl_option3.Visible = .T., ; - Cl_option3.WhatsThisHelpID = -1, ; - Cl_option3.Width = 209, ; - Cl_option3.WordWrap = .F. - *< END OBJECT: BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 224, ; - Left = 8, ; - Name = "Pageframe1", ; - PageCount = 2, ; - Top = 196, ; - Width = 553, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_optiongroup1' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackStyle = 0, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ControlSource = "", ; - Height = 76, ; - Left = 287, ; - Name = "Cl_optiongroup1", ; - Top = 12, ; - Value = 2, ; - Width = 248, ; - Option1.Alignment = 0, ; - Option1.Anchor = 0, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 240,240,240, ; - Option1.Caption = "La Opción 1", ; - Option1.ColorScheme = 1, ; - Option1.ColorSource = 4, ; - Option1.Comment = "", ; - Option1.ControlSource = "", ; - Option1.DisabledBackColor = 240,240,240, ; - Option1.DisabledForeColor = 109,109,109, ; - Option1.DisabledPicture = ..\..\, ; - Option1.DownPicture = ..\..\, ; - Option1.DragIcon = ..\..\, ; - Option1.DragMode = 0, ; - Option1.Enabled = .T., ; - Option1.FontBold = .F., ; - Option1.FontCharSet = 0, ; - Option1.FontCondense = .F., ; - Option1.FontExtend = .F., ; - Option1.FontItalic = .F., ; - Option1.FontName = "Arial", ; - Option1.FontOutline = .F., ; - Option1.FontShadow = .F., ; - Option1.FontStrikethru = .F., ; - Option1.FontUnderline = .F., ; - Option1.ForeColor = 0,0,0, ; - Option1.Height = 17, ; - Option1.HelpContextID = 0, ; - Option1.Left = 8, ; - Option1.MouseIcon = ..\..\, ; - Option1.MousePointer = 0, ; - Option1.Name = "Option1", ; - Option1.OLEDragMode = 0, ; - Option1.OLEDragPicture = ..\..\, ; - Option1.OLEDropEffects = 3, ; - Option1.OLEDropMode = 0, ; - Option1.Picture = ..\..\, ; - Option1.PictureMargin = 0, ; - Option1.PicturePosition = 13, ; - Option1.PictureSpacing = 0, ; - Option1.RightToLeft = .F., ; - Option1.SpecialEffect = 0, ; - Option1.StatusBarText = "", ; - Option1.Style = 0, ; - Option1.TabStop = .T., ; - Option1.Tag = "", ; - Option1.TerminateRead = .F., ; - Option1.Themes = .T., ; - Option1.ToolTipText = "", ; - Option1.Top = 4, ; - Option1.Value = 0, ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 84, ; - Option1.WordWrap = .F., ; - Option2.Alignment = 0, ; - Option2.Anchor = 0, ; - Option2.AutoSize = .F., ; - Option2.BackColor = 240,240,240, ; - Option2.Caption = "La opción 2 es más larga", ; - Option2.ColorScheme = 1, ; - Option2.ColorSource = 4, ; - Option2.Comment = "", ; - Option2.ControlSource = "", ; - Option2.DisabledBackColor = 240,240,240, ; - Option2.DisabledForeColor = 109,109,109, ; - Option2.DisabledPicture = ..\..\, ; - Option2.DownPicture = ..\..\, ; - Option2.DragIcon = ..\..\, ; - Option2.DragMode = 0, ; - Option2.Enabled = .T., ; - Option2.FontBold = .F., ; - Option2.FontCharSet = 0, ; - Option2.FontCondense = .F., ; - Option2.FontExtend = .F., ; - Option2.FontItalic = .F., ; - Option2.FontName = "Arial", ; - Option2.FontOutline = .F., ; - Option2.FontShadow = .F., ; - Option2.FontStrikethru = .F., ; - Option2.FontUnderline = .F., ; - Option2.ForeColor = 0,0,0, ; - Option2.Height = 17, ; - Option2.HelpContextID = 0, ; - Option2.Left = 8, ; - Option2.MouseIcon = ..\..\, ; - Option2.MousePointer = 0, ; - Option2.Name = "Option2", ; - Option2.OLEDragMode = 0, ; - Option2.OLEDragPicture = ..\..\, ; - Option2.OLEDropEffects = 3, ; - Option2.OLEDropMode = 0, ; - Option2.Picture = ..\..\, ; - Option2.PictureMargin = 0, ; - Option2.PicturePosition = 13, ; - Option2.PictureSpacing = 0, ; - Option2.RightToLeft = .F., ; - Option2.SpecialEffect = 0, ; - Option2.StatusBarText = "", ; - Option2.Style = 0, ; - Option2.TabStop = .T., ; - Option2.Tag = "", ; - Option2.TerminateRead = .F., ; - Option2.Themes = .T., ; - Option2.ToolTipText = "", ; - Option2.Top = 28, ; - Option2.Value = 1, ; - Option2.WhatsThisHelpID = -1, ; - Option2.Width = 158, ; - Option2.WordWrap = .F., ; - Option3.Alignment = 0, ; - Option3.Anchor = 0, ; - Option3.BackColor = 128,255,128, ; - Option3.Caption = "La opción 3 es la más larga de todas", ; - Option3.ColorScheme = 1, ; - Option3.ColorSource = 4, ; - Option3.Comment = "", ; - Option3.ControlSource = "", ; - Option3.DisabledBackColor = 240,240,240, ; - Option3.DisabledForeColor = 109,109,109, ; - Option3.DisabledPicture = ..\..\, ; - Option3.DownPicture = ..\..\, ; - Option3.DragIcon = ..\..\, ; - Option3.DragMode = 0, ; - Option3.Enabled = .T., ; - Option3.FontBold = .F., ; - Option3.FontCharSet = 0, ; - Option3.FontCondense = .F., ; - Option3.FontExtend = .F., ; - Option3.FontItalic = .F., ; - Option3.FontName = "Arial", ; - Option3.FontOutline = .F., ; - Option3.FontShadow = .F., ; - Option3.FontStrikethru = .F., ; - Option3.FontUnderline = .F., ; - Option3.ForeColor = 0,0,0, ; - Option3.Height = 17, ; - Option3.HelpContextID = 0, ; - Option3.Left = 8, ; - Option3.MouseIcon = ..\..\, ; - Option3.MousePointer = 0, ; - Option3.Name = "Option3", ; - Option3.OLEDragMode = 0, ; - Option3.OLEDragPicture = ..\..\, ; - Option3.OLEDropEffects = 3, ; - Option3.OLEDropMode = 0, ; - Option3.Picture = ..\..\, ; - Option3.PictureMargin = 0, ; - Option3.PicturePosition = 13, ; - Option3.PictureSpacing = 0, ; - Option3.RightToLeft = .F., ; - Option3.SpecialEffect = 0, ; - Option3.StatusBarText = "", ; - Option3.Style = 0, ; - Option3.TabStop = .T., ; - Option3.Tag = "", ; - Option3.TerminateRead = .F., ; - Option3.Themes = .T., ; - Option3.ToolTipText = "", ; - Option3.Top = 52, ; - Option3.Value = 0, ; - Option3.WhatsThisHelpID = -1, ; - Option3.Width = 222, ; - Option3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_optiongroup2' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackStyle = 1, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ControlSource = "", ; - Height = 76, ; - Left = 287, ; - Name = "Cl_optiongroup2", ; - Top = 96, ; - Value = 2, ; - Width = 248, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 240,240,240, ; - Option1.Caption = "La Opción 1", ; - Option1.FontBold = .F., ; - Option1.Height = 27, ; - Option1.Left = 8, ; - Option1.Name = "Option1", ; - Option1.SpecialEffect = 0, ; - Option1.Style = 1, ; - Option1.Top = 4, ; - Option1.Value = 0, ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 84, ; - Option2.AutoSize = .F., ; - Option2.BackColor = 240,240,240, ; - Option2.Caption = "La opción 2 es más larga", ; - Option2.FontBold = .F., ; - Option2.Height = 27, ; - Option2.Left = 8, ; - Option2.Name = "Option2", ; - Option2.SpecialEffect = 0, ; - Option2.Style = 1, ; - Option2.Top = 28, ; - Option2.Value = 1, ; - Option2.WhatsThisHelpID = -1, ; - Option2.Width = 158, ; - Option3.AutoSize = .F., ; - Option3.BackColor = 128,255,128, ; - Option3.Caption = "La opción 3 es la más larga de todas", ; - Option3.FontBold = .F., ; - Option3.Height = 21, ; - Option3.Left = 8, ; - Option3.Name = "Option3", ; - Option3.SpecialEffect = 0, ; - Option3.Style = 1, ; - Option3.Top = 52, ; - Option3.WhatsThisHelpID = -1, ; - Option3.Width = 222 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1.Page1.Optiongroup1' AS optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (76), ; - HelpContextID = 0, ; - Left = 15, ; - MemberClass = "cl_option", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Optiongroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (248), ; - Cl_option1.Alignment = 0, ; - Cl_option1.Anchor = 0, ; - Cl_option1.AutoSize = .F., ; - Cl_option1.BackColor = 240,240,240, ; - Cl_option1.BackStyle = 1, ; - Cl_option1.Caption = "La opción 1", ; - Cl_option1.ColorScheme = 1, ; - Cl_option1.ColorSource = 4, ; - Cl_option1.Comment = "", ; - Cl_option1.ControlSource = "", ; - Cl_option1.DisabledBackColor = 0,128,192, ; - Cl_option1.DisabledForeColor = 128,0,255, ; - Cl_option1.DisabledPicture = bmps\treeview.bmp, ; - Cl_option1.DownPicture = ..\..\, ; - Cl_option1.DragIcon = ..\..\, ; - Cl_option1.DragMode = 0, ; - Cl_option1.Enabled = .T., ; - Cl_option1.FontBold = .F., ; - Cl_option1.FontCharSet = 0, ; - Cl_option1.FontCondense = .F., ; - Cl_option1.FontExtend = .F., ; - Cl_option1.FontItalic = .F., ; - Cl_option1.FontName = "Arial", ; - Cl_option1.FontOutline = .F., ; - Cl_option1.FontShadow = .F., ; - Cl_option1.FontSize = 8, ; - Cl_option1.FontStrikethru = .F., ; - Cl_option1.FontUnderline = .F., ; - Cl_option1.ForeColor = 0,0,0, ; - Cl_option1.Height = 16, ; - Cl_option1.HelpContextID = 0, ; - Cl_option1.Left = 16, ; - Cl_option1.MouseIcon = ..\..\, ; - Cl_option1.MousePointer = 0, ; - Cl_option1.Name = "Cl_option1", ; - Cl_option1.OLEDragMode = 0, ; - Cl_option1.OLEDragPicture = ..\..\, ; - Cl_option1.OLEDropEffects = 3, ; - Cl_option1.OLEDropMode = 0, ; - Cl_option1.Picture = bmps\sobrepostal.bmp, ; - Cl_option1.PictureMargin = 0, ; - Cl_option1.PicturePosition = 4, ; - Cl_option1.PictureSpacing = 0, ; - Cl_option1.RightToLeft = .F., ; - Cl_option1.SpecialEffect = 0, ; - Cl_option1.StatusBarText = "", ; - Cl_option1.Style = 0, ; - Cl_option1.TabStop = .T., ; - Cl_option1.Tag = "", ; - Cl_option1.TerminateRead = .F., ; - Cl_option1.Themes = .T., ; - Cl_option1.ToolTipText = "", ; - Cl_option1.Top = 4, ; - Cl_option1.Visible = .T., ; - Cl_option1.WhatsThisHelpID = -1, ; - Cl_option1.Width = 74, ; - Cl_option1.WordWrap = .F., ; - Cl_option2.Alignment = 0, ; - Cl_option2.Anchor = 0, ; - Cl_option2.BackColor = 240,240,240, ; - Cl_option2.BackStyle = 1, ; - Cl_option2.Caption = "La opción 2 es más larga", ; - Cl_option2.ColorScheme = 1, ; - Cl_option2.ColorSource = 4, ; - Cl_option2.Comment = "", ; - Cl_option2.ControlSource = "", ; - Cl_option2.DisabledBackColor = 0,128,192, ; - Cl_option2.DisabledForeColor = 128,0,255, ; - Cl_option2.DisabledPicture = bmps\treeview.bmp, ; - Cl_option2.DownPicture = ..\..\, ; - Cl_option2.DragIcon = ..\..\, ; - Cl_option2.DragMode = 0, ; - Cl_option2.Enabled = .T., ; - Cl_option2.FontBold = .F., ; - Cl_option2.FontCharSet = 0, ; - Cl_option2.FontCondense = .F., ; - Cl_option2.FontExtend = .F., ; - Cl_option2.FontItalic = .F., ; - Cl_option2.FontName = "Arial", ; - Cl_option2.FontOutline = .F., ; - Cl_option2.FontShadow = .F., ; - Cl_option2.FontSize = 8, ; - Cl_option2.FontStrikethru = .F., ; - Cl_option2.FontUnderline = .F., ; - Cl_option2.ForeColor = 0,0,0, ; - Cl_option2.HelpContextID = 0, ; - Cl_option2.Left = 16, ; - Cl_option2.MouseIcon = ..\..\, ; - Cl_option2.MousePointer = 0, ; - Cl_option2.Name = "Cl_option2", ; - Cl_option2.OLEDragMode = 0, ; - Cl_option2.OLEDragPicture = ..\..\, ; - Cl_option2.OLEDropEffects = 3, ; - Cl_option2.OLEDropMode = 0, ; - Cl_option2.Picture = bmps\sobrepostal.bmp, ; - Cl_option2.PictureMargin = 0, ; - Cl_option2.PicturePosition = 4, ; - Cl_option2.PictureSpacing = 0, ; - Cl_option2.RightToLeft = .F., ; - Cl_option2.SpecialEffect = 0, ; - Cl_option2.StatusBarText = "", ; - Cl_option2.Style = 0, ; - Cl_option2.TabStop = .T., ; - Cl_option2.Tag = "", ; - Cl_option2.TerminateRead = .F., ; - Cl_option2.Themes = .T., ; - Cl_option2.ToolTipText = "", ; - Cl_option2.Top = 28, ; - Cl_option2.Value = 1, ; - Cl_option2.Visible = .T., ; - Cl_option2.WhatsThisHelpID = -1, ; - Cl_option2.WordWrap = .F., ; - Cl_option3.Alignment = 0, ; - Cl_option3.Anchor = 0, ; - Cl_option3.AutoSize = .F., ; - Cl_option3.BackColor = 240,240,240, ; - Cl_option3.BackStyle = 1, ; - Cl_option3.Caption = "La opción 3 es la más larga de todas", ; - Cl_option3.ColorScheme = 1, ; - Cl_option3.ColorSource = 4, ; - Cl_option3.Comment = "", ; - Cl_option3.ControlSource = "", ; - Cl_option3.DefWidth = , ; - Cl_option3.DisabledBackColor = 213,233,255, ; - Cl_option3.DisabledForeColor = 128,0,255, ; - Cl_option3.DisabledPicture = bmps\treeview.bmp, ; - Cl_option3.DownPicture = ..\..\, ; - Cl_option3.DragIcon = ..\..\, ; - Cl_option3.DragMode = 0, ; - Cl_option3.Enabled = .F., ; - Cl_option3.FontBold = .F., ; - Cl_option3.FontCharSet = 0, ; - Cl_option3.FontCondense = .F., ; - Cl_option3.FontExtend = .F., ; - Cl_option3.FontItalic = .F., ; - Cl_option3.FontName = "Arial", ; - Cl_option3.FontOutline = .F., ; - Cl_option3.FontShadow = .F., ; - Cl_option3.FontSize = 8, ; - Cl_option3.FontStrikethru = .F., ; - Cl_option3.FontUnderline = .F., ; - Cl_option3.ForeColor = 0,0,0, ; - Cl_option3.HelpContextID = 0, ; - Cl_option3.Left = 16, ; - Cl_option3.MouseIcon = ..\..\, ; - Cl_option3.MousePointer = 0, ; - Cl_option3.Name = "Cl_option3", ; - Cl_option3.OLEDragMode = 0, ; - Cl_option3.OLEDragPicture = ..\..\, ; - Cl_option3.OLEDropEffects = 3, ; - Cl_option3.OLEDropMode = 0, ; - Cl_option3.Picture = bmps\sobrepostal.bmp, ; - Cl_option3.PictureMargin = 0, ; - Cl_option3.PicturePosition = 4, ; - Cl_option3.PictureSpacing = 0, ; - Cl_option3.RightToLeft = .F., ; - Cl_option3.SpecialEffect = 0, ; - Cl_option3.StatusBarText = "", ; - Cl_option3.Style = 0, ; - Cl_option3.TabStop = .T., ; - Cl_option3.Tag = "", ; - Cl_option3.TerminateRead = .F., ; - Cl_option3.Themes = .T., ; - Cl_option3.ToolTipText = "", ; - Cl_option3.Top = 52, ; - Cl_option3.Visible = .T., ; - Cl_option3.WhatsThisHelpID = -1, ; - Cl_option3.Width = (195), ; - Cl_option3.WordWrap = .F. - *< END OBJECT: BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1.Page1.Optiongroup2' AS optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 15, ; - MemberClass = "cl_option", ; - MemberClassLibrary = lib_controles.vcx, ; - MousePointer = 0, ; - Name = "Optiongroup2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 96, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 248, ; - Cl_option1.Alignment = 0, ; - Cl_option1.Anchor = 0, ; - Cl_option1.AutoSize = .F., ; - Cl_option1.BackColor = 240,240,240, ; - Cl_option1.BackStyle = 1, ; - Cl_option1.Caption = "La opción 1", ; - Cl_option1.ColorScheme = 1, ; - Cl_option1.ColorSource = 4, ; - Cl_option1.Comment = "", ; - Cl_option1.ControlSource = "", ; - Cl_option1.DisabledBackColor = 0,128,192, ; - Cl_option1.DisabledForeColor = 128,0,255, ; - Cl_option1.DisabledPicture = bmps\treeview.bmp, ; - Cl_option1.DownPicture = ..\..\, ; - Cl_option1.DragIcon = ..\..\, ; - Cl_option1.DragMode = 0, ; - Cl_option1.Enabled = .T., ; - Cl_option1.FontBold = .F., ; - Cl_option1.FontCharSet = 0, ; - Cl_option1.FontCondense = .F., ; - Cl_option1.FontExtend = .F., ; - Cl_option1.FontItalic = .F., ; - Cl_option1.FontName = "Arial", ; - Cl_option1.FontOutline = .F., ; - Cl_option1.FontShadow = .F., ; - Cl_option1.FontSize = 8, ; - Cl_option1.FontStrikethru = .F., ; - Cl_option1.FontUnderline = .F., ; - Cl_option1.ForeColor = 0,0,0, ; - Cl_option1.Height = 42, ; - Cl_option1.HelpContextID = 0, ; - Cl_option1.Left = 16, ; - Cl_option1.MouseIcon = ..\..\, ; - Cl_option1.MousePointer = 0, ; - Cl_option1.Name = "Cl_option1", ; - Cl_option1.OLEDragMode = 0, ; - Cl_option1.OLEDragPicture = ..\..\, ; - Cl_option1.OLEDropEffects = 3, ; - Cl_option1.OLEDropMode = 0, ; - Cl_option1.Picture = bmps\sobrepostal.bmp, ; - Cl_option1.PictureMargin = 0, ; - Cl_option1.PicturePosition = 4, ; - Cl_option1.PictureSpacing = 0, ; - Cl_option1.RightToLeft = .F., ; - Cl_option1.SpecialEffect = 0, ; - Cl_option1.StatusBarText = "", ; - Cl_option1.Style = 1, ; - Cl_option1.TabStop = .T., ; - Cl_option1.Tag = "", ; - Cl_option1.TerminateRead = .F., ; - Cl_option1.Themes = .T., ; - Cl_option1.ToolTipText = "", ; - Cl_option1.Top = 4, ; - Cl_option1.Visible = .T., ; - Cl_option1.WhatsThisHelpID = -1, ; - Cl_option1.Width = 88, ; - Cl_option1.WordWrap = .F., ; - Cl_option2.Alignment = 0, ; - Cl_option2.Anchor = 0, ; - Cl_option2.BackColor = 240,240,240, ; - Cl_option2.BackStyle = 1, ; - Cl_option2.Caption = "La opción 2 es más larga", ; - Cl_option2.ColorScheme = 1, ; - Cl_option2.ColorSource = 4, ; - Cl_option2.Comment = "", ; - Cl_option2.ControlSource = "", ; - Cl_option2.DefHeight = , ; - Cl_option2.DisabledBackColor = 0,128,192, ; - Cl_option2.DisabledForeColor = 128,0,255, ; - Cl_option2.DisabledPicture = bmps\treeview.bmp, ; - Cl_option2.DownPicture = ..\..\, ; - Cl_option2.DragIcon = ..\..\, ; - Cl_option2.DragMode = 0, ; - Cl_option2.Enabled = .T., ; - Cl_option2.FontBold = .F., ; - Cl_option2.FontCharSet = 0, ; - Cl_option2.FontCondense = .F., ; - Cl_option2.FontExtend = .F., ; - Cl_option2.FontItalic = .F., ; - Cl_option2.FontName = "Arial", ; - Cl_option2.FontOutline = .F., ; - Cl_option2.FontShadow = .F., ; - Cl_option2.FontSize = 8, ; - Cl_option2.FontStrikethru = .F., ; - Cl_option2.FontUnderline = .F., ; - Cl_option2.ForeColor = 0,0,0, ; - Cl_option2.Height = (21), ; - Cl_option2.HelpContextID = 0, ; - Cl_option2.Left = 16, ; - Cl_option2.MouseIcon = ..\..\, ; - Cl_option2.MousePointer = 0, ; - Cl_option2.Name = "Cl_option2", ; - Cl_option2.OLEDragMode = 0, ; - Cl_option2.OLEDragPicture = ..\..\, ; - Cl_option2.OLEDropEffects = 3, ; - Cl_option2.OLEDropMode = 0, ; - Cl_option2.Picture = bmps\sobrepostal.bmp, ; - Cl_option2.PictureMargin = 0, ; - Cl_option2.PicturePosition = 4, ; - Cl_option2.PictureSpacing = 0, ; - Cl_option2.RightToLeft = .F., ; - Cl_option2.SpecialEffect = 0, ; - Cl_option2.StatusBarText = "", ; - Cl_option2.Style = 1, ; - Cl_option2.TabStop = .T., ; - Cl_option2.Tag = "", ; - Cl_option2.TerminateRead = .F., ; - Cl_option2.Themes = .T., ; - Cl_option2.ToolTipText = "", ; - Cl_option2.Top = 28, ; - Cl_option2.Value = 1, ; - Cl_option2.Visible = .T., ; - Cl_option2.WhatsThisHelpID = -1, ; - Cl_option2.WordWrap = .F., ; - Cl_option3.Alignment = 0, ; - Cl_option3.Anchor = 0, ; - Cl_option3.AutoSize = .F., ; - Cl_option3.BackColor = 240,240,240, ; - Cl_option3.BackStyle = 1, ; - Cl_option3.Caption = "La opción 3 es la más larga de todas", ; - Cl_option3.ColorScheme = 1, ; - Cl_option3.ColorSource = 4, ; - Cl_option3.Comment = "", ; - Cl_option3.ControlSource = "", ; - Cl_option3.DefHeight = , ; - Cl_option3.DisabledBackColor = 0,128,192, ; - Cl_option3.DisabledForeColor = 128,0,255, ; - Cl_option3.DisabledPicture = bmps\treeview.bmp, ; - Cl_option3.DownPicture = ..\..\, ; - Cl_option3.DragIcon = ..\..\, ; - Cl_option3.DragMode = 0, ; - Cl_option3.Enabled = .F., ; - Cl_option3.FontBold = .F., ; - Cl_option3.FontCharSet = 0, ; - Cl_option3.FontCondense = .F., ; - Cl_option3.FontExtend = .F., ; - Cl_option3.FontItalic = .F., ; - Cl_option3.FontName = "Arial", ; - Cl_option3.FontOutline = .F., ; - Cl_option3.FontShadow = .F., ; - Cl_option3.FontSize = 8, ; - Cl_option3.FontStrikethru = .F., ; - Cl_option3.FontUnderline = .F., ; - Cl_option3.ForeColor = 0,0,0, ; - Cl_option3.Height = (21), ; - Cl_option3.HelpContextID = 0, ; - Cl_option3.Left = 16, ; - Cl_option3.MouseIcon = ..\..\, ; - Cl_option3.MousePointer = 0, ; - Cl_option3.Name = "Cl_option3", ; - Cl_option3.OLEDragMode = 0, ; - Cl_option3.OLEDragPicture = ..\..\, ; - Cl_option3.OLEDropEffects = 3, ; - Cl_option3.OLEDropMode = 0, ; - Cl_option3.Picture = bmps\sobrepostal.bmp, ; - Cl_option3.PictureMargin = 0, ; - Cl_option3.PicturePosition = 4, ; - Cl_option3.PictureSpacing = 0, ; - Cl_option3.RightToLeft = .F., ; - Cl_option3.SpecialEffect = 0, ; - Cl_option3.StatusBarText = "", ; - Cl_option3.Style = 1, ; - Cl_option3.TabStop = .T., ; - Cl_option3.Tag = "", ; - Cl_option3.TerminateRead = .F., ; - Cl_option3.Themes = .T., ; - Cl_option3.ToolTipText = "", ; - Cl_option3.Top = 52, ; - Cl_option3.Visible = .T., ; - Cl_option3.WhatsThisHelpID = -1, ; - Cl_option3.Width = 209, ; - Cl_option3.WordWrap = .F. - *< END OBJECT: BaseClass="optiongroup" /> - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_optiongroup2.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_optiongroup2.dataenvironment.sc2 new file mode 100644 index 0000000..9450b12 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_optiongroup2.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_optiongroup2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_optiongroup2.f_optiongroup1.sc2 b/TESTS/DATOS_READONLY/f_optiongroup2.f_optiongroup1.sc2 new file mode 100644 index 0000000..d8002e0 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_optiongroup2.f_optiongroup1.sc2 @@ -0,0 +1,204 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_optiongroup2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_optiongroup1 AS f_optiongroup OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + * + DoCreate = .T. + Name = "F_optiongroup1" + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Name = "Label1" + Label2.Name = "Label2" + Optiongroup1.Anchor = 0 + Optiongroup1.AutoSize = .F. + Optiongroup1.BackColor = 240,240,240 + Optiongroup1.BackStyle = 0 + Optiongroup1.BorderColor = 100,100,100 + Optiongroup1.BorderStyle = 1 + Optiongroup1.ButtonCount = 3 + Optiongroup1.Cl_option1.Alignment = 0 + Optiongroup1.Cl_option1.Anchor = 0 + Optiongroup1.Cl_option1.AutoSize = .F. + Optiongroup1.Cl_option1.BackColor = 240,240,240 + Optiongroup1.Cl_option1.BackStyle = 1 + Optiongroup1.Cl_option1.Caption = "La opción 1" + Optiongroup1.Cl_option1.ColorScheme = 1 + Optiongroup1.Cl_option1.ColorSource = 4 + Optiongroup1.Cl_option1.Comment = "" + Optiongroup1.Cl_option1.ControlSource = "" + Optiongroup1.Cl_option1.DefHeight = + Optiongroup1.Cl_option1.DefLeft = + Optiongroup1.Cl_option1.DefTop = + Optiongroup1.Cl_option1.DefWidth = + Optiongroup1.Cl_option1.DisabledBackColor = 0,128,192 + Optiongroup1.Cl_option1.DisabledForeColor = 128,0,255 + Optiongroup1.Cl_option1.DisabledPicture = bmps\treeview.bmp + Optiongroup1.Cl_option1.DownPicture = ..\..\ + Optiongroup1.Cl_option1.DragIcon = ..\..\ + Optiongroup1.Cl_option1.DragMode = 0 + Optiongroup1.Cl_option1.Enabled = .T. + Optiongroup1.Cl_option1.FontBold = .F. + Optiongroup1.Cl_option1.FontCondense = .F. + Optiongroup1.Cl_option1.FontExtend = .F. + Optiongroup1.Cl_option1.FontItalic = .F. + Optiongroup1.Cl_option1.FontName = "Arial" + Optiongroup1.Cl_option1.FontOutline = .F. + Optiongroup1.Cl_option1.FontShadow = .F. + Optiongroup1.Cl_option1.FontSize = 8 + Optiongroup1.Cl_option1.FontStrikethru = .F. + Optiongroup1.Cl_option1.FontUnderline = .F. + Optiongroup1.Cl_option1.ForeColor = 0,0,0 + Optiongroup1.Cl_option1.Height = (16) + Optiongroup1.Cl_option1.HelpContextID = 0 + Optiongroup1.Cl_option1.Left = (16) + Optiongroup1.Cl_option1.MouseIcon = ..\..\ + Optiongroup1.Cl_option1.MousePointer = 0 + Optiongroup1.Cl_option1.Name = "Cl_option1" + Optiongroup1.Cl_option1.OLEDragMode = 0 + Optiongroup1.Cl_option1.OLEDragPicture = ..\..\ + Optiongroup1.Cl_option1.OLEDropEffects = 3 + Optiongroup1.Cl_option1.OLEDropMode = 0 + Optiongroup1.Cl_option1.Picture = bmps\sobrepostal.bmp + Optiongroup1.Cl_option1.PictureMargin = 0 + Optiongroup1.Cl_option1.PicturePosition = 4 + Optiongroup1.Cl_option1.PictureSpacing = 0 + Optiongroup1.Cl_option1.RightToLeft = .F. + Optiongroup1.Cl_option1.SpecialEffect = 0 + Optiongroup1.Cl_option1.StatusBarText = "" + Optiongroup1.Cl_option1.Style = 0 + Optiongroup1.Cl_option1.TabIndex = 1 + Optiongroup1.Cl_option1.TabStop = .T. + Optiongroup1.Cl_option1.Tag = "" + Optiongroup1.Cl_option1.TerminateRead = .F. + Optiongroup1.Cl_option1.test_aa = .F. + Optiongroup1.Cl_option1.Themes = .T. + Optiongroup1.Cl_option1.ToolTipText = "" + Optiongroup1.Cl_option1.Top = (4) + Optiongroup1.Cl_option1.Value = 0 + Optiongroup1.Cl_option1.Visible = .T. + Optiongroup1.Cl_option1.WhatsThisHelpID = -1 + Optiongroup1.Cl_option1.Width = (74) + Optiongroup1.Cl_option1.WordWrap = .F. + Optiongroup1.Cl_option2.Left = 16 + Optiongroup1.Cl_option2.Name = "Cl_option2" + Optiongroup1.Cl_option2.Top = 28 + Optiongroup1.Cl_option3.Left = 16 + Optiongroup1.Cl_option3.Name = "Cl_option3" + Optiongroup1.Cl_option3.Top = 52 + Optiongroup1.ColorSource = 4 + Optiongroup1.Comment = "" + Optiongroup1.ControlSource = "" + Optiongroup1.DefHeight = + Optiongroup1.DefLeft = + Optiongroup1.DefTop = + Optiongroup1.DefWidth = + Optiongroup1.DragIcon = ..\..\ + Optiongroup1.DragMode = 0 + Optiongroup1.Enabled = .T. + Optiongroup1.Height = (76) + Optiongroup1.HelpContextID = 0 + Optiongroup1.Left = (24) + Optiongroup1.MemberClassLibrary = lib_controles.vcx + Optiongroup1.MouseIcon = ..\..\ + Optiongroup1.MousePointer = 0 + Optiongroup1.Name = "Optiongroup1" + Optiongroup1.OLEDragMode = 0 + Optiongroup1.OLEDragPicture = ..\..\ + Optiongroup1.OLEDropEffects = 3 + Optiongroup1.OLEDropMode = 0 + Optiongroup1.SpecialEffect = 0 + Optiongroup1.StatusBarText = "" + Optiongroup1.TabIndex = 1 + Optiongroup1.Tag = "" + Optiongroup1.TerminateRead = .F. + Optiongroup1.Themes = .T. + Optiongroup1.ToolTipText = "" + Optiongroup1.Top = (24) + Optiongroup1.Value = 2 + Optiongroup1.Visible = .T. + Optiongroup1.WhatsThisHelpID = -1 + Optiongroup1.Width = (248) + Cl_optiongroup1.Name = "Cl_optiongroup1" + Cl_optiongroup1.Option1.Left = 8 + Cl_optiongroup1.Option1.Name = "Option1" + Cl_optiongroup1.Option1.Top = 4 + Cl_optiongroup1.Option2.Left = 8 + Cl_optiongroup1.Option2.Name = "Option2" + Cl_optiongroup1.Option2.Top = 28 + Cl_optiongroup1.Option3.Left = 8 + Cl_optiongroup1.Option3.Name = "Option3" + Cl_optiongroup1.Option3.Top = 52 + Cl_optiongroup2.Name = "Cl_optiongroup2" + Cl_optiongroup2.Option1.Left = 8 + Cl_optiongroup2.Option1.Name = "Option1" + Cl_optiongroup2.Option1.Top = 4 + Cl_optiongroup2.Option2.Left = 8 + Cl_optiongroup2.Option2.Name = "Option2" + Cl_optiongroup2.Option2.Top = 28 + Cl_optiongroup2.Option3.Left = 8 + Cl_optiongroup2.Option3.Name = "Option3" + Cl_optiongroup2.Option3.Top = 52 + Pageframe1.ErasePage = .T. + Pageframe1.Name = "Pageframe1" + Pageframe1.Page1.Cl_optiongroup1.Name = "Cl_optiongroup1" + Pageframe1.Page1.Cl_optiongroup1.Option1.Left = 8 + Pageframe1.Page1.Cl_optiongroup1.Option1.Name = "Option1" + Pageframe1.Page1.Cl_optiongroup1.Option1.Top = 8 + Pageframe1.Page1.Cl_optiongroup1.Option2.Left = 8 + Pageframe1.Page1.Cl_optiongroup1.Option2.Name = "Option2" + Pageframe1.Page1.Cl_optiongroup1.Option2.Top = 32 + Pageframe1.Page1.Cl_optiongroup1.Option3.Left = 8 + Pageframe1.Page1.Cl_optiongroup1.Option3.Name = "Option3" + Pageframe1.Page1.Cl_optiongroup1.Option3.Top = 56 + Pageframe1.Page1.Cl_optiongroup2.Name = "Cl_optiongroup2" + Pageframe1.Page1.Cl_optiongroup2.Option1.Left = 8 + Pageframe1.Page1.Cl_optiongroup2.Option1.Name = "Option1" + Pageframe1.Page1.Cl_optiongroup2.Option1.Top = 4 + Pageframe1.Page1.Cl_optiongroup2.Option2.Left = 8 + Pageframe1.Page1.Cl_optiongroup2.Option2.Name = "Option2" + Pageframe1.Page1.Cl_optiongroup2.Option2.Top = 28 + Pageframe1.Page1.Cl_optiongroup2.Option3.Left = 8 + Pageframe1.Page1.Cl_optiongroup2.Option3.Name = "Option3" + Pageframe1.Page1.Cl_optiongroup2.Option3.Top = 52 + Pageframe1.Page1.Label2.Name = "Label2" + Pageframe1.Page1.Name = "Page1" + Pageframe1.Page1.Optiongroup1.Cl_option1.Left = 16 + Pageframe1.Page1.Optiongroup1.Cl_option1.Name = "Cl_option1" + Pageframe1.Page1.Optiongroup1.Cl_option1.Top = 4 + Pageframe1.Page1.Optiongroup1.Cl_option2.Left = 16 + Pageframe1.Page1.Optiongroup1.Cl_option2.Name = "Cl_option2" + Pageframe1.Page1.Optiongroup1.Cl_option2.Top = 28 + Pageframe1.Page1.Optiongroup1.Cl_option3.Left = 16 + Pageframe1.Page1.Optiongroup1.Cl_option3.Name = "Cl_option3" + Pageframe1.Page1.Optiongroup1.Cl_option3.Top = 52 + Pageframe1.Page1.Optiongroup1.Name = "Optiongroup1" + Pageframe1.Page1.Optiongroup2.Cl_option1.Left = 16 + Pageframe1.Page1.Optiongroup2.Cl_option1.Name = "Cl_option1" + Pageframe1.Page1.Optiongroup2.Cl_option1.Top = 4 + Pageframe1.Page1.Optiongroup2.Cl_option2.Left = 16 + Pageframe1.Page1.Optiongroup2.Cl_option2.Name = "Cl_option2" + Pageframe1.Page1.Optiongroup2.Cl_option2.Top = 28 + Pageframe1.Page1.Optiongroup2.Cl_option3.Left = 16 + Pageframe1.Page1.Optiongroup2.Cl_option3.Name = "Cl_option3" + Pageframe1.Page1.Optiongroup2.Cl_option3.Top = 52 + Pageframe1.Page1.Optiongroup2.Name = "Optiongroup2" + Pageframe1.Page2.Name = "Page2" + Optiongroup2.Cl_option1.Left = 16 + Optiongroup2.Cl_option1.Name = "Cl_option1" + Optiongroup2.Cl_option1.Top = 4 + Optiongroup2.Cl_option2.Left = 16 + Optiongroup2.Cl_option2.Name = "Cl_option2" + Optiongroup2.Cl_option2.Top = 28 + Optiongroup2.Cl_option3.Left = 16 + Optiongroup2.Cl_option3.Name = "Cl_option3" + Optiongroup2.Cl_option3.Top = 52 + Optiongroup2.Name = "Optiongroup2" + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_optiongroup2.sc2 b/TESTS/DATOS_READONLY/f_optiongroup2.sc2 index 40697f7..7c16114 100644 --- a/TESTS/DATOS_READONLY/f_optiongroup2.sc2 +++ b/TESTS/DATOS_READONLY/f_optiongroup2.sc2 @@ -4,212 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_optiongroup2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_optiongroup1" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS f_optiongroup1 AS f_optiongroup OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - DoCreate = .T. - Name = "F_optiongroup1" - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Name = "Label1" - Label2.Name = "Label2" - Optiongroup1.Anchor = 0 - Optiongroup1.AutoSize = .F. - Optiongroup1.BackColor = 240,240,240 - Optiongroup1.BackStyle = 0 - Optiongroup1.BorderColor = 100,100,100 - Optiongroup1.BorderStyle = 1 - Optiongroup1.ButtonCount = 3 - Optiongroup1.Cl_option1.Alignment = 0 - Optiongroup1.Cl_option1.Anchor = 0 - Optiongroup1.Cl_option1.AutoSize = .F. - Optiongroup1.Cl_option1.BackColor = 240,240,240 - Optiongroup1.Cl_option1.BackStyle = 1 - Optiongroup1.Cl_option1.Caption = "La opción 1" - Optiongroup1.Cl_option1.ColorScheme = 1 - Optiongroup1.Cl_option1.ColorSource = 4 - Optiongroup1.Cl_option1.Comment = "" - Optiongroup1.Cl_option1.ControlSource = "" - Optiongroup1.Cl_option1.DefHeight = - Optiongroup1.Cl_option1.DefLeft = - Optiongroup1.Cl_option1.DefTop = - Optiongroup1.Cl_option1.DefWidth = - Optiongroup1.Cl_option1.DisabledBackColor = 0,128,192 - Optiongroup1.Cl_option1.DisabledForeColor = 128,0,255 - Optiongroup1.Cl_option1.DisabledPicture = bmps\treeview.bmp - Optiongroup1.Cl_option1.DownPicture = ..\..\ - Optiongroup1.Cl_option1.DragIcon = ..\..\ - Optiongroup1.Cl_option1.DragMode = 0 - Optiongroup1.Cl_option1.Enabled = .T. - Optiongroup1.Cl_option1.FontBold = .F. - Optiongroup1.Cl_option1.FontCondense = .F. - Optiongroup1.Cl_option1.FontExtend = .F. - Optiongroup1.Cl_option1.FontItalic = .F. - Optiongroup1.Cl_option1.FontName = "Arial" - Optiongroup1.Cl_option1.FontOutline = .F. - Optiongroup1.Cl_option1.FontShadow = .F. - Optiongroup1.Cl_option1.FontSize = 8 - Optiongroup1.Cl_option1.FontStrikethru = .F. - Optiongroup1.Cl_option1.FontUnderline = .F. - Optiongroup1.Cl_option1.ForeColor = 0,0,0 - Optiongroup1.Cl_option1.Height = (16) - Optiongroup1.Cl_option1.HelpContextID = 0 - Optiongroup1.Cl_option1.Left = (16) - Optiongroup1.Cl_option1.MouseIcon = ..\..\ - Optiongroup1.Cl_option1.MousePointer = 0 - Optiongroup1.Cl_option1.Name = "Cl_option1" - Optiongroup1.Cl_option1.OLEDragMode = 0 - Optiongroup1.Cl_option1.OLEDragPicture = ..\..\ - Optiongroup1.Cl_option1.OLEDropEffects = 3 - Optiongroup1.Cl_option1.OLEDropMode = 0 - Optiongroup1.Cl_option1.Picture = bmps\sobrepostal.bmp - Optiongroup1.Cl_option1.PictureMargin = 0 - Optiongroup1.Cl_option1.PicturePosition = 4 - Optiongroup1.Cl_option1.PictureSpacing = 0 - Optiongroup1.Cl_option1.RightToLeft = .F. - Optiongroup1.Cl_option1.SpecialEffect = 0 - Optiongroup1.Cl_option1.StatusBarText = "" - Optiongroup1.Cl_option1.Style = 0 - Optiongroup1.Cl_option1.TabIndex = 1 - Optiongroup1.Cl_option1.TabStop = .T. - Optiongroup1.Cl_option1.Tag = "" - Optiongroup1.Cl_option1.TerminateRead = .F. - Optiongroup1.Cl_option1.test_aa = .F. - Optiongroup1.Cl_option1.Themes = .T. - Optiongroup1.Cl_option1.ToolTipText = "" - Optiongroup1.Cl_option1.Top = (4) - Optiongroup1.Cl_option1.Value = 0 - Optiongroup1.Cl_option1.Visible = .T. - Optiongroup1.Cl_option1.WhatsThisHelpID = -1 - Optiongroup1.Cl_option1.Width = (74) - Optiongroup1.Cl_option1.WordWrap = .F. - Optiongroup1.Cl_option2.Left = 16 - Optiongroup1.Cl_option2.Name = "Cl_option2" - Optiongroup1.Cl_option2.Top = 28 - Optiongroup1.Cl_option3.Left = 16 - Optiongroup1.Cl_option3.Name = "Cl_option3" - Optiongroup1.Cl_option3.Top = 52 - Optiongroup1.ColorSource = 4 - Optiongroup1.Comment = "" - Optiongroup1.ControlSource = "" - Optiongroup1.DefHeight = - Optiongroup1.DefLeft = - Optiongroup1.DefTop = - Optiongroup1.DefWidth = - Optiongroup1.DragIcon = ..\..\ - Optiongroup1.DragMode = 0 - Optiongroup1.Enabled = .T. - Optiongroup1.Height = (76) - Optiongroup1.HelpContextID = 0 - Optiongroup1.Left = (24) - Optiongroup1.MemberClassLibrary = lib_controles.vcx - Optiongroup1.MouseIcon = ..\..\ - Optiongroup1.MousePointer = 0 - Optiongroup1.Name = "Optiongroup1" - Optiongroup1.OLEDragMode = 0 - Optiongroup1.OLEDragPicture = ..\..\ - Optiongroup1.OLEDropEffects = 3 - Optiongroup1.OLEDropMode = 0 - Optiongroup1.SpecialEffect = 0 - Optiongroup1.StatusBarText = "" - Optiongroup1.TabIndex = 1 - Optiongroup1.Tag = "" - Optiongroup1.TerminateRead = .F. - Optiongroup1.Themes = .T. - Optiongroup1.ToolTipText = "" - Optiongroup1.Top = (24) - Optiongroup1.Value = 2 - Optiongroup1.Visible = .T. - Optiongroup1.WhatsThisHelpID = -1 - Optiongroup1.Width = (248) - Cl_optiongroup1.Name = "Cl_optiongroup1" - Cl_optiongroup1.Option1.Left = 8 - Cl_optiongroup1.Option1.Name = "Option1" - Cl_optiongroup1.Option1.Top = 4 - Cl_optiongroup1.Option2.Left = 8 - Cl_optiongroup1.Option2.Name = "Option2" - Cl_optiongroup1.Option2.Top = 28 - Cl_optiongroup1.Option3.Left = 8 - Cl_optiongroup1.Option3.Name = "Option3" - Cl_optiongroup1.Option3.Top = 52 - Cl_optiongroup2.Name = "Cl_optiongroup2" - Cl_optiongroup2.Option1.Left = 8 - Cl_optiongroup2.Option1.Name = "Option1" - Cl_optiongroup2.Option1.Top = 4 - Cl_optiongroup2.Option2.Left = 8 - Cl_optiongroup2.Option2.Name = "Option2" - Cl_optiongroup2.Option2.Top = 28 - Cl_optiongroup2.Option3.Left = 8 - Cl_optiongroup2.Option3.Name = "Option3" - Cl_optiongroup2.Option3.Top = 52 - Pageframe1.ErasePage = .T. - Pageframe1.Name = "Pageframe1" - Pageframe1.Page1.Cl_optiongroup1.Name = "Cl_optiongroup1" - Pageframe1.Page1.Cl_optiongroup1.Option1.Left = 8 - Pageframe1.Page1.Cl_optiongroup1.Option1.Name = "Option1" - Pageframe1.Page1.Cl_optiongroup1.Option1.Top = 8 - Pageframe1.Page1.Cl_optiongroup1.Option2.Left = 8 - Pageframe1.Page1.Cl_optiongroup1.Option2.Name = "Option2" - Pageframe1.Page1.Cl_optiongroup1.Option2.Top = 32 - Pageframe1.Page1.Cl_optiongroup1.Option3.Left = 8 - Pageframe1.Page1.Cl_optiongroup1.Option3.Name = "Option3" - Pageframe1.Page1.Cl_optiongroup1.Option3.Top = 56 - Pageframe1.Page1.Cl_optiongroup2.Name = "Cl_optiongroup2" - Pageframe1.Page1.Cl_optiongroup2.Option1.Left = 8 - Pageframe1.Page1.Cl_optiongroup2.Option1.Name = "Option1" - Pageframe1.Page1.Cl_optiongroup2.Option1.Top = 4 - Pageframe1.Page1.Cl_optiongroup2.Option2.Left = 8 - Pageframe1.Page1.Cl_optiongroup2.Option2.Name = "Option2" - Pageframe1.Page1.Cl_optiongroup2.Option2.Top = 28 - Pageframe1.Page1.Cl_optiongroup2.Option3.Left = 8 - Pageframe1.Page1.Cl_optiongroup2.Option3.Name = "Option3" - Pageframe1.Page1.Cl_optiongroup2.Option3.Top = 52 - Pageframe1.Page1.Label2.Name = "Label2" - Pageframe1.Page1.Name = "Page1" - Pageframe1.Page1.Optiongroup1.Cl_option1.Left = 16 - Pageframe1.Page1.Optiongroup1.Cl_option1.Name = "Cl_option1" - Pageframe1.Page1.Optiongroup1.Cl_option1.Top = 4 - Pageframe1.Page1.Optiongroup1.Cl_option2.Left = 16 - Pageframe1.Page1.Optiongroup1.Cl_option2.Name = "Cl_option2" - Pageframe1.Page1.Optiongroup1.Cl_option2.Top = 28 - Pageframe1.Page1.Optiongroup1.Cl_option3.Left = 16 - Pageframe1.Page1.Optiongroup1.Cl_option3.Name = "Cl_option3" - Pageframe1.Page1.Optiongroup1.Cl_option3.Top = 52 - Pageframe1.Page1.Optiongroup1.Name = "Optiongroup1" - Pageframe1.Page1.Optiongroup2.Cl_option1.Left = 16 - Pageframe1.Page1.Optiongroup2.Cl_option1.Name = "Cl_option1" - Pageframe1.Page1.Optiongroup2.Cl_option1.Top = 4 - Pageframe1.Page1.Optiongroup2.Cl_option2.Left = 16 - Pageframe1.Page1.Optiongroup2.Cl_option2.Name = "Cl_option2" - Pageframe1.Page1.Optiongroup2.Cl_option2.Top = 28 - Pageframe1.Page1.Optiongroup2.Cl_option3.Left = 16 - Pageframe1.Page1.Optiongroup2.Cl_option3.Name = "Cl_option3" - Pageframe1.Page1.Optiongroup2.Cl_option3.Top = 52 - Pageframe1.Page1.Optiongroup2.Name = "Optiongroup2" - Pageframe1.Page2.Name = "Page2" - Optiongroup2.Cl_option1.Left = 16 - Optiongroup2.Cl_option1.Name = "Cl_option1" - Optiongroup2.Cl_option1.Top = 4 - Optiongroup2.Cl_option2.Left = 16 - Optiongroup2.Cl_option2.Name = "Cl_option2" - Optiongroup2.Cl_option2.Top = 28 - Optiongroup2.Cl_option3.Left = 16 - Optiongroup2.Cl_option3.Name = "Cl_option3" - Optiongroup2.Cl_option3.Top = 52 - Optiongroup2.Name = "Optiongroup2" - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_test.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_test.dataenvironment.sc2 new file mode 100644 index 0000000..2bbf1b6 --- /dev/null +++ b/TESTS/DATOS_READONLY/f_test.dataenvironment.sc2 @@ -0,0 +1,17 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_test.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Name = "Dataenvironment" + TabStop = .F. + Visible = .F. + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_test.f_form_controles1.sc2 b/TESTS/DATOS_READONLY/f_test.f_form_controles1.sc2 new file mode 100644 index 0000000..411588d --- /dev/null +++ b/TESTS/DATOS_READONLY/f_test.f_form_controles1.sc2 @@ -0,0 +1,452 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_test.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_form_controles1 AS f_form_controles OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + * + DoCreate = .T. + Name = "F_form_controles1" + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Name = "Label1" + Label2.Name = "Label2" + Label4.Alignment = 0 + Label4.Anchor = 0 + Label4.AutoSize = .F. + Label4.BackColor = 240,240,240 + Label4.BackStyle = 1 + Label4.BorderStyle = 0 + Label4.Caption = "Label4" + Label4.ColorScheme = 1 + Label4.ColorSource = 4 + Label4.Comment = "" + Label4.DefHeight = + Label4.DefLeft = + Label4.DefTop = + Label4.DefWidth = + Label4.DisabledBackColor = 240,240,240 + Label4.DisabledForeColor = 109,109,109 + Label4.DragIcon = ..\..\ + Label4.DragMode = 0 + Label4.Enabled = .T. + Label4.FontBold = .F. + Label4.FontCondense = .F. + Label4.FontExtend = .F. + Label4.FontItalic = .F. + Label4.FontName = "Arial" + Label4.FontOutline = .F. + Label4.FontShadow = .F. + Label4.FontSize = 8 + Label4.FontStrikethru = .F. + Label4.FontUnderline = .F. + Label4.ForeColor = 0,0,0 + Label4.Height = (17) + Label4.HelpContextID = 0 + Label4.Left = (44) + Label4.MouseIcon = ..\..\ + Label4.MousePointer = 0 + Label4.Name = "Label4" + Label4.OLEDragMode = 0 + Label4.OLEDragPicture = ..\..\ + Label4.OLEDropEffects = 3 + Label4.OLEDropMode = 0 + Label4.RightToLeft = .F. + Label4.Rotation = 0 + Label4.Style = 0 + Label4.TabIndex = 6 + Label4.Tag = "" + Label4.ToolTipText = "" + Label4.Top = (40) + Label4.WhatsThisHelpID = -1 + Label4.Width = (104) + Label4.WordWrap = .F. + Shape1.Anchor = 0 + Shape1.BackColor = 240,240,240 + Shape1.BackStyle = 1 + Shape1.BorderColor = 100,100,100 + Shape1.BorderStyle = 1 + Shape1.BorderWidth = 1 + Shape1.ColorScheme = 1 + Shape1.ColorSource = 4 + Shape1.Comment = "" + Shape1.Curvature = 0 + Shape1.DefHeight = + Shape1.DefLeft = + Shape1.DefTop = + Shape1.DefWidth = + Shape1.DragIcon = ..\..\ + Shape1.DragMode = 0 + Shape1.DrawMode = 13 + Shape1.Enabled = .T. + Shape1.FillColor = 0,0,0 + Shape1.FillStyle = 1 + Shape1.Height = (17) + Shape1.HelpContextID = 0 + Shape1.Left = (44) + Shape1.MouseIcon = ..\..\ + Shape1.MousePointer = 0 + Shape1.Name = "Shape1" + Shape1.OLEDragMode = 0 + Shape1.OLEDragPicture = ..\..\ + Shape1.OLEDropEffects = 3 + Shape1.OLEDropMode = 0 + Shape1.PolyPoints = "" + Shape1.Rotation = 0 + Shape1.SpecialEffect = 0 + Shape1.StatusBarText = "" + Shape1.Style = 0 + Shape1.Tag = "" + Shape1.ToolTipText = "" + Shape1.Top = (60) + Shape1.Visible = .T. + Shape1.WhatsThisHelpID = -1 + Shape1.Width = (105) + Line1.Anchor = 0 + Line1.BorderColor = 100,100,100 + Line1.BorderStyle = 1 + Line1.BorderWidth = 1 + Line1.ColorSource = 4 + Line1.Comment = "" + Line1.DefHeight = + Line1.DefLeft = + Line1.DefTop = + Line1.DefWidth = + Line1.DragIcon = ..\..\ + Line1.DragMode = 0 + Line1.DrawMode = 13 + Line1.Enabled = .T. + Line1.Height = (8) + Line1.HelpContextID = 0 + Line1.Left = (44) + Line1.LineSlant = "\" + Line1.MouseIcon = ..\..\ + Line1.MousePointer = 0 + Line1.Name = "Line1" + Line1.OLEDragMode = 0 + Line1.OLEDragPicture = ..\..\ + Line1.OLEDropEffects = 3 + Line1.OLEDropMode = 0 + Line1.PolyPoints = "" + Line1.Rotation = 0 + Line1.StatusBarText = "" + Line1.Tag = "" + Line1.ToolTipText = "" + Line1.Top = (80) + Line1.Visible = .T. + Line1.WhatsThisHelpID = -1 + Line1.Width = (104) + Image1.Anchor = 0 + Image1.BackStyle = 1 + Image1.BorderColor = 100,100,100 + Image1.BorderStyle = 0 + Image1.ColorSource = 4 + Image1.Comment = "" + Image1.DefHeight = + Image1.DefLeft = + Image1.DefTop = + Image1.DefWidth = + Image1.DragIcon = ..\..\ + Image1.DragMode = 0 + Image1.Enabled = .T. + Image1.Height = (16) + Image1.HelpContextID = 0 + Image1.Left = (44) + Image1.MouseIcon = ..\..\ + Image1.MousePointer = 0 + Image1.Name = "Image1" + Image1.OLEDragMode = 0 + Image1.OLEDragPicture = ..\..\ + Image1.OLEDropEffects = 3 + Image1.OLEDropMode = 0 + Image1.Picture = bmps\sobrepostal.bmp + Image1.RotateFlip = 0 + Image1.StatusBarText = "" + Image1.Stretch = 0 + Image1.Tag = "" + Image1.Themes = .T. + Image1.ToolTipText = "" + Image1.Top = (100) + Image1.Visible = .T. + Image1.WhatsThisHelpID = -1 + Image1.Width = (17) + Image2.Name = "Image2" + Image3.Height = 16 + Image3.Name = "Image3" + Image3.Width = 17 + Image4.Name = "Image4" + Image5.Height = 16 + Image5.Name = "Image5" + Image5.Width = 17 + Pageframe1.ActivePage = 2 + Pageframe1.Anchor = 0 + Pageframe1.cl_page1.BackColor = 240,240,240 + Pageframe1.cl_page1.Caption = "Page1" + Pageframe1.cl_page1.ColorSource = 4 + Pageframe1.cl_page1.Comment = "" + Pageframe1.cl_page1.DragIcon = ..\..\ + Pageframe1.cl_page1.DragMode = 0 + Pageframe1.cl_page1.Enabled = .T. + Pageframe1.cl_page1.FontBold = .F. + Pageframe1.cl_page1.FontCharSet = 0 + Pageframe1.cl_page1.FontCondense = .F. + Pageframe1.cl_page1.FontExtend = .F. + Pageframe1.cl_page1.FontItalic = .F. + Pageframe1.cl_page1.FontName = "Arial" + Pageframe1.cl_page1.FontOutline = .F. + Pageframe1.cl_page1.FontShadow = .F. + Pageframe1.cl_page1.FontSize = 8 + Pageframe1.cl_page1.FontStrikethru = .F. + Pageframe1.cl_page1.FontUnderline = .F. + Pageframe1.cl_page1.ForeColor = 0,0,0 + Pageframe1.cl_page1.HelpContextID = 0 + Pageframe1.cl_page1.MouseIcon = ..\..\ + Pageframe1.cl_page1.MousePointer = 0 + Pageframe1.cl_page1.Name = "cl_page1" + Pageframe1.cl_page1.OLEDragMode = 0 + Pageframe1.cl_page1.OLEDragPicture = ..\..\ + Pageframe1.cl_page1.OLEDropEffects = 3 + Pageframe1.cl_page1.OLEDropMode = 0 + Pageframe1.cl_page1.PageOrder = 1 + Pageframe1.cl_page1.StatusBarText = "" + Pageframe1.cl_page1.Tag = "" + Pageframe1.cl_page1.ToolTipText = "" + Pageframe1.cl_page1.WhatsThisHelpID = -1 + Pageframe1.cl_page2.Image1.Height = 16 + Pageframe1.cl_page2.Image1.Name = "Image1" + Pageframe1.cl_page2.Image1.Width = 17 + Pageframe1.cl_page2.Image10.Height = 16 + Pageframe1.cl_page2.Image10.Name = "Image10" + Pageframe1.cl_page2.Image10.Width = 17 + Pageframe1.cl_page2.Image2.Name = "Image2" + Pageframe1.cl_page2.Image3.Height = 16 + Pageframe1.cl_page2.Image3.Name = "Image3" + Pageframe1.cl_page2.Image3.Width = 17 + Pageframe1.cl_page2.Image4.Name = "Image4" + Pageframe1.cl_page2.Image5.Height = 16 + Pageframe1.cl_page2.Image5.Name = "Image5" + Pageframe1.cl_page2.Image5.Width = 17 + Pageframe1.cl_page2.Image6.Height = 16 + Pageframe1.cl_page2.Image6.Name = "Image6" + Pageframe1.cl_page2.Image6.Width = 17 + Pageframe1.cl_page2.Image7.Name = "Image7" + Pageframe1.cl_page2.Image8.Height = 16 + Pageframe1.cl_page2.Image8.Name = "Image8" + Pageframe1.cl_page2.Image8.Width = 17 + Pageframe1.cl_page2.Image9.Name = "Image9" + Pageframe1.cl_page2.Label4.Alignment = 0 + Pageframe1.cl_page2.Label4.Anchor = 0 + Pageframe1.cl_page2.Label4.AutoSize = .F. + Pageframe1.cl_page2.Label4.BackColor = 240,240,240 + Pageframe1.cl_page2.Label4.BackStyle = 1 + Pageframe1.cl_page2.Label4.BorderStyle = 0 + Pageframe1.cl_page2.Label4.Caption = "Label4" + Pageframe1.cl_page2.Label4.ColorScheme = 1 + Pageframe1.cl_page2.Label4.ColorSource = 4 + Pageframe1.cl_page2.Label4.Comment = "" + Pageframe1.cl_page2.Label4.DisabledBackColor = 240,240,240 + Pageframe1.cl_page2.Label4.DisabledForeColor = 109,109,109 + Pageframe1.cl_page2.Label4.DragIcon = ..\..\ + Pageframe1.cl_page2.Label4.DragMode = 0 + Pageframe1.cl_page2.Label4.Enabled = .T. + Pageframe1.cl_page2.Label4.FontBold = .F. + Pageframe1.cl_page2.Label4.Name = "Label4" + Pageframe1.cl_page2.Label5.Name = "Label5" + Pageframe1.cl_page2.Line1.Name = "Line1" + Pageframe1.cl_page2.Line2.Name = "Line2" + Pageframe1.cl_page2.Name = "cl_page2" + Pageframe1.cl_page2.PageOrder = 2 + Pageframe1.cl_page2.Shape1.Name = "Shape1" + Pageframe1.cl_page2.Shape2.Name = "Shape2" + Pageframe1.cl_page2.Spinner1.Name = "Spinner1" + Pageframe1.cl_page2.Spinner2.Name = "Spinner2" + Pageframe1.cl_page3.Name = "cl_page3" + Pageframe1.cl_page3.PageOrder = 3 + Pageframe1.ColorSource = 4 + Pageframe1.Comment = "" + Pageframe1.DefHeight = + Pageframe1.DefLeft = + Pageframe1.DefTop = + Pageframe1.DefWidth = + Pageframe1.DragIcon = ..\..\ + Pageframe1.DragMode = 0 + Pageframe1.Enabled = .T. + Pageframe1.ErasePage = .T. + Pageframe1.Height = (193) + Pageframe1.HelpContextID = 0 + Pageframe1.Left = (20) + Pageframe1.MouseIcon = ..\..\ + Pageframe1.MousePointer = 0 + Pageframe1.Name = "Pageframe1" + Pageframe1.OLEDragMode = 0 + Pageframe1.OLEDragPicture = ..\..\ + Pageframe1.OLEDropEffects = 3 + Pageframe1.OLEDropMode = 0 + Pageframe1.RightToLeft = .F. + Pageframe1.StatusBarText = "" + Pageframe1.TabIndex = 7 + Pageframe1.TabOrientation = 0 + Pageframe1.Tabs = .T. + Pageframe1.TabStop = .T. + Pageframe1.TabStretch = 1 + Pageframe1.TabStyle = 1 + Pageframe1.Tag = "" + Pageframe1.Themes = .T. + Pageframe1.ToolTipText = "" + Pageframe1.Top = (200) + Pageframe1.Visible = .T. + Pageframe1.WhatsThisHelpID = -1 + Pageframe1.Width = (256) + Spinner1.Alignment = 1 + Spinner1.Anchor = 0 + Spinner1.BackColor = 255,255,255 + Spinner1.BorderColor = 100,100,100 + Spinner1.BorderStyle = 1 + Spinner1.ColorScheme = 1 + Spinner1.ColorSource = 4 + Spinner1.Comment = "" + Spinner1.ControlSource = "" + Spinner1.DefHeight = + Spinner1.DefLeft = + Spinner1.DefTop = + Spinner1.DefWidth = + Spinner1.DisabledBackColor = 240,240,240 + Spinner1.DisabledForeColor = 109,109,109 + Spinner1.DragIcon = ..\..\ + Spinner1.DragMode = 0 + Spinner1.Enabled = .T. + Spinner1.FontBold = .F. + Spinner1.FontCondense = .F. + Spinner1.FontExtend = .F. + Spinner1.FontItalic = .F. + Spinner1.FontName = "Arial" + Spinner1.FontOutline = .F. + Spinner1.FontShadow = .F. + Spinner1.FontSize = 8 + Spinner1.FontStrikethru = .F. + Spinner1.FontUnderline = .F. + Spinner1.ForeColor = 0,0,0 + Spinner1.Format = "" + Spinner1.Height = (24) + Spinner1.HelpContextID = 0 + Spinner1.HideSelection = .T. + Spinner1.Increment = 1.00 + Spinner1.InputMask = "" + Spinner1.KeyboardHighValue = 2147483647 + Spinner1.KeyboardLowValue = -2147483647 + Spinner1.Left = (44) + Spinner1.Margin = 2 + Spinner1.MouseIcon = ..\..\ + Spinner1.MousePointer = 0 + Spinner1.Name = "Spinner1" + Spinner1.NullDisplay = "" + Spinner1.OLEDragMode = 0 + Spinner1.OLEDragPicture = ..\..\ + Spinner1.OLEDropEffects = 3 + Spinner1.OLEDropMode = 0 + Spinner1.OLEDropTextInsertion = 0 + Spinner1.ReadOnly = .F. + Spinner1.RightToLeft = .F. + Spinner1.SelectedBackColor = 51,153,255 + Spinner1.SelectedForeColor = 255,255,255 + Spinner1.SelectOnEntry = .F. + Spinner1.SpecialEffect = 0 + Spinner1.StatusBarText = "" + Spinner1.TabIndex = 8 + Spinner1.TabStop = .T. + Spinner1.Tag = "" + Spinner1.TerminateRead = .F. + Spinner1.Themes = .T. + Spinner1.ToolTipText = "" + Spinner1.Top = (160) + Spinner1.Value = 0 + Spinner1.Visible = .T. + Spinner1.WhatsThisHelpID = -1 + Spinner1.Width = (104) + Label5.Name = "Label5" + Shape2.Name = "Shape2" + Line2.Name = "Line2" + Image6.Height = 16 + Image6.Name = "Image6" + Image6.Width = 17 + Image7.Name = "Image7" + Image8.Height = 16 + Image8.Name = "Image8" + Image8.Width = 17 + Image9.Name = "Image9" + Image10.Height = 16 + Image10.Name = "Image10" + Image10.Width = 17 + Spinner2.Name = "Spinner2" + Cl_pageframe1.ErasePage = .T. + Cl_pageframe1.Name = "Cl_pageframe1" + Cl_pageframe1.Page1.Name = "Page1" + Cl_pageframe1.Page2.Image1.Height = 16 + Cl_pageframe1.Page2.Image1.Name = "Image1" + Cl_pageframe1.Page2.Image1.Width = 17 + Cl_pageframe1.Page2.Image10.Height = 16 + Cl_pageframe1.Page2.Image10.Name = "Image10" + Cl_pageframe1.Page2.Image10.Width = 17 + Cl_pageframe1.Page2.Image2.Name = "Image2" + Cl_pageframe1.Page2.Image3.Height = 16 + Cl_pageframe1.Page2.Image3.Name = "Image3" + Cl_pageframe1.Page2.Image3.Width = 17 + Cl_pageframe1.Page2.Image4.Name = "Image4" + Cl_pageframe1.Page2.Image5.Height = 16 + Cl_pageframe1.Page2.Image5.Name = "Image5" + Cl_pageframe1.Page2.Image5.Width = 17 + Cl_pageframe1.Page2.Image6.Height = 16 + Cl_pageframe1.Page2.Image6.Name = "Image6" + Cl_pageframe1.Page2.Image6.Width = 17 + Cl_pageframe1.Page2.Image7.Name = "Image7" + Cl_pageframe1.Page2.Image8.Height = 16 + Cl_pageframe1.Page2.Image8.Name = "Image8" + Cl_pageframe1.Page2.Image8.Width = 17 + Cl_pageframe1.Page2.Image9.Name = "Image9" + Cl_pageframe1.Page2.Label4.Name = "Label4" + Cl_pageframe1.Page2.Label5.Name = "Label5" + Cl_pageframe1.Page2.Line1.Name = "Line1" + Cl_pageframe1.Page2.Line2.Name = "Line2" + Cl_pageframe1.Page2.Name = "Page2" + Cl_pageframe1.Page2.Shape1.Name = "Shape1" + Cl_pageframe1.Page2.Shape2.Name = "Shape2" + Cl_pageframe1.Page2.Spinner1.Name = "Spinner1" + Cl_pageframe1.Page2.Spinner2.Name = "Spinner2" + Cl_pageframe1.Page3.Name = "Page3" + Cl_label1.Name = "Cl_label1" + Cl_shape1.Name = "Cl_shape1" + Cl_line1.Name = "Cl_line1" + Cl_image1.Height = 16 + Cl_image1.Name = "Cl_image1" + Cl_image1.Width = 17 + Cl_image2.Name = "Cl_image2" + Cl_image3.Height = 16 + Cl_image3.Name = "Cl_image3" + Cl_image3.Width = 17 + Cl_image4.Name = "Cl_image4" + Cl_image5.Height = 16 + Cl_image5.Name = "Cl_image5" + Cl_image5.Width = 17 + Cl_spinner1.Name = "Cl_spinner1" + Cl_label2.Name = "Cl_label2" + Cl_shape2.Name = "Cl_shape2" + Cl_line2.Name = "Cl_line2" + Cl_image6.Height = 16 + Cl_image6.Name = "Cl_image6" + Cl_image6.Width = 17 + Cl_image7.Name = "Cl_image7" + Cl_image8.Height = 16 + Cl_image8.Name = "Cl_image8" + Cl_image8.Width = 17 + Cl_image9.Name = "Cl_image9" + Cl_image10.Height = 16 + Cl_image10.Name = "Cl_image10" + Cl_image10.Width = 17 + Cl_spinner2.Name = "Cl_spinner2" + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_test.sc2 b/TESTS/DATOS_READONLY/f_test.sc2 index e9fac45..9b40a4e 100644 --- a/TESTS/DATOS_READONLY/f_test.sc2 +++ b/TESTS/DATOS_READONLY/f_test.sc2 @@ -4,458 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_test.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_form_controles1" Baseclass="form" /> - DataSource = .NULL. - Name = "Dataenvironment" - TabStop = .F. - Visible = .F. - -ENDDEFINE - -DEFINE CLASS f_form_controles1 AS f_form_controles OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - DoCreate = .T. - Name = "F_form_controles1" - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Name = "Label1" - Label2.Name = "Label2" - Label4.Alignment = 0 - Label4.Anchor = 0 - Label4.AutoSize = .F. - Label4.BackColor = 240,240,240 - Label4.BackStyle = 1 - Label4.BorderStyle = 0 - Label4.Caption = "Label4" - Label4.ColorScheme = 1 - Label4.ColorSource = 4 - Label4.Comment = "" - Label4.DefHeight = - Label4.DefLeft = - Label4.DefTop = - Label4.DefWidth = - Label4.DisabledBackColor = 240,240,240 - Label4.DisabledForeColor = 109,109,109 - Label4.DragIcon = ..\..\ - Label4.DragMode = 0 - Label4.Enabled = .T. - Label4.FontBold = .F. - Label4.FontCondense = .F. - Label4.FontExtend = .F. - Label4.FontItalic = .F. - Label4.FontName = "Arial" - Label4.FontOutline = .F. - Label4.FontShadow = .F. - Label4.FontSize = 8 - Label4.FontStrikethru = .F. - Label4.FontUnderline = .F. - Label4.ForeColor = 0,0,0 - Label4.Height = (17) - Label4.HelpContextID = 0 - Label4.Left = (44) - Label4.MouseIcon = ..\..\ - Label4.MousePointer = 0 - Label4.Name = "Label4" - Label4.OLEDragMode = 0 - Label4.OLEDragPicture = ..\..\ - Label4.OLEDropEffects = 3 - Label4.OLEDropMode = 0 - Label4.RightToLeft = .F. - Label4.Rotation = 0 - Label4.Style = 0 - Label4.TabIndex = 6 - Label4.Tag = "" - Label4.ToolTipText = "" - Label4.Top = (40) - Label4.WhatsThisHelpID = -1 - Label4.Width = (104) - Label4.WordWrap = .F. - Shape1.Anchor = 0 - Shape1.BackColor = 240,240,240 - Shape1.BackStyle = 1 - Shape1.BorderColor = 100,100,100 - Shape1.BorderStyle = 1 - Shape1.BorderWidth = 1 - Shape1.ColorScheme = 1 - Shape1.ColorSource = 4 - Shape1.Comment = "" - Shape1.Curvature = 0 - Shape1.DefHeight = - Shape1.DefLeft = - Shape1.DefTop = - Shape1.DefWidth = - Shape1.DragIcon = ..\..\ - Shape1.DragMode = 0 - Shape1.DrawMode = 13 - Shape1.Enabled = .T. - Shape1.FillColor = 0,0,0 - Shape1.FillStyle = 1 - Shape1.Height = (17) - Shape1.HelpContextID = 0 - Shape1.Left = (44) - Shape1.MouseIcon = ..\..\ - Shape1.MousePointer = 0 - Shape1.Name = "Shape1" - Shape1.OLEDragMode = 0 - Shape1.OLEDragPicture = ..\..\ - Shape1.OLEDropEffects = 3 - Shape1.OLEDropMode = 0 - Shape1.PolyPoints = "" - Shape1.Rotation = 0 - Shape1.SpecialEffect = 0 - Shape1.StatusBarText = "" - Shape1.Style = 0 - Shape1.Tag = "" - Shape1.ToolTipText = "" - Shape1.Top = (60) - Shape1.Visible = .T. - Shape1.WhatsThisHelpID = -1 - Shape1.Width = (105) - Line1.Anchor = 0 - Line1.BorderColor = 100,100,100 - Line1.BorderStyle = 1 - Line1.BorderWidth = 1 - Line1.ColorSource = 4 - Line1.Comment = "" - Line1.DefHeight = - Line1.DefLeft = - Line1.DefTop = - Line1.DefWidth = - Line1.DragIcon = ..\..\ - Line1.DragMode = 0 - Line1.DrawMode = 13 - Line1.Enabled = .T. - Line1.Height = (8) - Line1.HelpContextID = 0 - Line1.Left = (44) - Line1.LineSlant = "\" - Line1.MouseIcon = ..\..\ - Line1.MousePointer = 0 - Line1.Name = "Line1" - Line1.OLEDragMode = 0 - Line1.OLEDragPicture = ..\..\ - Line1.OLEDropEffects = 3 - Line1.OLEDropMode = 0 - Line1.PolyPoints = "" - Line1.Rotation = 0 - Line1.StatusBarText = "" - Line1.Tag = "" - Line1.ToolTipText = "" - Line1.Top = (80) - Line1.Visible = .T. - Line1.WhatsThisHelpID = -1 - Line1.Width = (104) - Image1.Anchor = 0 - Image1.BackStyle = 1 - Image1.BorderColor = 100,100,100 - Image1.BorderStyle = 0 - Image1.ColorSource = 4 - Image1.Comment = "" - Image1.DefHeight = - Image1.DefLeft = - Image1.DefTop = - Image1.DefWidth = - Image1.DragIcon = ..\..\ - Image1.DragMode = 0 - Image1.Enabled = .T. - Image1.Height = (16) - Image1.HelpContextID = 0 - Image1.Left = (44) - Image1.MouseIcon = ..\..\ - Image1.MousePointer = 0 - Image1.Name = "Image1" - Image1.OLEDragMode = 0 - Image1.OLEDragPicture = ..\..\ - Image1.OLEDropEffects = 3 - Image1.OLEDropMode = 0 - Image1.Picture = bmps\sobrepostal.bmp - Image1.RotateFlip = 0 - Image1.StatusBarText = "" - Image1.Stretch = 0 - Image1.Tag = "" - Image1.Themes = .T. - Image1.ToolTipText = "" - Image1.Top = (100) - Image1.Visible = .T. - Image1.WhatsThisHelpID = -1 - Image1.Width = (17) - Image2.Name = "Image2" - Image3.Height = 16 - Image3.Name = "Image3" - Image3.Width = 17 - Image4.Name = "Image4" - Image5.Height = 16 - Image5.Name = "Image5" - Image5.Width = 17 - Pageframe1.ActivePage = 2 - Pageframe1.Anchor = 0 - Pageframe1.cl_page1.BackColor = 240,240,240 - Pageframe1.cl_page1.Caption = "Page1" - Pageframe1.cl_page1.ColorSource = 4 - Pageframe1.cl_page1.Comment = "" - Pageframe1.cl_page1.DragIcon = ..\..\ - Pageframe1.cl_page1.DragMode = 0 - Pageframe1.cl_page1.Enabled = .T. - Pageframe1.cl_page1.FontBold = .F. - Pageframe1.cl_page1.FontCharSet = 0 - Pageframe1.cl_page1.FontCondense = .F. - Pageframe1.cl_page1.FontExtend = .F. - Pageframe1.cl_page1.FontItalic = .F. - Pageframe1.cl_page1.FontName = "Arial" - Pageframe1.cl_page1.FontOutline = .F. - Pageframe1.cl_page1.FontShadow = .F. - Pageframe1.cl_page1.FontSize = 8 - Pageframe1.cl_page1.FontStrikethru = .F. - Pageframe1.cl_page1.FontUnderline = .F. - Pageframe1.cl_page1.ForeColor = 0,0,0 - Pageframe1.cl_page1.HelpContextID = 0 - Pageframe1.cl_page1.MouseIcon = ..\..\ - Pageframe1.cl_page1.MousePointer = 0 - Pageframe1.cl_page1.Name = "cl_page1" - Pageframe1.cl_page1.OLEDragMode = 0 - Pageframe1.cl_page1.OLEDragPicture = ..\..\ - Pageframe1.cl_page1.OLEDropEffects = 3 - Pageframe1.cl_page1.OLEDropMode = 0 - Pageframe1.cl_page1.PageOrder = 1 - Pageframe1.cl_page1.StatusBarText = "" - Pageframe1.cl_page1.Tag = "" - Pageframe1.cl_page1.ToolTipText = "" - Pageframe1.cl_page1.WhatsThisHelpID = -1 - Pageframe1.cl_page2.Image1.Height = 16 - Pageframe1.cl_page2.Image1.Name = "Image1" - Pageframe1.cl_page2.Image1.Width = 17 - Pageframe1.cl_page2.Image10.Height = 16 - Pageframe1.cl_page2.Image10.Name = "Image10" - Pageframe1.cl_page2.Image10.Width = 17 - Pageframe1.cl_page2.Image2.Name = "Image2" - Pageframe1.cl_page2.Image3.Height = 16 - Pageframe1.cl_page2.Image3.Name = "Image3" - Pageframe1.cl_page2.Image3.Width = 17 - Pageframe1.cl_page2.Image4.Name = "Image4" - Pageframe1.cl_page2.Image5.Height = 16 - Pageframe1.cl_page2.Image5.Name = "Image5" - Pageframe1.cl_page2.Image5.Width = 17 - Pageframe1.cl_page2.Image6.Height = 16 - Pageframe1.cl_page2.Image6.Name = "Image6" - Pageframe1.cl_page2.Image6.Width = 17 - Pageframe1.cl_page2.Image7.Name = "Image7" - Pageframe1.cl_page2.Image8.Height = 16 - Pageframe1.cl_page2.Image8.Name = "Image8" - Pageframe1.cl_page2.Image8.Width = 17 - Pageframe1.cl_page2.Image9.Name = "Image9" - Pageframe1.cl_page2.Label4.Alignment = 0 - Pageframe1.cl_page2.Label4.Anchor = 0 - Pageframe1.cl_page2.Label4.AutoSize = .F. - Pageframe1.cl_page2.Label4.BackColor = 240,240,240 - Pageframe1.cl_page2.Label4.BackStyle = 1 - Pageframe1.cl_page2.Label4.BorderStyle = 0 - Pageframe1.cl_page2.Label4.Caption = "Label4" - Pageframe1.cl_page2.Label4.ColorScheme = 1 - Pageframe1.cl_page2.Label4.ColorSource = 4 - Pageframe1.cl_page2.Label4.Comment = "" - Pageframe1.cl_page2.Label4.DisabledBackColor = 240,240,240 - Pageframe1.cl_page2.Label4.DisabledForeColor = 109,109,109 - Pageframe1.cl_page2.Label4.DragIcon = ..\..\ - Pageframe1.cl_page2.Label4.DragMode = 0 - Pageframe1.cl_page2.Label4.Enabled = .T. - Pageframe1.cl_page2.Label4.FontBold = .F. - Pageframe1.cl_page2.Label4.Name = "Label4" - Pageframe1.cl_page2.Label5.Name = "Label5" - Pageframe1.cl_page2.Line1.Name = "Line1" - Pageframe1.cl_page2.Line2.Name = "Line2" - Pageframe1.cl_page2.Name = "cl_page2" - Pageframe1.cl_page2.PageOrder = 2 - Pageframe1.cl_page2.Shape1.Name = "Shape1" - Pageframe1.cl_page2.Shape2.Name = "Shape2" - Pageframe1.cl_page2.Spinner1.Name = "Spinner1" - Pageframe1.cl_page2.Spinner2.Name = "Spinner2" - Pageframe1.cl_page3.Name = "cl_page3" - Pageframe1.cl_page3.PageOrder = 3 - Pageframe1.ColorSource = 4 - Pageframe1.Comment = "" - Pageframe1.DefHeight = - Pageframe1.DefLeft = - Pageframe1.DefTop = - Pageframe1.DefWidth = - Pageframe1.DragIcon = ..\..\ - Pageframe1.DragMode = 0 - Pageframe1.Enabled = .T. - Pageframe1.ErasePage = .T. - Pageframe1.Height = (193) - Pageframe1.HelpContextID = 0 - Pageframe1.Left = (20) - Pageframe1.MouseIcon = ..\..\ - Pageframe1.MousePointer = 0 - Pageframe1.Name = "Pageframe1" - Pageframe1.OLEDragMode = 0 - Pageframe1.OLEDragPicture = ..\..\ - Pageframe1.OLEDropEffects = 3 - Pageframe1.OLEDropMode = 0 - Pageframe1.RightToLeft = .F. - Pageframe1.StatusBarText = "" - Pageframe1.TabIndex = 7 - Pageframe1.TabOrientation = 0 - Pageframe1.Tabs = .T. - Pageframe1.TabStop = .T. - Pageframe1.TabStretch = 1 - Pageframe1.TabStyle = 1 - Pageframe1.Tag = "" - Pageframe1.Themes = .T. - Pageframe1.ToolTipText = "" - Pageframe1.Top = (200) - Pageframe1.Visible = .T. - Pageframe1.WhatsThisHelpID = -1 - Pageframe1.Width = (256) - Spinner1.Alignment = 1 - Spinner1.Anchor = 0 - Spinner1.BackColor = 255,255,255 - Spinner1.BorderColor = 100,100,100 - Spinner1.BorderStyle = 1 - Spinner1.ColorScheme = 1 - Spinner1.ColorSource = 4 - Spinner1.Comment = "" - Spinner1.ControlSource = "" - Spinner1.DefHeight = - Spinner1.DefLeft = - Spinner1.DefTop = - Spinner1.DefWidth = - Spinner1.DisabledBackColor = 240,240,240 - Spinner1.DisabledForeColor = 109,109,109 - Spinner1.DragIcon = ..\..\ - Spinner1.DragMode = 0 - Spinner1.Enabled = .T. - Spinner1.FontBold = .F. - Spinner1.FontCondense = .F. - Spinner1.FontExtend = .F. - Spinner1.FontItalic = .F. - Spinner1.FontName = "Arial" - Spinner1.FontOutline = .F. - Spinner1.FontShadow = .F. - Spinner1.FontSize = 8 - Spinner1.FontStrikethru = .F. - Spinner1.FontUnderline = .F. - Spinner1.ForeColor = 0,0,0 - Spinner1.Format = "" - Spinner1.Height = (24) - Spinner1.HelpContextID = 0 - Spinner1.HideSelection = .T. - Spinner1.Increment = 1.00 - Spinner1.InputMask = "" - Spinner1.KeyboardHighValue = 2147483647 - Spinner1.KeyboardLowValue = -2147483647 - Spinner1.Left = (44) - Spinner1.Margin = 2 - Spinner1.MouseIcon = ..\..\ - Spinner1.MousePointer = 0 - Spinner1.Name = "Spinner1" - Spinner1.NullDisplay = "" - Spinner1.OLEDragMode = 0 - Spinner1.OLEDragPicture = ..\..\ - Spinner1.OLEDropEffects = 3 - Spinner1.OLEDropMode = 0 - Spinner1.OLEDropTextInsertion = 0 - Spinner1.ReadOnly = .F. - Spinner1.RightToLeft = .F. - Spinner1.SelectedBackColor = 51,153,255 - Spinner1.SelectedForeColor = 255,255,255 - Spinner1.SelectOnEntry = .F. - Spinner1.SpecialEffect = 0 - Spinner1.StatusBarText = "" - Spinner1.TabIndex = 8 - Spinner1.TabStop = .T. - Spinner1.Tag = "" - Spinner1.TerminateRead = .F. - Spinner1.Themes = .T. - Spinner1.ToolTipText = "" - Spinner1.Top = (160) - Spinner1.Value = 0 - Spinner1.Visible = .T. - Spinner1.WhatsThisHelpID = -1 - Spinner1.Width = (104) - Label5.Name = "Label5" - Shape2.Name = "Shape2" - Line2.Name = "Line2" - Image6.Height = 16 - Image6.Name = "Image6" - Image6.Width = 17 - Image7.Name = "Image7" - Image8.Height = 16 - Image8.Name = "Image8" - Image8.Width = 17 - Image9.Name = "Image9" - Image10.Height = 16 - Image10.Name = "Image10" - Image10.Width = 17 - Spinner2.Name = "Spinner2" - Cl_pageframe1.ErasePage = .T. - Cl_pageframe1.Name = "Cl_pageframe1" - Cl_pageframe1.Page1.Name = "Page1" - Cl_pageframe1.Page2.Image1.Height = 16 - Cl_pageframe1.Page2.Image1.Name = "Image1" - Cl_pageframe1.Page2.Image1.Width = 17 - Cl_pageframe1.Page2.Image10.Height = 16 - Cl_pageframe1.Page2.Image10.Name = "Image10" - Cl_pageframe1.Page2.Image10.Width = 17 - Cl_pageframe1.Page2.Image2.Name = "Image2" - Cl_pageframe1.Page2.Image3.Height = 16 - Cl_pageframe1.Page2.Image3.Name = "Image3" - Cl_pageframe1.Page2.Image3.Width = 17 - Cl_pageframe1.Page2.Image4.Name = "Image4" - Cl_pageframe1.Page2.Image5.Height = 16 - Cl_pageframe1.Page2.Image5.Name = "Image5" - Cl_pageframe1.Page2.Image5.Width = 17 - Cl_pageframe1.Page2.Image6.Height = 16 - Cl_pageframe1.Page2.Image6.Name = "Image6" - Cl_pageframe1.Page2.Image6.Width = 17 - Cl_pageframe1.Page2.Image7.Name = "Image7" - Cl_pageframe1.Page2.Image8.Height = 16 - Cl_pageframe1.Page2.Image8.Name = "Image8" - Cl_pageframe1.Page2.Image8.Width = 17 - Cl_pageframe1.Page2.Image9.Name = "Image9" - Cl_pageframe1.Page2.Label4.Name = "Label4" - Cl_pageframe1.Page2.Label5.Name = "Label5" - Cl_pageframe1.Page2.Line1.Name = "Line1" - Cl_pageframe1.Page2.Line2.Name = "Line2" - Cl_pageframe1.Page2.Name = "Page2" - Cl_pageframe1.Page2.Shape1.Name = "Shape1" - Cl_pageframe1.Page2.Shape2.Name = "Shape2" - Cl_pageframe1.Page2.Spinner1.Name = "Spinner1" - Cl_pageframe1.Page2.Spinner2.Name = "Spinner2" - Cl_pageframe1.Page3.Name = "Page3" - Cl_label1.Name = "Cl_label1" - Cl_shape1.Name = "Cl_shape1" - Cl_line1.Name = "Cl_line1" - Cl_image1.Height = 16 - Cl_image1.Name = "Cl_image1" - Cl_image1.Width = 17 - Cl_image2.Name = "Cl_image2" - Cl_image3.Height = 16 - Cl_image3.Name = "Cl_image3" - Cl_image3.Width = 17 - Cl_image4.Name = "Cl_image4" - Cl_image5.Height = 16 - Cl_image5.Name = "Cl_image5" - Cl_image5.Width = 17 - Cl_spinner1.Name = "Cl_spinner1" - Cl_label2.Name = "Cl_label2" - Cl_shape2.Name = "Cl_shape2" - Cl_line2.Name = "Cl_line2" - Cl_image6.Height = 16 - Cl_image6.Name = "Cl_image6" - Cl_image6.Width = 17 - Cl_image7.Name = "Cl_image7" - Cl_image8.Height = 16 - Cl_image8.Name = "Cl_image8" - Cl_image8.Width = 17 - Cl_image9.Name = "Cl_image9" - Cl_image10.Height = 16 - Cl_image10.Name = "Cl_image10" - Cl_image10.Width = 17 - Cl_spinner2.Name = "Cl_spinner2" - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/f_textbox.dataenvironment.sc2 b/TESTS/DATOS_READONLY/f_textbox.dataenvironment.sc2 new file mode 100644 index 0000000..17d643c --- /dev/null +++ b/TESTS/DATOS_READONLY/f_textbox.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_textbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_textbox.f_textbox_test.sc2 b/TESTS/DATOS_READONLY/f_textbox.f_textbox_test.sc2 new file mode 100644 index 0000000..ecc733c --- /dev/null +++ b/TESTS/DATOS_READONLY/f_textbox.f_textbox_test.sc2 @@ -0,0 +1,1447 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="f_textbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_textbox_test AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_textbox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_textbox2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Text2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Edit2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_editbox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_textbox3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Text3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_textbox4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Text4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Edit3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_editbox2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_textbox5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Text5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_textbox6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Text6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Edit4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_editbox3" UniqueID="" Timestamp="" /> + + * + c_testname = Textbox_Test + DoCreate = .T. + Left = 0 + Name = "F_Textbox_Test" + Top = 0 + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "TEXTBOX NORMAL" + Label1.Name = "Label1" + Label2.Caption = "TEXTBOX SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_editbox1' AS cl_editbox WITH ; + AddLineFeeds = .T., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (57), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = (426), ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_editbox1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 9, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (64), ; + Value = Un valor para el editbox que se vea en más de una línea, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (93) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> + + ADD OBJECT 'Cl_textbox1' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (23), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = (300), ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (64), ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (116) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Cl_textbox2' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 300, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 96, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 101, ; + Left = 20, ; + Name = "Container1", ; + Top = 148, ; + Width = 517 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Cl_editbox2' AS cl_editbox WITH ; + AddLineFeeds = .T., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 57, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = 406, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_editbox2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 20, ; + Value = Un valor para el editbox que se vea en más de una línea, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 93 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> + + ADD OBJECT 'Container1.Cl_textbox3' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 280, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox3", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 20, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Container1.Cl_textbox4' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 280, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox4", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 52, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Container1.Edit3' AS editbox WITH ; + AddLineFeeds = .T., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 57, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = 144, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Edit3", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 20, ; + Value = Un valor para el editbox que se vea en más de una línea, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 93 + *< END OBJECT: BaseClass="editbox" /> + + ADD OBJECT 'Container1.Text3' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 16, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text3", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 20, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Container1.Text4' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 16, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text4", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 52, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Edit2' AS editbox WITH ; + AddLineFeeds = .T., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (57), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = (164), ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Edit2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (64), ; + Value = Un valor para el editbox que se vea en más de una línea, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (93) + *< END OBJECT: BaseClass="editbox" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 129, ; + Left = 20, ; + Name = "Pageframe1", ; + PageCount = 2, ; + Top = 260, ; + Width = 517, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_editbox3' AS cl_editbox WITH ; + AddLineFeeds = .T., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 57, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = 405, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_editbox3", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = Un valor para el editbox que se vea en más de una línea, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 93 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_textbox5' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 279, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox5", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 16, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_textbox6' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 279, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox6", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 48, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Pageframe1.Page1.Edit4' AS editbox WITH ; + AddLineFeeds = .T., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 57, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = 143, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Edit4", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = Un valor para el editbox que se vea en más de una línea, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 93 + *< END OBJECT: BaseClass="editbox" /> + + ADD OBJECT 'Pageframe1.Page1.Text5' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 15, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text5", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 16, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Pageframe1.Page1.Text6' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 15, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text6", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 48, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Text1' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (23), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = (36), ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = (64), ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (116) + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Text2' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 36, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 96, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 116 + *< END OBJECT: BaseClass="textbox" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/f_textbox.sc2 b/TESTS/DATOS_READONLY/f_textbox.sc2 index d601e88..53083b6 100644 --- a/TESTS/DATOS_READONLY/f_textbox.sc2 +++ b/TESTS/DATOS_READONLY/f_textbox.sc2 @@ -4,1455 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="f_textbox.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="f_textbox_test" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS f_textbox_test AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_textbox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_textbox2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Text2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Edit2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_editbox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_textbox3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Text3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_textbox4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Text4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Edit3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_editbox2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_textbox5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Text5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_textbox6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Text6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Edit4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_editbox3" UniqueID="" Timestamp="" /> - - c_testname = Textbox_Test - DoCreate = .T. - Left = 0 - Name = "F_Textbox_Test" - Top = 0 - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "TEXTBOX NORMAL" - Label1.Name = "Label1" - Label2.Caption = "TEXTBOX SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_editbox1' AS cl_editbox WITH ; - AddLineFeeds = .T., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (57), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = (426), ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_editbox1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 9, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (64), ; - Value = Un valor para el editbox que se vea en más de una línea, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (93) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> - - ADD OBJECT 'Cl_textbox1' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (23), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = (300), ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (64), ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (116) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Cl_textbox2' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 300, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 96, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 101, ; - Left = 20, ; - Name = "Container1", ; - Top = 148, ; - Width = 517 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Cl_editbox2' AS cl_editbox WITH ; - AddLineFeeds = .T., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 57, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = 406, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_editbox2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 20, ; - Value = Un valor para el editbox que se vea en más de una línea, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 93 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> - - ADD OBJECT 'Container1.Cl_textbox3' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 280, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox3", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 20, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Container1.Cl_textbox4' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 280, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox4", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 52, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Container1.Edit3' AS editbox WITH ; - AddLineFeeds = .T., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 57, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = 144, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Edit3", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 20, ; - Value = Un valor para el editbox que se vea en más de una línea, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 93 - *< END OBJECT: BaseClass="editbox" /> - - ADD OBJECT 'Container1.Text3' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 16, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text3", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 20, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Container1.Text4' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 16, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text4", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 52, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Edit2' AS editbox WITH ; - AddLineFeeds = .T., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (57), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = (164), ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Edit2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (64), ; - Value = Un valor para el editbox que se vea en más de una línea, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (93) - *< END OBJECT: BaseClass="editbox" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 129, ; - Left = 20, ; - Name = "Pageframe1", ; - PageCount = 2, ; - Top = 260, ; - Width = 517, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_editbox3' AS cl_editbox WITH ; - AddLineFeeds = .T., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 57, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = 405, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_editbox3", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = Un valor para el editbox que se vea en más de una línea, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 93 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_textbox5' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 279, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox5", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 16, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_textbox6' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 279, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox6", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 48, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Pageframe1.Page1.Edit4' AS editbox WITH ; - AddLineFeeds = .T., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 57, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = 143, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Edit4", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = Un valor para el editbox que se vea en más de una línea, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 93 - *< END OBJECT: BaseClass="editbox" /> - - ADD OBJECT 'Pageframe1.Page1.Text5' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 15, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text5", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 16, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Pageframe1.Page1.Text6' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 15, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text6", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 48, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Text1' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (23), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = (36), ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = (64), ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (116) - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Text2' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 36, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 96, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 116 - *< END OBJECT: BaseClass="textbox" /> - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_commandgroup.vc2 b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_commandgroup.vc2 index 5e083e2..6d02598 100644 --- a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_commandgroup.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_commandgroup.vc2 @@ -12,23 +12,25 @@ DEFINE CLASS cl_commandgroup AS commandgroup && Descripci *p: una_prop_cmgroup && Con comentario, pero sin valor * - ButtonCount = 2 - Height = 66 - Name = "cl_commandgroup" - una_prop_cmgroup = .F. && Con comentario, pero sin valor - Value = 1 - Width = 94 - Command1.Caption = "Command1" - Command1.Height = 27 - Command1.Left = 5 - Command1.Name = "Command1" - Command1.Top = 5 - Command1.Width = 84 - Command2.Caption = "Command2" - Command2.Height = 27 - Command2.Left = 5 - Command2.Name = "Command2" - Command2.Top = 34 - Command2.Width = 84 + * + ButtonCount = 2 + Height = 66 + Name = "cl_commandgroup" + una_prop_cmgroup = .F. + Value = 1 + Width = 94 + Command1.Caption = "Command1" + Command1.Height = 27 + Command1.Left = 5 + Command1.Name = "Command1" + Command1.Top = 5 + Command1.Width = 84 + Command2.Caption = "Command2" + Command2.Height = 27 + Command2.Left = 5 + Command2.Name = "Command2" + Command2.Top = 34 + Command2.Width = 84 + * ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_form.vc2 b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_form.vc2 index 650a9f1..e35ca4b 100644 --- a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_form.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_form.vc2 @@ -23,22 +23,24 @@ DEFINE CLASS cl_form AS form OLEPUBLIC && mi OLE server DLL HIDDEN ahidden,chidden PROTECTED aprotected,cprotected - Caption = "Form" - chidden = && Prop.Hidden - cprotected = && Prop.Protegida - DoCreate = .T. - Height = 345 - Left = 0 - Name = "cl_form" - Picture = bmps\scccheckout.bmp - Top = 0 - Width = 570 - _memberdata = - - - - - && XML Metadata for customizable properties + * + Caption = "Form" + chidden = + cprotected = + DoCreate = .T. + Height = 345 + Left = 0 + Name = "cl_form" + Picture = bmps\scccheckout.bmp + Top = 0 + Width = 570 + _memberdata = + + + + + + * ADD OBJECT 'Cl_commandgroup1' AS cl_commandgroup WITH ; BackColor = 255,128,192, ; diff --git a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_imagen.vc2 b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_imagen.vc2 index 5947af3..a85209c 100644 --- a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_imagen.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_imagen.vc2 @@ -11,10 +11,12 @@ DEFINE CLASS cl_imagen AS image OLEPUBLIC && otro ole *m: un_metodo_de_clase && Para testear si el código se va a la clase cl_form * - Height = 16 - Name = "cl_imagen" - Picture = bmps\sobrepostal.bmp - Width = 17 + * + Height = 16 + Name = "cl_imagen" + Picture = bmps\sobrepostal.bmp + Width = 17 + * PROCEDURE un_metodo_de_clase && Para testear si el código se va a la clase cl_form * ESTE CODIGO ES DE "cl_imagen::un_metodo_de_clase" diff --git a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_olebound.vc2 b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_olebound.vc2 index 3a4bd63..16830cd 100644 --- a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_olebound.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_olebound.vc2 @@ -7,8 +7,10 @@ DEFINE CLASS cl_olebound AS oleboundcontrol *< CLASSDATA: Baseclass="oleboundcontrol" Timestamp="" Scale="Pixels" Uniqueid="" /> - Height = 100 - Name = "cl_olebound" - Width = 100 + * + Height = 100 + Name = "cl_olebound" + Width = 100 + * ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_olecontrol.vc2 b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_olecontrol.vc2 index 57fd5f8..0bbf5f3 100644 --- a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_olecontrol.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_olecontrol.vc2 @@ -7,8 +7,10 @@ DEFINE CLASS cl_olecontrol AS olecontrol *< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="cl_olecontrol" Parent="" ObjName="cl_olecontrol" OLEObject="C:\Windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABCpJ18M8c8BAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAD+////BwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPAAAAAAUAAIAAAAAAAAABAAAAAQABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dGxlY29udHJvbDEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" /> - Height = 67 - Name = "cl_olecontrol" - Width = 131 + * + Height = 67 + Name = "cl_olecontrol" + Width = 131 + * ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_optiongroup.vc2 b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_optiongroup.vc2 index f7b6562..9822cea 100644 --- a/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_optiongroup.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_classperfile_text.cl_optiongroup.vc2 @@ -14,26 +14,28 @@ DEFINE CLASS cl_optiongroup AS optiongroup && descripcion *p: propiedad_de_clase_sin_valor && Una propiedad sin valor para heredar * - ButtonCount = 2 - Height = 46 - Name = "cl_optiongroup" - propiedad_de_clase_con_valor = UN VALOR DE LA CLASE && Tiene un valor por defecto - propiedad_de_clase_sin_valor = .F. && Una propiedad sin valor para heredar - Value = 1 - Width = 71 - Option1.Caption = "Option1" - Option1.Height = 17 - Option1.Left = 5 - Option1.Name = "Option1" - Option1.Top = 5 - Option1.Value = 1 - Option1.Width = 61 - Option2.Caption = "Option2" - Option2.Height = 17 - Option2.Left = 5 - Option2.Name = "Option2" - Option2.Top = 24 - Option2.Width = 61 + * + ButtonCount = 2 + Height = 46 + Name = "cl_optiongroup" + propiedad_de_clase_con_valor = UN VALOR DE LA CLASE + propiedad_de_clase_sin_valor = .F. + Value = 1 + Width = 71 + Option1.Caption = "Option1" + Option1.Height = 17 + Option1.Left = 5 + Option1.Name = "Option1" + Option1.Top = 5 + Option1.Value = 1 + Option1.Width = 61 + Option2.Caption = "Option2" + Option2.Height = 17 + Option2.Left = 5 + Option2.Name = "Option2" + Option2.Top = 24 + Option2.Width = 61 + * PROCEDURE propiedad_de_clase_con_valor_access *To do: Modify this routine for the Access method diff --git a/TESTS/DATOS_READONLY/fb2p_classperfile_text.proj_hook.vc2 b/TESTS/DATOS_READONLY/fb2p_classperfile_text.proj_hook.vc2 index 84d9a31..22f93fa 100644 --- a/TESTS/DATOS_READONLY/fb2p_classperfile_text.proj_hook.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_classperfile_text.proj_hook.vc2 @@ -7,8 +7,10 @@ DEFINE CLASS proj_hook AS projecthook *< CLASSDATA: Baseclass="projecthook" Timestamp="" Scale="Pixels" Uniqueid="" /> - Height = 22 - Name = "proj_hook" - Width = 23 + * + Height = 22 + Name = "proj_hook" + Width = 23 + * ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.connection.remote_connection_dbf.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.connection.remote_connection_dbf.dc2 new file mode 100644 index 0000000..b537613 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.connection.remote_connection_dbf.dc2 @@ -0,0 +1,26 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + REMOTE_CONNECTION_DBF + + Visual FoxPro Tables + foxuser_fdb + + .F. + .T. + 15 + .F. + 1 + .F. + 0 + 4096 + + 0 + 1 + + 100 + \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.connection.remote_connection_oracle.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.connection.remote_connection_oracle.dc2 new file mode 100644 index 0000000..c276831 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.connection.remote_connection_oracle.dc2 @@ -0,0 +1,26 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + REMOTE_CONNECTION_ORACLE + + + + DRIVER={Oracle en OraClient11g_home1};SERVER=BDDServer;UID=BDDUser;PWD=BDDPwd;DBQ=CARTERA;DBA=W;APA=T;EXC=F;XSM=Default;FEN=T;QTO=T;FRC=10;FDL=10;LOB=T;RST=T;BTD=F;BNF=F;BAM=IfAllSuccessful;NUM=NLS;DPM=F;MTS=T;MDI=Me;CSR=F;FWC=F;FBS=60000;TLO=O;MLD=0;ODA + .F. + .T. + 15 + .F. + 3 + .F. + 10 + 8192 + + 180 + 1 + + 100 + \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.database.storedproceduressource.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.database.storedproceduressource.dc2 new file mode 100644 index 0000000..1b502a8 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.database.storedproceduressource.dc2 @@ -0,0 +1,461 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + 1 + =TABLEUPDATE() + ENDIF + ENDIF NOT already DELETED + ENDIF + UNLOCK RECORD (RECNO()) + llRetVal=pnerror=0 + RETURN llRetVal + +PROCEDURE RIUPDATE + LPARAMETERS tcFieldName,tcNewValue,tcCascadeParent + LOCAL llRetVal + llRetVal=.T. + IF ISRLOCKED() OR !RLOCK() + llRetVal=.F. + ELSE + IF EVAL(tcFieldName)<>tcNewValue + PRIVATE pcCascadeParent + pcCascadeParent=UPPER(IIF(TYPE("tcCascadeParent")<>"C","",tcCascadeParent)) + REPLACE (tcFieldName) WITH tcNewValue + IF CURSORGETPROP('BUFFERING') > 1 + =TABLEUPDATE() + ENDIF + ENDIF VALUES don't already match + ENDIF it's locked already, or I was able to lock it + UNLOCK RECORD (RECNO()) + llRetVal=pnerror=0 + RETURN llRetVal + +PROCEDURE rierror + PARAMETERS tnErrNo,tcMessage,tcCode,tcProgram + LOCAL lnErrorRows,lnXX + lnErrorRows=ALEN(gaErrors,1) + IF TYPE('gaErrors[lnErrorRows,1]')<>"L" + DIMENSION gaErrors[lnErrorRows+1,alen(gaErrors,2)] + lnErrorRows=lnErrorRows+1 + ENDIF + gaErrors[lnErrorRows,1]=tnErrNo + gaErrors[lnErrorRows,2]=tcMessage + gaErrors[lnErrorRows,3]=tcCode + gaErrors[lnErrorRows,4]="" + lnXX=1 + DO WHILE !EMPTY(PROGRAM(lnXX)) + gaErrors[lnErrorRows,4]=gaErrors[lnErrorRows,4]+","+; + PROGRAM(lnXX) + lnXX=lnXX+1 + ENDDO + gaErrors[lnErrorRows,5]=pcParentDBF + gaErrors[lnErrorRows,6]=pnParentRec + gaErrors[lnErrorRows,7]=pcParentID + gaErrors[lnErrorRows,8]=pcParentExpr + gaErrors[lnErrorRows,9]=pcChildDBF + gaErrors[lnErrorRows,10]=pnChildRec + gaErrors[lnErrorRows,11]=pcChildID + gaErrors[lnErrorRows,12]=pcChildExpr + RETURN tnErrNo + + +PROCEDURE riopen + PARAMETERS tcTable,tcOrder + + LOCAL lcCurWkArea,lcNewWkArea,lnInUseSpot,lnOccurs,lnOccurance + lnInUseSpot=0 + lnOccurs = OCCURS(UPPER(tcTable)+"*",UPPER(pcRIcursors)) + FOR lnOccurance = 1 TO lnOccurs + lnInUseSpot=ATC(tcTable+"*",pcRIcursors,lnOccurance) + IF ISDIGIT(SUBSTR(pcRIcursors,lnInUseSpot-1,1)) OR; + EMPTY(SUBSTR(pcRIcursors,lnInUseSpot-1,1)) + EXIT + ENDIF + lnInUseSpot=0 + ENDFOR + + IF lnInUseSpot=0 + lcCurWkArea=SELECT() + SELECT 0 + lcNewWkArea=SELECT() + IF NOT EMPTY(tcOrder) + USE (tcTable) AGAIN ORDER (tcOrder) ; + ALIAS ("__ri"+LTRIM(STR(SELECT()))) SHARE + ELSE + USE (tcTable) AGAIN ALIAS ("__ri"+LTRIM(STR(SELECT()))) SHARE + ENDIF + IF pnerror=0 + pcRIcursors=pcRIcursors+UPPER(tcTable)+"?"+STR(SELECT(),5) + ELSE + lcNewWkArea=0 + ENDIF something bad happened WHILE attempting TO OPEN the FILE + ELSE + lcNewWkArea=VAL(SUBSTR(pcRIcursors,lnInUseSpot+LEN(tcTable)+1,5)) + pcRIcursors = STRTRAN(pcRIcursors,UPPER(tcTable)+"*"+STR(lcNewWkArea,5),; + UPPER(tcTable)+"?"+STR(lcNewWkArea,5)) + IF NOT EMPTY(tcOrder) + SET ORDER TO (tcOrder) IN (lcNewWkArea) + ENDIF sent an ORDER + IF pnerror<>0 + lcNewWkArea=0 + ENDIF something bad happened WHILE setting ORDER + ENDIF + RETURN (lcNewWkArea) + + +PROCEDURE riend + PARAMETERS tlSuccess + LOCAL lnXX,lnSpot,lcWorkArea + IF tlSuccess + END TRANSACTION + ELSE + SET DELETED OFF + ROLLBACK + SET DELETED ON + ENDIF + IF EMPTY(pcRIolderror) + ON ERROR + ELSE + ON ERROR &pcRIolderror. + ENDIF + FOR lnXX=1 TO OCCURS("*",pcRIcursors) + lnSpot=ATC("*",pcRIcursors,lnXX)+1 + USE IN (VAL(SUBSTR(pcRIcursors,lnSpot,5))) + ENDFOR + IF pcOldCompat = "ON" + SET COMPATIBLE ON + ENDIF + IF pcOldDele="OFF" + SET DELETED OFF + ENDIF + IF pcOldExact="ON" + SET EXACT ON + ENDIF + IF pcOldTalk="ON" + SET TALK ON + ENDIF + DO CASE + CASE EMPTY(pcOldDBC) + SET DATA TO + CASE pcOldDBC<>DBC() + SET DATA TO (pcOldDBC) + ENDCASE + RETURN .T. + + +PROCEDURE rireuse + * rireuse.prg + PARAMETERS tcTableName,tcWkArea + pcRIcursors = STRTRAN(pcRIcursors,UPPER(tcTableName)+"?"+STR(tcWkArea,5),; + UPPER(tcTableName)+"*"+STR(tcWkArea,5)) + RETURN .T. + + ******************************************************************************** + ** "Referential integrity delete trigger for" fb2p_depto +PROCEDURE __RI_DELETE_fb2p_depto + LOCAL llRetVal + llRetVal = .T. + PRIVATE pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildID + PRIVATE pcParentExpr,pcChildExpr + STORE "" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr + STORE 0 TO pnParentRec,pnChildRec + IF _TRIGGERLEVEL=1 + BEGIN TRANSACTION + PRIVATE pcRIcursors,pcRIwkareas,pcRIolderror,pnerror,; + pcOldDele,pcOldExact,pcOldTalk,pcOldCompat,pcOldDBC + pcOldTalk=SET("TALK") + SET TALK OFF + pcOldDele=SET("DELETED") + pcOldExact=SET("EXACT") + pcOldCompat=SET("COMPATIBLE") + SET COMPATIBLE OFF + SET DELETED ON + SET EXACT OFF + pcRIcursors="" + pcRIwkareas="" + pcRIolderror=ON("error") + pnerror=0 + ON ERROR pnerror=rierror(ERROR(),MESSAGE(),MESSAGE(1),PROGRAM()) + IF TYPE('gaErrors(1)')<>"U" + RELEASE gaErrors + ENDIF + PUBLIC gaErrors(1,12) + pcOldDBC=DBC() + SET DATA TO ("FB2P_DBC") + ENDIF FIRST TRIGGER + LOCAL lcParentID && parent's value to be sought in child + LOCAL lcChildWkArea && child work area handle returned by riopen + LOCAL lcParentWkArea + LOCAL llDelHeaderarea + LOCAL lcStartArea + lcStartArea=SELECT() + llRetVal=.T. + lcParentWkArea=SELECT() + SELECT (lcParentWkArea) + pcParentDBF=DBF() + pnParentRec=RECNO() + STORE DEPTO TO lcParentID,pcParentID + pcParentExpr="DEPTO" + lcChildWkArea=riopen("nombrelargodeldbf","depto") + IF lcChildWkArea<=0 + IF _TRIGGERLEVEL=1 + DO riend WITH .F. + ENDIF AT the END OF the highest TRIGGER LEVEL + RETURN .F. + ENDIF NOT able TO OPEN the CHILD WORK area + pcChildDBF=DBF(lcChildWkArea) + SELECT (lcChildWkArea) + SEEK lcParentID + SCAN WHILE DEPTO=lcParentID AND llRetVal + pnChildRec=RECNO() + pcChildID=DEPTO + pcChildExpr="DEPTO" + llRetVal=RIDELETE() + ENDSCAN GET ALL OF the nombrelargodeldbf RECORDS + =rireuse("nombrelargodeldbf",lcChildWkArea) + IF NOT llRetVal + IF _TRIGGERLEVEL=1 + DO riend WITH llRetVal + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN llRetVal + ENDIF + IF _TRIGGERLEVEL=1 + DO riend WITH llRetVal + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN llRetVal + ** "End of Referential integrity Delete trigger for" fb2p_depto + ******************************************************************************** + + ******************************************************************************** +PROCEDURE __RI_UPDATE_nombrelargodeldbf + ** "Referential integrity update trigger for" nombrelargodeldbf + LOCAL llRetVal + llRetVal = .T. + PRIVATE pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildID + PRIVATE pcParentExpr,pcChildExpr + STORE "" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr + STORE 0 TO pnParentRec,pnChildRec + IF _TRIGGERLEVEL=1 + BEGIN TRANSACTION + PRIVATE pcRIcursors,pcRIwkareas,pcRIolderror,pnerror,; + pcOldDele,pcOldExact,pcOldTalk,pcOldCompat,pcOldDBC + pcOldTalk=SET("TALK") + SET TALK OFF + pcOldDele=SET("DELETED") + pcOldExact=SET("EXACT") + pcOldCompat=SET("COMPATIBLE") + SET COMPATIBLE OFF + SET DELETED ON + SET EXACT OFF + pcRIcursors="" + pcRIwkareas="" + pcRIolderror=ON("error") + pnerror=0 + ON ERROR pnerror=rierror(ERROR(),MESSAGE(),MESSAGE(1),PROGRAM()) + IF TYPE('gaErrors(1)')<>"U" + RELEASE gaErrors + ENDIF + PUBLIC gaErrors(1,12) + pcOldDBC=DBC() + SET DATA TO ("FB2P_DBC") + ENDIF FIRST TRIGGER + LOCAL lcParentID && parent's value to be sought in child + LOCAL lcOldParentID && previous parent id value + LOCAL lcChildWkArea && child work area handle returned by riopen + LOCAL lcChildID && child's value to be sought in parent + LOCAL lcOldChildID && old child id value + LOCAL lcParentWkArea && parentwork area handle returned by riopen + LOCAL lcStartArea + lcStartArea=SELECT() + llRetVal=.T. + lcChildWkArea=SELECT() + IF _TRIGGERLEVEL=1 OR TYPE("pccascadeparent")#"C" OR (NOT pcCascadeParent=="FB2P_DEPTO") + SELECT (lcChildWkArea) + lcChildID=DEPTO + lcOldChildID=OLDVAL("DEPTO") + pcChildDBF=DBF(lcChildWkArea) + pnChildRec=RECNO(lcChildWkArea) + pcChildID=lcOldChildID + pcChildExpr="DEPTO" + IF ISNULL(lcChildID) OR ISNULL(lcOldChildID) OR lcChildID <> lcOldChildID + lcParentWkArea=riopen("fb2p_depto","depto") + IF lcParentWkArea<=0 + IF _TRIGGERLEVEL=1 + DO riend WITH .F. + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN .F. + ENDIF NOT able TO OPEN the CHILD WORK area + pcParentDBF=DBF(lcParentWkArea) + llRetVal=SEEK(lcChildID,lcParentWkArea) + pnParentRec=RECNO(lcParentWkArea) + IF llRetVal AND NOT (ISRLOCKED(pnParentRec, lcParentWkArea) OR ; + ISFLOCKED(lcParentWkArea)) + IF RLOCK(lcParentWkArea) + UNLOCK RECORD pnParentRec IN (lcParentWkArea) + ELSE + =rireuse("tparen",lcParentWkArea) + pnerror = rierror(-1,"Insert restrict rule violated.","","") + IF _TRIGGERLEVEL=1 + DO riend WITH llRetVal + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN llRetVal + ENDIF + ENDIF + =rireuse("fb2p_depto",lcParentWkArea) + IF NOT llRetVal + pnerror = rierror(-1,"Insert restrict rule violated.","","") + IF _TRIGGERLEVEL=1 + DO riend WITH llRetVal + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN llRetVal + ENDIF no PARENT + ENDIF THIS VALUE was changed + ENDIF NOT PART OF a CASCADE FROM "fb2p_depto" + lcParentWkArea=lcChildWkArea + IF _TRIGGERLEVEL=1 + DO riend WITH llRetVal + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN llRetVal + ** "End of Referential integrity Update trigger for" nombrelargodeldbf + ******************************************************************************** + + ******************************************************************************** + ** "Referential integrity insert trigger for" nombrelargodeldbf +PROCEDURE __RI_INSERT_nombrelargodeldbf + LOCAL llRetVal + llRetVal = .T. + PRIVATE pcParentDBF,pnParentRec,pcChildDBF,pnChildRec,pcParentID,pcChildID + PRIVATE pcParentExpr,pcChildExpr + STORE "" TO pcParentDBF,pcChildDBF,pcParentID,pcChildID,pcParentExpr,pcChildExpr + STORE 0 TO pnParentRec,pnChildRec + IF _TRIGGERLEVEL=1 + BEGIN TRANSACTION + PRIVATE pcRIcursors,pcRIwkareas,pcRIolderror,pnerror,; + pcOldDele,pcOldExact,pcOldTalk,pcOldCompat,pcOldDBC + pcOldTalk=SET("TALK") + SET TALK OFF + pcOldDele=SET("DELETED") + pcOldExact=SET("EXACT") + pcOldCompat=SET("COMPATIBLE") + SET COMPATIBLE OFF + SET DELETED ON + SET EXACT OFF + pcRIcursors="" + pcRIwkareas="" + pcRIolderror=ON("error") + pnerror=0 + ON ERROR pnerror=rierror(ERROR(),MESSAGE(),MESSAGE(1),PROGRAM()) + IF TYPE('gaErrors(1)')<>"U" + RELEASE gaErrors + ENDIF + PUBLIC gaErrors(1,12) + pcOldDBC=DBC() + SET DATA TO ("FB2P_DBC") + ENDIF FIRST TRIGGER + LOCAL lcChildID && child's value to be sought in parent + LOCAL lcParentWkArea && parentwork area handle returned by riopen + LOCAL lcChildWkArea && child's work area + LOCAL lcStartArea + lcStartArea=SELECT() + llRetVal=.T. + lcChildWkArea=SELECT() + SELECT (lcChildWkArea) + lcChildID=DEPTO + pcChildDBF=DBF(lcChildWkArea) + pnChildRec=RECNO(lcChildWkArea) + pcChildID=lcChildID + pcChildExpr="DEPTO" + lcParentWkArea=riopen("fb2p_depto","depto") + IF lcParentWkArea<=0 + IF _TRIGGERLEVEL=1 + DO riend WITH .F. + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN .F. + ENDIF NOT able TO OPEN the CHILD WORK area + pcParentDBF=DBF(lcParentWkArea) + llRetVal=SEEK(lcChildID,lcParentWkArea) + pnParentRec=RECNO(lcParentWkArea) + IF llRetVal AND NOT (ISRLOCKED(pnParentRec, lcParentWkArea) OR ; + ISFLOCKED(lcParentWkArea)) + IF RLOCK(lcParentWkArea) + UNLOCK RECORD pnParentRec IN (lcParentWkArea) + ELSE + =rireuse("tparen",lcParentWkArea) + pnerror = rierror(-1,"Insert restrict rule violated.","","") + IF _TRIGGERLEVEL=1 + DO riend WITH llRetVal + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN llRetVal + ENDIF + ENDIF + =rireuse("fb2p_depto",lcParentWkArea) + IF NOT llRetVal + pnerror = rierror(-1,"Insert restrict rule violated.","","") + IF _TRIGGERLEVEL=1 + DO riend WITH llRetVal + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN llRetVal + ENDIF + IF _TRIGGERLEVEL=1 + DO riend WITH llRetVal + ENDIF AT the END OF the highest TRIGGER LEVEL + SELECT (lcStartArea) + RETURN llRetVal + ** "End of Referential integrity insert trigger for" nombrelargodeldbf + ******************************************************************************** + **__RI_FOOTER!@ Do NOT REMOVE or MODIFY this line!!!! @!__RI_FOOTER** + + ]]> \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.dbc b/TESTS/DATOS_READONLY/fb2p_dbc.dbc index b3887164b5dd879586a284347360ad542f49a35c..394e5ca4588a38864fa8f50f2c33ba7faaa48965 100644 GIT binary patch delta 21 dcmezF`Q4MnK%7HrBg=Lsrc))G_cB>20RUF-2WkKS delta 21 ccmezF`Q4MnfS*}xBg=LsCIP0+dzq}108TpwEdT%j diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.dct b/TESTS/DATOS_READONLY/fb2p_dbc.dct index 45879097533517f995a05b8e1ba57eb3213f1687..5ff8b9d2d92636d06d3c885ae2785cc08630f137 100644 GIT binary patch delta 69 zcmaF*lyUVdMh*ssQf&qX2F8topBN`9aBgO1dQ>o3fXR!IVRAH+%w#d9L?Cv-!HWg} Dr}z<; delta 27 jcmZ4eit*`FMh*ssqNfZD42&BEKQT^J;M~m2^r!#;iT4RR diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.table.fb2p_depto.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.table.fb2p_depto.dc2 new file mode 100644 index 0000000..a3812cd --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.table.fb2p_depto.dc2 @@ -0,0 +1,64 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + + FB2P_DEPTO + Comentario de "fb2p_depto" + fb2p_depto.dbf + __ri_delete_fb2p_depto() + + + depto + fb2p_depto_record_rule_validation() + fb2p_depto_record_rule_validation_message() + + + depto + descrip + + + + + depto + + depto_field_comment + "Depto." + cl_optiongroup + c:\desa\foxbin2prg\tests\datos_readonly\fb2p_test.vcx + ! + XXXXXXXXXX + depto_field_validation_rule() + depto_field_validation_message() + + + descrip + + + + + + + + + + + + + + + depto + + .T. + + + descrip + + .F. + + + +
"Depto.Caption"Descripción
\ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.table.nombrelargodeldbf.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.table.nombrelargodeldbf.dc2 new file mode 100644 index 0000000..da46885 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.table.nombrelargodeldbf.dc2 @@ -0,0 +1,139 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + + NOMBRELARGODELDBF + Comentario de la tabla "fb2p_dbf" + fb2p_dbf.dbf + del_trg() + __ri_insert_nombrelargodeldbf().AND.(ins_trg()) + __ri_update_nombrelargodeldbf().AND.(upd_trg()) + id + edad>10 + "Mensaje de error de la regla edad > 10" + + + nombre + edad + id + bigtext + depto + + + + + bigtext + + + + + + + + + + + + depto + + + + + + + + + + + + edad + + + + + + + + + + + + id + + + + + + + + + + + + nombre + + Comentario de "Nombre" + "." + + + A + !XXXXXXXXXXXXXXXXXXXXXXXXXXXXX + .NOT.EMPTY(nombre) + "El nombre está vacío" + + + + + + depto + + .F. + + + edad + + .T. + + + edad_nd + + .F. + + + i_nombre + + .F. + + + id + + .T. + + + nombre + + .F. + + + notdeleted + + .F. + + + + + + Relation 1 + NOMBRELARGODELDBF + FB2P_DEPTO + DEPTO + DEPTO + + + + +
"Nombre:"
\ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.view.rv_db_debug_setup.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.view.rv_db_debug_setup.dc2 new file mode 100644 index 0000000..cda21a3 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.view.rv_db_debug_setup.dc2 @@ -0,0 +1,193 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + + rv_db_debug_setup + + STROSNC.DB_DEBUG_SETUP + SELECT Db_debug_setup.PK_NAME, Db_debug_setup.ENABLED, Db_debug_setup.EVALUACION, Db_debug_setup.PK_METODO, Db_debug_setup.NIVELDEBUG, Db_debug_setup.F_DESDE, Db_debug_setup.F_HASTA, Db_debug_setup.DIRECCION_IP, Db_debug_setup.USUARIO FROM STROSNC.DB_DEBUG_SETUP Db_debug_setup ORDER BY Db_debug_setup.PK_NAME, Db_debug_setup.PK_METODO + .T. + 1 + .T. + remote_connection_Oracle + .T. + .T. + 100 + -1 + .F. + + .T. + + + .F. + .T. + 2 + 1 + 255 + 3 + + + pk_name + enabled + evaluacion + pk_metodo + niveldebug + f_desde + f_hasta + direccion_ip + usuario + + + + + direccion_ip + + + C(30) + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.DIRECCION_IP + + + enabled + + + N(3) + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.ENABLED + + + evaluacion + + + M + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.EVALUACION + + + f_desde + + + T + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.F_DESDE + + + f_hasta + + + T + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.F_HASTA + + + niveldebug + + + N(3) + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.NIVELDEBUG + + + pk_metodo + + + C(30) + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.PK_METODO + + + pk_name + + + C(30) + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.PK_NAME + + + usuario + + + C(30) + + + + + + .F. + + + .F. + STROSNC.DB_DEBUG_SETUP.USUARIO + + + + + \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.view.vista_local.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.view.vista_local.dc2 new file mode 100644 index 0000000..326e586 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.view.vista_local.dc2 @@ -0,0 +1,127 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + + vista_local + + fb2p_dbc!nombrelargodeldbf + SELECT Fb2p_depto.descrip, Nombrelargodeldbf.nombre, Nombrelargodeldbf.edad, Nombrelargodeldbf.id, Nombrelargodeldbf.depto FROM fb2p_dbc!fb2p_depto INNER JOIN fb2p_dbc!nombrelargodeldbf ON Fb2p_depto.depto = Nombrelargodeldbf.depto + .F. + 1 + .T. + + .F. + .T. + 100 + -1 + .T. + + .F. + + + .T. + .F. + 1 + 1 + 255 + 3 + ..\..\vista_local.dbf + 5 + + + descrip + nombre + edad + id + depto + + + + + depto + + + C(10) + + + + + + .F. + + + .T. + fb2p_dbc!nombrelargodeldbf.depto + + + descrip + + + C(50) + + + + + + .F. + + + .F. + fb2p_dbc!fb2p_depto.descrip + + + edad + + + N(3) + + + + + + .F. + + + .T. + fb2p_dbc!nombrelargodeldbf.edad + + + id + + + I + + + + + + .T. + + + .F. + fb2p_dbc!nombrelargodeldbf.id + + + nombre + + + C(30) + + + + + + .F. + + + .T. + fb2p_dbc!nombrelargodeldbf.nombre + + + + + \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_local_encuestas.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_local_encuestas.dc2 new file mode 100644 index 0000000..7c4031e --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_local_encuestas.dc2 @@ -0,0 +1,127 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + + vw_local_encuestas + + + SELECT ENCUESTAS.Promotor,ENCUESTAS.Idenc,ENCUESTAS.Calific,ENCUESTAS.Fecha, ENCUESTAS.Resultado FROM C:\DESA\FOXBIN2PRG\TESTS\DATOS_READONLY\ENCUESTAS.DBF ENCUESTAS + .F. + 1 + .T. + + .F. + .T. + 100 + -1 + .T. + + .F. + + + .F. + .T. + 1 + 1 + 255 + 3 + vw_local_encuestas.dbf + 2 + + + promotor + idenc + calific + fecha + resultado + + + + + calific + + + C(2) + + + + + + .F. + + + .F. + calific + + + fecha + + + D + + + + + + .F. + + + .F. + fecha + + + idenc + + + C(20) + + + + + + .F. + + + .F. + idenc + + + promotor + + + C(20) + + + + + + .F. + + + .F. + promotor + + + resultado + + + C(10) + + + + + + .F. + + + .F. + resultado + + + + + \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_ora_convenios.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_ora_convenios.dc2 new file mode 100644 index 0000000..021a277 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_ora_convenios.dc2 @@ -0,0 +1,93 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + + vw_ora_convenios + + CONVENIOS + SELECT CONVENIOS.ID_CONVENIO,CONVENIOS.NOMBRE_CONVENIO,CONVENIOS.HISTORICO FROM CONVENIOS + .F. + 1 + .T. + remote_connection_Oracle + .F. + .T. + 100 + -1 + .T. + + .F. + + + .F. + .T. + 2 + 1 + 255 + 3 + + 0 + + + id_convenio + nombre_convenio + historico + + + + + historico + + + C(1) + + + + + + .F. + + + .T. + CONVENIOS.HISTORICO + + + id_convenio + + + C(15) + + + + + + .F. + + + .T. + CONVENIOS.ID_CONVENIO + + + nombre_convenio + + + C(250) + + + + + + .F. + + + .T. + CONVENIOS.NOMBRE_CONVENIO + + + + + \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_ora_dual.dc2 b/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_ora_dual.dc2 new file mode 100644 index 0000000..3942fb6 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_dbc.view.vw_ora_dual.dc2 @@ -0,0 +1,59 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_dbc.dbc" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* + + + vw_ora_dual + + DUAL + SELECT DUAL.DUMMY FROM DUAL + .F. + 1 + .T. + REMOTE_CONNECTION_ORACLE + .F. + .T. + 100 + -1 + .T. + + .F. + + + .F. + .T. + 2 + 1 + 255 + 3 + + 0 + + + dummy + + + + + dummy + Dummy + Dummy_field_comment + C(1) + Depto. + cl_optiongroup + fb2p_test.vcx + ! + XXXXXXXXXX + .F. + dummy_field_validation_rule() + dummy_field_validation_message + .T. + DUAL.DUMMY + + + + + \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_depto.db2 b/TESTS/DATOS_READONLY/fb2p_depto.db2 index be40ecc..ae4ce51 100644 --- a/TESTS/DATOS_READONLY/fb2p_depto.db2 +++ b/TESTS/DATOS_READONLY/fb2p_depto.db2 @@ -5,6 +5,7 @@ *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_depto.dbf" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * + 1252 @@ -56,34 +57,42 @@ + - FB2P_DEPTO.CDX + - - - DEPTO - PRIMARY - DEPTO - depto=>"0" - ASCENDING - MACHINE - - - DESCRIP - REGULAR - DESCRIP - - DESCENDING - GENERAL - - + + + DEPTO + PRIMARY + DEPTO + depto=>"0" + ASCENDING + MACHINE + + + DESCRIP + REGULAR + DESCRIP + + DESCENDING + GENERAL + + + + + - + + D.1.C la descrip + +
+ diff --git a/TESTS/DATOS_READONLY/fb2p_free.db2 b/TESTS/DATOS_READONLY/fb2p_free.db2 index 3a8659c..0444248 100644 --- a/TESTS/DATOS_READONLY/fb2p_free.db2 +++ b/TESTS/DATOS_READONLY/fb2p_free.db2 @@ -5,6 +5,7 @@ *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_free.dbf" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * + 1252 @@ -376,39 +377,44 @@ + - FB2P_FREE.CDX + - - - CARACTER - CANDIDATE - CARACTER - .NOT.EMPTY(caracter) - ASCENDING - GENERAL - - - ENTERO - REGULAR - ENTERO - - DESCENDING - MACHINE - - - LOGICO - BINARY - LOGICO - - ASCENDING - MACHINE - - + + + CARACTER + CANDIDATE + CARACTER + .NOT.EMPTY(caracter) + ASCENDING + GENERAL + + + ENTERO + REGULAR + ENTERO + + DESCENDING + MACHINE + + + LOGICO + BINARY + LOGICO + + ASCENDING + MACHINE + + + + + - + + / / / / : : @@ -423,11 +429,12 @@ - ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg + - 45 + 50 - + + axaxaxaxaXAXA 1969/11/26 1969/11/26 22:10:06 @@ -438,15 +445,18 @@ NgAuAEUAcwB0AGEAIABlAHMAIAB1AG4AYQAgAGYAcgBhAHMAZQAgAGMAbwBkAGkAZgBpAGMAYQBkAGEAIABlAG4AIABoAGUAeABhACAAeQAgAGMAbwBuACAAYwBhAHIAYQBjAHQAZQByAGUAcwAgAGUAcwBwAGUAYwBpAGEAbABlAHMALgAgAOEA6QDtAPMA+gDBAMkAzQDTANoAxADLAM8A1gDcAOQA6wDvAPYA/ADgAOgA7ADyAPkA8QDRAMcA5wBeAA== 12345.6786 1234567896 - 6.notas TXT. áéíóúÄËÏÖÜÑñäëïöü. ^FinÇç + Ni5GcmFzZSBVVEYtOC4gw6HDqcOtw7PDusOEw4vDj8OWw5w= var char 6.áéíóúÜÑ - yQBzAHQAYQAgAGUAcwAgAGwAYQAgAHMAZQDxAGEAbAAhAA== - Q2hhckJpbi02LsOhw6nDrcOzw7rDnMORICAgICAg - VkNoYXJCaW4tNi7DocOpw63Ds8O6w5zDkQ== - 35 + + CharBin-6.áéíóúÜÑ + VCharBin-6.áéíóúÜÑ + 55 - + + lalal.áéíóúÜÑ 1969/11/27 1969/11/27 22:10:07 @@ -457,15 +467,18 @@ NwAuAEUAcwB0AGEAIABlAHMAIAB1AG4AYQAgAGYAcgBhAHMAZQAgAGMAbwBkAGkAZgBpAGMAYQBkAGEAIABlAG4AIABoAGUAeABhACAAeQAgAGMAbwBuACAAYwBhAHIAYQBjAHQAZQByAGUAcwAgAGUAcwBwAGUAYwBpAGEAbABlAHMALgAgAOEA6QDtAPMA+gDBAMkAzQDTANoAxADLAM8A1gDcAOQA6wDvAPYA/ADgAOgA7ADyAPkA8QDRAMcA5wBeAA== 12345.6787 1234567897 - 7.notas TXT. áéíóúÄËÏÖÜÑñäëïöü. ^FinÇç + Ny5GcmFzZSBVVEYtOC4gw6HDqcOtw7PDusOEw4vDj8OWw5w= var char 7.áéíóúÜÑ - yQB4AGkAdABvAHMAIADaAG4AaQBjAG8AcwAhACAAOgApAA== - Q2hhckJpbi03LsOhw6nDrcOzw7rDnMORICAgICAg - VkNoYXJCaW4tNy7DocOpw63Ds8O6w5zDkQ== - 30 + + CharBin-7.áéíóúÜÑ + VCharBin-7.áéíóúÜÑ + 60 - + + pepepepepEPE 1969/11/25 1969/11/25 22:10:05 @@ -476,14 +489,19 @@ NQAuAEUAcwB0AGEAIABlAHMAIAB1AG4AYQAgAGYAcgBhAHMAZQAgAGMAbwBkAGkAZgBpAGMAYQBkAGEAIABlAG4AIABoAGUAeABhACAAeQAgAGMAbwBuACAAYwBhAHIAYQBjAHQAZQByAGUAcwAgAGUAcwBwAGUAYwBpAGEAbABlAHMALgAgAOEA6QDtAPMA+gDBAMkAzQDTANoAxADLAM8A1gDcAOQA6wDvAPYA/ADgAOgA7ADyAPkA8QDRAMcA5wBeAA== 12345.6785 1234567895 - 5.notas TXT. áéíóúÄËÏÖÜÑñäëïöü. ^FinÇç + NS5GcmFzZSBVVEYtOC4gw6HDqcOtw7PDusOEw4vDj8OWw5w= var char 5.áéíóúÜÑ - yQBzAHQAYQAgAGUAcwAgAGwAYQAgAHMAZQDxAGEAbAAhAA== - Q2hhckJpbi01LsOhw6nDrcOzw7rDnMORICAgICAg - VkNoYXJCaW4tNS7DocOpw63Ds8O6w5zDkQ== - 40 + + CharBin-5.áéíóúÜÑ + VCharBin-5.áéíóúÜÑ + 65 + +
+ diff --git a/TESTS/DATOS_READONLY/fb2p_frm_1.cl_form1.sc2 b/TESTS/DATOS_READONLY/fb2p_frm_1.cl_form1.sc2 new file mode 100644 index 0000000..4f57715 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_frm_1.cl_form1.sc2 @@ -0,0 +1,511 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_frm_1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_form1 AS cl_form OF "fb2p_test.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="txtPromotor" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="lblPromotor" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="txtIdenc" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="lblIdenc" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="txtCalific" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="lblCalific" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="txtFecha" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="lblFecha" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="txtResultado" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="lblResultado" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column1.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column1.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column2.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column2.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column3.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column3.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column4.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column4.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column5.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="grdEncuestas.Column5.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_olecontrol1" UniqueID="" Timestamp="" /> + + * + AllowOutput = .T. + AlwaysOnBottom = .F. + AlwaysOnTop = .T. + AutoCenter = .T. + BackColor = 240,240,240 + BindControls = .T. + BorderStyle = 3 + BufferMode = 0 + Caption = "Form" + ClipControls = .T. + Closable = .T. + ColorSource = 4 + Comment = "" + ContinuousScroll = .T. + ControlBox = .T. + DataSession = 1 + DefOleLCID = 0 + Desktop = .F. + Dockable = 0 + DoCreate = .T. + DrawMode = 13 + DrawStyle = 0 + DrawWidth = 1 + Enabled = .T. + FillColor = 0,0,0 + FillStyle = 1 + FontBold = .F. + FontCharSet = 0 + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 9 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + HalfHeightCaption = .F. + Height = 346 + HelpContextID = 0 + HScrollSmallChange = 10 + Icon = ..\..\ + KeyPreview = .F. + LockScreen = .F. + MacDesktop = 0 + MaxButton = .T. + MaxHeight = -1 + MaxLeft = -1 + MaxTop = -1 + MaxWidth = -1 + MDIForm = .F. + MinButton = .T. + MinHeight = -1 + MinWidth = -1 + MouseIcon = ..\..\ + MousePointer = 0 + Movable = .T. + Name = "cl_form1" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + Picture = bmps\fondogris.bmp + RightToLeft = .F. + ScaleMode = 3 + ScrollBars = 0 + ShowInTaskBar = .T. + ShowTips = .F. + ShowWindow = 0 + SizeBox = .F. + TabIndex = 1 + TabStop = .T. + Tag = "" + Themes = .T. + TitleBar = 1 + Visible = .T. + VScrollSmallChange = 10 + WhatsThisButton = .F. + WhatsThisHelp = .F. + WhatsThisHelpID = -1 + Width = 648 + WindowState = 0 + WindowType = 0 + ZoomBox = .F. + Cl_optiongroup1.Name = "Cl_optiongroup1" + Cl_optiongroup1.Option1.Left = 8 + Cl_optiongroup1.Option1.Name = "Option1" + Cl_optiongroup1.Option1.RightToLeft = .F. + Cl_optiongroup1.Option1.Top = 8 + Cl_optiongroup1.Option1.Value = 0 + Cl_optiongroup1.Option2.Left = 124 + Cl_optiongroup1.Option2.Name = "Option2" + Cl_optiongroup1.Option2.RightToLeft = .F. + Cl_optiongroup1.Option2.Top = 8 + Cl_optiongroup1.Option2.Value = 1 + Cl_optiongroup1.propiedad_de_clase_sin_valor = Valor reescrito en el form! + Cl_optiongroup1.Value = 2 + Cl_optiongroup1.ZOrderSet = 1 + Cl_commandgroup1.Command1.Left = 8 + Cl_commandgroup1.Command1.Name = "Command1" + Cl_commandgroup1.Command1.RightToLeft = .F. + Cl_commandgroup1.Command1.Top = 4 + Cl_commandgroup1.Command2.Left = 124 + Cl_commandgroup1.Command2.Name = "Command2" + Cl_commandgroup1.Command2.RightToLeft = .F. + Cl_commandgroup1.Command2.Top = 4 + Cl_commandgroup1.Name = "Cl_commandgroup1" + Cl_commandgroup1.una_prop_cmgroup = Ahora tiene valor + Cl_commandgroup1.ZOrderSet = 2 + Cl_imagen1.Left = 268 + Cl_imagen1.Name = "Cl_imagen1" + Cl_imagen1.Top = 292 + Cl_imagen1.ZOrderSet = 3 + Cl_imagen2.Left = 316 + Cl_imagen2.Name = "Cl_imagen2" + Cl_imagen2.Top = 292 + Cl_imagen2.ZOrderSet = 4 + * + + ADD OBJECT 'Cl_olecontrol1' AS cl_olecontrol WITH ; + Height = 67, ; + Left = 484, ; + Name = "Cl_olecontrol1", ; + Top = 256, ; + Width = 131 + *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="olecontrol" OLEObject="c:\windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBdOTWhkM8BAwAAAIACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAOAAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAAIAAAABwAAAP7///8JAAAA/v////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP////8AAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACACwAAAEFwcGVhcmFuY2UACQAAAEkKAAAAAAAAAAwAAABCb3JkZXJTdHlsZQAJAAAASQoAAAABAAAADQAAAAAAAAUAAIAAAAAAAAABAAAAAAABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dABCdWxsZXRJbmRlbnQAEQAAAE4NAAAABwAAAAAAAAAAAAAAEAAAAERpc2FibGVOb1Njcm9sbAAFAAAATAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAABSaWdodE1hcmdpbgARAAAATg0AAAAHAAAAAAAAAAAAAAAFAAAAVGV4dAAUAAAASAAAAAALAAAAT2xlY29udHJvbDENAAAAQXV0b1ZlcmJNZW51AAUAAABMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" /> + + ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; + BackColor = 255,128,255, ; + ButtonCount = 2, ; + Height = 76, ; + Left = 8, ; + Name = "Commandgroup1", ; + Top = 172, ; + Value = 1, ; + Width = 244, ; + ZOrderSet = 16, ; + Command1.Caption = "\ + + ADD OBJECT 'grdEncuestas' AS grid WITH ; + ColumnCount = 5, ; + DeleteMark = .F., ; + Height = 140, ; + Left = 268, ; + Name = "grdEncuestas", ; + Panel = 1, ; + ReadOnly = .T., ; + RecordSource = "encuestas", ; + RecordSourceType = 1, ; + RightToLeft = .F., ; + Top = 12, ; + Width = 320, ; + ZOrderSet = 15, ; + Column1.ControlSource = "encuestas.promotor", ; + Column1.Name = "Column1", ; + Column1.ReadOnly = .T., ; + Column1.Width = 58, ; + Column2.ControlSource = "encuestas.idenc", ; + Column2.Name = "Column2", ; + Column2.ReadOnly = .T., ; + Column2.Width = 46, ; + Column3.ControlSource = "encuestas.calific", ; + Column3.Name = "Column3", ; + Column3.ReadOnly = .T., ; + Column3.Width = 41, ; + Column4.ControlSource = "encuestas.fecha", ; + Column4.Name = "Column4", ; + Column4.ReadOnly = .T., ; + Column4.Width = 69, ; + Column5.ControlSource = "encuestas.resultado", ; + Column5.Name = "Column5", ; + Column5.ReadOnly = .T., ; + Column5.Width = 58 + *< END OBJECT: BaseClass="grid" /> + + ADD OBJECT 'grdEncuestas.Column1.Header1' AS header WITH ; + Caption = "promotor", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'grdEncuestas.Column1.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + ReadOnly = .T., ; + RightToLeft = .F. + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'grdEncuestas.Column2.Header1' AS header WITH ; + Caption = "idenc", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'grdEncuestas.Column2.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + ReadOnly = .T., ; + RightToLeft = .F. + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'grdEncuestas.Column3.Header1' AS header WITH ; + Caption = "calific", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'grdEncuestas.Column3.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + ReadOnly = .T., ; + RightToLeft = .F. + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'grdEncuestas.Column4.Header1' AS header WITH ; + Caption = "fecha", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'grdEncuestas.Column4.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + ReadOnly = .T., ; + RightToLeft = .F. + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'grdEncuestas.Column5.Header1' AS header WITH ; + Caption = "resultado", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'grdEncuestas.Column5.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + ReadOnly = .T., ; + RightToLeft = .F. + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'lblCalific' AS label WITH ; + AutoSize = .T., ; + BackStyle = 0, ; + Caption = "Calific", ; + Left = 491, ; + Name = "lblCalific", ; + RightToLeft = .F., ; + TabIndex = 7, ; + Top = 164, ; + Width = 34, ; + WordWrap = .T., ; + ZOrderSet = 10 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'lblFecha' AS label WITH ; + AutoSize = .T., ; + BackStyle = 0, ; + Caption = "Fecha", ; + Left = 491, ; + Name = "lblFecha", ; + RightToLeft = .F., ; + TabIndex = 9, ; + Top = 192, ; + Width = 34, ; + WordWrap = .T., ; + ZOrderSet = 12 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'lblIdenc' AS label WITH ; + AutoSize = .T., ; + BackStyle = 0, ; + Caption = "Idenc", ; + Left = 292, ; + Name = "lblIdenc", ; + RightToLeft = .F., ; + TabIndex = 5, ; + Top = 192, ; + Width = 30, ; + WordWrap = .T., ; + ZOrderSet = 8 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'lblPromotor' AS label WITH ; + AutoSize = .T., ; + BackStyle = 0, ; + Caption = "Promotor", ; + Left = 271, ; + Name = "lblPromotor", ; + RightToLeft = .F., ; + TabIndex = 3, ; + Top = 164, ; + Width = 51, ; + WordWrap = .T., ; + ZOrderSet = 6 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'lblResultado' AS label WITH ; + AutoSize = .T., ; + BackStyle = 0, ; + Caption = "Resultado", ; + Left = 472, ; + Name = "lblResultado", ; + RightToLeft = .F., ; + TabIndex = 11, ; + Top = 220, ; + Width = 57, ; + WordWrap = .T., ; + ZOrderSet = 14 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Optiongroup1' AS optiongroup WITH ; + BackColor = 0,128,255, ; + ButtonCount = 2, ; + Height = 72, ; + Left = 8, ; + Name = "Optiongroup1", ; + Top = 256, ; + Value = 2, ; + Width = 244, ; + ZOrderSet = 17, ; + Option1.Caption = "Option1", ; + Option1.Height = 48, ; + Option1.Left = 16, ; + Option1.Name = "Option1", ; + Option1.Picture = bmps\scccheckout.bmp, ; + Option1.RightToLeft = .F., ; + Option1.Style = 1, ; + Option1.Top = 12, ; + Option1.Value = 0, ; + Option1.Width = 92, ; + Option2.Caption = "Option2", ; + Option2.Height = 48, ; + Option2.Left = 132, ; + Option2.Name = "Option2", ; + Option2.Picture = bmps\scccheckout.bmp, ; + Option2.RightToLeft = .F., ; + Option2.Style = 1, ; + Option2.Top = 12, ; + Option2.Value = 1, ; + Option2.Width = 88 + *< END OBJECT: BaseClass="optiongroup" /> + + ADD OBJECT 'Shape1' AS shape WITH ; + BorderStyle = 2, ; + BorderWidth = 1, ; + Curvature = 16, ; + Height = 49, ; + Left = 264, ; + Name = "Shape1", ; + SpecialEffect = 0, ; + Top = 284, ; + Width = 101, ; + ZOrderSet = 0 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'txtCalific' AS textbox WITH ; + Comment = "", ; + ControlSource = "encuestas.calific", ; + DisabledForeColor = 0,0,160, ; + ForeColor = 0,0,255, ; + Height = 23, ; + Left = 532, ; + MaxLength = 2, ; + Name = "txtCalific", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + TabIndex = 8, ; + Top = 164, ; + Width = 38, ; + ZOrderSet = 9 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'txtFecha' AS textbox WITH ; + Comment = "", ; + ControlSource = "encuestas.fecha", ; + DisabledForeColor = 0,0,160, ; + ForeColor = 0,0,255, ; + Height = 23, ; + Left = 532, ; + Name = "txtFecha", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + TabIndex = 10, ; + Top = 192, ; + Width = 73, ; + ZOrderSet = 11 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'txtIdenc' AS textbox WITH ; + Comment = "", ; + ControlSource = "encuestas.idenc", ; + DisabledForeColor = 0,0,160, ; + ForeColor = 0,0,255, ; + Height = 23, ; + Left = 328, ; + MaxLength = 20, ; + Name = "txtIdenc", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + TabIndex = 6, ; + Top = 192, ; + Width = 149, ; + ZOrderSet = 7 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'txtPromotor' AS textbox WITH ; + Comment = "", ; + ControlSource = "encuestas.promotor", ; + DisabledForeColor = 0,0,160, ; + ForeColor = 0,0,255, ; + Height = 23, ; + Left = 328, ; + MaxLength = 20, ; + Name = "txtPromotor", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + TabIndex = 4, ; + Top = 164, ; + Width = 149, ; + ZOrderSet = 5 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'txtResultado' AS textbox WITH ; + Comment = "", ; + ControlSource = "encuestas.resultado", ; + DisabledForeColor = 0,0,160, ; + ForeColor = 0,0,255, ; + Height = 23, ; + Left = 532, ; + MaxLength = 10, ; + Name = "txtResultado", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + TabIndex = 12, ; + Top = 220, ; + Width = 81, ; + ZOrderSet = 13 + *< END OBJECT: BaseClass="textbox" /> + + PROCEDURE grdEncuestas.AfterRowColChange + LPARAMETERS nColIndex + + thisform.Refresh() + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_frm_1.dataenvironment.sc2 b/TESTS/DATOS_READONLY/fb2p_frm_1.dataenvironment.sc2 new file mode 100644 index 0000000..710669a --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_frm_1.dataenvironment.sc2 @@ -0,0 +1,58 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_frm_1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" /> + + * + AutoCloseTables = .T. + AutoOpenTables = .T. + Comment = "" + DataSource = .NULL. + DataSourceType = "" + Height = 200 + InitialSelectedAlias = "" + Left = 11 + Name = "Dataenvironment" + OpenViews = 0 + Tag = "" + Top = 404 + Width = 520 + * + + ADD OBJECT 'Cursor1' AS cursor WITH ; + Alias = "encuestas", ; + BufferModeOverride = 1, ; + Comment = "", ; + CursorSource = encuestas.dbf, ; + Exclusive = .F., ; + Filter = "", ; + Height = 98, ; + Left = 10, ; + Name = "Cursor1", ; + NoDataOnLoad = .F., ; + Order = "", ; + OrderDirection = 0, ; + ReadOnly = .F., ; + Tag = "", ; + Top = 20, ; + Width = 102 + *< END OBJECT: BaseClass="cursor" /> + + PROCEDURE BeforeOpenTables + *-- Comentario en método [Dataenvironment.BeforeOpenTables] + + ENDPROC + + PROCEDURE Cursor1.Init + *-- Comentario en método [Dataenvironment.Cursor1.Init] + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_frm_1.sc2 b/TESTS/DATOS_READONLY/fb2p_frm_1.sc2 index 9a66881..805d69e 100644 --- a/TESTS/DATOS_READONLY/fb2p_frm_1.sc2 +++ b/TESTS/DATOS_READONLY/fb2p_frm_1.sc2 @@ -4,561 +4,9 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_frm_1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="cl_form1" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> * #INCLUDE "..\..\include\principal.h" - -DEFINE CLASS cl_form1 AS cl_form OF "fb2p_test.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="txtPromotor" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="lblPromotor" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="txtIdenc" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="lblIdenc" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="txtCalific" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="lblCalific" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="txtFecha" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="lblFecha" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="txtResultado" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="lblResultado" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column1.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column1.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column2.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column2.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column3.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column3.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column4.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column4.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column5.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="grdEncuestas.Column5.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_olecontrol1" UniqueID="" Timestamp="" /> - - AllowOutput = .T. - AlwaysOnBottom = .F. - AlwaysOnTop = .T. - AutoCenter = .T. - BackColor = 240,240,240 - BindControls = .T. - BorderStyle = 3 - BufferMode = 0 - Caption = "Form" - ClipControls = .T. - Closable = .T. - ColorSource = 4 - Comment = "" - ContinuousScroll = .T. - ControlBox = .T. - DataSession = 1 - DefOleLCID = 0 - Desktop = .F. - Dockable = 0 - DoCreate = .T. - DrawMode = 13 - DrawStyle = 0 - DrawWidth = 1 - Enabled = .T. - FillColor = 0,0,0 - FillStyle = 1 - FontBold = .F. - FontCharSet = 0 - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 9 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - HalfHeightCaption = .F. - Height = 346 - HelpContextID = 0 - HScrollSmallChange = 10 - Icon = ..\..\ - KeyPreview = .F. - LockScreen = .F. - MacDesktop = 0 - MaxButton = .T. - MaxHeight = -1 - MaxLeft = -1 - MaxTop = -1 - MaxWidth = -1 - MDIForm = .F. - MinButton = .T. - MinHeight = -1 - MinWidth = -1 - MouseIcon = ..\..\ - MousePointer = 0 - Movable = .T. - Name = "cl_form1" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - Picture = bmps\fondogris.bmp - RightToLeft = .F. - ScaleMode = 3 - ScrollBars = 0 - ShowInTaskBar = .T. - ShowTips = .F. - ShowWindow = 0 - SizeBox = .F. - TabIndex = 1 - TabStop = .T. - Tag = "" - Themes = .T. - TitleBar = 1 - Visible = .T. - VScrollSmallChange = 10 - WhatsThisButton = .F. - WhatsThisHelp = .F. - WhatsThisHelpID = -1 - Width = 648 - WindowState = 0 - WindowType = 0 - ZoomBox = .F. - Cl_commandgroup1.Command1.Left = 8 - Cl_commandgroup1.Command1.Name = "Command1" - Cl_commandgroup1.Command1.RightToLeft = .F. - Cl_commandgroup1.Command1.Top = 4 - Cl_commandgroup1.Command2.Left = 124 - Cl_commandgroup1.Command2.Name = "Command2" - Cl_commandgroup1.Command2.RightToLeft = .F. - Cl_commandgroup1.Command2.Top = 4 - Cl_commandgroup1.Name = "Cl_commandgroup1" - Cl_commandgroup1.una_prop_cmgroup = Ahora tiene valor - Cl_commandgroup1.ZOrderSet = 2 - Cl_imagen1.Left = 268 - Cl_imagen1.Name = "Cl_imagen1" - Cl_imagen1.Top = 292 - Cl_imagen1.ZOrderSet = 3 - Cl_imagen2.Left = 316 - Cl_imagen2.Name = "Cl_imagen2" - Cl_imagen2.Top = 292 - Cl_imagen2.ZOrderSet = 4 - Cl_optiongroup1.Name = "Cl_optiongroup1" - Cl_optiongroup1.Option1.Left = 8 - Cl_optiongroup1.Option1.Name = "Option1" - Cl_optiongroup1.Option1.RightToLeft = .F. - Cl_optiongroup1.Option1.Top = 8 - Cl_optiongroup1.Option1.Value = 0 - Cl_optiongroup1.Option2.Left = 124 - Cl_optiongroup1.Option2.Name = "Option2" - Cl_optiongroup1.Option2.RightToLeft = .F. - Cl_optiongroup1.Option2.Top = 8 - Cl_optiongroup1.Option2.Value = 1 - Cl_optiongroup1.propiedad_de_clase_sin_valor = Valor reescrito en el form! - Cl_optiongroup1.Value = 2 - Cl_optiongroup1.ZOrderSet = 1 - - ADD OBJECT 'Cl_olecontrol1' AS cl_olecontrol WITH ; - Height = 67, ; - Left = 484, ; - Name = "Cl_olecontrol1", ; - Top = 256, ; - Width = 131 - *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="olecontrol" Nombre="cl_form1.Cl_olecontrol1" Parent="cl_form1" ObjName="Cl_olecontrol1" OLEObject="C:\Windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7///8EAAAA/v///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEBdOTWhkM8BAwAAAIACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAOAAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAAIAAAABwAAAP7///8JAAAA/v////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP////8AAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACACwAAAEFwcGVhcmFuY2UACQAAAEkKAAAAAAAAAAwAAABCb3JkZXJTdHlsZQAJAAAASQoAAAABAAAADQAAAAAAAAUAAIAAAAAAAAABAAAAAAABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dABCdWxsZXRJbmRlbnQAEQAAAE4NAAAABwAAAAAAAAAAAAAAEAAAAERpc2FibGVOb1Njcm9sbAAFAAAATAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAABSaWdodE1hcmdpbgARAAAATg0AAAAHAAAAAAAAAAAAAAAFAAAAVGV4dAAUAAAASAAAAAALAAAAT2xlY29udHJvbDENAAAAQXV0b1ZlcmJNZW51AAUAAABMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA" /> - - ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; - BackColor = 255,128,255, ; - ButtonCount = 2, ; - Height = 76, ; - Left = 8, ; - Name = "Commandgroup1", ; - Top = 172, ; - Value = 1, ; - Width = 244, ; - ZOrderSet = 16, ; - Command1.Caption = "\ - - ADD OBJECT 'grdEncuestas' AS grid WITH ; - ColumnCount = 5, ; - DeleteMark = .F., ; - Height = 140, ; - Left = 268, ; - Name = "grdEncuestas", ; - Panel = 1, ; - ReadOnly = .T., ; - RecordSource = "encuestas", ; - RecordSourceType = 1, ; - RightToLeft = .F., ; - Top = 12, ; - Width = 320, ; - ZOrderSet = 15, ; - Column1.ControlSource = "encuestas.promotor", ; - Column1.Name = "Column1", ; - Column1.ReadOnly = .T., ; - Column1.Width = 58, ; - Column2.ControlSource = "encuestas.idenc", ; - Column2.Name = "Column2", ; - Column2.ReadOnly = .T., ; - Column2.Width = 46, ; - Column3.ControlSource = "encuestas.calific", ; - Column3.Name = "Column3", ; - Column3.ReadOnly = .T., ; - Column3.Width = 41, ; - Column4.ControlSource = "encuestas.fecha", ; - Column4.Name = "Column4", ; - Column4.ReadOnly = .T., ; - Column4.Width = 69, ; - Column5.ControlSource = "encuestas.resultado", ; - Column5.Name = "Column5", ; - Column5.ReadOnly = .T., ; - Column5.Width = 58 - *< END OBJECT: BaseClass="grid" /> - - ADD OBJECT 'grdEncuestas.Column1.Header1' AS header WITH ; - Caption = "promotor", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'grdEncuestas.Column1.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - ReadOnly = .T., ; - RightToLeft = .F. - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'grdEncuestas.Column2.Header1' AS header WITH ; - Caption = "idenc", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'grdEncuestas.Column2.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - ReadOnly = .T., ; - RightToLeft = .F. - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'grdEncuestas.Column3.Header1' AS header WITH ; - Caption = "calific", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'grdEncuestas.Column3.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - ReadOnly = .T., ; - RightToLeft = .F. - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'grdEncuestas.Column4.Header1' AS header WITH ; - Caption = "fecha", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'grdEncuestas.Column4.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - ReadOnly = .T., ; - RightToLeft = .F. - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'grdEncuestas.Column5.Header1' AS header WITH ; - Caption = "resultado", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'grdEncuestas.Column5.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - ReadOnly = .T., ; - RightToLeft = .F. - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'lblCalific' AS label WITH ; - AutoSize = .T., ; - BackStyle = 0, ; - Caption = "Calific", ; - Left = 491, ; - Name = "lblCalific", ; - RightToLeft = .F., ; - TabIndex = 7, ; - Top = 164, ; - Width = 34, ; - WordWrap = .T., ; - ZOrderSet = 10 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'lblFecha' AS label WITH ; - AutoSize = .T., ; - BackStyle = 0, ; - Caption = "Fecha", ; - Left = 491, ; - Name = "lblFecha", ; - RightToLeft = .F., ; - TabIndex = 9, ; - Top = 192, ; - Width = 34, ; - WordWrap = .T., ; - ZOrderSet = 12 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'lblIdenc' AS label WITH ; - AutoSize = .T., ; - BackStyle = 0, ; - Caption = "Idenc", ; - Left = 292, ; - Name = "lblIdenc", ; - RightToLeft = .F., ; - TabIndex = 5, ; - Top = 192, ; - Width = 30, ; - WordWrap = .T., ; - ZOrderSet = 8 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'lblPromotor' AS label WITH ; - AutoSize = .T., ; - BackStyle = 0, ; - Caption = "Promotor", ; - Left = 271, ; - Name = "lblPromotor", ; - RightToLeft = .F., ; - TabIndex = 3, ; - Top = 164, ; - Width = 51, ; - WordWrap = .T., ; - ZOrderSet = 6 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'lblResultado' AS label WITH ; - AutoSize = .T., ; - BackStyle = 0, ; - Caption = "Resultado", ; - Left = 472, ; - Name = "lblResultado", ; - RightToLeft = .F., ; - TabIndex = 11, ; - Top = 220, ; - Width = 57, ; - WordWrap = .T., ; - ZOrderSet = 14 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Optiongroup1' AS optiongroup WITH ; - BackColor = 0,128,255, ; - ButtonCount = 2, ; - Height = 72, ; - Left = 8, ; - Name = "Optiongroup1", ; - Top = 256, ; - Value = 2, ; - Width = 244, ; - ZOrderSet = 17, ; - Option1.Caption = "Option1", ; - Option1.Height = 48, ; - Option1.Left = 16, ; - Option1.Name = "Option1", ; - Option1.Picture = bmps\scccheckout.bmp, ; - Option1.RightToLeft = .F., ; - Option1.Style = 1, ; - Option1.Top = 12, ; - Option1.Value = 0, ; - Option1.Width = 92, ; - Option2.Caption = "Option2", ; - Option2.Height = 48, ; - Option2.Left = 132, ; - Option2.Name = "Option2", ; - Option2.Picture = bmps\scccheckout.bmp, ; - Option2.RightToLeft = .F., ; - Option2.Style = 1, ; - Option2.Top = 12, ; - Option2.Value = 1, ; - Option2.Width = 88 - *< END OBJECT: BaseClass="optiongroup" /> - - ADD OBJECT 'Shape1' AS shape WITH ; - BorderStyle = 2, ; - BorderWidth = 1, ; - Curvature = 16, ; - Height = 49, ; - Left = 264, ; - Name = "Shape1", ; - SpecialEffect = 0, ; - Top = 284, ; - Width = 101, ; - ZOrderSet = 0 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'txtCalific' AS textbox WITH ; - Comment = "", ; - ControlSource = "encuestas.calific", ; - DisabledForeColor = 0,0,160, ; - ForeColor = 0,0,255, ; - Height = 23, ; - Left = 532, ; - MaxLength = 2, ; - Name = "txtCalific", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - TabIndex = 8, ; - Top = 164, ; - Width = 38, ; - ZOrderSet = 9 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'txtFecha' AS textbox WITH ; - Comment = "", ; - ControlSource = "encuestas.fecha", ; - DisabledForeColor = 0,0,160, ; - ForeColor = 0,0,255, ; - Height = 23, ; - Left = 532, ; - Name = "txtFecha", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - TabIndex = 10, ; - Top = 192, ; - Width = 73, ; - ZOrderSet = 11 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'txtIdenc' AS textbox WITH ; - Comment = "", ; - ControlSource = "encuestas.idenc", ; - DisabledForeColor = 0,0,160, ; - ForeColor = 0,0,255, ; - Height = 23, ; - Left = 328, ; - MaxLength = 20, ; - Name = "txtIdenc", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - TabIndex = 6, ; - Top = 192, ; - Width = 149, ; - ZOrderSet = 7 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'txtPromotor' AS textbox WITH ; - Comment = "", ; - ControlSource = "encuestas.promotor", ; - DisabledForeColor = 0,0,160, ; - ForeColor = 0,0,255, ; - Height = 23, ; - Left = 328, ; - MaxLength = 20, ; - Name = "txtPromotor", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - TabIndex = 4, ; - Top = 164, ; - Width = 149, ; - ZOrderSet = 5 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'txtResultado' AS textbox WITH ; - Comment = "", ; - ControlSource = "encuestas.resultado", ; - DisabledForeColor = 0,0,160, ; - ForeColor = 0,0,255, ; - Height = 23, ; - Left = 532, ; - MaxLength = 10, ; - Name = "txtResultado", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - TabIndex = 12, ; - Top = 220, ; - Width = 81, ; - ZOrderSet = 13 - *< END OBJECT: BaseClass="textbox" /> - - PROCEDURE grdEncuestas.AfterRowColChange - LPARAMETERS nColIndex - - thisform.Refresh() - - ENDPROC - -ENDDEFINE - -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" /> - - AutoCloseTables = .T. - AutoOpenTables = .T. - Comment = "" - DataSource = .NULL. - DataSourceType = "" - Height = 200 - InitialSelectedAlias = "" - Left = 11 - Name = "Dataenvironment" - OpenViews = 0 - Tag = "" - Top = 404 - Width = 520 - - ADD OBJECT 'Cursor1' AS cursor WITH ; - Alias = "encuestas", ; - BufferModeOverride = 1, ; - Comment = "", ; - CursorSource = encuestas.dbf, ; - Exclusive = .F., ; - Filter = "", ; - Height = 98, ; - Left = 10, ; - Name = "Cursor1", ; - NoDataOnLoad = .F., ; - Order = "", ; - OrderDirection = 0, ; - ReadOnly = .F., ; - Tag = "", ; - Top = 20, ; - Width = 102 - *< END OBJECT: BaseClass="cursor" /> - - PROCEDURE BeforeOpenTables - *-- Comentario en método [Dataenvironment.BeforeOpenTables] - - ENDPROC - - PROCEDURE Cursor1.Init - *-- Comentario en método [Dataenvironment.Cursor1.Init] - - ENDPROC - -ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_frm_2.dataenvironment.sc2 b/TESTS/DATOS_READONLY/fb2p_frm_2.dataenvironment.sc2 new file mode 100644 index 0000000..02aa671 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_frm_2.dataenvironment.sc2 @@ -0,0 +1,19 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_frm_2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + * + DataSource = .NULL. + Height = 0 + Left = 0 + Name = "Dataenvironment" + Top = 0 + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_frm_2.form1.sc2 b/TESTS/DATOS_READONLY/fb2p_frm_2.form1.sc2 new file mode 100644 index 0000000..086e31e --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_frm_2.form1.sc2 @@ -0,0 +1,226 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_frm_2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS form1 AS form + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" /> + + * + *p: a_otra + *a: a_prop[1,0] && array + *p: _prop + * + + * + AllowOutput = .T. + AlwaysOnBottom = .F. + AlwaysOnTop = .T. + AutoCenter = .F. + a_otra = .F. + BackColor = 240,240,240 + BindControls = .T. + BorderStyle = 3 + BufferMode = 0 + Caption = "Form1" + ClipControls = .T. + Closable = .T. + ColorSource = 4 + ContinuousScroll = .T. + ControlBox = .T. + DataSession = 1 + DefOleLCID = 0 + Dockable = 0 + DoCreate = .T. + DrawMode = 13 + DrawStyle = 0 + DrawWidth = 1 + Enabled = .T. + FillColor = 0,0,0 + FillStyle = 1 + FontBold = .F. + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 9 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + HalfHeightCaption = .F. + Height = 250 + HelpContextID = 0 + HScrollSmallChange = 10 + Icon = ..\..\ + KeyPreview = .F. + Left = 2 + LockScreen = .F. + MacDesktop = 0 + MaxButton = .T. + MaxHeight = -1 + MaxLeft = -1 + MaxTop = -1 + MaxWidth = -1 + MDIForm = .F. + MinButton = .T. + MinHeight = -1 + MinWidth = -1 + MousePointer = 0 + Movable = .T. + Name = "Form1" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + RightToLeft = .F. + ScaleMode = 3 + ScrollBars = 0 + ShowInTaskBar = .T. + ShowTips = .F. + ShowWindow = 0 + SizeBox = .F. + TabIndex = 1 + TabStop = .T. + Tag = "" + Themes = .T. + TitleBar = 1 + Top = 1 + Visible = .T. + VScrollSmallChange = 10 + WhatsThisButton = .F. + WhatsThisHelp = .F. + WhatsThisHelpID = -1 + Width = 375 + WindowState = 0 + WindowType = 0 + ZoomBox = .F. + _prop = .F. + * + + ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; + ButtonCount = 3, ; + Height = 100, ; + Left = 12, ; + Name = "Commandgroup1", ; + Top = 8, ; + Value = 2, ; + Width = 94, ; + Command1.Caption = "Command1", ; + Command1.Height = 27, ; + Command1.Left = 5, ; + Command1.Name = "Command1", ; + Command1.Top = 5, ; + Command1.Width = 84, ; + Command2.Alignment = 2, ; + Command2.Anchor = 0, ; + Command2.AutoSize = .F., ; + Command2.BackColor = 240,240,240, ; + Command2.Cancel = .F., ; + Command2.Caption = "Command2", ; + Command2.ColorScheme = 1, ; + Command2.ColorSource = 4, ; + Command2.Default = .F., ; + Command2.DisabledBackColor = 240,240,240, ; + Command2.DisabledForeColor = 109,109,109, ; + Command2.DragMode = 0, ; + Command2.Enabled = .T., ; + Command2.FontBold = .F., ; + Command2.FontCondense = .F., ; + Command2.FontExtend = .F., ; + Command2.FontItalic = .F., ; + Command2.FontName = "Arial", ; + Command2.FontOutline = .F., ; + Command2.FontShadow = .F., ; + Command2.FontSize = 9, ; + Command2.FontStrikethru = .F., ; + Command2.FontUnderline = .F., ; + Command2.ForeColor = 0,0,0, ; + Command2.Height = 27, ; + Command2.HelpContextID = 0, ; + Command2.Left = 5, ; + Command2.MousePointer = 0, ; + Command2.Name = "Command2", ; + Command2.OLEDragMode = 0, ; + Command2.OLEDragPicture = ..\..\, ; + Command2.OLEDropEffects = 3, ; + Command2.OLEDropMode = 0, ; + Command2.Picture = ..\..\, ; + Command2.RightToLeft = .F., ; + Command2.SpecialEffect = 0, ; + Command2.StatusBarText = "", ; + Command2.Style = 0, ; + Command2.TabIndex = 2, ; + Command2.TabStop = .T., ; + Command2.Tag = "", ; + Command2.TerminateRead = .F., ; + Command2.Themes = .T., ; + Command2.ToolTipText = "", ; + Command2.Top = 34, ; + Command2.Visible = .T., ; + Command2.WhatsThisHelpID = -1, ; + Command2.Width = 84, ; + Command2.WordWrap = .F., ; + Command3.Caption = "Command3", ; + Command3.Height = 27, ; + Command3.Left = 5, ; + Command3.Name = "Command3", ; + Command3.Top = 63, ; + Command3.Width = 84 + *< END OBJECT: BaseClass="commandgroup" /> + + ADD OBJECT 'Optiongroup1' AS optiongroup WITH ; + ButtonCount = 3, ; + Height = 68, ; + Left = 20, ; + Name = "Optiongroup1", ; + Top = 144, ; + Value = 2, ; + Width = 71, ; + Option1.Caption = "Option1", ; + Option1.Height = 17, ; + Option1.Left = 5, ; + Option1.Name = "Option1", ; + Option1.Top = 5, ; + Option1.Value = 0, ; + Option1.Width = 61, ; + Option2.Caption = "Option2", ; + Option2.Height = 17, ; + Option2.Left = 5, ; + Option2.Name = "Option2", ; + Option2.Top = 24, ; + Option2.Value = 1, ; + Option2.Width = 61, ; + Option3.Caption = "Option3", ; + Option3.Height = 17, ; + Option3.Left = 5, ; + Option3.Name = "Option3", ; + Option3.Top = 43, ; + Option3.Width = 61 + *< END OBJECT: BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ActivePage = 2, ; + ErasePage = .T., ; + Height = 132, ; + Left = 120, ; + Name = "Pageframe1", ; + PageCount = 3, ; + Top = 12, ; + Width = 245, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2", ; + Page3.Caption = "Page3", ; + Page3.Name = "Page3" + *< END OBJECT: BaseClass="pageframe" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_frm_2.sc2 b/TESTS/DATOS_READONLY/fb2p_frm_2.sc2 index 83f80ed..760c2c5 100644 --- a/TESTS/DATOS_READONLY/fb2p_frm_2.sc2 +++ b/TESTS/DATOS_READONLY/fb2p_frm_2.sc2 @@ -4,234 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_frm_2.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="form1" Baseclass="form" /> - DataSource = .NULL. - Height = 0 - Left = 0 - Name = "Dataenvironment" - Top = 0 - Width = 0 - -ENDDEFINE - -DEFINE CLASS form1 AS form - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" /> - - * - *p: a_otra - *a: a_prop[1,0] && array - *p: _prop - * - - AllowOutput = .T. - AlwaysOnBottom = .F. - AlwaysOnTop = .T. - AutoCenter = .F. - a_otra = .F. - BackColor = 240,240,240 - BindControls = .T. - BorderStyle = 3 - BufferMode = 0 - Caption = "Form1" - ClipControls = .T. - Closable = .T. - ColorSource = 4 - ContinuousScroll = .T. - ControlBox = .T. - DataSession = 1 - DefOleLCID = 0 - Dockable = 0 - DoCreate = .T. - DrawMode = 13 - DrawStyle = 0 - DrawWidth = 1 - Enabled = .T. - FillColor = 0,0,0 - FillStyle = 1 - FontBold = .F. - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 9 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - HalfHeightCaption = .F. - Height = 250 - HelpContextID = 0 - HScrollSmallChange = 10 - Icon = ..\..\ - KeyPreview = .F. - Left = 2 - LockScreen = .F. - MacDesktop = 0 - MaxButton = .T. - MaxHeight = -1 - MaxLeft = -1 - MaxTop = -1 - MaxWidth = -1 - MDIForm = .F. - MinButton = .T. - MinHeight = -1 - MinWidth = -1 - MousePointer = 0 - Movable = .T. - Name = "Form1" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - RightToLeft = .F. - ScaleMode = 3 - ScrollBars = 0 - ShowInTaskBar = .T. - ShowTips = .F. - ShowWindow = 0 - SizeBox = .F. - TabIndex = 1 - TabStop = .T. - Tag = "" - Themes = .T. - TitleBar = 1 - Top = 1 - Visible = .T. - VScrollSmallChange = 10 - WhatsThisButton = .F. - WhatsThisHelp = .F. - WhatsThisHelpID = -1 - Width = 375 - WindowState = 0 - WindowType = 0 - ZoomBox = .F. - _prop = .F. - - ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; - ButtonCount = 3, ; - Height = 100, ; - Left = 12, ; - Name = "Commandgroup1", ; - Top = 8, ; - Value = 2, ; - Width = 94, ; - Command1.Caption = "Command1", ; - Command1.Height = 27, ; - Command1.Left = 5, ; - Command1.Name = "Command1", ; - Command1.Top = 5, ; - Command1.Width = 84, ; - Command2.Alignment = 2, ; - Command2.Anchor = 0, ; - Command2.AutoSize = .F., ; - Command2.BackColor = 240,240,240, ; - Command2.Cancel = .F., ; - Command2.Caption = "Command2", ; - Command2.ColorScheme = 1, ; - Command2.ColorSource = 4, ; - Command2.Default = .F., ; - Command2.DisabledBackColor = 240,240,240, ; - Command2.DisabledForeColor = 109,109,109, ; - Command2.DragMode = 0, ; - Command2.Enabled = .T., ; - Command2.FontBold = .F., ; - Command2.FontCondense = .F., ; - Command2.FontExtend = .F., ; - Command2.FontItalic = .F., ; - Command2.FontName = "Arial", ; - Command2.FontOutline = .F., ; - Command2.FontShadow = .F., ; - Command2.FontSize = 9, ; - Command2.FontStrikethru = .F., ; - Command2.FontUnderline = .F., ; - Command2.ForeColor = 0,0,0, ; - Command2.Height = 27, ; - Command2.HelpContextID = 0, ; - Command2.Left = 5, ; - Command2.MousePointer = 0, ; - Command2.Name = "Command2", ; - Command2.OLEDragMode = 0, ; - Command2.OLEDragPicture = ..\..\, ; - Command2.OLEDropEffects = 3, ; - Command2.OLEDropMode = 0, ; - Command2.Picture = ..\..\, ; - Command2.RightToLeft = .F., ; - Command2.SpecialEffect = 0, ; - Command2.StatusBarText = "", ; - Command2.Style = 0, ; - Command2.TabIndex = 2, ; - Command2.TabStop = .T., ; - Command2.Tag = "", ; - Command2.TerminateRead = .F., ; - Command2.Themes = .T., ; - Command2.ToolTipText = "", ; - Command2.Top = 34, ; - Command2.Visible = .T., ; - Command2.WhatsThisHelpID = -1, ; - Command2.Width = 84, ; - Command2.WordWrap = .F., ; - Command3.Caption = "Command3", ; - Command3.Height = 27, ; - Command3.Left = 5, ; - Command3.Name = "Command3", ; - Command3.Top = 63, ; - Command3.Width = 84 - *< END OBJECT: BaseClass="commandgroup" /> - - ADD OBJECT 'Optiongroup1' AS optiongroup WITH ; - ButtonCount = 3, ; - Height = 68, ; - Left = 20, ; - Name = "Optiongroup1", ; - Top = 144, ; - Value = 2, ; - Width = 71, ; - Option1.Caption = "Option1", ; - Option1.Height = 17, ; - Option1.Left = 5, ; - Option1.Name = "Option1", ; - Option1.Top = 5, ; - Option1.Value = 0, ; - Option1.Width = 61, ; - Option2.Caption = "Option2", ; - Option2.Height = 17, ; - Option2.Left = 5, ; - Option2.Name = "Option2", ; - Option2.Top = 24, ; - Option2.Value = 1, ; - Option2.Width = 61, ; - Option3.Caption = "Option3", ; - Option3.Height = 17, ; - Option3.Left = 5, ; - Option3.Name = "Option3", ; - Option3.Top = 43, ; - Option3.Width = 61 - *< END OBJECT: BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ActivePage = 2, ; - ErasePage = .T., ; - Height = 132, ; - Left = 120, ; - Name = "Pageframe1", ; - PageCount = 3, ; - Top = 12, ; - Width = 245, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2", ; - Page3.Caption = "Page3", ; - Page3.Name = "Page3" - *< END OBJECT: BaseClass="pageframe" /> - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_test.cl_commandgroup.vc2 b/TESTS/DATOS_READONLY/fb2p_test.cl_commandgroup.vc2 new file mode 100644 index 0000000..bf0eccb --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test.cl_commandgroup.vc2 @@ -0,0 +1,36 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_commandgroup AS commandgroup && Descripción de cl_CommandGroup + *< CLASSDATA: Baseclass="commandgroup" Timestamp="" Scale="Pixels" Uniqueid="" /> + + #INCLUDE "..\..\include\principal.h" + * + *p: una_prop_cmgroup && Con comentario, pero sin valor + * + + * + ButtonCount = 2 + Height = 66 + Name = "cl_commandgroup" + una_prop_cmgroup = .F. + Value = 1 + Width = 94 + Command1.Caption = "Command1" + Command1.Height = 27 + Command1.Left = 5 + Command1.Name = "Command1" + Command1.Top = 5 + Command1.Width = 84 + Command2.Caption = "Command2" + Command2.Height = 27 + Command2.Left = 5 + Command2.Name = "Command2" + Command2.Top = 34 + Command2.Width = 84 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test.cl_cust_rsv_kwd.vc2 b/TESTS/DATOS_READONLY/fb2p_test.cl_cust_rsv_kwd.vc2 new file mode 100644 index 0000000..aee69b9 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test.cl_cust_rsv_kwd.vc2 @@ -0,0 +1,23 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_cust_rsv_kwd AS custom + *< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *p: nota + *p: note && Reserved keyword + * + + * + Height = 53 + Name = "cl_cust_rsv_kwd" + nota = + note = + Width = 135 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test.cl_form.vc2 b/TESTS/DATOS_READONLY/fb2p_test.cl_form.vc2 new file mode 100644 index 0000000..6ac4b72 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test.cl_form.vc2 @@ -0,0 +1,123 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_form AS form OLEPUBLIC && mi OLE server DLL + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" ProjectClassIcon="bmps\container.ico" ClassIcon="bmps\container.ico" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_imagen1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_imagen2" UniqueID="" Timestamp="" /> + + * + *p: chidden && Prop.Hidden + *p: cprotected && Prop.Protegida + *a: ahidden[1,0] && Array Oculto + *a: aprotected[1,0] && Array Protegido + *p: _memberdata && XML Metadata for customizable properties + * + + HIDDEN ahidden,chidden + PROTECTED aprotected,cprotected + * + Caption = "Form" + chidden = + cprotected = + DoCreate = .T. + Height = 345 + Left = 0 + Name = "cl_form" + Picture = bmps\scccheckout.bmp + Top = 0 + Width = 570 + _memberdata = + + + + + + * + + ADD OBJECT 'Cl_commandgroup1' AS cl_commandgroup WITH ; + BackColor = 255,128,192, ; + Height = 66, ; + Left = 8, ; + Name = "Cl_commandgroup1", ; + Top = 88, ; + Width = 244, ; + Command1.Caption = "Abrir", ; + Command1.Height = 52, ; + Command1.Left = 8, ; + Command1.Name = "Command1", ; + Command1.Picture = bmps\carpetaabierta.bmp, ; + Command1.Top = 4, ; + Command1.Width = 104, ; + Command2.Caption = "Cerrar", ; + Command2.Height = 52, ; + Command2.Left = 124, ; + Command2.Name = "Command2", ; + Command2.Picture = bmps\carpetacerrada.bmp, ; + Command2.Top = 4, ; + Command2.Width = 104 + *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'Cl_imagen1' AS cl_imagen WITH ; + Height = 34, ; + Left = 452, ; + Name = "Cl_imagen1", ; + Picture = bmps\sobrepostal.bmp, ; + Stretch = 1, ; + Top = 276, ; + Width = 38 + *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_imagen2' AS cl_imagen WITH ; + Height = 34, ; + Left = 500, ; + Name = "Cl_imagen2", ; + Picture = bmps\treeview.bmp, ; + Stretch = 1, ; + Top = 276, ; + Width = 38 + *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_optiongroup1' AS cl_optiongroup WITH ; + BackColor = 0,128,255, ; + Height = 68, ; + Left = 8, ; + Name = "Cl_optiongroup1", ; + Top = 12, ; + Width = 244, ; + Option1.Height = 52, ; + Option1.Left = 8, ; + Option1.Name = "Option1", ; + Option1.Picture = bmps\scccheckout.bmp, ; + Option1.Style = 1, ; + Option1.Top = 8, ; + Option1.Width = 104, ; + Option2.Height = 52, ; + Option2.Left = 124, ; + Option2.Name = "Option2", ; + Option2.Picture = bmps\scccheckout.bmp, ; + Option2.Style = 1, ; + Option2.Top = 8, ; + Option2.Width = 104 + *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="optiongroup" /> + + PROCEDURE Cl_optiongroup1.Init + *-- Prueba para comprobar que respeta espacios y TABS del código + TEXT TO xx + * TAB a la izquierda del asterisco + * 2 TAB a la izquierda del asterisco + * 1 ESPACIO a la izquierda del asterisco + * 2 ESPACIOS a la izquierda del asterisco + 1 TAB a la derecha del asterisco * + 1 ESPACIO a la derecha del asterisco * + ENDTEXT && Esto termina sin ENTER + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test.cl_imagen.vc2 b/TESTS/DATOS_READONLY/fb2p_test.cl_imagen.vc2 new file mode 100644 index 0000000..427da0c --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test.cl_imagen.vc2 @@ -0,0 +1,25 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_imagen AS image OLEPUBLIC && otro ole + *< CLASSDATA: Baseclass="image" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: un_metodo_de_clase && Para testear si el código se va a la clase cl_form + * + + * + Height = 16 + Name = "cl_imagen" + Picture = bmps\sobrepostal.bmp + Width = 17 + * + + PROCEDURE un_metodo_de_clase && Para testear si el código se va a la clase cl_form + * ESTE CODIGO ES DE "cl_imagen::un_metodo_de_clase" + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test.cl_olebound.vc2 b/TESTS/DATOS_READONLY/fb2p_test.cl_olebound.vc2 new file mode 100644 index 0000000..8e1e01d --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test.cl_olebound.vc2 @@ -0,0 +1,16 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_olebound AS oleboundcontrol + *< CLASSDATA: Baseclass="oleboundcontrol" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Height = 100 + Name = "cl_olebound" + Width = 100 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test.cl_olecontrol.vc2 b/TESTS/DATOS_READONLY/fb2p_test.cl_olecontrol.vc2 new file mode 100644 index 0000000..6501c28 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test.cl_olecontrol.vc2 @@ -0,0 +1,16 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_olecontrol AS olecontrol + *< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="cl_olecontrol" Parent="" ObjName="cl_olecontrol" OLEObject="C:\Windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABCpJ18M8c8BAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAD+////BwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPAAAAAAUAAIAAAAAAAAABAAAAAQABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dGxlY29udHJvbDEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" /> + + * + Height = 67 + Name = "cl_olecontrol" + Width = 131 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test.cl_optiongroup.vc2 b/TESTS/DATOS_READONLY/fb2p_test.cl_optiongroup.vc2 new file mode 100644 index 0000000..3e817f1 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test.cl_optiongroup.vc2 @@ -0,0 +1,53 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_optiongroup AS optiongroup && descripcion + *< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: propiedad_de_clase_con_valor_access + *m: propiedad_de_clase_con_valor_assign + *p: propiedad_de_clase_con_valor && Tiene un valor por defecto + *p: propiedad_de_clase_sin_valor && Una propiedad sin valor para heredar + * + + * + ButtonCount = 2 + Height = 46 + Name = "cl_optiongroup" + propiedad_de_clase_con_valor = UN VALOR DE LA CLASE + propiedad_de_clase_sin_valor = .F. + Value = 1 + Width = 71 + Option1.Caption = "Option1" + Option1.Height = 17 + Option1.Left = 5 + Option1.Name = "Option1" + Option1.Top = 5 + Option1.Value = 1 + Option1.Width = 61 + Option2.Caption = "Option2" + Option2.Height = 17 + Option2.Left = 5 + Option2.Name = "Option2" + Option2.Top = 24 + Option2.Width = 61 + * + + PROCEDURE propiedad_de_clase_con_valor_access + *To do: Modify this routine for the Access method + RETURN THIS.propiedad_de_clase_con_valor + + ENDPROC + + PROCEDURE propiedad_de_clase_con_valor_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.propiedad_de_clase_con_valor = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test.pj2 b/TESTS/DATOS_READONLY/fb2p_test.pj2 index 1343724..0da34ba 100644 --- a/TESTS/DATOS_READONLY/fb2p_test.pj2 +++ b/TESTS/DATOS_READONLY/fb2p_test.pj2 @@ -81,72 +81,74 @@ MODIFY PROJECT 'fb2p_test.pjx' NOWAIT NOSHOW NOPROJECTHOOK loProject = _VFP.Projects('fb2p_test.pjx') WITH loProject.FILES - .ADD('..\ft__foxbin2prg__c_conversor_prg_a_dbc.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ft__foxbin2prg__c_conversor_prg_a_dbf.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ft__foxbin2prg__c_conversor_prg_a_mnx.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\fxu_lib_objetos_y_funciones_de_soporte.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_base__dobackup.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_base__get_separatedpropandvalue.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_base__gettimestamp.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_base__identificarbloquesdeexclusion.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_base__normalizarvalorpropiedad.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_base__rowtimestamp.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_bin_a_prg__get_propsandvaluesfrom_properties.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_bin_a_prg__indentarmemo.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_prg_a_bin__analizarasignacion_tag_indicado.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_conversor_prg_a_bin__insert_allobjects.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('..\ut__foxbin2prg__c_foxbin2prg__evaluarconfiguracion.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('bmps\carpetaabierta.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('bmps\carpetacerrada.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('bmps\scccheckout.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('bmps\sobrepostal.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('bmps\treeview.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_checkbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_combobox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_commandgroup.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_containers.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_form_aa.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_form_aa2.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_form_controles.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_formset.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_listbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_optiongroup.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('f_textbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('fb2p_frm_1.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('fb2p_frm_2.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('fb2p_test.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('lib_controles.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> - .ADD('lib_controles2.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" /> + .ADD('..\ft__foxbin2prg__c_conversor_prg_a_dbc.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ft__foxbin2prg__c_conversor_prg_a_dbf.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ft__foxbin2prg__c_conversor_prg_a_mnx.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\fxu_lib_objetos_y_funciones_de_soporte.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_base__dobackup.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_base__get_separatedpropandvalue.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_base__gettimestamp.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_base__identificarbloquesdeexclusion.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_base__normalizarvalorpropiedad.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_base__rowtimestamp.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_bin_a_prg__get_propsandvaluesfrom_properties.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_bin_a_prg__indentarmemo.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_prg_a_bin__analizarasignacion_tag_indicado.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_conversor_prg_a_bin__insert_allobjects.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('..\ut__foxbin2prg__c_foxbin2prg__evaluarconfiguracion.prg') && *< FileMetadata: Type="P" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('bmps\carpetaabierta.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('bmps\carpetacerrada.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('bmps\scccheckout.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('bmps\sobrepostal.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('bmps\treeview.bmp') && *< FileMetadata: Type="x" Cpid="0" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('config\config.fpw') && *< FileMetadata: Type="T" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_checkbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_combobox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_commandgroup.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_containers.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_form_aa.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_form_aa2.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_form_controles.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_formset.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_listbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_optiongroup.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('f_textbox.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('fb2p_frm_1.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('fb2p_frm_2.scx') && *< FileMetadata: Type="K" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('fb2p_test.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('lib_controles.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> + .ADD('lib_controles2.vcx') && *< FileMetadata: Type="V" Cpid="1252" Timestamp="0" ID="0" ObjRev="0" User="" /> * .ITEM('__newproject.f2b').Remove() * - .ITEM(lcCurdir + 'f_form_aa.scx').Description = 'Form con todos los controles' - .ITEM(lcCurdir + 'f_form_aa2.scx').Description = 'Instancia del form con todos los controles' - .ITEM(lcCurdir + 'fb2p_test.vcx').Description = 'clase descrip' + .ITEM("f_form_aa.scx").Description = 'Form con todos los controles' + .ITEM("f_form_aa2.scx").Description = 'Instancia del form con todos los controles' + .ITEM("fb2p_test.vcx").Description = 'clase descrip' * * - .ITEM(lcCurdir + 'config\config.fpw').Exclude = .T. + .ITEM("config\config.fpw").Exclude = .T. * * - .ITEM(lcCurdir + 'config\config.fpw').Type = 'T' + .ITEM("config\config.fpw").Type = 'T' * ENDWITH WITH loProject * - .SetMain(lcCurdir + '..\fxu_lib_objetos_y_funciones_de_soporte.prg') - .Icon = lcCurdir + 'bmps\container.ico' + .SetMain("..\fxu_lib_objetos_y_funciones_de_soporte.prg") + + .Icon = "bmps\container.ico" .Debug = .T. .Encrypted = .T. *<.CmntStyle = 1 /> *<.NoLogo = .F. /> *<.SaveCode = .T. /> + *<.User = '' /> .ProjectHookLibrary = 'fb2p_test.vcx' .ProjectHookClass = 'proj_hook' * diff --git a/TESTS/DATOS_READONLY/fb2p_test.proj_hook.vc2 b/TESTS/DATOS_READONLY/fb2p_test.proj_hook.vc2 new file mode 100644 index 0000000..32dd377 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test.proj_hook.vc2 @@ -0,0 +1,16 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS proj_hook AS projecthook + *< CLASSDATA: Baseclass="projecthook" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Height = 22 + Name = "proj_hook" + Width = 23 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test.vc2 b/TESTS/DATOS_READONLY/fb2p_test.vc2 index 92929ca..8298075 100644 --- a/TESTS/DATOS_READONLY/fb2p_test.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_test.vc2 @@ -4,257 +4,16 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="cl_commandgroup" Baseclass="commandgroup" /> +*< EXTERNAL_CLASS: Name="cl_cust_rsv_kwd" Baseclass="custom" /> +*< EXTERNAL_CLASS: Name="cl_form" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="cl_imagen" Baseclass="image" /> +*< EXTERNAL_CLASS: Name="cl_olebound" Baseclass="oleboundcontrol" /> +*< EXTERNAL_CLASS: Name="cl_olecontrol" Baseclass="olecontrol" /> +*< EXTERNAL_CLASS: Name="cl_optiongroup" Baseclass="optiongroup" /> +*< EXTERNAL_CLASS: Name="proj_hook" Baseclass="projecthook" /> + * *< LIBCOMMENT: Comentario principal de "fb2p_test.vcx" /> -* -DEFINE CLASS cl_commandgroup AS commandgroup && Descripción de cl_CommandGroup - *< CLASSDATA: Baseclass="commandgroup" Timestamp="" Scale="Pixels" Uniqueid="" /> - - #INCLUDE "..\..\include\principal.h" - * - *p: una_prop_cmgroup && Con comentario, pero sin valor - * - - ButtonCount = 2 - Height = 66 - Name = "cl_commandgroup" - una_prop_cmgroup = .F. && Con comentario, pero sin valor - Value = 1 - Width = 94 - Command1.Caption = "Command1" - Command1.Height = 27 - Command1.Left = 5 - Command1.Name = "Command1" - Command1.Top = 5 - Command1.Width = 84 - Command2.Caption = "Command2" - Command2.Height = 27 - Command2.Left = 5 - Command2.Name = "Command2" - Command2.Top = 34 - Command2.Width = 84 - -ENDDEFINE - -DEFINE CLASS cl_cust_rsv_kwd AS custom - *< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *p: nota - *p: note && Reserved keyword - * - - Height = 53 - Name = "cl_cust_rsv_kwd" - nota = - note = && Reserved keyword - Width = 135 - -ENDDEFINE - -DEFINE CLASS cl_form AS form OLEPUBLIC && mi OLE server DLL - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" ProjectClassIcon="bmps\container.ico" ClassIcon="bmps\container.ico" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_imagen1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_imagen2" UniqueID="" Timestamp="" /> - - * - *p: chidden && Prop.Hidden - *p: cprotected && Prop.Protegida - *a: ahidden[1,0] && Array Oculto - *a: aprotected[1,0] && Array Protegido - *p: _memberdata && XML Metadata for customizable properties - * - - HIDDEN ahidden,chidden - PROTECTED aprotected,cprotected - Caption = "Form" - chidden = && Prop.Hidden - cprotected = && Prop.Protegida - DoCreate = .T. - Height = 345 - Left = 0 - Name = "cl_form" - Picture = bmps\scccheckout.bmp - Top = 0 - Width = 570 - _memberdata = - - - - - && XML Metadata for customizable properties - - ADD OBJECT 'Cl_commandgroup1' AS cl_commandgroup WITH ; - BackColor = 255,128,192, ; - Height = 66, ; - Left = 8, ; - Name = "Cl_commandgroup1", ; - Top = 88, ; - Width = 244, ; - Command1.Caption = "Abrir", ; - Command1.Height = 52, ; - Command1.Left = 8, ; - Command1.Name = "Command1", ; - Command1.Picture = bmps\carpetaabierta.bmp, ; - Command1.Top = 4, ; - Command1.Width = 104, ; - Command2.Caption = "Cerrar", ; - Command2.Height = 52, ; - Command2.Left = 124, ; - Command2.Name = "Command2", ; - Command2.Picture = bmps\carpetacerrada.bmp, ; - Command2.Top = 4, ; - Command2.Width = 104 - *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'Cl_imagen1' AS cl_imagen WITH ; - Height = 34, ; - Left = 452, ; - Name = "Cl_imagen1", ; - Picture = bmps\sobrepostal.bmp, ; - Stretch = 1, ; - Top = 276, ; - Width = 38 - *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_imagen2' AS cl_imagen WITH ; - Height = 34, ; - Left = 500, ; - Name = "Cl_imagen2", ; - Picture = bmps\treeview.bmp, ; - Stretch = 1, ; - Top = 276, ; - Width = 38 - *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_optiongroup1' AS cl_optiongroup WITH ; - BackColor = 0,128,255, ; - Height = 68, ; - Left = 8, ; - Name = "Cl_optiongroup1", ; - Top = 12, ; - Width = 244, ; - Option1.Height = 52, ; - Option1.Left = 8, ; - Option1.Name = "Option1", ; - Option1.Picture = bmps\scccheckout.bmp, ; - Option1.Style = 1, ; - Option1.Top = 8, ; - Option1.Width = 104, ; - Option2.Height = 52, ; - Option2.Left = 124, ; - Option2.Name = "Option2", ; - Option2.Picture = bmps\scccheckout.bmp, ; - Option2.Style = 1, ; - Option2.Top = 8, ; - Option2.Width = 104 - *< END OBJECT: ClassLib="fb2p_test.vcx" BaseClass="optiongroup" /> - - PROCEDURE Cl_optiongroup1.Init - *-- Prueba para comprobar que respeta espacios y TABS del código - TEXT TO xx - * TAB a la izquierda del asterisco - * 2 TAB a la izquierda del asterisco - * 1 ESPACIO a la izquierda del asterisco - * 2 ESPACIOS a la izquierda del asterisco - 1 TAB a la derecha del asterisco * - 1 ESPACIO a la derecha del asterisco * - ENDTEXT && Esto termina sin ENTER - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_imagen AS image OLEPUBLIC && otro ole - *< CLASSDATA: Baseclass="image" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: un_metodo_de_clase && Para testear si el código se va a la clase cl_form - * - - Height = 16 - Name = "cl_imagen" - Picture = bmps\sobrepostal.bmp - Width = 17 - - PROCEDURE un_metodo_de_clase && Para testear si el código se va a la clase cl_form - * ESTE CODIGO ES DE "cl_imagen::un_metodo_de_clase" - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_olebound AS oleboundcontrol - *< CLASSDATA: Baseclass="oleboundcontrol" Timestamp="" Scale="Pixels" Uniqueid="" /> - - Height = 100 - Name = "cl_olebound" - Width = 100 - -ENDDEFINE - -DEFINE CLASS cl_olecontrol AS olecontrol - *< CLASSDATA: Baseclass="olecontrol" Timestamp="" Scale="Pixels" Uniqueid="" Nombre="cl_olecontrol" Parent="" ObjName="cl_olecontrol" OLEObject="C:\Windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABCpJ18M8c8BAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABAAAAAIAAAD+////BQAAAAYAAAD+////BwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAACKDQAA7QYAACFDNBIBAAYArAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPAAAAAAUAAIAAAAAAAAABAAAAAQABAAIACAAAAHtccnRmMVxhbnNpXGFuc2ljcGcxMjUyXGRlZmYwe1xmb250dGxlY29udHJvbDEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" /> - - Height = 67 - Name = "cl_olecontrol" - Width = 131 - -ENDDEFINE - -DEFINE CLASS cl_optiongroup AS optiongroup && descripcion - *< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: propiedad_de_clase_con_valor_access - *m: propiedad_de_clase_con_valor_assign - *p: propiedad_de_clase_con_valor && Tiene un valor por defecto - *p: propiedad_de_clase_sin_valor && Una propiedad sin valor para heredar - * - - ButtonCount = 2 - Height = 46 - Name = "cl_optiongroup" - propiedad_de_clase_con_valor = UN VALOR DE LA CLASE && Tiene un valor por defecto - propiedad_de_clase_sin_valor = .F. && Una propiedad sin valor para heredar - Value = 1 - Width = 71 - Option1.Caption = "Option1" - Option1.Height = 17 - Option1.Left = 5 - Option1.Name = "Option1" - Option1.Top = 5 - Option1.Value = 1 - Option1.Width = 61 - Option2.Caption = "Option2" - Option2.Height = 17 - Option2.Left = 5 - Option2.Name = "Option2" - Option2.Top = 24 - Option2.Width = 61 - - PROCEDURE propiedad_de_clase_con_valor_access - *To do: Modify this routine for the Access method - RETURN THIS.propiedad_de_clase_con_valor - - ENDPROC - - PROCEDURE propiedad_de_clase_con_valor_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.propiedad_de_clase_con_valor = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS proj_hook AS projecthook - *< CLASSDATA: Baseclass="projecthook" Timestamp="" Scale="Pixels" Uniqueid="" /> - - Height = 22 - Name = "proj_hook" - Width = 23 - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_test_bug_estructural.cl_form.vc2 b/TESTS/DATOS_READONLY/fb2p_test_bug_estructural.cl_form.vc2 new file mode 100644 index 0000000..35fe122 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test_bug_estructural.cl_form.vc2 @@ -0,0 +1,46 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test_bug_estructural.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_form AS form + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" /> + + * + Caption = "Form" + DoCreate = .T. + Name = "cl_form" + * + + ADD OBJECT 'Command1' AS commandbutton WITH ; + Caption = "Command1", ; + Height = 27, ; + Left = 36, ; + Name = "Command1", ; + Top = 32, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" /> + + PROCEDURE Load + TEXT && COMPROBACIÓN DE CIERRE DE ESTRUCTURA "ENDPROC" + + *-- Dejando la últim línea sin ENTER se comprueba si el ENDPROC + *-- se queda pegado a la misma o no por faltar un CR+LF antes del mismo. + + ENDTEXT && Esto termina sin ENTER. + ENDPROC + + PROCEDURE Command1.Click + TEXT && COMPROBACIÓN DE CIERRE DE ESTRUCTURA "ENDPROC" + + *-- Dejando la últim línea sin ENTER se comprueba si el ENDPROC + *-- se queda pegado a la misma o no por faltar un CR+LF antes del mismo. + + ENDTEXT && Esto termina sin ENTER. + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test_bug_estructural.vc2 b/TESTS/DATOS_READONLY/fb2p_test_bug_estructural.vc2 index 76c4a40..d4c199b 100644 --- a/TESTS/DATOS_READONLY/fb2p_test_bug_estructural.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_test_bug_estructural.vc2 @@ -4,42 +4,7 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test_bug_estructural.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS cl_form AS form - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="cl_form" Baseclass="form" /> - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" /> - - Caption = "Form" - DoCreate = .T. - Name = "cl_form" - - ADD OBJECT 'Command1' AS commandbutton WITH ; - Caption = "Command1", ; - Height = 27, ; - Left = 36, ; - Name = "Command1", ; - Top = 32, ; - Width = 84 - *< END OBJECT: BaseClass="commandbutton" /> - - PROCEDURE Load - TEXT && COMPROBACIÓN DE CIERRE DE ESTRUCTURA "ENDPROC" - - *-- Dejando la últim línea sin ENTER se comprueba si el ENDPROC - *-- se queda pegado a la misma o no por faltar un CR+LF antes del mismo. - - ENDTEXT && Esto termina sin ENTER. - ENDPROC - - PROCEDURE Command1.Click - TEXT && COMPROBACIÓN DE CIERRE DE ESTRUCTURA "ENDPROC" - - *-- Dejando la últim línea sin ENTER se comprueba si el ENDPROC - *-- se queda pegado a la misma o no por faltar un CR+LF antes del mismo. - - ENDTEXT && Esto termina sin ENTER. - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.cl_commandgroup.vc2 b/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.cl_commandgroup.vc2 new file mode 100644 index 0000000..7eaa42f --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.cl_commandgroup.vc2 @@ -0,0 +1,37 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test_bug_metodo_movido.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_commandgroup AS commandgroup + *< CLASSDATA: Baseclass="commandgroup" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + ButtonCount = 2 + Height = 66 + Name = "cl_commandgroup" + Value = 1 + Width = 94 + Command1.Caption = "Command1" + Command1.Height = 27 + Command1.Left = 5 + Command1.Name = "Command1" + Command1.Top = 5 + Command1.Width = 84 + Command2.Caption = "Command2" + Command2.Height = 27 + Command2.Left = 5 + Command2.Name = "Command2" + Command2.Top = 34 + Command2.Width = 84 + * + + PROCEDURE Command1.Click + TEXT && CL_COMMANDGROUP::Command1.Click() + * ESTE ES EL ÚNICO CÓDIGO QUE DEBERÍA TENER ESTE MÉTODO. + * SI HAY MÁS CÓDIGO FUERA DEL TEXT/ENDTEXT, ES PORQUE SE ESTÁ MEZCLANDO. + ENDTEXT + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.cl_optiongroup.vc2 b/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.cl_optiongroup.vc2 new file mode 100644 index 0000000..ed4da71 --- /dev/null +++ b/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.cl_optiongroup.vc2 @@ -0,0 +1,41 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test_bug_metodo_movido.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_optiongroup AS optiongroup + *< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + ButtonCount = 2 + Height = 46 + Name = "cl_optiongroup" + Value = 1 + Width = 71 + Option1.Caption = "Option1" + Option1.Height = 17 + Option1.Left = 5 + Option1.Name = "Option1" + Option1.Top = 5 + Option1.Value = 1 + Option1.Width = 61 + Option2.Caption = "Option2" + Option2.Height = 17 + Option2.Left = 5 + Option2.Name = "Option2" + Option2.Top = 24 + Option2.Width = 61 + * + + PROCEDURE Option1.Click + TEXT && CL_OPTIONGROUP::Option1.Click() + * BUG DEL MÉTODO MOVIDO: + * Este método es para reproducir un bug, por el cuál el último PROCEDURE de un OBJETO + * de la clase anterior se queda referenciado en un obejeto que no se limpia, + * y por el cuál el siguiente PROCEDURE de OBJETO de la siguiente CLASE se agrega + * al mismo, quedando esa clase con un método vacío. (O sea, esta) + ENDTEXT + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.vc2 b/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.vc2 index 5ebc67b..34eea54 100644 --- a/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.vc2 +++ b/TESTS/DATOS_READONLY/fb2p_test_bug_metodo_movido.vc2 @@ -4,67 +4,8 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="fb2p_test_bug_metodo_movido.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS cl_commandgroup AS commandgroup - *< CLASSDATA: Baseclass="commandgroup" Timestamp="" Scale="Pixels" Uniqueid="" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="cl_commandgroup" Baseclass="commandgroup" /> +*< EXTERNAL_CLASS: Name="cl_optiongroup" Baseclass="optiongroup" /> - ButtonCount = 2 - Height = 66 - Name = "cl_commandgroup" - Value = 1 - Width = 94 - Command1.Caption = "Command1" - Command1.Height = 27 - Command1.Left = 5 - Command1.Name = "Command1" - Command1.Top = 5 - Command1.Width = 84 - Command2.Caption = "Command2" - Command2.Height = 27 - Command2.Left = 5 - Command2.Name = "Command2" - Command2.Top = 34 - Command2.Width = 84 - - PROCEDURE Command1.Click - TEXT && CL_COMMANDGROUP::Command1.Click() - * ESTE ES EL ÚNICO CÓDIGO QUE DEBERÍA TENER ESTE MÉTODO. - * SI HAY MÁS CÓDIGO FUERA DEL TEXT/ENDTEXT, ES PORQUE SE ESTÁ MEZCLANDO. - ENDTEXT - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_optiongroup AS optiongroup - *< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" /> - - ButtonCount = 2 - Height = 46 - Name = "cl_optiongroup" - Value = 1 - Width = 71 - Option1.Caption = "Option1" - Option1.Height = 17 - Option1.Left = 5 - Option1.Name = "Option1" - Option1.Top = 5 - Option1.Value = 1 - Option1.Width = 61 - Option2.Caption = "Option2" - Option2.Height = 17 - Option2.Left = 5 - Option2.Name = "Option2" - Option2.Top = 24 - Option2.Width = 61 - - PROCEDURE Option1.Click - TEXT && CL_OPTIONGROUP::Option1.Click() - * BUG DEL MÉTODO MOVIDO: - * Este método es para reproducir un bug, por el cuál el último PROCEDURE de un OBJETO - * de la clase anterior se queda referenciado en un obejeto que no se limpia, - * y por el cuál el siguiente PROCEDURE de OBJETO de la siguiente CLASE se agrega - * al mismo, quedando esa clase con un método vacío. (O sea, esta) - ENDTEXT - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/form1.dataenvironment.sc2 b/TESTS/DATOS_READONLY/form1.dataenvironment.sc2 new file mode 100644 index 0000000..3cf1381 --- /dev/null +++ b/TESTS/DATOS_READONLY/form1.dataenvironment.sc2 @@ -0,0 +1,42 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="form1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" /> + + * + DataSource = .NULL. + Height = 200 + Left = 1 + Name = "Dataenvironment" + Top = 220 + Width = 520 + * + + ADD OBJECT 'Cursor1' AS cursor WITH ; + Alias = "foxuser_fdbozzo", ; + CursorSource = foxuser_fdbozzo.dbf, ; + Height = 90, ; + Left = 10, ; + Name = "Cursor1", ; + Top = 20, ; + Width = 90 + *< END OBJECT: BaseClass="cursor" /> + + PROCEDURE BeforeOpenTables + *-- Dataenvironment.BeforeOpenTables() + + ENDPROC + + PROCEDURE Cursor1.Init + *-- Dataenvironment.Cursor1.Init() + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/form1.frm_form1.sc2 b/TESTS/DATOS_READONLY/form1.frm_form1.sc2 new file mode 100644 index 0000000..4cc70ee --- /dev/null +++ b/TESTS/DATOS_READONLY/form1.frm_form1.sc2 @@ -0,0 +1,167 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="form1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS frm_form1 AS form + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Command2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cnt_controles1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cnt_controles1.Label1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Olecontrol1" UniqueID="" Timestamp="" /> + + * + *m: metodo_comun && Método común + * + + * + Caption = "Form1" + DoCreate = .T. + Height = 250 + Icon = container.ico + Left = 0 + Name = "frm_Form1" + Top = 0 + Width = 470 + WindowType = 1 + * + + ADD OBJECT 'Cnt_controles1' AS cnt_controles WITH ; + Left = 28, ; + Name = "Cnt_controles1", ; + TabIndex = 3, ; + Top = 72, ; + Check2.Alignment = 0, ; + Check2.Name = "Check2", ; + Check2.TabIndex = 2, ; + Check2.ZOrderSet = 1, ; + Check4.Alignment = 0, ; + Check4.Name = "Check4", ; + Check4.TabIndex = 5, ; + Check4.ZOrderSet = 5, ; + Label_h.Name = "Label_h", ; + Label_h.TabIndex = 6, ; + Label_h.ZOrderSet = 2, ; + Textbox_h.Name = "Textbox_h", ; + Textbox_h.TabIndex = 3, ; + Textbox_h.ZOrderSet = 3, ; + Check1.Alignment = 0, ; + Check1.Name = "Check1", ; + Check1.TabIndex = 1, ; + Check1.ZOrderSet = 0, ; + Check3.Alignment = 0, ; + Check3.Name = "Check3", ; + Check3.TabIndex = 4, ; + Check3.ZOrderSet = 4 + *< END OBJECT: ClassLib="bca.vcx" BaseClass="container" /> + + ADD OBJECT 'Cnt_controles1.Label1' AS label WITH ; + Caption = "Label1", ; + Height = 17, ; + Left = 24, ; + Name = "Label1", ; + TabIndex = 7, ; + Top = 84, ; + Width = 64 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Command1' AS commandbutton WITH ; + Caption = "Command1", ; + Height = 27, ; + Left = 28, ; + Name = "Command1", ; + TabIndex = 1, ; + Top = 20, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'Command2' AS commandbutton WITH ; + Caption = "Command1", ; + Height = 27, ; + Left = 132, ; + Name = "Command2", ; + TabIndex = 2, ; + Top = 20, ; + Width = 84 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'Olecontrol1' AS olecontrol WITH ; + Height = 157, ; + Left = 328, ; + Name = "Olecontrol1", ; + Top = 72, ; + Width = 133 + *< END OBJECT: BaseClass="olecontrol" OLEObject="c:\windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOBWdmE47c4BAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABQAAAAIAAAD+////BAAAAP7///8GAAAABwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAAC/DQAAOhAAACFDNBIBAAYArAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPbGVjb250cm9sMQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFAACAAAAAAAAAAQAAAAEAAQACAAgAAAB7XHJ0ZjFcYW5zaVxhbnNpY3BnMTI1MlxkZWZmMHtcZm9udHRibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" /> + + PROCEDURE Load + *-- Form 1 LOAD() + + ENDPROC + + PROCEDURE metodo_comun && Método común + *-- frm_Form1.metodo_comun() + + ENDPROC + + PROCEDURE Unload + *-- Form1.Unload() + + ENDPROC + + PROCEDURE Cnt_controles1.Check1.Click + *-- Form1.Cnt_controles1.Check1.Click() + + ENDPROC + + PROCEDURE Cnt_controles1.Check2.Click + *-- Form1.Cnt_controles1.Check2.Click() + + ENDPROC + + PROCEDURE Cnt_controles1.Check3.Click + *-- Form1.Cnt_controles1.Check3.Click() + + ENDPROC + + PROCEDURE Cnt_controles1.Check4.Click + *-- Form1.Cnt_controles1.Check4.Click() + + ENDPROC + + PROCEDURE Cnt_controles1.Init + *-- Form1.Command1.Cnt_controles1.Init() + + ENDPROC + + PROCEDURE Cnt_controles1.Label1.Click + *-- Form1.Cnt_controles1.Label1.Click() ==> No hereda, es nuevo! + + ENDPROC + + PROCEDURE Command1.Click + *-- Form1.Command1.Click() + PUBLIC ; + glEnabled_Opc_A_2_Sub_2 ; + , glEnabled_Opc_A_2_Sub_3 ; + , glEnabled_Opc_B + + STORE .T. TO ; + glEnabled_Opc_A_2_Sub_2 ; + , glEnabled_Opc_A_2_Sub_3 ; + , glEnabled_Opc_B + + DO MENU1.MPR + + ENDPROC + + PROCEDURE Command2.Click + *-- Form1.Command2.Click() + QUIT + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/form1.sc2 b/TESTS/DATOS_READONLY/form1.sc2 index 6ff153c..beae2a8 100644 --- a/TESTS/DATOS_READONLY/form1.sc2 +++ b/TESTS/DATOS_READONLY/form1.sc2 @@ -4,200 +4,9 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="form1.scx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="frm_form1" Baseclass="form" /> + * #INCLUDE "include\keycodes.h" - -DEFINE CLASS dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="" Uniqueid="" ClassIcon="1" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cursor1" UniqueID="" Timestamp="" /> - - DataSource = .NULL. - Height = 200 - Left = 1 - Name = "Dataenvironment" - Top = 220 - Width = 520 - - ADD OBJECT 'Cursor1' AS cursor WITH ; - Alias = "foxuser_fdbozzo", ; - CursorSource = foxuser_fdbozzo.dbf, ; - Height = 90, ; - Left = 10, ; - Name = "Cursor1", ; - Top = 20, ; - Width = 90 - *< END OBJECT: BaseClass="cursor" /> - - PROCEDURE BeforeOpenTables - *-- Dataenvironment.BeforeOpenTables() - - ENDPROC - - PROCEDURE Cursor1.Init - *-- Dataenvironment.Cursor1.Init() - - ENDPROC - -ENDDEFINE - -DEFINE CLASS frm_form1 AS form - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Command2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cnt_controles1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cnt_controles1.Label1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Olecontrol1" UniqueID="" Timestamp="" /> - - * - *m: metodo_comun && Método común - * - - Caption = "Form1" - DoCreate = .T. - Height = 250 - Icon = container.ico - Left = 0 - Name = "frm_Form1" - Top = 0 - Width = 470 - WindowType = 1 - - ADD OBJECT 'Cnt_controles1' AS cnt_controles WITH ; - Left = 28, ; - Name = "Cnt_controles1", ; - TabIndex = 3, ; - Top = 72, ; - Check2.Alignment = 0, ; - Check2.Name = "Check2", ; - Check2.TabIndex = 2, ; - Check2.ZOrderSet = 1, ; - Check4.Alignment = 0, ; - Check4.Name = "Check4", ; - Check4.TabIndex = 5, ; - Check4.ZOrderSet = 5, ; - Label_h.Name = "Label_h", ; - Label_h.TabIndex = 6, ; - Label_h.ZOrderSet = 2, ; - Textbox_h.Name = "Textbox_h", ; - Textbox_h.TabIndex = 3, ; - Textbox_h.ZOrderSet = 3, ; - Check1.Alignment = 0, ; - Check1.Name = "Check1", ; - Check1.TabIndex = 1, ; - Check1.ZOrderSet = 0, ; - Check3.Alignment = 0, ; - Check3.Name = "Check3", ; - Check3.TabIndex = 4, ; - Check3.ZOrderSet = 4 - *< END OBJECT: ClassLib="bca.vcx" BaseClass="container" /> - - ADD OBJECT 'Cnt_controles1.Label1' AS label WITH ; - Caption = "Label1", ; - Height = 17, ; - Left = 24, ; - Name = "Label1", ; - TabIndex = 7, ; - Top = 84, ; - Width = 64 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Command1' AS commandbutton WITH ; - Caption = "Command1", ; - Height = 27, ; - Left = 28, ; - Name = "Command1", ; - TabIndex = 1, ; - Top = 20, ; - Width = 84 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'Command2' AS commandbutton WITH ; - Caption = "Command1", ; - Height = 27, ; - Left = 132, ; - Name = "Command2", ; - TabIndex = 2, ; - Top = 20, ; - Width = 84 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'Olecontrol1' AS olecontrol WITH ; - Height = 157, ; - Left = 328, ; - Name = "Olecontrol1", ; - Top = 72, ; - Width = 133 - *< END OBJECT: BaseClass="olecontrol" OLEObject="c:\windows\system32\richtx32.ocx" Value="0M8R4KGxGuEAAAAAAAAAAAAAAAAAAAAAPgADAP7/CQAGAAAAAAAAAAAAAAABAAAAAQAAAAAAAAAAEAAAAgAAAAEAAAD+////AAAAAAAAAAD////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9/////v////7////+/////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////1IAbwBvAHQAIABFAG4AdAByAHkAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAWAAUA//////////8BAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAOBWdmE47c4BAwAAAAACAAAAAAAAAwBPAGwAZQBPAGIAagBlAGMAdABEAGEAdABhAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAB4AAgEDAAAAAgAAAP////8AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA2AAAAAAAAAADAEEAYwBjAGUAcwBzAE8AYgBqAFMAaQB0AGUARABhAHQAYQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAJgACAP///////////////wAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAEAAABPAAAAAAAAAAMAQwBoAGEAbgBnAGUAZABQAHIAbwBwAHMAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAcAAIA////////////////AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAwAAAEoAAAAAAAAABQAAAAIAAAD+////BAAAAP7///8GAAAABwAAAP7///////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////////9giHw7j9cbELm1BAIcAJQCIUM0EggAAAC/DQAAOhAAACFDNBIBAAYArAAAAAAA//8AAP//AQAAAAAAAAAAAAAATwAAAAAAAAABAAAAAAAAAAAAAAAAAAAAAAAAABcAAAA4AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAgcWhqIFp0dVFoYTtqZGZuW2lhZXRyIAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAABAACADAAAAFJpZ2h0TWFyZ2luABEAAABODQAAAAcAAAAAAAAAAAAAAAUAAABUZXh0ABQAAABIAAAAAAsAAABPbGVjb250cm9sMQAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAFAACAAAAAAAAAAQAAAAEAAQACAAgAAAB7XHJ0ZjFcYW5zaVxhbnNpY3BnMTI1MlxkZWZmMHtcZm9udHRibHtcZjBcZm5pbFxmY2hhcnNldDAgQXJpYWw7fX0NClx2aWV3a2luZDRcdWMxXHBhcmRcbGFuZzMwODJcZnMxOCBPbGVjb250cm9sMQ0KXHBhciB9DQoAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA==" /> - - PROCEDURE Load - *-- Form 1 LOAD() - - ENDPROC - - PROCEDURE metodo_comun && Método común - *-- frm_Form1.metodo_comun() - - ENDPROC - - PROCEDURE Unload - *-- Form1.Unload() - - ENDPROC - - PROCEDURE Cnt_controles1.Check1.Click - *-- Form1.Cnt_controles1.Check1.Click() - - ENDPROC - - PROCEDURE Cnt_controles1.Check2.Click - *-- Form1.Cnt_controles1.Check2.Click() - - ENDPROC - - PROCEDURE Cnt_controles1.Check3.Click - *-- Form1.Cnt_controles1.Check3.Click() - - ENDPROC - - PROCEDURE Cnt_controles1.Check4.Click - *-- Form1.Cnt_controles1.Check4.Click() - - ENDPROC - - PROCEDURE Cnt_controles1.Init - *-- Form1.Command1.Cnt_controles1.Init() - - ENDPROC - - PROCEDURE Cnt_controles1.Label1.Click - *-- Form1.Cnt_controles1.Label1.Click() ==> No hereda, es nuevo! - - ENDPROC - - PROCEDURE Command1.Click - *-- Form1.Command1.Click() - PUBLIC ; - glEnabled_Opc_A_2_Sub_2 ; - , glEnabled_Opc_A_2_Sub_3 ; - , glEnabled_Opc_B - - STORE .T. TO ; - glEnabled_Opc_A_2_Sub_2 ; - , glEnabled_Opc_A_2_Sub_3 ; - , glEnabled_Opc_B - - DO MENU1.MPR - - ENDPROC - - PROCEDURE Command2.Click - *-- Form1.Command2.Click() - QUIT - - ENDPROC - -ENDDEFINE diff --git a/TESTS/DATOS_READONLY/foxuser_fdbozzo.db2 b/TESTS/DATOS_READONLY/foxuser_fdbozzo.db2 new file mode 100644 index 0000000000000000000000000000000000000000..72e52248e4153e1c0949b81c43ec2afed1e4c121 GIT binary patch literal 43019 zcmeHQdypGRd2j8@Z{zdXKHnX=j15QZd+e^HeO~r9BWty5nO#Xp^5YJ}GAqrlbx0a9 zl8k-1;)+TLNfnhRAtWIQkozY|81%e6K5I7QY1Sbc{=J)kX zk4BG~(MsC2@7S?tHPii@ucyEM`s?nmyT5th;oJ1sxBCIU5=&8RB9shCku#C-*>ot0=(DL%QcA@aLralZI$}ge zakY>{csR6lDjH8ok4d4$rBFB$qp)~PIvq(SLrYOS5lTs^@Y1nk#;e5auab_;A@NWe zuab_&jaP}q(-KjS%^`9=o|GaN=uM31v#E#_k1amNBbFk`g=lO+3ZD+e79uGr6q}P$ z>3EXD&PUUyDOo8Uk1wWp;}_a5S z86obB$oZU_&n}-+^11ACB$XwzzdEZgZh@s9D;!n^UtxZ5un-dfjH|c5}MX=Jad= z@)l_^TtHCM*mP=Jy=|+vji@(sluA|+RMwejF{@r7TT9spu!Tq@Y>ysKRrG46Qq`6G zammC01cTg#h+$d*|M@K+_;N#vvc_9xV-%7$@3?B5S*c*AJROZ;v?Kxyz|4p}PYxNZb$p#N2{T?OiH>orJl39Wk-b}y9m68# zloi+VG9JB6@?j~^juWQ*G3vNG$FsWNaU z^p2rYYypNMLM@z0M#AwVx8G8oG;a+(Fhc@2n@C3H&x0d$&8zK9bZ!>*>&S%!%>S_D z;noNzRWdts?Db*l%DrC6tig_~72fa$*aUf$ff6;+Fw|OiMkF6|%m#zgQ?QvBH%0`J ztkE7|ba2W%!oZmFG#eNlof^S^e{g0*gb`w9#K^3{jkfceNS;Z=Q=5{{(aGsa_k8v- zHgKq)u_@#?k8CSGo^}3b>+*j#x*6G@2#$}^)CP?+O%ZA=W?ODq44J-wfVY}~3G>$w zh8kO(uC|C>s2Zv0<7n$Ppd_>Uajd^cH@EW}mDcg`AgYg>w7N))e`GW;;)inT zLBGZ7qoFI+Py>a~bkRri`$xUrV1d* z4mj(ii;!k-VVuiu9saa=)%lZNSZ5Jz?m8NX-&pKf&m za)7XO_&|&3^}QdzA6#E2&Whvjaq+J>Z~A<4pAFa7fO`&@uW($Se1{D;)PVaZV7|t2 z{W5;)4_l|%9x-In6Jb9sF7W$#oHuaZ^bN{8TyXyg%yo_%k`I}p>wl)6-e*DK%Q$cPcF6-a+&}~FGr(NqxZU!g4L8_;`v+jY z%5i&S{L~)~@3+@Rk2TQyA}IVD&YQk{@;)2R*MR#MV7|d|`(^yp9}ejrH0cSjz1;o+ zJpLr-^8xuz7u@IY@HcVZ^xYu~I@Yg4x_33u+d0Ts77rb@9wd5q%C=kM(t+OL26}cn z-#{L|>_sKH`G=G*b8y&YQj?GJfh0hji~T=_!z_zGv&@>YGUOKY6-G<-tEP>M!B? z8*tA9^8&}+E!QWCJBM_SHsr%zZr=i}?{Iqe%6Gfq{vDYA;<#6~o$meydOK||`~_Tp z9p_EoeR8x|(Y0(flhfI0C4-T4CZEd~tD%)lC3jiTSy)#UsalkZ=n89+qGvAUE^91C zcZ`Krbd@5_VCkwNsaJC43RaM+6bZU)p{nRvMapAgbw(+y&;o0a%;%m|vbe;;WbrUk z#5!dYj|ZcLlAbFNeMQP>rJN#V)jY01yO_&rxRdgVgsy2t0m67+^P!wxdy288s#>mK zfj6G6PfJpZb`n@9T~VZxuI6(ES_{sa0vOiAmh`H+g8V3wrdPBzU0HozVe#4}dtEgL zGKep$c{P*Cy-<{{(rpGS%`j?g91yz}}HDw}nsY}C0LAIlIK`(3q&!je!Q zQGM9F#qM&g7^r?V(lbk-EUBU}%BUAMN>QVTY-GTFi;D45G+}Ogm0{){Uwfn0q{KV5 zB4fo_91dNrLU*9bloV8R%tA9B;%ct*kNEK)Gg>_`zAQNPQ8#Fc@CPOX9#cfrA4T)Z z57!=e@214avbz+Yi_T-#-JuU&L6sXW>1!SI!TsZ-CAr;qwa z0=*eW5{pkI<(0lWhtfVxz)~SQMZs!emFnQ^M*e@7H0Rc=h(9kFt!8#Feu*4gKvHDvzS&u z57T9ChIAoh2}AuJ)YVihnph0AusaJodjb7JGDr+x&Rls)%dd1GQqz+G54!{yynVFd zfNP^jW+~YEdmshaIlB~%&BqN^Y%V9}8jr6AMT1&*&JC zE;#@_B9=~2>=tr``a)e#tWEkSJSOcam(==u=Bzi<+n6y-P!rNr-W%-VjgL=Fc~os5 zyBqm>5*hq9O7>y23Y1slaLz6DW_#A5O*?gHg^mkje64F3mC{(o*6;5?#sgTN;UVMH z>3wE5{`|rE`n~x1H86yDbROr|aEjyYBoH`)I9nNE5w^|&_~QdDq9^WoB{FYr;`b=h zm?9&r3vM?s4{}_eY(8rJ4A{C)Rv<3=UFiKc;_v442IK)3+>5~7%W;G9pbKsQnEN?y zNFH**eGl|r$#Fa69WJ=v1@8B7PWg7qJ6&+!2j+)3ycOS>?mUp}0{tvhx z=D0ob9v2)Hro?f3<-IOAs!+!`4n|lP-2Z^yJsh`R-tU6@7;qoQIpuqW{0bM`AZWdY z(>ov^aKY^X<{^%|L%zcWw*#0H9CuJY=z=>8%s9v0Dc|XW>jUOh9Ct`Q4Bd=3$PzOFrU)y9<~}jyo!Y-F1gkeLLDf?~v`OouGA+)4NB$ z+XXiS%#U!~z3mu7Q-(!PgT0aLD4JBbR+hAtCsdf0hFL9E7lF*tt_oiju(pyJ3U)u! z#!ALK=w8yim0U@a)JpCxRkfn9h`4ZsW~xe7=Qhy_Hs_ljEpn!Lm)jtPX^N>bDyx>%Vm8NTI|NHw#Bpk;v}!Ty zOp=(->*6B++ms~Yxk{iO8RjU+UyYClNXJ8%QpsSle65?{;3@7!3nT%3dvr*i(PZJ0&k}}i@ zXPmO8)6|Gm(@w+*-s!C)%^zuF9MYR{r)ST6E>~8+O$9;PrOTdqa5U(#GLCxYhiTaP zk@fYx`1yIXl5|kd{3rO8@y7=nEk(&VTlLHld_XsQ%s$W}dI;l(y=VR>Ao5o@KZTyT z8D0Bv=yCTo(6jdd{v5QP<@EaHeiz&eNaedYKjlNu+y(cip!L_B-k@B2G4smd{RUm= zeFC)phSS?254qs}44A*=xSjG27u*am3mmtr?f2W+K+j$te+gQD$LZ~nce&t}!Gbs8 z{FHBRJ3T0@>7mxjn2*%3?U2uzAq*{q=%!G0H#=44Y-vr}hcUZnQa~rG`T5#Z9@Icx zje#c7^dd;3_VBqt7BNC<0oJsWZDJ2Tvr0LYF9$W06zH0oQ86a0#r&WRS$hi`rSJ>c z+?v@lb0lJbYR^|C4N4VLry#VV=urE3{Yxq?3e@f>Wyx$)ng;BcdfBA zV0WyUcv%J3D~2s_$cizDeH}$%W@6 zSuNw`OeY!l2ghjfhTF^t>R)MXRVNkgABORvghAsfT13@9Oqc%Q%9To4Szg1?1tTDB zn0t(5KL8VJTOj2bp2!_z^J6^bOzpWHfe_HYB!m7$3&&y&dWhoG!~dn4nz-c)Dg-^C3~H`&KxRIlEF$nJCC!S8?v!{~{9#tamGU~KId z5YETesXtdgFx_x0c$+(d>7APKb_CN6A16jV*Fk^Z%M(oR@=6_W*Y(KJxlm$pncVh8 zI_M4s#zwt1^x79CALZkmhH6Ar?j^D)Ie}NzY1n2v?2D57*=e@ApRv98w+9#++Z|@d z*%1uzq`uEHY5Zq>Uqs*;grC5CmNE9j&Bl*tRw?C|OIT>3GW)fQCYq*o?mhIw<0@B? zR62P!ygWD8fmDr6`Nur0E+kbuO=h2BRNd$!h7y=He07$YoQ6Qcx(5D3ci$kLZdlh^U>4ww`nY+v&AN~GM24rMO)Ck znpviaTw4%6(zIMH>uw9sw^Xmgn_@hbiY_G>hFF@Yxj5g zzO$3+Mg1YPdq3Cir2oio#{r17VF|8Bi#t?cdmR?R?f+78_pm=^&)$D8dl1PD&>|U5 za$XRj)=a$JX`5hj7&Q6*Gguh8 z4~0 z-luUiId^9vnZP_S%-QbqXY#;%z+74}N_&CcX=C&j4d=ah(9LK*Fg@k9%d(Hj1IJ+p zA`ZL*zqcU=y6^V}rzXgcgO?Bn%(FMN9~v zjx2>-m*UYdsFTJ&;Ggtp{HZJa3gn&67tksGGz3B%Tcr+o{#$x{6su~eZ&&Vs0m1Rf zNe|neirk990F4BH9OqYdU@t0M8p#9AXgdOx+-ZxE$36K`&D_2??SN zDjQ@_#@0=KnQ{k`BN(JXGZTZhNC|Ij4;FcrGq;m;pq1gg$*WnWJy?&ETK>cJb+S{v z3g>5V(jF|*(BklcOLRPf6XUg~Tb$My#|K(Ok3Z1x=NBQ4zmD@6@{Ztw`z2uB$8mk~ zpbPFj!2A}+VGouI?%lxr2FGC!mJ9Bef%#3289Qdhm|mf_pD8 zAK*B6M{vRYDli}9ICw{J!I75>TKe&fZ+AO;rp)c93irXONVNS)FBcizWduC;`pEm)s4iM>C+M$YmjoiLq!A_v`lZ8*c+c!47~MpLk2GM zz00~<(6F_gJc+`yp*=|KE)^LzBFTAXz7B4LSWX~q`7(TL*6rQkFIl$0*1HMkpe^%3 z+s_aoTtW(C1rry7J=_nf4QSu$MZ4MH6f=Vj?|jP^Zk2oiJ~U}tH(WFF6zX}3`3U%4 z9k#u!GXYVm4@qy~en;VxKzP!GcLDO636HFN8+*8RxmEg()OfV9YpbB-iXD1W-1hZHpLg-xeX^<-_(wa2JKTISIpO8; z&)9X6DP*}%VtqJ_!O)w35H^>H>g4q6T+MpA{N8hagIxrkGD}M2LmN>aQZ; zwI&z7fa|Z|v@wMk<9KWl$It+{Zb|BnXSemHq@Gqj?@dYFaWXJ9=H=++a|O2#RQEKu zo^uA7JJ6B|$C6bCt%qvO>$ zTTE)uM29tz;R7wA#~;8Snl};0OX-6c&=K3 z84tu)%s`@S%s5!CGwlvGH^Xrz{Mq;J1KG()BA!gQnr09SXLNmdRqwnQEnWJ-ya^~4))lKnr(Pm8rCp`Lz)MV|YCJUd4 zq%jeBKffEl)MUL5r#Oz8okgc63%Hs;RQlW`o#tV0vJQd%7|!b(XtIVH=vjgZ`obUT zbu?KbJ@Mib;i3IC%Jj*zy&A#mtM!`V%zvE~PiI5A(^b(`a_9xncL4j79;%b{{g;mq}~7k literal 0 HcmV?d00001 diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_checkbox.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_checkbox.vc2 new file mode 100644 index 0000000..e2ed69a --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_checkbox.vc2 @@ -0,0 +1,39 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_checkbox AS checkbox + *< CLASSDATA: Baseclass="checkbox" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Alignment = 0 + AutoSize = .T. + Caption = "Chk1" + Height = 17 + Name = "cl_checkbox" + test_aa = .F. + Width = 47 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_collection.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_collection.vc2 new file mode 100644 index 0000000..5dcd74a --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_collection.vc2 @@ -0,0 +1,36 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_collection AS collection + *< CLASSDATA: Baseclass="collection" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Height = 23 + Name = "cl_collection" + test_aa = .F. + Width = 23 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_combobox.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_combobox.vc2 new file mode 100644 index 0000000..bed3cd6 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_combobox.vc2 @@ -0,0 +1,116 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_combobox AS combobox + *< CLASSDATA: Baseclass="combobox" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Alignment = 0 + Anchor = 0 + BackColor = 255,255,255 + BorderColor = 255,0,0 + BorderStyle = 1 + BoundColumn = 1 + BoundTo = .F. + ColorScheme = 2 + ColorSource = 4 + ColumnCount = 0 + ColumnLines = .T. + ColumnWidths = "" + Comment = "" + ControlSource = "" + DisabledBackColor = 240,240,240 + DisabledForeColor = 109,109,109 + DisabledItemBackColor = 255,255,255 + DisabledItemForeColor = 109,109,109 + DisplayCount = 0 + DisplayValue = cl_combobox + DragIcon = ..\..\ + DragMode = 0 + Enabled = .T. + FirstElement = 1 + FontBold = .F. + FontCharSet = 0 + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 9 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + Format = "" + Height = 24 + HelpContextID = 0 + HideSelection = .T. + IMEMode = 0 + IncrementalSearch = .T. + InputMask = "" + ItemBackColor = 255,255,255 + ItemForeColor = 0,0,0 + ItemTips = .F. + Margin = 2 + MaxLength = 0 + MouseIcon = ..\..\ + MousePointer = 0 + Name = "cl_combobox" + NullDisplay = "" + NumberOfElements = 0 + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + OLEDropTextInsertion = 0 + Picture = ..\..\ + PictureSelectionDisplay = 0 + ReadOnly = .F. + RightToLeft = .F. + RowSource = "" + RowSourceType = 0 + SelectedBackColor = 51,153,255 + SelectedForeColor = 255,255,255 + SelectedItemBackColor = 51,153,255 + SelectedItemForeColor = 255,255,255 + SelectOnEntry = .F. + Sorted = .F. + SpecialEffect = 0 + StatusBarText = "" + Style = 0 + TabIndex = 1 + TabStop = .T. + Tag = "" + TerminateRead = .F. + test_aa = .F. + Themes = .T. + ToolTipText = "" + Value = + Visible = .T. + WhatsThisHelpID = -1 + Width = 60 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_commandbutton.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_commandbutton.vc2 new file mode 100644 index 0000000..987644e --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_commandbutton.vc2 @@ -0,0 +1,38 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_commandbutton AS commandbutton + *< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + AutoSize = .T. + Caption = "Cmd1" + Height = 27 + Name = "cl_commandbutton" + test_aa = .F. + Width = 52 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_commandgroup.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_commandgroup.vc2 new file mode 100644 index 0000000..2647faf --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_commandgroup.vc2 @@ -0,0 +1,57 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_commandgroup AS commandgroup + *< CLASSDATA: Baseclass="commandgroup" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + AutoSize = .T. + ButtonCount = 2 + Height = 66 + Name = "cl_commandgroup" + test_aa = .F. + Value = 1 + Width = 62 + Command1.AutoSize = .T. + Command1.BackColor = 255,128,128 + Command1.Caption = "Cmd1" + Command1.Height = 27 + Command1.Left = 5 + Command1.Name = "Command1" + Command1.Top = 5 + Command1.Width = 52 + Command2.AutoSize = .T. + Command2.BackColor = 255,128,128 + Command2.Caption = "Cmd2" + Command2.DisabledBackColor = 240,240,240 + Command2.DisabledForeColor = 109,109,109 + Command2.Height = 27 + Command2.Left = 5 + Command2.Name = "Command2" + Command2.Top = 34 + Command2.Width = 52 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_container.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_container.vc2 new file mode 100644 index 0000000..069e136 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_container.vc2 @@ -0,0 +1,36 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_container AS container + *< CLASSDATA: Baseclass="container" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Height = 33 + Name = "cl_container" + test_aa = .F. + Width = 123 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_control.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_control.vc2 new file mode 100644 index 0000000..1e5bbce --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_control.vc2 @@ -0,0 +1,36 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_control AS control + *< CLASSDATA: Baseclass="control" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Height = 32 + Name = "cl_control" + test_aa = .F. + Width = 77 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_cursor.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_cursor.vc2 new file mode 100644 index 0000000..6c8dff5 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_cursor.vc2 @@ -0,0 +1,28 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_cursor AS cursor + *< CLASSDATA: Baseclass="cursor" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Alias = "_alias" + BufferModeOverride = 1 + Comment = "" + CursorSource = ..\..\.dbf + Database = ..\..\ + Exclusive = .F. + Filter = "" + Height = 23 + Name = "cl_cursor" + NoDataOnLoad = .F. + Order = "" + OrderDirection = 0 + ReadOnly = .F. + Tag = "" + Width = 23 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_cursoradapter.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_cursoradapter.vc2 new file mode 100644 index 0000000..864ad1f --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_cursoradapter.vc2 @@ -0,0 +1,80 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_cursoradapter AS cursoradapter + *< CLASSDATA: Baseclass="cursoradapter" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + ADOCodePage = 0 + Alias = "h" + AllowDelete = .T. + AllowInsert = .T. + AllowSimultaneousFetch = .F. + AllowUpdate = .T. + BatchUpdateCount = 1 + BreakOnError = .F. + BufferModeOverride = 3 + Comment = "" + CompareMemo = .T. + ConflictCheckCmd = + ConflictCheckType = 0 + ConversionFunc = + CursorSchema = + DataSource = .NULL. + DataSourceType = "" + DeleteCmd = + DeleteCmdDataSource = .NULL. + DeleteCmdDataSourceType = "" + FetchAsNeeded = .F. + FetchMemo = .T. + FetchMemoCmdList = + FetchMemoDataSource = .NULL. + FetchMemoDataSourceType = "" + FetchSize = 100 + Flags = 0 + Height = 22 + InsertCmd = + InsertCmdDataSource = .NULL. + InsertCmdDataSourceType = "" + InsertCmdRefreshCmd = + InsertCmdRefreshFieldList = + InsertCmdRefreshKeyFieldList = + KeyFieldList = + MapBinary = .F. + MapVarchar = .F. + MaxRecords = -1 + Name = "cl_cursoradapter" + NoData = .F. + Prepared = .F. + RefreshCmd = + RefreshCmdDataSource = .NULL. + RefreshCmdDataSourceType = "" + RefreshIgnoreFieldList = + RefreshTimestamp = .F. + SelectCmd = + SendUpdates = .T. + Tables = + Tag = "" + TimestampFieldList = + UpdatableFieldList = + UpdateCmd = + UpdateCmdDataSource = .NULL. + UpdateCmdDataSourceType = "" + UpdateCmdRefreshCmd = + UpdateCmdRefreshFieldList = + UpdateCmdRefreshKeyFieldList = + UpdateGramSchemaLocation = "" + UpdateNameList = + UpdateType = 1 + UseCursorSchema = .F. + UseDeDataSource = .F. + UseMemoSize = 255 + UseTransactions = .T. + WhereType = 3 + Width = 23 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_dataenvironment.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_dataenvironment.vc2 new file mode 100644 index 0000000..4ddbf58 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_dataenvironment.vc2 @@ -0,0 +1,15 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_dataenvironment AS dataenvironment + *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + DataSource = .NULL. + Name = "cl_dataenvironment" + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_editbox.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_editbox.vc2 new file mode 100644 index 0000000..011b067 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_editbox.vc2 @@ -0,0 +1,36 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_editbox AS editbox + *< CLASSDATA: Baseclass="editbox" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Height = 41 + Name = "cl_editbox" + test_aa = .F. + Width = 75 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_grid.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_grid.vc2 new file mode 100644 index 0000000..11cd6e8 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_grid.vc2 @@ -0,0 +1,108 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_grid AS grid + *< CLASSDATA: Baseclass="grid" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Column1.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column1.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column2.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column2.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column3.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column3.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column4.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column4.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column5.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Column5.Text1" UniqueID="" Timestamp="" /> + + * + ColumnCount = 5 + Height = 160 + Left = 36 + Name = "grdEncuestas" + RecordSource = "encuestas" + RecordSourceType = 1 + Top = 44 + Width = 228 + Column1.ControlSource = "encuestas.promotor" + Column1.Name = "Column1" + Column2.ControlSource = "encuestas.idenc" + Column2.Name = "Column2" + Column3.ControlSource = "encuestas.calific" + Column3.Name = "Column3" + Column4.ControlSource = "encuestas.fecha" + Column4.Name = "Column4" + Column5.ControlSource = "encuestas.resultado" + Column5.Name = "Column5" + * + + ADD OBJECT 'Column1.Header1' AS header WITH ; + Caption = "promotor", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Column1.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Column2.Header1' AS header WITH ; + Caption = "idenc", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Column2.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Column3.Header1' AS header WITH ; + Caption = "calific", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Column3.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Column4.Header1' AS header WITH ; + Caption = "fecha", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Column4.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Column5.Header1' AS header WITH ; + Caption = "resultado", ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Column5.Text1' AS textbox WITH ; + BackColor = 255,255,255, ; + BorderStyle = 0, ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1" + *< END OBJECT: BaseClass="textbox" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_hyperlink.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_hyperlink.vc2 new file mode 100644 index 0000000..92d7204 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_hyperlink.vc2 @@ -0,0 +1,36 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_hyperlink AS hyperlink + *< CLASSDATA: Baseclass="hyperlink" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Height = 23 + Name = "cl_hyperlink" + test_aa = .F. + Width = 23 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_image.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_image.vc2 new file mode 100644 index 0000000..34436d7 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_image.vc2 @@ -0,0 +1,36 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_image AS image + *< CLASSDATA: Baseclass="image" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Height = 12 + Name = "cl_image" + test_aa = .F. + Width = 12 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_label.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_label.vc2 new file mode 100644 index 0000000..37b52ac --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_label.vc2 @@ -0,0 +1,37 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_label AS label + *< CLASSDATA: Baseclass="label" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Caption = "Label4" + Height = 17 + Name = "cl_label" + test_aa = .F. + Width = 104 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_line.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_line.vc2 new file mode 100644 index 0000000..5e2fc8c --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_line.vc2 @@ -0,0 +1,37 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_line AS line + *< CLASSDATA: Baseclass="line" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + BorderColor = 255,0,0 + Height = 8 + Name = "cl_line" + test_aa = .F. + Width = 50 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_listbox.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_listbox.vc2 new file mode 100644 index 0000000..71b61b5 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_listbox.vc2 @@ -0,0 +1,38 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_listbox AS listbox + *< CLASSDATA: Baseclass="listbox" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + BorderColor = 255,0,0 + Height = 24 + Name = "cl_listbox" + SpecialEffect = 1 + test_aa = .F. + Width = 95 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_olebound.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_olebound.vc2 new file mode 100644 index 0000000..6085b4d --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_olebound.vc2 @@ -0,0 +1,16 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_olebound AS oleboundcontrol + *< CLASSDATA: Baseclass="oleboundcontrol" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Height = 25 + Name = "cl_olebound" + Width = 100 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_option.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_option.vc2 new file mode 100644 index 0000000..63dcb51 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_option.vc2 @@ -0,0 +1,89 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_option AS optionbutton + *< CLASSDATA: Baseclass="optionbutton" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Alignment = 0 + Anchor = 0 + AutoSize = .T. + BackColor = 240,240,240 + BackStyle = 1 + Caption = "Option1" + ColorScheme = 1 + ColorSource = 4 + Comment = "" + ControlSource = "" + DisabledBackColor = 240,240,240 + DisabledForeColor = 109,109,109 + DisabledPicture = ..\..\ + DownPicture = ..\..\ + DragIcon = ..\..\ + DragMode = 0 + Enabled = .T. + FontBold = .F. + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 9 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + Height = 17 + HelpContextID = 0 + MouseIcon = ..\..\ + MousePointer = 0 + Name = "cl_option" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + Picture = ..\..\ + PictureMargin = 0 + PicturePosition = 13 + PictureSpacing = 0 + RightToLeft = .F. + SpecialEffect = 0 + StatusBarText = "" + Style = 0 + TabIndex = 1 + TabStop = .T. + Tag = "" + TerminateRead = .F. + test_aa = .F. + Themes = .T. + ToolTipText = "" + Value = 0 + Visible = .T. + WhatsThisHelpID = -1 + Width = 61 + WordWrap = .F. + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_optiongroup.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_optiongroup.vc2 new file mode 100644 index 0000000..5712f4b --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_optiongroup.vc2 @@ -0,0 +1,182 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_optiongroup AS optiongroup + *< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Anchor = 0 + AutoSize = .F. + BackColor = 240,240,240 + BackStyle = 1 + BorderColor = 100,100,100 + BorderStyle = 1 + ButtonCount = 2 + ColorSource = 4 + Comment = "" + ControlSource = "" + DragIcon = ..\..\ + DragMode = 0 + Enabled = .T. + Height = 46 + HelpContextID = 0 + MemberClassLibrary = ..\..\ + MouseIcon = ..\..\ + MousePointer = 0 + Name = "cl_optiongroup" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + SpecialEffect = 0 + StatusBarText = "" + TabIndex = 1 + Tag = "" + TerminateRead = .F. + test_aa = .F. + Themes = .T. + ToolTipText = "" + Value = 0 + Visible = .T. + WhatsThisHelpID = -1 + Width = 71 + Option1.Alignment = 0 + Option1.Anchor = 0 + Option1.AutoSize = .T. + Option1.BackColor = 240,240,240 + Option1.BackStyle = 1 + Option1.Caption = "Opt1" + Option1.ColorScheme = 1 + Option1.ColorSource = 4 + Option1.Comment = "" + Option1.ControlSource = "" + Option1.DisabledBackColor = 240,240,240 + Option1.DisabledForeColor = 109,109,109 + Option1.DisabledPicture = ..\..\ + Option1.DownPicture = ..\..\ + Option1.DragIcon = ..\..\ + Option1.DragMode = 0 + Option1.Enabled = .T. + Option1.FontBold = .F. + Option1.FontCharSet = 0 + Option1.FontCondense = .F. + Option1.FontExtend = .F. + Option1.FontItalic = .F. + Option1.FontName = "Arial" + Option1.FontOutline = .F. + Option1.FontShadow = .F. + Option1.FontSize = 9 + Option1.FontStrikethru = .F. + Option1.FontUnderline = .F. + Option1.ForeColor = 0,0,0 + Option1.Height = 17 + Option1.HelpContextID = 0 + Option1.Left = 5 + Option1.MouseIcon = ..\..\ + Option1.MousePointer = 0 + Option1.Name = "Option1" + Option1.OLEDragMode = 0 + Option1.OLEDragPicture = ..\..\ + Option1.OLEDropEffects = 3 + Option1.OLEDropMode = 0 + Option1.Picture = ..\..\ + Option1.PictureMargin = 0 + Option1.PicturePosition = 13 + Option1.PictureSpacing = 0 + Option1.RightToLeft = .F. + Option1.SpecialEffect = 0 + Option1.StatusBarText = "" + Option1.Style = 0 + Option1.TabStop = .T. + Option1.Tag = "" + Option1.TerminateRead = .F. + Option1.Themes = .T. + Option1.ToolTipText = "" + Option1.Top = 5 + Option1.Value = 0 + Option1.Visible = .T. + Option1.WhatsThisHelpID = -1 + Option1.Width = 44 + Option1.WordWrap = .F. + Option2.Alignment = 0 + Option2.Anchor = 0 + Option2.BackColor = 255,128,128 + Option2.BackStyle = 1 + Option2.Caption = "Opt2" + Option2.ColorScheme = 1 + Option2.ColorSource = 4 + Option2.Comment = "" + Option2.ControlSource = "" + Option2.DisabledBackColor = 240,240,240 + Option2.DisabledForeColor = 109,109,109 + Option2.DisabledPicture = ..\..\ + Option2.DownPicture = ..\..\ + Option2.DragIcon = ..\..\ + Option2.DragMode = 0 + Option2.Enabled = .T. + Option2.FontBold = .F. + Option2.FontCharSet = 0 + Option2.FontCondense = .F. + Option2.FontExtend = .F. + Option2.FontItalic = .F. + Option2.FontName = "Arial" + Option2.FontOutline = .F. + Option2.FontShadow = .F. + Option2.FontSize = 9 + Option2.FontStrikethru = .F. + Option2.FontUnderline = .F. + Option2.ForeColor = 0,0,0 + Option2.Height = 17 + Option2.HelpContextID = 0 + Option2.Left = 5 + Option2.MouseIcon = ..\..\ + Option2.MousePointer = 0 + Option2.Name = "Option2" + Option2.OLEDragMode = 0 + Option2.OLEDragPicture = ..\..\ + Option2.OLEDropEffects = 3 + Option2.OLEDropMode = 0 + Option2.Picture = ..\..\ + Option2.PictureMargin = 0 + Option2.PicturePosition = 13 + Option2.PictureSpacing = 0 + Option2.RightToLeft = .F. + Option2.SpecialEffect = 0 + Option2.StatusBarText = "" + Option2.Style = 0 + Option2.TabStop = .T. + Option2.Tag = "" + Option2.TerminateRead = .F. + Option2.Themes = .T. + Option2.ToolTipText = "" + Option2.Top = 24 + Option2.Value = 0 + Option2.Visible = .T. + Option2.WhatsThisHelpID = -1 + Option2.Width = 44 + Option2.WordWrap = .F. + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_page.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_page.vc2 new file mode 100644 index 0000000..71706b0 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_page.vc2 @@ -0,0 +1,37 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_page AS page + *< CLASSDATA: Baseclass="page" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Caption = "Page1" + Height = 44 + Name = "cl_page" + test_aa = .F. + Width = 89 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_pageframe.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_pageframe.vc2 new file mode 100644 index 0000000..20165e0 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_pageframe.vc2 @@ -0,0 +1,42 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_pageframe AS pageframe + *< CLASSDATA: Baseclass="pageframe" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + ErasePage = .T. + Height = 111 + Name = "cl_pageframe" + PageCount = 2 + test_aa = .F. + Width = 175 + Page1.Caption = "Page1" + Page1.Name = "Page1" + Page2.Caption = "Page2" + Page2.Name = "Page2" + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_projecthook.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_projecthook.vc2 new file mode 100644 index 0000000..d0d1566 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_projecthook.vc2 @@ -0,0 +1,20 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_projecthook AS projecthook + *< CLASSDATA: Baseclass="projecthook" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Comment = "" + Height = 22 + Name = "cl_projecthook" + OLEDropEffects = 3 + OLEDropMode = 1 + Tag = "" + Width = 23 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_relation.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_relation.vc2 new file mode 100644 index 0000000..f13e4a1 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_relation.vc2 @@ -0,0 +1,23 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_relation AS relation + *< CLASSDATA: Baseclass="relation" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + ChildAlias = "" + ChildOrder = "" + Comment = "" + Height = 23 + Name = "cl_relation" + OneToMany = .F. + ParentAlias = "" + RelationalExpr = "" + Tag = "" + Width = 23 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_reportlistener.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_reportlistener.vc2 new file mode 100644 index 0000000..739fbd4 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_reportlistener.vc2 @@ -0,0 +1,31 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_reportlistener AS reportlistener + *< CLASSDATA: Baseclass="reportlistener" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + AllowModalMessages = .F. + CallAdjustObjectSize = 0 + CallEvaluateContents = 0 + CommandClauses = .NULL. + Comment = "" + CurrentDataSession = 1 + CurrentPass = 0 + DynamicLineHeight = .T. + FRXDataSession = -1 + Height = 23 + Name = "cl_reportlistener" + PreviewContainer = .NULL. + PrintJobName = "" + QuietMode = .F. + SendGDIPlusImage = 0 + Tag = "" + TwoPassProcess = .F. + Width = 23 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_separator.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_separator.vc2 new file mode 100644 index 0000000..a868d8f --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_separator.vc2 @@ -0,0 +1,21 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_separator AS separator + *< CLASSDATA: Baseclass="separator" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Comment = "" + Enabled = .T. + Height = 0 + Name = "cl_separator" + Style = 0 + Tag = "" + Visible = .T. + Width = 0 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_shape.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_shape.vc2 new file mode 100644 index 0000000..98448bb --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_shape.vc2 @@ -0,0 +1,38 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_shape AS shape + *< CLASSDATA: Baseclass="shape" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Height = 17 + Name = "cl_shape" + SpecialEffect = 0 + Style = 0 + test_aa = .F. + Width = 50 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_spinner.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_spinner.vc2 new file mode 100644 index 0000000..08ceeca --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_spinner.vc2 @@ -0,0 +1,37 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_spinner AS spinner + *< CLASSDATA: Baseclass="spinner" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + FontSize = 12 + Height = 28 + Name = "cl_spinner" + test_aa = .F. + Width = 50 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_textbox.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_textbox.vc2 new file mode 100644 index 0000000..aba0e69 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_textbox.vc2 @@ -0,0 +1,109 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_textbox AS textbox + *< CLASSDATA: Baseclass="textbox" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Alignment = 3 + Anchor = 0 + AutoComplete = 0 + AutoCompSource = "" + AutoCompTable = "" + BackColor = 255,255,255 + BackStyle = 1 + BorderColor = 100,100,100 + BorderStyle = 1 + Century = 1 + ColorScheme = 1 + ColorSource = 4 + Comment = "" + ControlSource = "" + DateFormat = 0 + DateMark = "" + DisabledBackColor = 240,240,240 + DisabledForeColor = 109,109,109 + DragIcon = ..\..\ + DragMode = 0 + Enabled = .T. + EnableHyperlinks = .F. + FontBold = .F. + FontCharSet = 0 + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 9 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + Format = "" + Height = 23 + HelpContextID = 0 + HideSelection = .T. + Hours = 0 + IMEMode = 0 + InputMask = "" + IntegralHeight = .F. + Margin = 2 + MaxLength = 0 + MemoWindow = "" + MouseIcon = ..\..\ + MousePointer = 0 + Name = "cl_textbox" + NullDisplay = "" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + OLEDropTextInsertion = 0 + OpenWindow = .F. + PasswordChar = "" + ReadOnly = .F. + RightToLeft = .F. + Seconds = 2 + SelectedBackColor = 51,153,255 + SelectedForeColor = 255,255,255 + SelectOnEntry = .F. + SpecialEffect = 0 + StatusBarText = "" + StrictDateEntry = 1 + Style = 0 + TabIndex = 1 + TabStop = .T. + Tag = "" + TerminateRead = .F. + test_aa = .F. + Themes = .T. + ToolTipText = "" + Value = + Visible = .T. + WhatsThisHelpID = -1 + Width = 50 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_timer.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_timer.vc2 new file mode 100644 index 0000000..5197b56 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_timer.vc2 @@ -0,0 +1,36 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_timer AS timer + *< CLASSDATA: Baseclass="timer" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: test_aa_access + *m: test_aa_assign + *p: test_aa + * + + * + Height = 23 + Name = "cl_timer" + test_aa = .F. + Width = 23 + * + + PROCEDURE test_aa_access + *To do: Modify this routine for the Access method + RETURN THIS.test_aa + + ENDPROC + + PROCEDURE test_aa_assign + LPARAMETERS vNewVal + *To do: Modify this routine for the Assign method + THIS.test_aa = m.vNewVal + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_toolbar.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_toolbar.vc2 new file mode 100644 index 0000000..90d095c --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_toolbar.vc2 @@ -0,0 +1,60 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_toolbar AS toolbar + *< CLASSDATA: Baseclass="toolbar" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_separator1" UniqueID="" Timestamp="" /> + + * + BackColor = 240,240,240 + Caption = "Toolbar1" + ColorSource = 4 + Comment = "" + ControlBox = .T. + DataSession = 1 + DefLeft = + DefTop = + Enabled = .T. + ForeColor = 0,0,0 + HelpContextID = 0 + KeyPreview = .F. + Left = (0) + LockScreen = .F. + MouseIcon = ..\..\ + MousePointer = 0 + Movable = .T. + Name = "cl_toolbar" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + ScaleMode = 3 + ShowTips = .T. + ShowWindow = 0 + Sizable = .T. + Tag = "" + Themes = .T. + Top = (0) + Visible = .T. + WhatsThisHelpID = -1 + * + + ADD OBJECT 'Cl_separator1' AS cl_separator WITH ; + Comment = "Separador de Toolbar", ; + Enabled = .T., ; + Height = 0, ; + Left = 5, ; + Name = "Cl_separator1", ; + Style = 0, ; + Tag = "", ; + Top = 3, ; + Visible = .T., ; + Width = 0 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="separator" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_xmladapter.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_xmladapter.vc2 new file mode 100644 index 0000000..f695437 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_xmladapter.vc2 @@ -0,0 +1,56 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_xmladapter AS xmladapter + *< CLASSDATA: Baseclass="xmladapter" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Tables" UniqueID="" Timestamp="" /> + + * + CodePage = 0 + Comment = "" + DeclareXMLPrefix = .F. + DisableEncode = .F. + ForceCloseTag = .F. + FormattedOutput = .T. + Height = 56 + IsDiffgram = .F. + MapBinary = .F. + MapN19_4ToCurrency = .F. + MapVarchar = .F. + Name = "cl_xmladapter" + NoCpTrans = .F. + PreserveWhiteSpace = .F. + RespectCursorCP = .F. + RespectNesting = .F. + SelectionNamespaces = + Tag = "" + Unicode = .F. + UseCodePage = .F. + UTF8Encoded = .F. + Width = 56 + WrapCharInCDATA = .F. + WrapMemoInCDATA = .F. + XMLName = + XMLNameIsXPath = .F. + XMLNamespace = + XMLPrefix = + XMLSchemaLocation = ..\..\ + * + + ADD OBJECT 'Tables' AS collection WITH ; + Comment = "", ; + Height = 23, ; + KeySort = 0, ; + Left = 23, ; + Name = "Tables", ; + Tag = "", ; + Top = 23, ; + Width = 23 + *< END OBJECT: BaseClass="collection" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_xmlfield.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_xmlfield.vc2 new file mode 100644 index 0000000..cab396a --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_xmlfield.vc2 @@ -0,0 +1,38 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_xmlfield AS xmlfield + *< CLASSDATA: Baseclass="xmlfield" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Alias = "" + CodePage = 0 + Comment = "" + DataType = "" + DisableEncode = .F. + FractionDigits = -1 + Height = 23 + IsAttribute = .F. + IsBase64 = .F. + IsBinary = .F. + IsNull = .F. + Keyfield = .F. + MaxLength = -1 + Name = "cl_xmlfield" + NoCpTrans = .F. + Tag = "" + Unicode = .F. + Width = 23 + WrapInCDATA = .F. + XMLName = + XMLNameIsXPath = .F. + XSDfractionDigits = "" + XSDmaxLength = "" + XSDtotalDigits = "" + XSDtype = "" + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.cl_xmltable.vc2 b/TESTS/DATOS_READONLY/lib_controles.cl_xmltable.vc2 new file mode 100644 index 0000000..0c07c53 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.cl_xmltable.vc2 @@ -0,0 +1,40 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cl_xmltable AS xmltable + *< CLASSDATA: Baseclass="xmltable" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Fields" UniqueID="" Timestamp="" /> + + * + Alias = "" + ChildTable = .NULL. + CodePage = 0 + Comment = "" + DeclareXMLPrefix = .F. + FirstNestedTable = .NULL. + Height = 56 + Name = "cl_xmltable" + NestedInto = .NULL. + NextSiblingTable = .NULL. + Tag = "" + Width = 56 + XMLName = + XMLNameIsXPath = .F. + XMLNamespace = + XMLPrefix = + * + + ADD OBJECT 'Fields' AS collection WITH ; + Height = 23, ; + Left = 23, ; + Name = "Fields", ; + Top = 23, ; + Width = 23 + *< END OBJECT: BaseClass="collection" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_base.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_base.vc2 new file mode 100644 index 0000000..7a9b26a --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_base.vc2 @@ -0,0 +1,137 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_base AS form + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Edit1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Label3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="cmdCapturar" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Label2" UniqueID="" Timestamp="" /> + + * + *m: capturarpantallaabitmap + *p: c_testname + * + + * + AlwaysOnTop = .T. + BackColor = 192,192,192 + Caption = "OptionGroup_Test" + c_testname = OptionGroup_Test + DoCreate = .T. + Height = 424 + Left = 0 + Name = "f_base" + Top = 0 + Width = 819 + * + + ADD OBJECT 'cmdCapturar' AS commandbutton WITH ; + Caption = "Capturar Pantalla", ; + Height = 27, ; + Left = 564, ; + Name = "cmdCapturar", ; + TabIndex = 1, ; + Top = 392, ; + Width = 248 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'Edit1' AS editbox WITH ; + Height = 356, ; + Left = 564, ; + Name = "Edit1", ; + ReadOnly = .T., ; + TabIndex = 2, ; + Top = 32, ; + Value = , ; + Width = 249 + *< END OBJECT: BaseClass="editbox" /> + + ADD OBJECT 'Label1' AS label WITH ; + Alignment = 2, ; + Caption = "OPTIONGROUP NORMAL", ; + FontBold = .T., ; + Height = 17, ; + Left = 28, ; + Name = "Label1", ; + TabIndex = 4, ; + Top = 8, ; + Width = 244 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Label2' AS label WITH ; + Alignment = 2, ; + Caption = "OPTIONGROUP SUBCLASADOS", ; + FontBold = .T., ; + Height = 17, ; + Left = 296, ; + Name = "Label2", ; + TabIndex = 5, ; + Top = 8, ; + Width = 248 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Label3' AS label WITH ; + Alignment = 2, ; + Caption = "OBSERVACIONES", ; + FontBold = .T., ; + Height = 17, ; + Left = 564, ; + Name = "Label3", ; + TabIndex = 3, ; + Top = 8, ; + Width = 248 + *< END OBJECT: BaseClass="label" /> + + PROCEDURE capturarpantallaabitmap + LPARAMETERS tcFilename + + LOCAL retVal + tcFilename = EVL(tcFilename, 'optiongroup') + + IF NOT '\' $ tcFilename + tcFilename = SYS(5) + ADDBS(CURDIR()) + "TESTS\DATOS_TEST\" + tcFilename + '.bmp' + ENDIF + + Declare Integer formtobmp IN "PCT_DLL.dll" integer hwnd,String bmpFileName + retVal = formtobmp( THISFORM.HWnd, tcFilename ) + + *Declare Integer formtobmpA IN "TESTS\PCT_DLL.dll" string bmpfilename,integer nX,integer nY,integer nX2,integer nY2 + + *retVal = formtobmpA( "c:\desa\foxbin2prg\screen0.bmp" ; + , THIS.Left ; + , this.Top ; + , this.Left + this.Width ; + , this.Top + this.Height ) && Save screen to file c:\screen.bmp + CLEAR DLLS formtobmp + + RETURN retVal + + ENDPROC + + PROCEDURE Init + SET PATH TO (FULLPATH("..\", THIS.ClassLibrary)) ADDITIVE + THISFORM.cmdCapturar.SetFocus() + + ENDPROC + + PROCEDURE Refresh + DODEFAULT() + INKEY(0.01,"S") + DOEVENTS FORCE + this.capturarpantallaabitmap( THISFORM.c_testname ) + + ENDPROC + + PROCEDURE cmdCapturar.Click + THISFORM.capturarpantallaabitmap() + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_checkbox.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_checkbox.vc2 new file mode 100644 index 0000000..98ac43f --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_checkbox.vc2 @@ -0,0 +1,818 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_checkbox AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_checkbox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Check1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_checkbox2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Check2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_checkbox3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Check3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_checkbox4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Check4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Check5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Check6" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Left = 0 + Name = "f_checkbox" + Top = 1 + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "CHECKBOX NORMAL" + Label1.Name = "Label1" + Label2.Caption = "CHECKBOX SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Check1' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 64, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 72, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Check2' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 64, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 96, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Cl_checkbox1' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 340, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 72, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Cl_checkbox2' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 340, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 96, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 76, ; + Left = 24, ; + Name = "Container1", ; + Top = 152, ; + Width = 516 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Check3' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 40, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Container1.Check4' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 40, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 40, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Container1.Cl_checkbox3' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 316, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Container1.Cl_checkbox4' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 316, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 40, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 113, ; + Left = 24, ; + Name = "Pageframe1", ; + PageCount = 2, ; + Top = 276, ; + Width = 517, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Check5' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 35, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Pageframe1.Page1.Check6' AS checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox normal", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 35, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Check6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 40, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 152, ; + WordWrap = .F. + *< END OBJECT: BaseClass="checkbox" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_checkbox5' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 311, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 16, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_checkbox6' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Checkbox subclasado", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 21, ; + HelpContextID = 0, ; + Left = 311, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_checkbox6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + PictureMargin = 0, ; + PicturePosition = 13, ; + PictureSpacing = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 40, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 156, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_combobox.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_combobox.vc2 new file mode 100644 index 0000000..cbd6c4b --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_combobox.vc2 @@ -0,0 +1,1237 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_combobox AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.ComboList1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.ComboDropdown1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="ComboDropdown1" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Name = "f_combobox" + Edit1.Name = "Edit1" + Edit1.TabIndex = 2 + Label3.Name = "Label3" + Label3.TabIndex = 3 + Command2.Name = "Command2" + Command2.TabIndex = 1 + Label1.Caption = "COMBOBOX NORMAL" + Label1.Name = "Label1" + Label1.TabIndex = 4 + Label2.Caption = "COMBOBOX SUBCLASADOS" + Label2.Name = "Label2" + Label2.TabIndex = 5 + * + + ADD OBJECT 'Cl_ComboDropdown1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 328, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Cl_ComboList1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 328, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 7, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 76, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'ComboDropdown1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 48, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'ComboList1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 48, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 76, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 97, ; + Left = 28, ; + Name = "Container1", ; + TabIndex = 9, ; + Top = 116, ; + Width = 512 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Cl_ComboDropdown1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 300, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 20, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Container1.Cl_ComboList1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 300, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 7, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 52, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Container1.ComboDropdown1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 20, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 20, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'Container1.ComboList1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 20, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 52, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 153, ; + Left = 28, ; + Name = "Pageframe1", ; + PageCount = 2, ; + TabIndex = 10, ; + Top = 236, ; + Width = 513, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_ComboDropdown1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 299, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_ComboList1' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 299, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 7, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'Pageframe1.Page1.ComboDropdown1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 19, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboDropdown1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .T., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + ADD OBJECT 'Pageframe1.Page1.ComboList1' AS combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 255,255,0, ; + BorderStyle = 1, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 19, ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "ComboList1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\sobrepostal.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 2, ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 200 + *< END OBJECT: BaseClass="combobox" /> + + PROCEDURE Cl_ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Cl_ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.Cl_ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.Cl_ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.Cl_ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.Cl_ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.ComboDropdown1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.ComboList1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_commandgroup.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_commandgroup.vc2 new file mode 100644 index 0000000..4b81fb9 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_commandgroup.vc2 @@ -0,0 +1,1277 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_commandgroup AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_commandgroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Commandgroup1" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Left = 0 + Name = "f_commandgroup" + Top = 0 + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "COMMANDGROUP NORMAL" + Label1.Name = "Label1" + Label2.Caption = "COMMANDGROUP SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_commandgroup1' AS cl_commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 304, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 128,255,128, ; + Command1.Cancel = .F., ; + Command1.Caption = "Este es el botón de comando 1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 0,128,192, ; + Command1.DisabledForeColor = 128,0,255, ; + Command1.DisabledPicture = bmps\treeview.bmp, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 21, ; + Command1.HelpContextID = 0, ; + Command1.Left = 4, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 200, ; + Command1.WordWrap = .F., ; + Command2.Alignment = 2, ; + Command2.Anchor = 0, ; + Command2.AutoSize = .F., ; + Command2.BackColor = 128,255,128, ; + Command2.Cancel = .F., ; + Command2.Caption = "Este es el botón de comando 2", ; + Command2.ColorScheme = 1, ; + Command2.ColorSource = 4, ; + Command2.Comment = "", ; + Command2.Default = .F., ; + Command2.DisabledBackColor = 0,128,192, ; + Command2.DisabledForeColor = 128,0,255, ; + Command2.DisabledPicture = bmps\treeview.bmp, ; + Command2.DownPicture = ..\..\, ; + Command2.DragIcon = ..\..\, ; + Command2.DragMode = 0, ; + Command2.Enabled = .F., ; + Command2.FontBold = .F., ; + Command2.FontCharSet = 0, ; + Command2.FontCondense = .F., ; + Command2.FontExtend = .F., ; + Command2.FontItalic = .F., ; + Command2.FontName = "Arial", ; + Command2.FontOutline = .F., ; + Command2.FontShadow = .F., ; + Command2.FontSize = 8, ; + Command2.FontStrikethru = .F., ; + Command2.FontUnderline = .F., ; + Command2.ForeColor = 0,0,0, ; + Command2.Height = 21, ; + Command2.HelpContextID = 0, ; + Command2.Left = 4, ; + Command2.MouseIcon = ..\..\, ; + Command2.MousePointer = 0, ; + Command2.Name = "Command2", ; + Command2.OLEDragMode = 0, ; + Command2.OLEDragPicture = ..\..\, ; + Command2.OLEDropEffects = 3, ; + Command2.OLEDropMode = 0, ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PictureMargin = 0, ; + Command2.PicturePosition = 4, ; + Command2.PictureSpacing = 0, ; + Command2.RightToLeft = .F., ; + Command2.SpecialEffect = 0, ; + Command2.StatusBarText = "", ; + Command2.Style = 0, ; + Command2.TabStop = .T., ; + Command2.Tag = "", ; + Command2.TerminateRead = .F., ; + Command2.Themes = .T., ; + Command2.ToolTipText = "", ; + Command2.Top = 28, ; + Command2.Visible = .T., ; + Command2.WhatsThisHelpID = -1, ; + Command2.Width = 200, ; + Command2.WordWrap = .F., ; + Command3.Alignment = 2, ; + Command3.Anchor = 0, ; + Command3.AutoSize = .F., ; + Command3.BackColor = 128,255,128, ; + Command3.Cancel = .F., ; + Command3.Caption = "Este es el botón de comando 3", ; + Command3.ColorScheme = 1, ; + Command3.ColorSource = 4, ; + Command3.Comment = "", ; + Command3.Default = .F., ; + Command3.DisabledBackColor = 0,128,192, ; + Command3.DisabledForeColor = 128,0,255, ; + Command3.DisabledPicture = bmps\treeview.bmp, ; + Command3.DownPicture = ..\..\, ; + Command3.DragIcon = ..\..\, ; + Command3.DragMode = 0, ; + Command3.Enabled = .T., ; + Command3.FontBold = .F., ; + Command3.FontCharSet = 0, ; + Command3.FontCondense = .F., ; + Command3.FontExtend = .F., ; + Command3.FontItalic = .F., ; + Command3.FontName = "Arial", ; + Command3.FontOutline = .F., ; + Command3.FontShadow = .F., ; + Command3.FontSize = 8, ; + Command3.FontStrikethru = .F., ; + Command3.FontUnderline = .F., ; + Command3.ForeColor = 0,0,0, ; + Command3.Height = 21, ; + Command3.HelpContextID = 0, ; + Command3.Left = 4, ; + Command3.MouseIcon = ..\..\, ; + Command3.MousePointer = 0, ; + Command3.Name = "Command3", ; + Command3.OLEDragMode = 0, ; + Command3.OLEDragPicture = ..\..\, ; + Command3.OLEDropEffects = 3, ; + Command3.OLEDropMode = 0, ; + Command3.Picture = bmps\sobrepostal.bmp, ; + Command3.PictureMargin = 0, ; + Command3.PicturePosition = 4, ; + Command3.PictureSpacing = 0, ; + Command3.RightToLeft = .F., ; + Command3.SpecialEffect = 0, ; + Command3.StatusBarText = "", ; + Command3.Style = 0, ; + Command3.TabStop = .T., ; + Command3.Tag = "", ; + Command3.TerminateRead = .F., ; + Command3.Themes = .T., ; + Command3.ToolTipText = "", ; + Command3.Top = 52, ; + Command3.Visible = .T., ; + Command3.WhatsThisHelpID = -1, ; + Command3.Width = 200, ; + Command3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 36, ; + MemberClass = "cl_commandbutton", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Cl_commandbutton1.Alignment = 2, ; + Cl_commandbutton1.Anchor = 0, ; + Cl_commandbutton1.AutoSize = .F., ; + Cl_commandbutton1.BackColor = 128,255,128, ; + Cl_commandbutton1.Cancel = .F., ; + Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; + Cl_commandbutton1.ColorScheme = 1, ; + Cl_commandbutton1.ColorSource = 4, ; + Cl_commandbutton1.Comment = "", ; + Cl_commandbutton1.Default = .F., ; + Cl_commandbutton1.DisabledBackColor = 0,128,192, ; + Cl_commandbutton1.DisabledForeColor = 128,0,255, ; + Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton1.DownPicture = ..\..\, ; + Cl_commandbutton1.DragIcon = ..\..\, ; + Cl_commandbutton1.DragMode = 0, ; + Cl_commandbutton1.Enabled = .T., ; + Cl_commandbutton1.FontBold = .F., ; + Cl_commandbutton1.FontCharSet = 0, ; + Cl_commandbutton1.FontCondense = .F., ; + Cl_commandbutton1.FontExtend = .F., ; + Cl_commandbutton1.FontItalic = .F., ; + Cl_commandbutton1.FontName = "Arial", ; + Cl_commandbutton1.FontOutline = .F., ; + Cl_commandbutton1.FontShadow = .F., ; + Cl_commandbutton1.FontSize = 8, ; + Cl_commandbutton1.FontStrikethru = .F., ; + Cl_commandbutton1.FontUnderline = .F., ; + Cl_commandbutton1.Height = 21, ; + Cl_commandbutton1.HelpContextID = 0, ; + Cl_commandbutton1.Left = 8, ; + Cl_commandbutton1.MouseIcon = ..\..\, ; + Cl_commandbutton1.MousePointer = 0, ; + Cl_commandbutton1.Name = "Cl_commandbutton1", ; + Cl_commandbutton1.OLEDragMode = 0, ; + Cl_commandbutton1.OLEDragPicture = ..\..\, ; + Cl_commandbutton1.OLEDropEffects = 3, ; + Cl_commandbutton1.OLEDropMode = 0, ; + Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton1.PictureMargin = 0, ; + Cl_commandbutton1.PicturePosition = 4, ; + Cl_commandbutton1.PictureSpacing = 0, ; + Cl_commandbutton1.RightToLeft = .F., ; + Cl_commandbutton1.SpecialEffect = 0, ; + Cl_commandbutton1.StatusBarText = "", ; + Cl_commandbutton1.Style = 0, ; + Cl_commandbutton1.TabStop = .T., ; + Cl_commandbutton1.Tag = "", ; + Cl_commandbutton1.TerminateRead = .F., ; + Cl_commandbutton1.Themes = .T., ; + Cl_commandbutton1.ToolTipText = "", ; + Cl_commandbutton1.Top = 4, ; + Cl_commandbutton1.Visible = .T., ; + Cl_commandbutton1.WhatsThisHelpID = -1, ; + Cl_commandbutton1.Width = 200, ; + Cl_commandbutton1.WordWrap = .F., ; + Cl_commandbutton2.Alignment = 2, ; + Cl_commandbutton2.Anchor = 0, ; + Cl_commandbutton2.AutoSize = .F., ; + Cl_commandbutton2.BackColor = 128,255,128, ; + Cl_commandbutton2.Cancel = .F., ; + Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; + Cl_commandbutton2.ColorScheme = 1, ; + Cl_commandbutton2.ColorSource = 4, ; + Cl_commandbutton2.Comment = "", ; + Cl_commandbutton2.Default = .F., ; + Cl_commandbutton2.DisabledBackColor = 0,128,192, ; + Cl_commandbutton2.DisabledForeColor = 128,0,255, ; + Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton2.DownPicture = ..\..\, ; + Cl_commandbutton2.DragIcon = ..\..\, ; + Cl_commandbutton2.DragMode = 0, ; + Cl_commandbutton2.Enabled = .F., ; + Cl_commandbutton2.FontBold = .F., ; + Cl_commandbutton2.FontCharSet = 0, ; + Cl_commandbutton2.FontCondense = .F., ; + Cl_commandbutton2.FontExtend = .F., ; + Cl_commandbutton2.FontItalic = .F., ; + Cl_commandbutton2.FontName = "Arial", ; + Cl_commandbutton2.FontOutline = .F., ; + Cl_commandbutton2.FontShadow = .F., ; + Cl_commandbutton2.FontSize = 8, ; + Cl_commandbutton2.FontStrikethru = .F., ; + Cl_commandbutton2.FontUnderline = .F., ; + Cl_commandbutton2.Height = 21, ; + Cl_commandbutton2.HelpContextID = 0, ; + Cl_commandbutton2.Left = 8, ; + Cl_commandbutton2.MouseIcon = ..\..\, ; + Cl_commandbutton2.MousePointer = 0, ; + Cl_commandbutton2.Name = "Cl_commandbutton2", ; + Cl_commandbutton2.OLEDragMode = 0, ; + Cl_commandbutton2.OLEDragPicture = ..\..\, ; + Cl_commandbutton2.OLEDropEffects = 3, ; + Cl_commandbutton2.OLEDropMode = 0, ; + Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton2.PictureMargin = 0, ; + Cl_commandbutton2.PicturePosition = 4, ; + Cl_commandbutton2.PictureSpacing = 0, ; + Cl_commandbutton2.RightToLeft = .F., ; + Cl_commandbutton2.SpecialEffect = 0, ; + Cl_commandbutton2.StatusBarText = "", ; + Cl_commandbutton2.Style = 0, ; + Cl_commandbutton2.TabStop = .T., ; + Cl_commandbutton2.Tag = "", ; + Cl_commandbutton2.TerminateRead = .F., ; + Cl_commandbutton2.Themes = .T., ; + Cl_commandbutton2.ToolTipText = "", ; + Cl_commandbutton2.Top = 28, ; + Cl_commandbutton2.Visible = .T., ; + Cl_commandbutton2.WhatsThisHelpID = -1, ; + Cl_commandbutton2.Width = 200, ; + Cl_commandbutton2.WordWrap = .F., ; + Cl_commandbutton3.Alignment = 2, ; + Cl_commandbutton3.Anchor = 0, ; + Cl_commandbutton3.AutoSize = .F., ; + Cl_commandbutton3.BackColor = 128,255,128, ; + Cl_commandbutton3.Cancel = .F., ; + Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; + Cl_commandbutton3.ColorScheme = 1, ; + Cl_commandbutton3.ColorSource = 4, ; + Cl_commandbutton3.Comment = "", ; + Cl_commandbutton3.Default = .F., ; + Cl_commandbutton3.DisabledBackColor = 0,128,192, ; + Cl_commandbutton3.DisabledForeColor = 128,0,255, ; + Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton3.DownPicture = ..\..\, ; + Cl_commandbutton3.DragIcon = ..\..\, ; + Cl_commandbutton3.DragMode = 0, ; + Cl_commandbutton3.Enabled = .T., ; + Cl_commandbutton3.FontBold = .F., ; + Cl_commandbutton3.FontCharSet = 0, ; + Cl_commandbutton3.FontCondense = .F., ; + Cl_commandbutton3.FontExtend = .F., ; + Cl_commandbutton3.FontItalic = .F., ; + Cl_commandbutton3.FontName = "Arial", ; + Cl_commandbutton3.FontOutline = .F., ; + Cl_commandbutton3.FontShadow = .F., ; + Cl_commandbutton3.FontSize = 8, ; + Cl_commandbutton3.FontStrikethru = .F., ; + Cl_commandbutton3.FontUnderline = .F., ; + Cl_commandbutton3.Height = 21, ; + Cl_commandbutton3.HelpContextID = 0, ; + Cl_commandbutton3.Left = 8, ; + Cl_commandbutton3.MouseIcon = ..\..\, ; + Cl_commandbutton3.MousePointer = 0, ; + Cl_commandbutton3.Name = "Cl_commandbutton3", ; + Cl_commandbutton3.OLEDragMode = 0, ; + Cl_commandbutton3.OLEDragPicture = ..\..\, ; + Cl_commandbutton3.OLEDropEffects = 3, ; + Cl_commandbutton3.OLEDropMode = 0, ; + Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton3.PictureMargin = 0, ; + Cl_commandbutton3.PicturePosition = 4, ; + Cl_commandbutton3.PictureSpacing = 0, ; + Cl_commandbutton3.RightToLeft = .F., ; + Cl_commandbutton3.SpecialEffect = 0, ; + Cl_commandbutton3.StatusBarText = "", ; + Cl_commandbutton3.Style = 0, ; + Cl_commandbutton3.TabStop = .T., ; + Cl_commandbutton3.Tag = "", ; + Cl_commandbutton3.TerminateRead = .F., ; + Cl_commandbutton3.Themes = .T., ; + Cl_commandbutton3.ToolTipText = "", ; + Cl_commandbutton3.Top = 52, ; + Cl_commandbutton3.Visible = .T., ; + Cl_commandbutton3.WhatsThisHelpID = -1, ; + Cl_commandbutton3.Width = 200, ; + Cl_commandbutton3.WordWrap = .F. + *< END OBJECT: BaseClass="commandgroup" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 101, ; + Left = 28, ; + Name = "Container1", ; + Top = 140, ; + Width = 517 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Cl_commandgroup1' AS cl_commandgroup WITH ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 0, ; + ButtonCount = 3, ; + Enabled = .F., ; + Height = 76, ; + Left = 276, ; + Name = "Cl_commandgroup1", ; + Top = 12, ; + Width = 228, ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 128,255,128, ; + Command1.Cancel = .F., ; + Command1.Caption = "Este es el botón de comando 1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 0,128,192, ; + Command1.DisabledForeColor = 128,0,255, ; + Command1.DisabledPicture = bmps\treeview.bmp, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 21, ; + Command1.HelpContextID = 0, ; + Command1.Left = 4, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 200, ; + Command1.WordWrap = .F., ; + Command2.Alignment = 2, ; + Command2.Anchor = 0, ; + Command2.AutoSize = .F., ; + Command2.BackColor = 128,255,128, ; + Command2.Cancel = .F., ; + Command2.Caption = "Este es el botón de comando 2", ; + Command2.ColorScheme = 1, ; + Command2.ColorSource = 4, ; + Command2.Comment = "", ; + Command2.Default = .F., ; + Command2.DisabledBackColor = 0,128,192, ; + Command2.DisabledForeColor = 128,0,255, ; + Command2.DisabledPicture = bmps\treeview.bmp, ; + Command2.DownPicture = ..\..\, ; + Command2.DragIcon = ..\..\, ; + Command2.DragMode = 0, ; + Command2.Enabled = .F., ; + Command2.FontBold = .F., ; + Command2.FontCharSet = 0, ; + Command2.FontCondense = .F., ; + Command2.FontExtend = .F., ; + Command2.FontItalic = .F., ; + Command2.FontName = "Arial", ; + Command2.FontOutline = .F., ; + Command2.FontShadow = .F., ; + Command2.FontSize = 8, ; + Command2.FontStrikethru = .F., ; + Command2.FontUnderline = .F., ; + Command2.ForeColor = 0,0,0, ; + Command2.Height = 21, ; + Command2.HelpContextID = 0, ; + Command2.Left = 4, ; + Command2.MouseIcon = ..\..\, ; + Command2.MousePointer = 0, ; + Command2.Name = "Command2", ; + Command2.OLEDragMode = 0, ; + Command2.OLEDragPicture = ..\..\, ; + Command2.OLEDropEffects = 3, ; + Command2.OLEDropMode = 0, ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PictureMargin = 0, ; + Command2.PicturePosition = 4, ; + Command2.PictureSpacing = 0, ; + Command2.RightToLeft = .F., ; + Command2.SpecialEffect = 0, ; + Command2.StatusBarText = "", ; + Command2.Style = 0, ; + Command2.TabStop = .T., ; + Command2.Tag = "", ; + Command2.TerminateRead = .F., ; + Command2.Themes = .T., ; + Command2.ToolTipText = "", ; + Command2.Top = 28, ; + Command2.Visible = .T., ; + Command2.WhatsThisHelpID = -1, ; + Command2.Width = 200, ; + Command2.WordWrap = .F., ; + Command3.Alignment = 2, ; + Command3.Anchor = 0, ; + Command3.AutoSize = .F., ; + Command3.BackColor = 128,255,128, ; + Command3.Cancel = .F., ; + Command3.Caption = "Este es el botón de comando 3", ; + Command3.ColorScheme = 1, ; + Command3.ColorSource = 4, ; + Command3.Comment = "", ; + Command3.Default = .F., ; + Command3.DisabledBackColor = 0,128,192, ; + Command3.DisabledForeColor = 128,0,255, ; + Command3.DisabledPicture = bmps\treeview.bmp, ; + Command3.DownPicture = ..\..\, ; + Command3.DragIcon = ..\..\, ; + Command3.DragMode = 0, ; + Command3.Enabled = .T., ; + Command3.FontBold = .F., ; + Command3.FontCharSet = 0, ; + Command3.FontCondense = .F., ; + Command3.FontExtend = .F., ; + Command3.FontItalic = .F., ; + Command3.FontName = "Arial", ; + Command3.FontOutline = .F., ; + Command3.FontShadow = .F., ; + Command3.FontSize = 8, ; + Command3.FontStrikethru = .F., ; + Command3.FontUnderline = .F., ; + Command3.ForeColor = 0,0,0, ; + Command3.Height = 21, ; + Command3.HelpContextID = 0, ; + Command3.Left = 4, ; + Command3.MouseIcon = ..\..\, ; + Command3.MousePointer = 0, ; + Command3.Name = "Command3", ; + Command3.OLEDragMode = 0, ; + Command3.OLEDragPicture = ..\..\, ; + Command3.OLEDropEffects = 3, ; + Command3.OLEDropMode = 0, ; + Command3.Picture = bmps\sobrepostal.bmp, ; + Command3.PictureMargin = 0, ; + Command3.PicturePosition = 4, ; + Command3.PictureSpacing = 0, ; + Command3.RightToLeft = .F., ; + Command3.SpecialEffect = 0, ; + Command3.StatusBarText = "", ; + Command3.Style = 0, ; + Command3.TabStop = .T., ; + Command3.Tag = "", ; + Command3.TerminateRead = .F., ; + Command3.Themes = .T., ; + Command3.ToolTipText = "", ; + Command3.Top = 52, ; + Command3.Visible = .T., ; + Command3.WhatsThisHelpID = -1, ; + Command3.Width = 200, ; + Command3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'Container1.Commandgroup1' AS commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 8, ; + MemberClass = "cl_commandbutton", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Cl_commandbutton1.Alignment = 2, ; + Cl_commandbutton1.Anchor = 0, ; + Cl_commandbutton1.AutoSize = .F., ; + Cl_commandbutton1.BackColor = 128,255,128, ; + Cl_commandbutton1.Cancel = .F., ; + Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; + Cl_commandbutton1.ColorScheme = 1, ; + Cl_commandbutton1.ColorSource = 4, ; + Cl_commandbutton1.Comment = "", ; + Cl_commandbutton1.Default = .F., ; + Cl_commandbutton1.DisabledBackColor = 0,128,192, ; + Cl_commandbutton1.DisabledForeColor = 128,0,255, ; + Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton1.DownPicture = ..\..\, ; + Cl_commandbutton1.DragIcon = ..\..\, ; + Cl_commandbutton1.DragMode = 0, ; + Cl_commandbutton1.Enabled = .T., ; + Cl_commandbutton1.FontBold = .F., ; + Cl_commandbutton1.FontCharSet = 0, ; + Cl_commandbutton1.FontCondense = .F., ; + Cl_commandbutton1.FontExtend = .F., ; + Cl_commandbutton1.FontItalic = .F., ; + Cl_commandbutton1.FontName = "Arial", ; + Cl_commandbutton1.FontOutline = .F., ; + Cl_commandbutton1.FontShadow = .F., ; + Cl_commandbutton1.FontSize = 8, ; + Cl_commandbutton1.FontStrikethru = .F., ; + Cl_commandbutton1.FontUnderline = .F., ; + Cl_commandbutton1.Height = 21, ; + Cl_commandbutton1.HelpContextID = 0, ; + Cl_commandbutton1.Left = 8, ; + Cl_commandbutton1.MouseIcon = ..\..\, ; + Cl_commandbutton1.MousePointer = 0, ; + Cl_commandbutton1.Name = "Cl_commandbutton1", ; + Cl_commandbutton1.OLEDragMode = 0, ; + Cl_commandbutton1.OLEDragPicture = ..\..\, ; + Cl_commandbutton1.OLEDropEffects = 3, ; + Cl_commandbutton1.OLEDropMode = 0, ; + Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton1.PictureMargin = 0, ; + Cl_commandbutton1.PicturePosition = 4, ; + Cl_commandbutton1.PictureSpacing = 0, ; + Cl_commandbutton1.RightToLeft = .F., ; + Cl_commandbutton1.SpecialEffect = 0, ; + Cl_commandbutton1.StatusBarText = "", ; + Cl_commandbutton1.Style = 0, ; + Cl_commandbutton1.TabStop = .T., ; + Cl_commandbutton1.Tag = "", ; + Cl_commandbutton1.TerminateRead = .F., ; + Cl_commandbutton1.Themes = .T., ; + Cl_commandbutton1.ToolTipText = "", ; + Cl_commandbutton1.Top = 4, ; + Cl_commandbutton1.Visible = .T., ; + Cl_commandbutton1.WhatsThisHelpID = -1, ; + Cl_commandbutton1.Width = 200, ; + Cl_commandbutton1.WordWrap = .F., ; + Cl_commandbutton2.Alignment = 2, ; + Cl_commandbutton2.Anchor = 0, ; + Cl_commandbutton2.AutoSize = .F., ; + Cl_commandbutton2.BackColor = 128,255,128, ; + Cl_commandbutton2.Cancel = .F., ; + Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; + Cl_commandbutton2.ColorScheme = 1, ; + Cl_commandbutton2.ColorSource = 4, ; + Cl_commandbutton2.Comment = "", ; + Cl_commandbutton2.Default = .F., ; + Cl_commandbutton2.DisabledBackColor = 0,128,192, ; + Cl_commandbutton2.DisabledForeColor = 128,0,255, ; + Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton2.DownPicture = ..\..\, ; + Cl_commandbutton2.DragIcon = ..\..\, ; + Cl_commandbutton2.DragMode = 0, ; + Cl_commandbutton2.Enabled = .F., ; + Cl_commandbutton2.FontBold = .F., ; + Cl_commandbutton2.FontCharSet = 0, ; + Cl_commandbutton2.FontCondense = .F., ; + Cl_commandbutton2.FontExtend = .F., ; + Cl_commandbutton2.FontItalic = .F., ; + Cl_commandbutton2.FontName = "Arial", ; + Cl_commandbutton2.FontOutline = .F., ; + Cl_commandbutton2.FontShadow = .F., ; + Cl_commandbutton2.FontSize = 8, ; + Cl_commandbutton2.FontStrikethru = .F., ; + Cl_commandbutton2.FontUnderline = .F., ; + Cl_commandbutton2.Height = 21, ; + Cl_commandbutton2.HelpContextID = 0, ; + Cl_commandbutton2.Left = 8, ; + Cl_commandbutton2.MouseIcon = ..\..\, ; + Cl_commandbutton2.MousePointer = 0, ; + Cl_commandbutton2.Name = "Cl_commandbutton2", ; + Cl_commandbutton2.OLEDragMode = 0, ; + Cl_commandbutton2.OLEDragPicture = ..\..\, ; + Cl_commandbutton2.OLEDropEffects = 3, ; + Cl_commandbutton2.OLEDropMode = 0, ; + Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton2.PictureMargin = 0, ; + Cl_commandbutton2.PicturePosition = 4, ; + Cl_commandbutton2.PictureSpacing = 0, ; + Cl_commandbutton2.RightToLeft = .F., ; + Cl_commandbutton2.SpecialEffect = 0, ; + Cl_commandbutton2.StatusBarText = "", ; + Cl_commandbutton2.Style = 0, ; + Cl_commandbutton2.TabStop = .T., ; + Cl_commandbutton2.Tag = "", ; + Cl_commandbutton2.TerminateRead = .F., ; + Cl_commandbutton2.Themes = .T., ; + Cl_commandbutton2.ToolTipText = "", ; + Cl_commandbutton2.Top = 28, ; + Cl_commandbutton2.Visible = .T., ; + Cl_commandbutton2.WhatsThisHelpID = -1, ; + Cl_commandbutton2.Width = 200, ; + Cl_commandbutton2.WordWrap = .F., ; + Cl_commandbutton3.Alignment = 2, ; + Cl_commandbutton3.Anchor = 0, ; + Cl_commandbutton3.AutoSize = .F., ; + Cl_commandbutton3.BackColor = 128,255,128, ; + Cl_commandbutton3.Cancel = .F., ; + Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; + Cl_commandbutton3.ColorScheme = 1, ; + Cl_commandbutton3.ColorSource = 4, ; + Cl_commandbutton3.Comment = "", ; + Cl_commandbutton3.Default = .F., ; + Cl_commandbutton3.DisabledBackColor = 0,128,192, ; + Cl_commandbutton3.DisabledForeColor = 128,0,255, ; + Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton3.DownPicture = ..\..\, ; + Cl_commandbutton3.DragIcon = ..\..\, ; + Cl_commandbutton3.DragMode = 0, ; + Cl_commandbutton3.Enabled = .T., ; + Cl_commandbutton3.FontBold = .F., ; + Cl_commandbutton3.FontCharSet = 0, ; + Cl_commandbutton3.FontCondense = .F., ; + Cl_commandbutton3.FontExtend = .F., ; + Cl_commandbutton3.FontItalic = .F., ; + Cl_commandbutton3.FontName = "Arial", ; + Cl_commandbutton3.FontOutline = .F., ; + Cl_commandbutton3.FontShadow = .F., ; + Cl_commandbutton3.FontSize = 8, ; + Cl_commandbutton3.FontStrikethru = .F., ; + Cl_commandbutton3.FontUnderline = .F., ; + Cl_commandbutton3.Height = 21, ; + Cl_commandbutton3.HelpContextID = 0, ; + Cl_commandbutton3.Left = 8, ; + Cl_commandbutton3.MouseIcon = ..\..\, ; + Cl_commandbutton3.MousePointer = 0, ; + Cl_commandbutton3.Name = "Cl_commandbutton3", ; + Cl_commandbutton3.OLEDragMode = 0, ; + Cl_commandbutton3.OLEDragPicture = ..\..\, ; + Cl_commandbutton3.OLEDropEffects = 3, ; + Cl_commandbutton3.OLEDropMode = 0, ; + Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton3.PictureMargin = 0, ; + Cl_commandbutton3.PicturePosition = 4, ; + Cl_commandbutton3.PictureSpacing = 0, ; + Cl_commandbutton3.RightToLeft = .F., ; + Cl_commandbutton3.SpecialEffect = 0, ; + Cl_commandbutton3.StatusBarText = "", ; + Cl_commandbutton3.Style = 0, ; + Cl_commandbutton3.TabStop = .T., ; + Cl_commandbutton3.Tag = "", ; + Cl_commandbutton3.TerminateRead = .F., ; + Cl_commandbutton3.Themes = .T., ; + Cl_commandbutton3.ToolTipText = "", ; + Cl_commandbutton3.Top = 52, ; + Cl_commandbutton3.Visible = .T., ; + Cl_commandbutton3.WhatsThisHelpID = -1, ; + Cl_commandbutton3.Width = 200, ; + Cl_commandbutton3.WordWrap = .F. + *< END OBJECT: BaseClass="commandgroup" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 132, ; + Left = 28, ; + Name = "Pageframe1", ; + PageCount = 2, ; + Top = 256, ; + Width = 517, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_commandgroup1' AS cl_commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 275, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 128,255,128, ; + Command1.Cancel = .F., ; + Command1.Caption = "Este es el botón de comando 1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 0,128,192, ; + Command1.DisabledForeColor = 128,0,255, ; + Command1.DisabledPicture = bmps\treeview.bmp, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 21, ; + Command1.HelpContextID = 0, ; + Command1.Left = 4, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 200, ; + Command1.WordWrap = .F., ; + Command2.Alignment = 2, ; + Command2.Anchor = 0, ; + Command2.AutoSize = .F., ; + Command2.BackColor = 128,255,128, ; + Command2.Cancel = .F., ; + Command2.Caption = "Este es el botón de comando 2", ; + Command2.ColorScheme = 1, ; + Command2.ColorSource = 4, ; + Command2.Comment = "", ; + Command2.Default = .F., ; + Command2.DisabledBackColor = 0,128,192, ; + Command2.DisabledForeColor = 128,0,255, ; + Command2.DisabledPicture = bmps\treeview.bmp, ; + Command2.DownPicture = ..\..\, ; + Command2.DragIcon = ..\..\, ; + Command2.DragMode = 0, ; + Command2.Enabled = .F., ; + Command2.FontBold = .F., ; + Command2.FontCharSet = 0, ; + Command2.FontCondense = .F., ; + Command2.FontExtend = .F., ; + Command2.FontItalic = .F., ; + Command2.FontName = "Arial", ; + Command2.FontOutline = .F., ; + Command2.FontShadow = .F., ; + Command2.FontSize = 8, ; + Command2.FontStrikethru = .F., ; + Command2.FontUnderline = .F., ; + Command2.ForeColor = 0,0,0, ; + Command2.Height = 21, ; + Command2.HelpContextID = 0, ; + Command2.Left = 4, ; + Command2.MouseIcon = ..\..\, ; + Command2.MousePointer = 0, ; + Command2.Name = "Command2", ; + Command2.OLEDragMode = 0, ; + Command2.OLEDragPicture = ..\..\, ; + Command2.OLEDropEffects = 3, ; + Command2.OLEDropMode = 0, ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PictureMargin = 0, ; + Command2.PicturePosition = 4, ; + Command2.PictureSpacing = 0, ; + Command2.RightToLeft = .F., ; + Command2.SpecialEffect = 0, ; + Command2.StatusBarText = "", ; + Command2.Style = 0, ; + Command2.TabStop = .T., ; + Command2.Tag = "", ; + Command2.TerminateRead = .F., ; + Command2.Themes = .T., ; + Command2.ToolTipText = "", ; + Command2.Top = 28, ; + Command2.Visible = .T., ; + Command2.WhatsThisHelpID = -1, ; + Command2.Width = 200, ; + Command2.WordWrap = .F., ; + Command3.Alignment = 2, ; + Command3.Anchor = 0, ; + Command3.AutoSize = .F., ; + Command3.BackColor = 128,255,128, ; + Command3.Cancel = .F., ; + Command3.Caption = "Este es el botón de comando 3", ; + Command3.ColorScheme = 1, ; + Command3.ColorSource = 4, ; + Command3.Comment = "", ; + Command3.Default = .F., ; + Command3.DisabledBackColor = 0,128,192, ; + Command3.DisabledForeColor = 128,0,255, ; + Command3.DisabledPicture = bmps\treeview.bmp, ; + Command3.DownPicture = ..\..\, ; + Command3.DragIcon = ..\..\, ; + Command3.DragMode = 0, ; + Command3.Enabled = .T., ; + Command3.FontBold = .F., ; + Command3.FontCharSet = 0, ; + Command3.FontCondense = .F., ; + Command3.FontExtend = .F., ; + Command3.FontItalic = .F., ; + Command3.FontName = "Arial", ; + Command3.FontOutline = .F., ; + Command3.FontShadow = .F., ; + Command3.FontSize = 8, ; + Command3.FontStrikethru = .F., ; + Command3.FontUnderline = .F., ; + Command3.ForeColor = 0,0,0, ; + Command3.Height = 21, ; + Command3.HelpContextID = 0, ; + Command3.Left = 4, ; + Command3.MouseIcon = ..\..\, ; + Command3.MousePointer = 0, ; + Command3.Name = "Command3", ; + Command3.OLEDragMode = 0, ; + Command3.OLEDragPicture = ..\..\, ; + Command3.OLEDropEffects = 3, ; + Command3.OLEDropMode = 0, ; + Command3.Picture = bmps\sobrepostal.bmp, ; + Command3.PictureMargin = 0, ; + Command3.PicturePosition = 4, ; + Command3.PictureSpacing = 0, ; + Command3.RightToLeft = .F., ; + Command3.SpecialEffect = 0, ; + Command3.StatusBarText = "", ; + Command3.Style = 0, ; + Command3.TabStop = .T., ; + Command3.Tag = "", ; + Command3.TerminateRead = .F., ; + Command3.Themes = .T., ; + Command3.ToolTipText = "", ; + Command3.Top = 52, ; + Command3.Visible = .T., ; + Command3.WhatsThisHelpID = -1, ; + Command3.Width = 200, ; + Command3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'Pageframe1.Page1.Commandgroup1' AS commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 255,128,0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 11, ; + MemberClass = "cl_commandbutton", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Commandgroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 228, ; + Cl_commandbutton1.Alignment = 2, ; + Cl_commandbutton1.Anchor = 0, ; + Cl_commandbutton1.AutoSize = .F., ; + Cl_commandbutton1.BackColor = 128,255,128, ; + Cl_commandbutton1.Cancel = .F., ; + Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; + Cl_commandbutton1.ColorScheme = 1, ; + Cl_commandbutton1.ColorSource = 4, ; + Cl_commandbutton1.Comment = "", ; + Cl_commandbutton1.Default = .F., ; + Cl_commandbutton1.DisabledBackColor = 0,128,192, ; + Cl_commandbutton1.DisabledForeColor = 128,0,255, ; + Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton1.DownPicture = ..\..\, ; + Cl_commandbutton1.DragIcon = ..\..\, ; + Cl_commandbutton1.DragMode = 0, ; + Cl_commandbutton1.Enabled = .T., ; + Cl_commandbutton1.FontBold = .F., ; + Cl_commandbutton1.FontCharSet = 0, ; + Cl_commandbutton1.FontCondense = .F., ; + Cl_commandbutton1.FontExtend = .F., ; + Cl_commandbutton1.FontItalic = .F., ; + Cl_commandbutton1.FontName = "Arial", ; + Cl_commandbutton1.FontOutline = .F., ; + Cl_commandbutton1.FontShadow = .F., ; + Cl_commandbutton1.FontSize = 8, ; + Cl_commandbutton1.FontStrikethru = .F., ; + Cl_commandbutton1.FontUnderline = .F., ; + Cl_commandbutton1.Height = 21, ; + Cl_commandbutton1.HelpContextID = 0, ; + Cl_commandbutton1.Left = 8, ; + Cl_commandbutton1.MouseIcon = ..\..\, ; + Cl_commandbutton1.MousePointer = 0, ; + Cl_commandbutton1.Name = "Cl_commandbutton1", ; + Cl_commandbutton1.OLEDragMode = 0, ; + Cl_commandbutton1.OLEDragPicture = ..\..\, ; + Cl_commandbutton1.OLEDropEffects = 3, ; + Cl_commandbutton1.OLEDropMode = 0, ; + Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton1.PictureMargin = 0, ; + Cl_commandbutton1.PicturePosition = 4, ; + Cl_commandbutton1.PictureSpacing = 0, ; + Cl_commandbutton1.RightToLeft = .F., ; + Cl_commandbutton1.SpecialEffect = 0, ; + Cl_commandbutton1.StatusBarText = "", ; + Cl_commandbutton1.Style = 0, ; + Cl_commandbutton1.TabStop = .T., ; + Cl_commandbutton1.Tag = "", ; + Cl_commandbutton1.TerminateRead = .F., ; + Cl_commandbutton1.Themes = .T., ; + Cl_commandbutton1.ToolTipText = "", ; + Cl_commandbutton1.Top = 4, ; + Cl_commandbutton1.Visible = .T., ; + Cl_commandbutton1.WhatsThisHelpID = -1, ; + Cl_commandbutton1.Width = 200, ; + Cl_commandbutton1.WordWrap = .F., ; + Cl_commandbutton2.Alignment = 2, ; + Cl_commandbutton2.Anchor = 0, ; + Cl_commandbutton2.AutoSize = .F., ; + Cl_commandbutton2.BackColor = 128,255,128, ; + Cl_commandbutton2.Cancel = .F., ; + Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; + Cl_commandbutton2.ColorScheme = 1, ; + Cl_commandbutton2.ColorSource = 4, ; + Cl_commandbutton2.Comment = "", ; + Cl_commandbutton2.Default = .F., ; + Cl_commandbutton2.DisabledBackColor = 0,128,192, ; + Cl_commandbutton2.DisabledForeColor = 128,0,255, ; + Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton2.DownPicture = ..\..\, ; + Cl_commandbutton2.DragIcon = ..\..\, ; + Cl_commandbutton2.DragMode = 0, ; + Cl_commandbutton2.Enabled = .F., ; + Cl_commandbutton2.FontBold = .F., ; + Cl_commandbutton2.FontCharSet = 0, ; + Cl_commandbutton2.FontCondense = .F., ; + Cl_commandbutton2.FontExtend = .F., ; + Cl_commandbutton2.FontItalic = .F., ; + Cl_commandbutton2.FontName = "Arial", ; + Cl_commandbutton2.FontOutline = .F., ; + Cl_commandbutton2.FontShadow = .F., ; + Cl_commandbutton2.FontSize = 8, ; + Cl_commandbutton2.FontStrikethru = .F., ; + Cl_commandbutton2.FontUnderline = .F., ; + Cl_commandbutton2.Height = 21, ; + Cl_commandbutton2.HelpContextID = 0, ; + Cl_commandbutton2.Left = 8, ; + Cl_commandbutton2.MouseIcon = ..\..\, ; + Cl_commandbutton2.MousePointer = 0, ; + Cl_commandbutton2.Name = "Cl_commandbutton2", ; + Cl_commandbutton2.OLEDragMode = 0, ; + Cl_commandbutton2.OLEDragPicture = ..\..\, ; + Cl_commandbutton2.OLEDropEffects = 3, ; + Cl_commandbutton2.OLEDropMode = 0, ; + Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton2.PictureMargin = 0, ; + Cl_commandbutton2.PicturePosition = 4, ; + Cl_commandbutton2.PictureSpacing = 0, ; + Cl_commandbutton2.RightToLeft = .F., ; + Cl_commandbutton2.SpecialEffect = 0, ; + Cl_commandbutton2.StatusBarText = "", ; + Cl_commandbutton2.Style = 0, ; + Cl_commandbutton2.TabStop = .T., ; + Cl_commandbutton2.Tag = "", ; + Cl_commandbutton2.TerminateRead = .F., ; + Cl_commandbutton2.Themes = .T., ; + Cl_commandbutton2.ToolTipText = "", ; + Cl_commandbutton2.Top = 28, ; + Cl_commandbutton2.Visible = .T., ; + Cl_commandbutton2.WhatsThisHelpID = -1, ; + Cl_commandbutton2.Width = 200, ; + Cl_commandbutton2.WordWrap = .F., ; + Cl_commandbutton3.Alignment = 2, ; + Cl_commandbutton3.Anchor = 0, ; + Cl_commandbutton3.AutoSize = .F., ; + Cl_commandbutton3.BackColor = 128,255,128, ; + Cl_commandbutton3.Cancel = .F., ; + Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; + Cl_commandbutton3.ColorScheme = 1, ; + Cl_commandbutton3.ColorSource = 4, ; + Cl_commandbutton3.Comment = "", ; + Cl_commandbutton3.Default = .F., ; + Cl_commandbutton3.DisabledBackColor = 0,128,192, ; + Cl_commandbutton3.DisabledForeColor = 128,0,255, ; + Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; + Cl_commandbutton3.DownPicture = ..\..\, ; + Cl_commandbutton3.DragIcon = ..\..\, ; + Cl_commandbutton3.DragMode = 0, ; + Cl_commandbutton3.Enabled = .T., ; + Cl_commandbutton3.FontBold = .F., ; + Cl_commandbutton3.FontCharSet = 0, ; + Cl_commandbutton3.FontCondense = .F., ; + Cl_commandbutton3.FontExtend = .F., ; + Cl_commandbutton3.FontItalic = .F., ; + Cl_commandbutton3.FontName = "Arial", ; + Cl_commandbutton3.FontOutline = .F., ; + Cl_commandbutton3.FontShadow = .F., ; + Cl_commandbutton3.FontSize = 8, ; + Cl_commandbutton3.FontStrikethru = .F., ; + Cl_commandbutton3.FontUnderline = .F., ; + Cl_commandbutton3.Height = 21, ; + Cl_commandbutton3.HelpContextID = 0, ; + Cl_commandbutton3.Left = 8, ; + Cl_commandbutton3.MouseIcon = ..\..\, ; + Cl_commandbutton3.MousePointer = 0, ; + Cl_commandbutton3.Name = "Cl_commandbutton3", ; + Cl_commandbutton3.OLEDragMode = 0, ; + Cl_commandbutton3.OLEDragPicture = ..\..\, ; + Cl_commandbutton3.OLEDropEffects = 3, ; + Cl_commandbutton3.OLEDropMode = 0, ; + Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; + Cl_commandbutton3.PictureMargin = 0, ; + Cl_commandbutton3.PicturePosition = 4, ; + Cl_commandbutton3.PictureSpacing = 0, ; + Cl_commandbutton3.RightToLeft = .F., ; + Cl_commandbutton3.SpecialEffect = 0, ; + Cl_commandbutton3.StatusBarText = "", ; + Cl_commandbutton3.Style = 0, ; + Cl_commandbutton3.TabStop = .T., ; + Cl_commandbutton3.Tag = "", ; + Cl_commandbutton3.TerminateRead = .F., ; + Cl_commandbutton3.Themes = .T., ; + Cl_commandbutton3.ToolTipText = "", ; + Cl_commandbutton3.Top = 52, ; + Cl_commandbutton3.Visible = .T., ; + Cl_commandbutton3.WhatsThisHelpID = -1, ; + Cl_commandbutton3.Width = 200, ; + Cl_commandbutton3.WordWrap = .F. + *< END OBJECT: BaseClass="commandgroup" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_form_aa.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_form_aa.vc2 new file mode 100644 index 0000000..00e64bc --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_form_aa.vc2 @@ -0,0 +1,2807 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_grid1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.checkbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.collection" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.combobox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.commandgroup" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.commandbutton" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.container" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.control" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.editbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.hyperlink" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.image" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.label" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.line" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.listbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.optiongroup" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.option" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.spinner" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.textbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.timer" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.Cl_optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" /> + + * + *m: add_control + *m: run_tests + *p: l_activated + *p: n_controles_count + *p: valor + *a: a_controles[1,0] + * + + * + AllowOutput = .T. + AlwaysOnBottom = .F. + AlwaysOnTop = .F. + AutoCenter = .F. + BackColor = 192,192,192 + BindControls = .T. + BorderStyle = 3 + BufferMode = 0 + Caption = "AllControls_Test" + ClipControls = .T. + Closable = .T. + ColorSource = 4 + Comment = "" + ContinuousScroll = .T. + ControlBox = .T. + c_testname = AllControls_Test + DataSession = 2 + DEClass = "cl_dataenvironment" + DEClassLibrary = lib_controles.vcx + DefHeight = + DefLeft = + DefOleLCID = 0 + DefTop = + Desktop = .F. + Dockable = 0 + DoCreate = .T. + DrawMode = 13 + DrawStyle = 0 + DrawWidth = 1 + Enabled = .T. + FillColor = 0,0,0 + FillStyle = 1 + FontBold = .F. + FontCharSet = 0 + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 9 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + HalfHeightCaption = .F. + Height = (460) + HelpContextID = 0 + HScrollSmallChange = 10 + Icon = bmps\container.ico + KeyPreview = .F. + Left = (2) + LockScreen = .F. + l_activated = .F. + MacDesktop = 0 + MaxButton = .T. + MaxHeight = -1 + MaxLeft = -1 + MaxTop = -1 + MaxWidth = -1 + MDIForm = .F. + MinButton = .T. + MinHeight = -1 + MinWidth = -1 + MouseIcon = ..\..\ + MousePointer = 0 + Movable = .T. + Name = "f_form_aa" + n_controles_count = 0 + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + Picture = bmps\fondogris.bmp + RightToLeft = .F. + ScaleMode = 3 + ScrollBars = 3 + ShowInTaskBar = .T. + ShowTips = .F. + ShowWindow = 0 + SizeBox = .F. + TabIndex = 1 + TabStop = .T. + Tag = "" + Themes = .T. + TitleBar = 1 + Top = (4) + valor = .F. + Visible = .T. + VScrollSmallChange = 10 + WhatsThisButton = .F. + WhatsThisHelp = .F. + WhatsThisHelpID = -1 + Width = 998 + WindowState = 0 + WindowType = 0 + ZoomBox = .F. + Edit1.Height = 144 + Edit1.Left = 764 + Edit1.Name = "Edit1" + Edit1.RightToLeft = .F. + Edit1.Top = 32 + Edit1.Width = 212 + Label3.BackColor = 128,255,128 + Label3.Height = 17 + Label3.Left = 764 + Label3.Name = "Label3" + Label3.RightToLeft = .F. + Label3.Top = 8 + Label3.Width = 212 + cmdCapturar.Height = 27 + cmdCapturar.Left = 764 + cmdCapturar.Name = "cmdCapturar" + cmdCapturar.RightToLeft = .F. + cmdCapturar.Top = 392 + cmdCapturar.Width = 212 + Label1.BackColor = 128,255,128 + Label1.Caption = "CONTROLES" + Label1.Height = 17 + Label1.Left = 12 + Label1.Name = "Label1" + Label1.RightToLeft = .F. + Label1.Top = 8 + Label1.Width = 268 + Label2.BackColor = 128,255,128 + Label2.Caption = "TESTS" + Label2.Height = 17 + Label2.Left = 296 + Label2.Name = "Label2" + Label2.RightToLeft = .F. + Label2.Top = 8 + Label2.Width = 460 + * + + ADD OBJECT 'Cl_grid1' AS cl_grid WITH ; + AllowAddNew = .F., ; + AllowAutoColumnFit = 0, ; + AllowCellSelection = .T., ; + AllowHeaderSizing = .F., ; + AllowRowSizing = .F., ; + Anchor = 0, ; + BackColor = 255,255,217, ; + ChildOrder = "", ; + ColumnCount = 6, ; + Comment = "", ; + DeleteMark = .F., ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + GridLineColor = 0,0,0, ; + GridLines = 3, ; + GridLineWidth = 1, ; + HeaderHeight = 18, ; + Height = 420, ; + HelpContextID = 0, ; + Highlight = .T., ; + HighlightBackColor = 51,153,255, ; + HighlightForeColor = 255,255,255, ; + HighlightRow = .T., ; + HighlightRowLineWidth = 1, ; + HighlightStyle = 0, ; + Left = 296, ; + LinkMaster = "", ; + LockColumns = 0, ; + LockColumnsLeft = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_grid1", ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Optimize = .F., ; + Panel = 1, ; + PanelLink = .T., ; + Partition = 0, ; + ReadOnly = .F., ; + RecordMark = .T., ; + RecordSource = "C_TESTS", ; + RecordSourceType = 1, ; + RelationalExpr = "", ; + RightToLeft = .F., ; + RowHeight = 18, ; + ScrollBars = 2, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SplitBar = .F., ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 32, ; + Value = 0, ; + View = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 460, ; + COLUMN1.Alignment = 3, ; + COLUMN1.BackColor = 255,255,217, ; + COLUMN1.Bound = .T., ; + COLUMN1.ColumnOrder = 1, ; + COLUMN1.Comment = "", ; + COLUMN1.ControlSource = "c_ctlname", ; + COLUMN1.CurrentControl = "Text1", ; + COLUMN1.DynamicAlignment = "", ; + COLUMN1.DynamicBackColor = "", ; + COLUMN1.DynamicCurrentControl = "", ; + COLUMN1.DynamicFontBold = "", ; + COLUMN1.DynamicFontItalic = "", ; + COLUMN1.DynamicFontName = "", ; + COLUMN1.DynamicFontOutline = "", ; + COLUMN1.DynamicFontShadow = "", ; + COLUMN1.DynamicFontSize = "", ; + COLUMN1.DynamicFontStrikethru = "", ; + COLUMN1.DynamicFontUnderline = "", ; + COLUMN1.DynamicForeColor = "", ; + COLUMN1.DynamicInputMask = "", ; + COLUMN1.Enabled = .T., ; + COLUMN1.FontBold = .F., ; + COLUMN1.FontCharSet = 0, ; + COLUMN1.FontCondense = .F., ; + COLUMN1.FontExtend = .F., ; + COLUMN1.FontItalic = .F., ; + COLUMN1.FontName = "Arial", ; + COLUMN1.FontOutline = .F., ; + COLUMN1.FontShadow = .F., ; + COLUMN1.FontSize = 9, ; + COLUMN1.FontStrikethru = .F., ; + COLUMN1.FontUnderline = .F., ; + COLUMN1.ForeColor = 0,0,0, ; + COLUMN1.Format = "", ; + COLUMN1.Header1.Alignment = 0, ; + COLUMN1.Header1.BackColor = 240,240,240, ; + COLUMN1.Header1.Caption = "Control", ; + COLUMN1.Header1.Comment = "", ; + COLUMN1.Header1.FontBold = .F., ; + COLUMN1.Header1.FontCharSet = 0, ; + COLUMN1.Header1.FontCondense = .F., ; + COLUMN1.Header1.FontExtend = .F., ; + COLUMN1.Header1.FontItalic = .F., ; + COLUMN1.Header1.FontName = "Arial", ; + COLUMN1.Header1.FontOutline = .F., ; + COLUMN1.Header1.FontShadow = .F., ; + COLUMN1.Header1.FontSize = 9, ; + COLUMN1.Header1.FontStrikethru = .F., ; + COLUMN1.Header1.FontUnderline = .F., ; + COLUMN1.Header1.ForeColor = 0,0,0, ; + COLUMN1.Header1.MouseIcon = ..\..\, ; + COLUMN1.Header1.MousePointer = 0, ; + COLUMN1.Header1.Name = "Header1", ; + COLUMN1.Header1.Picture = ..\..\, ; + COLUMN1.Header1.StatusBarText = "", ; + COLUMN1.Header1.Tag = "", ; + COLUMN1.Header1.ToolTipText = "", ; + COLUMN1.Header1.WordWrap = .F., ; + COLUMN1.InputMask = "", ; + COLUMN1.MouseIcon = ..\..\, ; + COLUMN1.MousePointer = 0, ; + COLUMN1.Movable = .T., ; + COLUMN1.Name = "COLUMN1", ; + COLUMN1.ReadOnly = .F., ; + COLUMN1.Resizable = .T., ; + COLUMN1.SelectOnEntry = .T., ; + COLUMN1.Sparse = .T., ; + COLUMN1.StatusBarText = "", ; + COLUMN1.Tag = "", ; + COLUMN1.Text1.Alignment = 3, ; + COLUMN1.Text1.Anchor = 0, ; + COLUMN1.Text1.AutoComplete = 0, ; + COLUMN1.Text1.AutoCompSource = "", ; + COLUMN1.Text1.AutoCompTable = "", ; + COLUMN1.Text1.BackColor = 255,255,217, ; + COLUMN1.Text1.BackStyle = 1, ; + COLUMN1.Text1.BorderColor = 100,100,100, ; + COLUMN1.Text1.BorderStyle = 0, ; + COLUMN1.Text1.Century = 1, ; + COLUMN1.Text1.ColorScheme = 1, ; + COLUMN1.Text1.ColorSource = 4, ; + COLUMN1.Text1.Comment = "", ; + COLUMN1.Text1.DateFormat = 0, ; + COLUMN1.Text1.DateMark = "", ; + COLUMN1.Text1.DisabledBackColor = 255,255,255, ; + COLUMN1.Text1.DisabledForeColor = 109,109,109, ; + COLUMN1.Text1.DragIcon = ..\..\, ; + COLUMN1.Text1.DragMode = 0, ; + COLUMN1.Text1.Enabled = .T., ; + COLUMN1.Text1.EnableHyperlinks = .F., ; + COLUMN1.Text1.FontBold = .F., ; + COLUMN1.Text1.FontCharSet = 0, ; + COLUMN1.Text1.FontCondense = .F., ; + COLUMN1.Text1.FontExtend = .F., ; + COLUMN1.Text1.FontItalic = .F., ; + COLUMN1.Text1.FontName = "Arial", ; + COLUMN1.Text1.FontOutline = .F., ; + COLUMN1.Text1.FontShadow = .F., ; + COLUMN1.Text1.FontSize = 9, ; + COLUMN1.Text1.FontStrikethru = .F., ; + COLUMN1.Text1.FontUnderline = .F., ; + COLUMN1.Text1.ForeColor = 0,0,0, ; + COLUMN1.Text1.Format = "", ; + COLUMN1.Text1.HelpContextID = 0, ; + COLUMN1.Text1.HideSelection = .T., ; + COLUMN1.Text1.Hours = 0, ; + COLUMN1.Text1.IMEMode = 0, ; + COLUMN1.Text1.InputMask = "", ; + COLUMN1.Text1.IntegralHeight = .F., ; + COLUMN1.Text1.MemoWindow = "", ; + COLUMN1.Text1.MouseIcon = ..\..\, ; + COLUMN1.Text1.MousePointer = 0, ; + COLUMN1.Text1.Name = "Text1", ; + COLUMN1.Text1.NullDisplay = "", ; + COLUMN1.Text1.OLEDragMode = 0, ; + COLUMN1.Text1.OLEDragPicture = ..\..\, ; + COLUMN1.Text1.OLEDropEffects = 3, ; + COLUMN1.Text1.OLEDropMode = 0, ; + COLUMN1.Text1.OLEDropTextInsertion = 0, ; + COLUMN1.Text1.OpenWindow = .F., ; + COLUMN1.Text1.PasswordChar = "", ; + COLUMN1.Text1.ReadOnly = .F., ; + COLUMN1.Text1.RightToLeft = .F., ; + COLUMN1.Text1.Seconds = 2, ; + COLUMN1.Text1.SelectedBackColor = 51,153,255, ; + COLUMN1.Text1.SelectedForeColor = 255,255,255, ; + COLUMN1.Text1.SelectOnEntry = .F., ; + COLUMN1.Text1.SpecialEffect = 0, ; + COLUMN1.Text1.StatusBarText = "", ; + COLUMN1.Text1.StrictDateEntry = 1, ; + COLUMN1.Text1.Style = 0, ; + COLUMN1.Text1.TabIndex = 1, ; + COLUMN1.Text1.TabStop = .T., ; + COLUMN1.Text1.Tag = "", ; + COLUMN1.Text1.TerminateRead = .F., ; + COLUMN1.Text1.Themes = .T., ; + COLUMN1.Text1.ToolTipText = "", ; + COLUMN1.Text1.Value = , ; + COLUMN1.Text1.Visible = .T., ; + COLUMN1.ToolTipText = "", ; + COLUMN1.Visible = .T., ; + COLUMN1.Width = 170, ; + COLUMN2.Alignment = 2, ; + COLUMN2.BackColor = 255,255,217, ; + COLUMN2.ControlSource = "c_Access", ; + COLUMN2.DynamicBackColor = 'ICASE( c_access="S", RGB(0,255,0), c_access="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN2.DynamicForeColor = 'ICASE( c_access="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN2.Enabled = .T., ; + COLUMN2.FontBold = .F., ; + COLUMN2.FontCharSet = 0, ; + COLUMN2.FontCondense = .F., ; + COLUMN2.FontExtend = .F., ; + COLUMN2.FontItalic = .F., ; + COLUMN2.FontName = "Arial", ; + COLUMN2.FontOutline = .F., ; + COLUMN2.FontShadow = .F., ; + COLUMN2.FontSize = 9, ; + COLUMN2.FontStrikethru = .F., ; + COLUMN2.FontUnderline = .F., ; + COLUMN2.ForeColor = 0,0,0, ; + COLUMN2.Header1.Alignment = 2, ; + COLUMN2.Header1.BackColor = 240,240,240, ; + COLUMN2.Header1.Caption = "Access", ; + COLUMN2.Header1.FontBold = .F., ; + COLUMN2.Header1.FontCharSet = 0, ; + COLUMN2.Header1.FontCondense = .F., ; + COLUMN2.Header1.FontExtend = .F., ; + COLUMN2.Header1.FontItalic = .F., ; + COLUMN2.Header1.FontName = "Arial", ; + COLUMN2.Header1.FontOutline = .F., ; + COLUMN2.Header1.FontShadow = .F., ; + COLUMN2.Header1.FontSize = 9, ; + COLUMN2.Header1.FontStrikethru = .F., ; + COLUMN2.Header1.FontUnderline = .F., ; + COLUMN2.Header1.Name = "Header1", ; + COLUMN2.Name = "COLUMN2", ; + COLUMN2.ReadOnly = .F., ; + COLUMN2.Text1.Alignment = 2, ; + COLUMN2.Text1.BackColor = 255,255,217, ; + COLUMN2.Text1.Enabled = .T., ; + COLUMN2.Text1.FontBold = .F., ; + COLUMN2.Text1.FontCharSet = 0, ; + COLUMN2.Text1.FontCondense = .F., ; + COLUMN2.Text1.FontExtend = .F., ; + COLUMN2.Text1.FontItalic = .F., ; + COLUMN2.Text1.FontName = "Arial", ; + COLUMN2.Text1.FontOutline = .F., ; + COLUMN2.Text1.FontShadow = .F., ; + COLUMN2.Text1.FontSize = 9, ; + COLUMN2.Text1.FontStrikethru = .F., ; + COLUMN2.Text1.FontUnderline = .F., ; + COLUMN2.Text1.ForeColor = 0,0,0, ; + COLUMN2.Text1.Name = "Text1", ; + COLUMN2.Text1.ReadOnly = .F., ; + COLUMN2.Text1.RightToLeft = .F., ; + COLUMN2.Text1.Visible = .T., ; + COLUMN2.Visible = .T., ; + COLUMN2.Width = 50, ; + COLUMN3.Alignment = 2, ; + COLUMN3.BackColor = 255,255,217, ; + COLUMN3.ControlSource = "c_Assign", ; + COLUMN3.DynamicBackColor = 'ICASE( c_assign="S", RGB(0,255,0), c_assign="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN3.DynamicForeColor = 'ICASE( c_assign="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN3.Enabled = .T., ; + COLUMN3.FontBold = .F., ; + COLUMN3.FontCharSet = 0, ; + COLUMN3.FontCondense = .F., ; + COLUMN3.FontExtend = .F., ; + COLUMN3.FontItalic = .F., ; + COLUMN3.FontName = "Arial", ; + COLUMN3.FontOutline = .F., ; + COLUMN3.FontShadow = .F., ; + COLUMN3.FontSize = 9, ; + COLUMN3.FontStrikethru = .F., ; + COLUMN3.FontUnderline = .F., ; + COLUMN3.ForeColor = 0,0,0, ; + COLUMN3.Header1.Alignment = 2, ; + COLUMN3.Header1.Caption = "Assign", ; + COLUMN3.Header1.FontBold = .F., ; + COLUMN3.Header1.FontCharSet = 0, ; + COLUMN3.Header1.FontCondense = .F., ; + COLUMN3.Header1.FontExtend = .F., ; + COLUMN3.Header1.FontItalic = .F., ; + COLUMN3.Header1.FontName = "Arial", ; + COLUMN3.Header1.FontOutline = .F., ; + COLUMN3.Header1.FontShadow = .F., ; + COLUMN3.Header1.FontSize = 9, ; + COLUMN3.Header1.FontStrikethru = .F., ; + COLUMN3.Header1.FontUnderline = .F., ; + COLUMN3.Header1.Name = "Header1", ; + COLUMN3.Name = "COLUMN3", ; + COLUMN3.ReadOnly = .F., ; + COLUMN3.Text1.Alignment = 2, ; + COLUMN3.Text1.BackColor = 255,255,217, ; + COLUMN3.Text1.Enabled = .T., ; + COLUMN3.Text1.FontBold = .F., ; + COLUMN3.Text1.FontCharSet = 0, ; + COLUMN3.Text1.FontCondense = .F., ; + COLUMN3.Text1.FontExtend = .F., ; + COLUMN3.Text1.FontItalic = .F., ; + COLUMN3.Text1.FontName = "Arial", ; + COLUMN3.Text1.FontOutline = .F., ; + COLUMN3.Text1.FontShadow = .F., ; + COLUMN3.Text1.FontSize = 9, ; + COLUMN3.Text1.FontStrikethru = .F., ; + COLUMN3.Text1.FontUnderline = .F., ; + COLUMN3.Text1.ForeColor = 0,0,0, ; + COLUMN3.Text1.Name = "Text1", ; + COLUMN3.Text1.ReadOnly = .F., ; + COLUMN3.Text1.RightToLeft = .F., ; + COLUMN3.Text1.Visible = .T., ; + COLUMN3.Visible = .T., ; + COLUMN3.Width = 50, ; + COLUMN4.Alignment = 2, ; + COLUMN4.BackColor = 255,255,217, ; + COLUMN4.ControlSource = "c_Value", ; + COLUMN4.DynamicBackColor = 'ICASE( c_value="S", RGB(0,255,0), c_value="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN4.DynamicForeColor = 'ICASE( c_value="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN4.Enabled = .T., ; + COLUMN4.FontBold = .F., ; + COLUMN4.FontCharSet = 0, ; + COLUMN4.FontCondense = .F., ; + COLUMN4.FontExtend = .F., ; + COLUMN4.FontItalic = .F., ; + COLUMN4.FontName = "Arial", ; + COLUMN4.FontOutline = .F., ; + COLUMN4.FontShadow = .F., ; + COLUMN4.FontSize = 9, ; + COLUMN4.FontStrikethru = .F., ; + COLUMN4.FontUnderline = .F., ; + COLUMN4.ForeColor = 0,0,0, ; + COLUMN4.Header1.Alignment = 2, ; + COLUMN4.Header1.Caption = "Value/Act", ; + COLUMN4.Header1.FontBold = .F., ; + COLUMN4.Header1.FontCharSet = 0, ; + COLUMN4.Header1.FontCondense = .F., ; + COLUMN4.Header1.FontExtend = .F., ; + COLUMN4.Header1.FontItalic = .F., ; + COLUMN4.Header1.FontName = "Arial", ; + COLUMN4.Header1.FontOutline = .F., ; + COLUMN4.Header1.FontShadow = .F., ; + COLUMN4.Header1.FontSize = 9, ; + COLUMN4.Header1.FontStrikethru = .F., ; + COLUMN4.Header1.FontUnderline = .F., ; + COLUMN4.Header1.Name = "Header1", ; + COLUMN4.Name = "COLUMN4", ; + COLUMN4.ReadOnly = .F., ; + COLUMN4.Text1.Alignment = 2, ; + COLUMN4.Text1.BackColor = 255,255,217, ; + COLUMN4.Text1.Enabled = .T., ; + COLUMN4.Text1.FontBold = .F., ; + COLUMN4.Text1.FontCharSet = 0, ; + COLUMN4.Text1.FontCondense = .F., ; + COLUMN4.Text1.FontExtend = .F., ; + COLUMN4.Text1.FontItalic = .F., ; + COLUMN4.Text1.FontName = "Arial", ; + COLUMN4.Text1.FontOutline = .F., ; + COLUMN4.Text1.FontShadow = .F., ; + COLUMN4.Text1.FontSize = 9, ; + COLUMN4.Text1.FontStrikethru = .F., ; + COLUMN4.Text1.FontUnderline = .F., ; + COLUMN4.Text1.ForeColor = 0,0,0, ; + COLUMN4.Text1.Name = "Text1", ; + COLUMN4.Text1.ReadOnly = .F., ; + COLUMN4.Text1.RightToLeft = .F., ; + COLUMN4.Text1.Visible = .T., ; + COLUMN4.Visible = .T., ; + COLUMN4.Width = 50, ; + COLUMN5.Alignment = 2, ; + COLUMN5.BackColor = 255,255,217, ; + COLUMN5.ControlSource = "c_ProgrChg", ; + COLUMN5.DynamicBackColor = 'ICASE( c_ProgrChg="S", RGB(0,255,0), c_ProgrChg="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN5.DynamicForeColor = 'ICASE( c_ProgrChg="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN5.Enabled = .T., ; + COLUMN5.FontBold = .F., ; + COLUMN5.FontCharSet = 0, ; + COLUMN5.FontCondense = .F., ; + COLUMN5.FontExtend = .F., ; + COLUMN5.FontItalic = .F., ; + COLUMN5.FontName = "Arial", ; + COLUMN5.FontOutline = .F., ; + COLUMN5.FontShadow = .F., ; + COLUMN5.FontSize = 9, ; + COLUMN5.FontStrikethru = .F., ; + COLUMN5.FontUnderline = .F., ; + COLUMN5.ForeColor = 0,0,0, ; + COLUMN5.Header1.Alignment = 2, ; + COLUMN5.Header1.Caption = "Prg.Chg", ; + COLUMN5.Header1.FontBold = .F., ; + COLUMN5.Header1.FontCharSet = 0, ; + COLUMN5.Header1.FontCondense = .F., ; + COLUMN5.Header1.FontExtend = .F., ; + COLUMN5.Header1.FontItalic = .F., ; + COLUMN5.Header1.FontName = "Arial", ; + COLUMN5.Header1.FontOutline = .F., ; + COLUMN5.Header1.FontShadow = .F., ; + COLUMN5.Header1.FontSize = 9, ; + COLUMN5.Header1.FontStrikethru = .F., ; + COLUMN5.Header1.FontUnderline = .F., ; + COLUMN5.Header1.Name = "Header1", ; + COLUMN5.Name = "COLUMN5", ; + COLUMN5.ReadOnly = .F., ; + COLUMN5.Text1.Alignment = 2, ; + COLUMN5.Text1.BackColor = 255,255,217, ; + COLUMN5.Text1.Enabled = .T., ; + COLUMN5.Text1.FontBold = .F., ; + COLUMN5.Text1.FontCharSet = 0, ; + COLUMN5.Text1.FontCondense = .F., ; + COLUMN5.Text1.FontExtend = .F., ; + COLUMN5.Text1.FontItalic = .F., ; + COLUMN5.Text1.FontName = "Arial", ; + COLUMN5.Text1.FontOutline = .F., ; + COLUMN5.Text1.FontShadow = .F., ; + COLUMN5.Text1.FontSize = 9, ; + COLUMN5.Text1.FontStrikethru = .F., ; + COLUMN5.Text1.FontUnderline = .F., ; + COLUMN5.Text1.ForeColor = 0,0,0, ; + COLUMN5.Text1.Name = "Text1", ; + COLUMN5.Text1.ReadOnly = .F., ; + COLUMN5.Text1.RightToLeft = .F., ; + COLUMN5.Text1.Visible = .T., ; + COLUMN5.Visible = .T., ; + COLUMN5.Width = 50, ; + Column6.Alignment = 2, ; + Column6.BackColor = 255,255,217, ; + Column6.ControlSource = "c_UI", ; + Column6.DynamicBackColor = 'ICASE( c_UI="S", RGB(0,255,0), c_UI="N", RGB(255,0,0), RGB(255,255,255) )', ; + Column6.DynamicForeColor = 'ICASE( c_UI="N", RGB(255,255,255), RGB(0,0,0) )', ; + Column6.Enabled = .T., ; + Column6.FontBold = .F., ; + Column6.FontCharSet = 0, ; + Column6.FontCondense = .F., ; + Column6.FontExtend = .F., ; + Column6.FontItalic = .F., ; + Column6.FontName = "Arial", ; + Column6.FontOutline = .F., ; + Column6.FontShadow = .F., ; + Column6.FontSize = 9, ; + Column6.FontStrikethru = .F., ; + Column6.FontUnderline = .F., ; + Column6.ForeColor = 0,0,0, ; + Column6.Name = "Column6", ; + Column6.ReadOnly = .F., ; + Column6.Visible = .T., ; + Column6.Width = 50 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> + + ADD OBJECT 'Cl_grid1.Column6.Header1' AS header WITH ; + Alignment = 2, ; + Caption = "UI", ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Cl_grid1.Column6.Text1' AS textbox WITH ; + Alignment = 2, ; + BackColor = 255,255,217, ; + BorderStyle = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + RightToLeft = .F., ; + Visible = .T. + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Cl_image1' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 255,0,0, ; + BorderStyle = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 104, ; + HelpContextID = 0, ; + Left = 764, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\vfpxlogo.bmp, ; + RotateFlip = 0, ; + StatusBarText = "", ; + Stretch = 0, ; + Tag = "", ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 284, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 212, ; + ZOrderSet = 0 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Image1' AS image WITH ; + BorderColor = 255,0,0, ; + BorderStyle = 1, ; + Height = 104, ; + Left = 764, ; + Name = "Image1", ; + Picture = bmps\vfpxlogo.bmp, ; + Top = 180, ; + Width = 212 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'pgf' AS cl_pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = 384, ; + HelpContextID = 0, ; + Left = 12, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "pgf", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 2, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabIndex = 7, ; + TabOrientation = 1, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 0, ; + Tag = "", ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 268, ; + Page1.BackColor = 240,240,240, ; + Page1.Caption = "Page1", ; + Page1.ColorSource = 4, ; + Page1.Comment = "Sin comentarios", ; + Page1.DragIcon = ..\..\, ; + Page1.DragMode = 0, ; + Page1.Enabled = .T., ; + Page1.FontBold = .F., ; + Page1.FontCharSet = 0, ; + Page1.FontCondense = .F., ; + Page1.FontExtend = .F., ; + Page1.FontItalic = .F., ; + Page1.FontName = "Arial", ; + Page1.FontOutline = .F., ; + Page1.FontShadow = .F., ; + Page1.FontSize = 9, ; + Page1.FontStrikethru = .F., ; + Page1.FontUnderline = .F., ; + Page1.ForeColor = 0,0,0, ; + Page1.HelpContextID = 0, ; + Page1.MouseIcon = ..\..\, ; + Page1.MousePointer = 0, ; + Page1.Name = "Page1", ; + Page1.OLEDragMode = 0, ; + Page1.OLEDragPicture = ..\..\, ; + Page1.OLEDropEffects = 3, ; + Page1.OLEDropMode = 0, ; + Page1.PageOrder = 1, ; + Page1.Picture = ..\..\, ; + Page1.StatusBarText = "", ; + Page1.Tag = "", ; + Page1.ToolTipText = "", ; + Page1.WhatsThisHelpID = -1, ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2", ; + Page2.PageOrder = 2 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> + + ADD OBJECT 'pgf.Page1.checkbox' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Chk1", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (21), ; + HelpContextID = 0, ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "checkbox", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\treeview.bmp, ; + PictureMargin = 0, ; + PicturePosition = 4, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (8), ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (199), ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'pgf.Page1.Cl_optiongroup1' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (46), ; + HelpContextID = 0, ; + Left = 123, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_optiongroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 231, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (112), ; + Option1.Alignment = 0, ; + Option1.Anchor = 0, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 192,192,192, ; + Option1.BackStyle = 1, ; + Option1.Caption = "Esta es la opc. 1", ; + Option1.ColorScheme = 1, ; + Option1.ColorSource = 4, ; + Option1.Comment = "", ; + Option1.ControlSource = "", ; + Option1.DisabledBackColor = 240,240,240, ; + Option1.DisabledForeColor = 109,109,109, ; + Option1.DisabledPicture = ..\..\, ; + Option1.DownPicture = ..\..\, ; + Option1.DragIcon = ..\..\, ; + Option1.DragMode = 0, ; + Option1.Enabled = .T., ; + Option1.FontBold = .F., ; + Option1.FontCondense = .F., ; + Option1.FontExtend = .F., ; + Option1.FontItalic = .F., ; + Option1.FontName = "Arial", ; + Option1.FontOutline = .F., ; + Option1.FontShadow = .F., ; + Option1.FontSize = 8, ; + Option1.FontStrikethru = .F., ; + Option1.FontUnderline = .F., ; + Option1.ForeColor = 0,0,0, ; + Option1.Height = 16, ; + Option1.HelpContextID = 0, ; + Option1.Left = 5, ; + Option1.MouseIcon = ..\..\, ; + Option1.MousePointer = 0, ; + Option1.Name = "Option1", ; + Option1.OLEDragMode = 0, ; + Option1.OLEDragPicture = ..\..\, ; + Option1.OLEDropEffects = 3, ; + Option1.OLEDropMode = 0, ; + Option1.Picture = bmps\scccheckout.bmp, ; + Option1.PictureMargin = 0, ; + Option1.PicturePosition = 4, ; + Option1.PictureSpacing = 0, ; + Option1.RightToLeft = .F., ; + Option1.SpecialEffect = 0, ; + Option1.StatusBarText = "", ; + Option1.Style = 0, ; + Option1.TabIndex = 1, ; + Option1.TabStop = .T., ; + Option1.Tag = "", ; + Option1.TerminateRead = .F., ; + Option1.Themes = .T., ; + Option1.ToolTipText = "", ; + Option1.Top = 5, ; + Option1.Value = 0, ; + Option1.Visible = .T., ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 98, ; + Option1.WordWrap = .F., ; + Option2.AutoSize = .F., ; + Option2.BackColor = 192,192,192, ; + Option2.Caption = "Esta es la opc. 2", ; + Option2.FontSize = 8, ; + Option2.Height = 16, ; + Option2.Left = 5, ; + Option2.Name = "Option2", ; + Option2.Picture = bmps\scccheckout.bmp, ; + Option2.PicturePosition = 4, ; + Option2.Style = 0, ; + Option2.Top = 24, ; + Option2.Value = 1, ; + Option2.Width = 102 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'pgf.Page1.collection' AS cl_collection WITH ; + Left = 218, ; + Name = "collection", ; + Top = 8 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="collection" /> + + ADD OBJECT 'pgf.Page1.combobox' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + BoundColumn = 1, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 0, ; + ColumnLines = .T., ; + ColumnWidths = "", ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DisplayValue = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (20), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = (7), ; + Margin = 0, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "combobox", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\treeview.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (35), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (196) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'pgf.Page1.commandbutton' AS cl_commandbutton WITH ; + AutoSize = .F., ; + Caption = "Comando", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + FontSize = 8, ; + Height = (25), ; + Left = (99), ; + Name = "commandbutton", ; + Picture = bmps\treeview.bmp, ; + PicturePosition = 4, ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (63), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (80), ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandbutton" /> + + ADD OBJECT 'pgf.Page1.commandgroup' AS cl_commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (64), ; + HelpContextID = 0, ; + Left = (6), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "commandgroup", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 2, ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (60), ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (93), ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 192,192,192, ; + Command1.Cancel = .F., ; + Command1.Caption = "Comando1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 240,240,240, ; + Command1.DisabledForeColor = 109,109,109, ; + Command1.DisabledPicture = ..\..\, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 25, ; + Command1.HelpContextID = 0, ; + Command1.Left = 1, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabIndex = 1, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 90, ; + Command1.WordWrap = .F., ; + Command2.AutoSize = .F., ; + Command2.BackColor = 192,192,192, ; + Command2.Caption = "Comando2", ; + Command2.FontSize = 8, ; + Command2.Height = 25, ; + Command2.Left = 1, ; + Command2.Name = "Command2", ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PicturePosition = 4, ; + Command2.Top = 32, ; + Command2.Width = 90 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'pgf.Page1.container' AS cl_container WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = (24), ; + HelpContextID = 0, ; + Left = (227), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "container", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + SpecialEffect = 2, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 4, ; + TabStop = .T., ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (127), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (20) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" /> + + ADD OBJECT 'pgf.Page1.control' AS cl_control WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = (24), ; + HelpContextID = 0, ; + Left = (199), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "control", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + SpecialEffect = 2, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 5, ; + TabStop = .T., ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (127), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (20) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" /> + + ADD OBJECT 'pgf.Page1.editbox' AS cl_editbox WITH ; + AddLineFeeds = .F., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (41), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = (183), ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "editbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (60), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (68) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> + + ADD OBJECT 'pgf.Page1.hyperlink' AS cl_hyperlink WITH ; + Comment = "", ; + Left = 199, ; + Name = "hyperlink", ; + Tag = "", ; + test_aa = .F., ; + Top = 103 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="hyperlink" /> + + ADD OBJECT 'pgf.Page1.image' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 231, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "image", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\scccheckout.bmp, ; + RotateFlip = 0, ; + StatusBarText = "", ; + Stretch = 0, ; + Tag = "", ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 107, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'pgf.Page1.label' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (17), ; + HelpContextID = 0, ; + Left = (6), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "label", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 7, ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (136), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (104), ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'pgf.Page1.line' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 255,0,0, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .T., ; + Height = (8), ; + HelpContextID = 0, ; + Left = (121), ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "line", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (136), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (50) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'pgf.Page1.listbox' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 128,255,128, ; + BoundColumn = 1, ; + BoundTo = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + ColumnCount = 0, ; + ColumnLines = .T., ; + ColumnWidths = "", ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 255,255,255, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayValue = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = (60), ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "listbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (164), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (224) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'pgf.Page1.option' AS cl_option WITH ; + AutoSize = .F., ; + Caption = "Esta es la opción B", ; + DefHeight = , ; + DefWidth = , ; + FontSize = 8, ; + Height = (16), ; + Left = 11, ; + Name = "option", ; + Top = 283, ; + Width = (110) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optionbutton" /> + + ADD OBJECT 'pgf.Page1.optiongroup' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (46), ; + HelpContextID = 0, ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "optiongroup", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (232), ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (112), ; + Option1.Alignment = 0, ; + Option1.Anchor = 0, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 192,192,192, ; + Option1.BackStyle = 1, ; + Option1.Caption = "Esta es la opc. 1", ; + Option1.ColorScheme = 1, ; + Option1.ColorSource = 4, ; + Option1.Comment = "", ; + Option1.ControlSource = "", ; + Option1.DisabledBackColor = 240,240,240, ; + Option1.DisabledForeColor = 109,109,109, ; + Option1.DisabledPicture = ..\..\, ; + Option1.DownPicture = ..\..\, ; + Option1.DragIcon = ..\..\, ; + Option1.DragMode = 0, ; + Option1.Enabled = .T., ; + Option1.FontBold = .F., ; + Option1.FontCondense = .F., ; + Option1.FontExtend = .F., ; + Option1.FontItalic = .F., ; + Option1.FontName = "Arial", ; + Option1.FontOutline = .F., ; + Option1.FontShadow = .F., ; + Option1.FontSize = 8, ; + Option1.FontStrikethru = .F., ; + Option1.FontUnderline = .F., ; + Option1.ForeColor = 0,0,0, ; + Option1.Height = 41, ; + Option1.HelpContextID = 0, ; + Option1.Left = 5, ; + Option1.MouseIcon = ..\..\, ; + Option1.MousePointer = 0, ; + Option1.Name = "Option1", ; + Option1.OLEDragMode = 0, ; + Option1.OLEDragPicture = ..\..\, ; + Option1.OLEDropEffects = 3, ; + Option1.OLEDropMode = 0, ; + Option1.Picture = bmps\scccheckout.bmp, ; + Option1.PictureMargin = 0, ; + Option1.PicturePosition = 4, ; + Option1.PictureSpacing = 0, ; + Option1.RightToLeft = .F., ; + Option1.SpecialEffect = 0, ; + Option1.StatusBarText = "", ; + Option1.Style = 1, ; + Option1.TabIndex = 1, ; + Option1.TabStop = .T., ; + Option1.Tag = "", ; + Option1.TerminateRead = .F., ; + Option1.Themes = .T., ; + Option1.ToolTipText = "", ; + Option1.Top = 5, ; + Option1.Value = 0, ; + Option1.Visible = .T., ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 112, ; + Option1.WordWrap = .F., ; + Option2.AutoSize = .F., ; + Option2.BackColor = 192,192,192, ; + Option2.Caption = "Esta es la opc. 2", ; + Option2.FontSize = 8, ; + Option2.Height = 16, ; + Option2.Left = 5, ; + Option2.Name = "Option2", ; + Option2.Picture = bmps\scccheckout.bmp, ; + Option2.PicturePosition = 4, ; + Option2.Style = 1, ; + Option2.Top = 24, ; + Option2.Value = 1, ; + Option2.Width = 103 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'pgf.Page1.Pageframe1' AS pageframe WITH ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + ErasePage = .T., ; + Height = (61), ; + Left = (135), ; + MemberClass = "cl_page", ; + MemberClassLibrary = lib_controles.vcx, ; + Name = "Pageframe1", ; + PageCount = 2, ; + TabOrientation = 2, ; + Themes = .F., ; + Top = (284), ; + Width = (117), ; + Cl_page1.Caption = "Pg1", ; + Cl_page1.Name = "Cl_page1", ; + Cl_page2.BackColor = 255,193,132, ; + Cl_page2.Caption = "Pg2", ; + Cl_page2.Name = "Cl_page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'pgf.Page1.spinner' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (19), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 11, ; + Margin = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "spinner", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabIndex = 9, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 303, ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (108) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'pgf.Page1.textbox' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DefHeight = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (19), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 11, ; + Margin = 0, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "textbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 327, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (108) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'pgf.Page1.timer' AS cl_timer WITH ; + Comment = "", ; + DefHeight = , ; + DefWidth = , ; + Enabled = .T., ; + Height = (23), ; + Interval = 0, ; + Left = 235, ; + Name = "timer", ; + Tag = "", ; + test_aa = .F., ; + Top = 255, ; + Width = (23) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="timer" /> + + PROCEDURE Activate + IF NOT THISFORM.l_activated + THISFORM.run_tests() + THISFORM.l_activated = .T. + ENDIF + + ENDPROC + + PROCEDURE add_control + LPARAMETERS toControl + + LOCAL lcCtlPath + + WITH THISFORM + lcCtlPath = SYS(1272, toControl) + + INSERT INTO C_TESTS ; + ( c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg, c_UI ) ; + VALUES ; + ( SUBSTR( lcCtlPath, LEN(.NAME) + 2), 'N', 'N', 'N', 'N', 'N' ) + ENDWITH + + ENDPROC + + PROCEDURE Load + CREATE CURSOR C_TESTS ( c_CtlName C(30), c_Access C(1), c_Assign C(1), c_Value C(1), c_ProgrChg C(1), c_UI C(1) ) + INDEX ON c_CtlName TAG c_CtlName + + ENDPROC + + PROCEDURE run_tests + TRY + LOCAL loEx AS Exception, loCtl + + WITH THISFORM AS Form + *-- c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg + THISFORM.pgf.page1.SETALL( "Tag", "" ) + THISFORM.pgf.ActivePage = 1 + + SCAN + *-- Test UI Enable + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + DO CASE + CASE NOT PEMSTATUS(loCtl, 'UIEnable',5) + REPLACE c_UI WITH "-" + CASE loCtl.Tag = "UI" + REPLACE c_UI WITH "S" + ENDCASE + ENDSCAN + + SCAN + *-- Test Access + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + loCtl.Tag = '' + IF loCtl.test_aa = "ACCESS_OK" + REPLACE c_Access WITH "S" + ENDIF + ENDSCAN + + SCAN + *-- Test Assign + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + loCtl.Tag = '' + loCtl.test_aa = "ASSIGN_OK" + IF loCtl.Tag = "ASSIGN_OK" + REPLACE c_Assign WITH "S" + ENDIF + ENDSCAN + + SCAN + *-- Test Valor/Activate + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + + DO CASE + CASE loCtl.Baseclass == 'Checkbox' + .valor = 1 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Combobox' + .valor = 3 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Commandgroup' + .valor = 2 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Editbox' + .valor = 'Texto editable' + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Listbox' + .valor = 3 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Optiongroup' + .valor = 2 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Spinner' + .valor = 123 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Textbox' + .valor = "Mi texto" + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Page' + loCtl.Parent.ActivePage = 2 + IF loCtl.Tag = 'AC' + REPLACE c_Value WITH "S" + ENDIF + + OTHERWISE + REPLACE c_Value WITH "-" + + ENDCASE + ENDSCAN + + SCAN + *-- Test ProgrammaticChange + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + .Tag = '' + DO CASE + CASE loCtl.Baseclass == 'Checkbox' + loCtl.Value = 0 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Combobox' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Commandgroup' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Editbox' + loCtl.Value = 'Editado!' + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Listbox' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Optiongroup' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Spinner' + loCtl.Value = 321 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Textbox' + loCtl.Value = 'Editado!' + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + OTHERWISE + REPLACE c_ProgrChg WITH "-" + + ENDCASE + + ENDSCAN + ENDWITH + + + CATCH TO loEx + THISFORM.edit1.Value = 'Error ' + TRANSFORM(loEx.ErrorNo) + CHR(13) ; + + loEx.Message + CHR(13) ; + + loEx.Procedure + ', Line ' + TRANSFORM(loEx.LineNo) + CHR(13) ; + + loEx.Details + + FINALLY + IF USED("C_TESTS") + SELECT C_TESTS + GO TOP + ENDIF + + ENDTRY + + ENDPROC + + PROCEDURE pgf.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.Cl_optiongroup1.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.collection.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.collection.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.collection.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.combobox.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.combobox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.combobox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.combobox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.combobox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.container.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.container.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.container.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.container.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.control.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.control.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.control.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.control.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.editbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.editbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.editbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.editbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.editbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.image.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.image.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.image.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.image.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.label.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.label.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.label.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.label.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.line.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.line.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.line.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.line.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.listbox.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.listbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.listbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.listbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.listbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.option.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.option.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.option.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.option.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Activate + THIS.Tag = 'AC' + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Init + this.Cl_page2.Init() + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.UIEnable + LPARAMETERS lEnable + + IF lEnable + THISFORM.pgf.Tag = 'UI' + ENDIF + + + ENDPROC + + PROCEDURE pgf.Page1.spinner.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.spinner.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.spinner.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.spinner.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.spinner.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.textbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.textbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.textbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.textbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.textbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.timer.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.timer.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_form_aa_.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_form_aa_.vc2 new file mode 100644 index 0000000..ae8f1c4 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_form_aa_.vc2 @@ -0,0 +1,2666 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_form_aa_ AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_grid1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Header1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.checkbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.collection" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.combobox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.commandgroup" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.commandbutton" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.container" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.control" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.editbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.hyperlink" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.image" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.label" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.line" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.listbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.optiongroup" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.option" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.spinner" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.textbox" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.timer" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="pgf.Page1.Shape1" UniqueID="" Timestamp="" /> + + * + *m: add_control + *m: run_tests + *p: l_activated + *p: n_controles_count + *p: valor + *a: a_controles[1,0] + * + + * + AllowOutput = .T. + AlwaysOnBottom = .F. + AlwaysOnTop = .F. + AutoCenter = .F. + BackColor = 192,192,192 + BindControls = .T. + BorderStyle = 3 + BufferMode = 0 + Caption = "AllControls_Test" + ClipControls = .T. + Closable = .T. + ColorSource = 4 + Comment = "" + ContinuousScroll = .T. + ControlBox = .T. + c_testname = AllControls_Test + DataSession = 2 + DEClass = "cl_dataenvironment" + DEClassLibrary = lib_controles.vcx + DefHeight = + DefLeft = + DefOleLCID = 0 + DefTop = + DefWidth = + Desktop = .F. + Dockable = 0 + DoCreate = .T. + DrawMode = 13 + DrawStyle = 0 + DrawWidth = 1 + Enabled = .T. + FillColor = 0,0,0 + FillStyle = 1 + FontBold = .F. + FontCharSet = 0 + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 9 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + HalfHeightCaption = .F. + Height = (424) + HelpContextID = 0 + HScrollSmallChange = 10 + Icon = bmps\container.ico + KeyPreview = .F. + Left = (2) + LockScreen = .F. + l_activated = .F. + MacDesktop = 0 + MaxButton = .T. + MaxHeight = -1 + MaxLeft = -1 + MaxTop = -1 + MaxWidth = -1 + MDIForm = .F. + MinButton = .T. + MinHeight = -1 + MinWidth = -1 + MouseIcon = ..\..\ + MousePointer = 0 + Movable = .T. + Name = "f_form_aa" + n_controles_count = 0 + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + Picture = bmps\fondogris.bmp + RightToLeft = .F. + ScaleMode = 3 + ScrollBars = 3 + ShowInTaskBar = .T. + ShowTips = .F. + ShowWindow = 0 + SizeBox = .F. + TabIndex = 1 + TabStop = .T. + Tag = "" + Themes = .T. + TitleBar = 1 + Top = (4) + valor = .F. + Visible = .T. + VScrollSmallChange = 10 + WhatsThisButton = .F. + WhatsThisHelp = .F. + WhatsThisHelpID = -1 + Width = (980) + WindowState = 0 + WindowType = 0 + ZoomBox = .F. + Edit1.Height = 356 + Edit1.Left = 764 + Edit1.Name = "Edit1" + Edit1.RightToLeft = .F. + Edit1.Top = 32 + Edit1.Width = 212 + Label3.BackColor = 128,255,128 + Label3.Height = 17 + Label3.Left = 764 + Label3.Name = "Label3" + Label3.RightToLeft = .F. + Label3.Top = 8 + Label3.Width = 212 + cmdCapturar.Height = 27 + cmdCapturar.Left = 764 + cmdCapturar.Name = "cmdCapturar" + cmdCapturar.RightToLeft = .F. + cmdCapturar.Top = 392 + cmdCapturar.Width = 212 + Label1.BackColor = 128,255,128 + Label1.Caption = "CONTROLES" + Label1.Height = 17 + Label1.Left = 12 + Label1.Name = "Label1" + Label1.RightToLeft = .F. + Label1.Top = 8 + Label1.Width = 268 + Label2.BackColor = 128,255,128 + Label2.Caption = "TESTS" + Label2.Height = 17 + Label2.Left = 296 + Label2.Name = "Label2" + Label2.RightToLeft = .F. + Label2.Top = 8 + Label2.Width = 460 + * + + ADD OBJECT 'Cl_grid1' AS cl_grid WITH ; + AllowAddNew = .F., ; + AllowAutoColumnFit = 0, ; + AllowCellSelection = .T., ; + AllowHeaderSizing = .F., ; + AllowRowSizing = .F., ; + Anchor = 0, ; + BackColor = 255,255,217, ; + ChildOrder = "", ; + ColumnCount = 6, ; + Comment = "", ; + DeleteMark = .F., ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + GridLineColor = 0,0,0, ; + GridLines = 3, ; + GridLineWidth = 1, ; + HeaderHeight = 18, ; + Height = 384, ; + HelpContextID = 0, ; + Highlight = .T., ; + HighlightBackColor = 51,153,255, ; + HighlightForeColor = 255,255,255, ; + HighlightRow = .T., ; + HighlightRowLineWidth = 1, ; + HighlightStyle = 0, ; + Left = 296, ; + LinkMaster = "", ; + LockColumns = 0, ; + LockColumnsLeft = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_grid1", ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Optimize = .F., ; + Panel = 1, ; + PanelLink = .T., ; + Partition = 0, ; + ReadOnly = .F., ; + RecordMark = .T., ; + RecordSource = "C_TESTS", ; + RecordSourceType = 1, ; + RelationalExpr = "", ; + RightToLeft = .F., ; + RowHeight = 18, ; + ScrollBars = 2, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SplitBar = .F., ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 32, ; + Value = 0, ; + View = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 460, ; + COLUMN1.Alignment = 3, ; + COLUMN1.BackColor = 255,255,217, ; + COLUMN1.Bound = .T., ; + COLUMN1.ColumnOrder = 1, ; + COLUMN1.Comment = "", ; + COLUMN1.ControlSource = "c_ctlname", ; + COLUMN1.CurrentControl = "Text1", ; + COLUMN1.DynamicAlignment = "", ; + COLUMN1.DynamicBackColor = "", ; + COLUMN1.DynamicCurrentControl = "", ; + COLUMN1.DynamicFontBold = "", ; + COLUMN1.DynamicFontItalic = "", ; + COLUMN1.DynamicFontName = "", ; + COLUMN1.DynamicFontOutline = "", ; + COLUMN1.DynamicFontShadow = "", ; + COLUMN1.DynamicFontSize = "", ; + COLUMN1.DynamicFontStrikethru = "", ; + COLUMN1.DynamicFontUnderline = "", ; + COLUMN1.DynamicForeColor = "", ; + COLUMN1.DynamicInputMask = "", ; + COLUMN1.Enabled = .T., ; + COLUMN1.FontBold = .F., ; + COLUMN1.FontCharSet = 0, ; + COLUMN1.FontCondense = .F., ; + COLUMN1.FontExtend = .F., ; + COLUMN1.FontItalic = .F., ; + COLUMN1.FontName = "Arial", ; + COLUMN1.FontOutline = .F., ; + COLUMN1.FontShadow = .F., ; + COLUMN1.FontSize = 9, ; + COLUMN1.FontStrikethru = .F., ; + COLUMN1.FontUnderline = .F., ; + COLUMN1.ForeColor = 0,0,0, ; + COLUMN1.Format = "", ; + COLUMN1.Header1.Alignment = 0, ; + COLUMN1.Header1.BackColor = 240,240,240, ; + COLUMN1.Header1.Caption = "Control", ; + COLUMN1.Header1.Comment = "", ; + COLUMN1.Header1.FontBold = .F., ; + COLUMN1.Header1.FontCharSet = 0, ; + COLUMN1.Header1.FontCondense = .F., ; + COLUMN1.Header1.FontExtend = .F., ; + COLUMN1.Header1.FontItalic = .F., ; + COLUMN1.Header1.FontName = "Arial", ; + COLUMN1.Header1.FontOutline = .F., ; + COLUMN1.Header1.FontShadow = .F., ; + COLUMN1.Header1.FontSize = 9, ; + COLUMN1.Header1.FontStrikethru = .F., ; + COLUMN1.Header1.FontUnderline = .F., ; + COLUMN1.Header1.ForeColor = 0,0,0, ; + COLUMN1.Header1.MouseIcon = ..\..\, ; + COLUMN1.Header1.MousePointer = 0, ; + COLUMN1.Header1.Name = "Header1", ; + COLUMN1.Header1.Picture = ..\..\, ; + COLUMN1.Header1.StatusBarText = "", ; + COLUMN1.Header1.Tag = "", ; + COLUMN1.Header1.ToolTipText = "", ; + COLUMN1.Header1.WordWrap = .F., ; + COLUMN1.InputMask = "", ; + COLUMN1.MouseIcon = ..\..\, ; + COLUMN1.MousePointer = 0, ; + COLUMN1.Movable = .T., ; + COLUMN1.Name = "COLUMN1", ; + COLUMN1.ReadOnly = .F., ; + COLUMN1.Resizable = .T., ; + COLUMN1.SelectOnEntry = .T., ; + COLUMN1.Sparse = .T., ; + COLUMN1.StatusBarText = "", ; + COLUMN1.Tag = "", ; + COLUMN1.Text1.Alignment = 3, ; + COLUMN1.Text1.Anchor = 0, ; + COLUMN1.Text1.AutoComplete = 0, ; + COLUMN1.Text1.AutoCompSource = "", ; + COLUMN1.Text1.AutoCompTable = "", ; + COLUMN1.Text1.BackColor = 255,255,217, ; + COLUMN1.Text1.BackStyle = 1, ; + COLUMN1.Text1.BorderColor = 100,100,100, ; + COLUMN1.Text1.BorderStyle = 0, ; + COLUMN1.Text1.Century = 1, ; + COLUMN1.Text1.ColorScheme = 1, ; + COLUMN1.Text1.ColorSource = 4, ; + COLUMN1.Text1.Comment = "", ; + COLUMN1.Text1.DateFormat = 0, ; + COLUMN1.Text1.DateMark = "", ; + COLUMN1.Text1.DisabledBackColor = 255,255,255, ; + COLUMN1.Text1.DisabledForeColor = 109,109,109, ; + COLUMN1.Text1.DragIcon = ..\..\, ; + COLUMN1.Text1.DragMode = 0, ; + COLUMN1.Text1.Enabled = .T., ; + COLUMN1.Text1.EnableHyperlinks = .F., ; + COLUMN1.Text1.FontBold = .F., ; + COLUMN1.Text1.FontCharSet = 0, ; + COLUMN1.Text1.FontCondense = .F., ; + COLUMN1.Text1.FontExtend = .F., ; + COLUMN1.Text1.FontItalic = .F., ; + COLUMN1.Text1.FontName = "Arial", ; + COLUMN1.Text1.FontOutline = .F., ; + COLUMN1.Text1.FontShadow = .F., ; + COLUMN1.Text1.FontSize = 9, ; + COLUMN1.Text1.FontStrikethru = .F., ; + COLUMN1.Text1.FontUnderline = .F., ; + COLUMN1.Text1.ForeColor = 0,0,0, ; + COLUMN1.Text1.Format = "", ; + COLUMN1.Text1.HelpContextID = 0, ; + COLUMN1.Text1.HideSelection = .T., ; + COLUMN1.Text1.Hours = 0, ; + COLUMN1.Text1.IMEMode = 0, ; + COLUMN1.Text1.InputMask = "", ; + COLUMN1.Text1.IntegralHeight = .F., ; + COLUMN1.Text1.MemoWindow = "", ; + COLUMN1.Text1.MouseIcon = ..\..\, ; + COLUMN1.Text1.MousePointer = 0, ; + COLUMN1.Text1.Name = "Text1", ; + COLUMN1.Text1.NullDisplay = "", ; + COLUMN1.Text1.OLEDragMode = 0, ; + COLUMN1.Text1.OLEDragPicture = ..\..\, ; + COLUMN1.Text1.OLEDropEffects = 3, ; + COLUMN1.Text1.OLEDropMode = 0, ; + COLUMN1.Text1.OLEDropTextInsertion = 0, ; + COLUMN1.Text1.OpenWindow = .F., ; + COLUMN1.Text1.PasswordChar = "", ; + COLUMN1.Text1.ReadOnly = .F., ; + COLUMN1.Text1.RightToLeft = .F., ; + COLUMN1.Text1.Seconds = 2, ; + COLUMN1.Text1.SelectedBackColor = 51,153,255, ; + COLUMN1.Text1.SelectedForeColor = 255,255,255, ; + COLUMN1.Text1.SelectOnEntry = .F., ; + COLUMN1.Text1.SpecialEffect = 0, ; + COLUMN1.Text1.StatusBarText = "", ; + COLUMN1.Text1.StrictDateEntry = 1, ; + COLUMN1.Text1.Style = 0, ; + COLUMN1.Text1.TabIndex = 1, ; + COLUMN1.Text1.TabStop = .T., ; + COLUMN1.Text1.Tag = "", ; + COLUMN1.Text1.TerminateRead = .F., ; + COLUMN1.Text1.Themes = .T., ; + COLUMN1.Text1.ToolTipText = "", ; + COLUMN1.Text1.Value = , ; + COLUMN1.Text1.Visible = .T., ; + COLUMN1.ToolTipText = "", ; + COLUMN1.Visible = .T., ; + COLUMN1.Width = 170, ; + COLUMN2.Alignment = 2, ; + COLUMN2.BackColor = 255,255,217, ; + COLUMN2.ControlSource = "c_Access", ; + COLUMN2.DynamicBackColor = 'ICASE( c_access="S", RGB(0,255,0), c_access="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN2.DynamicForeColor = 'ICASE( c_access="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN2.Enabled = .T., ; + COLUMN2.FontBold = .F., ; + COLUMN2.FontCharSet = 0, ; + COLUMN2.FontCondense = .F., ; + COLUMN2.FontExtend = .F., ; + COLUMN2.FontItalic = .F., ; + COLUMN2.FontName = "Arial", ; + COLUMN2.FontOutline = .F., ; + COLUMN2.FontShadow = .F., ; + COLUMN2.FontSize = 9, ; + COLUMN2.FontStrikethru = .F., ; + COLUMN2.FontUnderline = .F., ; + COLUMN2.ForeColor = 0,0,0, ; + COLUMN2.Header1.Alignment = 2, ; + COLUMN2.Header1.BackColor = 240,240,240, ; + COLUMN2.Header1.Caption = "Access", ; + COLUMN2.Header1.FontBold = .F., ; + COLUMN2.Header1.FontCharSet = 0, ; + COLUMN2.Header1.FontCondense = .F., ; + COLUMN2.Header1.FontExtend = .F., ; + COLUMN2.Header1.FontItalic = .F., ; + COLUMN2.Header1.FontName = "Arial", ; + COLUMN2.Header1.FontOutline = .F., ; + COLUMN2.Header1.FontShadow = .F., ; + COLUMN2.Header1.FontSize = 9, ; + COLUMN2.Header1.FontStrikethru = .F., ; + COLUMN2.Header1.FontUnderline = .F., ; + COLUMN2.Header1.Name = "Header1", ; + COLUMN2.Name = "COLUMN2", ; + COLUMN2.ReadOnly = .F., ; + COLUMN2.Text1.Alignment = 2, ; + COLUMN2.Text1.BackColor = 255,255,217, ; + COLUMN2.Text1.Enabled = .T., ; + COLUMN2.Text1.FontBold = .F., ; + COLUMN2.Text1.FontCharSet = 0, ; + COLUMN2.Text1.FontCondense = .F., ; + COLUMN2.Text1.FontExtend = .F., ; + COLUMN2.Text1.FontItalic = .F., ; + COLUMN2.Text1.FontName = "Arial", ; + COLUMN2.Text1.FontOutline = .F., ; + COLUMN2.Text1.FontShadow = .F., ; + COLUMN2.Text1.FontSize = 9, ; + COLUMN2.Text1.FontStrikethru = .F., ; + COLUMN2.Text1.FontUnderline = .F., ; + COLUMN2.Text1.ForeColor = 0,0,0, ; + COLUMN2.Text1.Name = "Text1", ; + COLUMN2.Text1.ReadOnly = .F., ; + COLUMN2.Text1.RightToLeft = .F., ; + COLUMN2.Text1.Visible = .T., ; + COLUMN2.Visible = .T., ; + COLUMN2.Width = 50, ; + COLUMN3.Alignment = 2, ; + COLUMN3.BackColor = 255,255,217, ; + COLUMN3.ControlSource = "c_Assign", ; + COLUMN3.DynamicBackColor = 'ICASE( c_assign="S", RGB(0,255,0), c_assign="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN3.DynamicForeColor = 'ICASE( c_assign="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN3.Enabled = .T., ; + COLUMN3.FontBold = .F., ; + COLUMN3.FontCharSet = 0, ; + COLUMN3.FontCondense = .F., ; + COLUMN3.FontExtend = .F., ; + COLUMN3.FontItalic = .F., ; + COLUMN3.FontName = "Arial", ; + COLUMN3.FontOutline = .F., ; + COLUMN3.FontShadow = .F., ; + COLUMN3.FontSize = 9, ; + COLUMN3.FontStrikethru = .F., ; + COLUMN3.FontUnderline = .F., ; + COLUMN3.ForeColor = 0,0,0, ; + COLUMN3.Header1.Alignment = 2, ; + COLUMN3.Header1.Caption = "Assign", ; + COLUMN3.Header1.FontBold = .F., ; + COLUMN3.Header1.FontCharSet = 0, ; + COLUMN3.Header1.FontCondense = .F., ; + COLUMN3.Header1.FontExtend = .F., ; + COLUMN3.Header1.FontItalic = .F., ; + COLUMN3.Header1.FontName = "Arial", ; + COLUMN3.Header1.FontOutline = .F., ; + COLUMN3.Header1.FontShadow = .F., ; + COLUMN3.Header1.FontSize = 9, ; + COLUMN3.Header1.FontStrikethru = .F., ; + COLUMN3.Header1.FontUnderline = .F., ; + COLUMN3.Header1.Name = "Header1", ; + COLUMN3.Name = "COLUMN3", ; + COLUMN3.ReadOnly = .F., ; + COLUMN3.Text1.Alignment = 2, ; + COLUMN3.Text1.BackColor = 255,255,217, ; + COLUMN3.Text1.Enabled = .T., ; + COLUMN3.Text1.FontBold = .F., ; + COLUMN3.Text1.FontCharSet = 0, ; + COLUMN3.Text1.FontCondense = .F., ; + COLUMN3.Text1.FontExtend = .F., ; + COLUMN3.Text1.FontItalic = .F., ; + COLUMN3.Text1.FontName = "Arial", ; + COLUMN3.Text1.FontOutline = .F., ; + COLUMN3.Text1.FontShadow = .F., ; + COLUMN3.Text1.FontSize = 9, ; + COLUMN3.Text1.FontStrikethru = .F., ; + COLUMN3.Text1.FontUnderline = .F., ; + COLUMN3.Text1.ForeColor = 0,0,0, ; + COLUMN3.Text1.Name = "Text1", ; + COLUMN3.Text1.ReadOnly = .F., ; + COLUMN3.Text1.RightToLeft = .F., ; + COLUMN3.Text1.Visible = .T., ; + COLUMN3.Visible = .T., ; + COLUMN3.Width = 50, ; + COLUMN4.Alignment = 2, ; + COLUMN4.BackColor = 255,255,217, ; + COLUMN4.ControlSource = "c_Value", ; + COLUMN4.DynamicBackColor = 'ICASE( c_value="S", RGB(0,255,0), c_value="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN4.DynamicForeColor = 'ICASE( c_value="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN4.Enabled = .T., ; + COLUMN4.FontBold = .F., ; + COLUMN4.FontCharSet = 0, ; + COLUMN4.FontCondense = .F., ; + COLUMN4.FontExtend = .F., ; + COLUMN4.FontItalic = .F., ; + COLUMN4.FontName = "Arial", ; + COLUMN4.FontOutline = .F., ; + COLUMN4.FontShadow = .F., ; + COLUMN4.FontSize = 9, ; + COLUMN4.FontStrikethru = .F., ; + COLUMN4.FontUnderline = .F., ; + COLUMN4.ForeColor = 0,0,0, ; + COLUMN4.Header1.Alignment = 2, ; + COLUMN4.Header1.Caption = "Value/Act", ; + COLUMN4.Header1.FontBold = .F., ; + COLUMN4.Header1.FontCharSet = 0, ; + COLUMN4.Header1.FontCondense = .F., ; + COLUMN4.Header1.FontExtend = .F., ; + COLUMN4.Header1.FontItalic = .F., ; + COLUMN4.Header1.FontName = "Arial", ; + COLUMN4.Header1.FontOutline = .F., ; + COLUMN4.Header1.FontShadow = .F., ; + COLUMN4.Header1.FontSize = 9, ; + COLUMN4.Header1.FontStrikethru = .F., ; + COLUMN4.Header1.FontUnderline = .F., ; + COLUMN4.Header1.Name = "Header1", ; + COLUMN4.Name = "COLUMN4", ; + COLUMN4.ReadOnly = .F., ; + COLUMN4.Text1.Alignment = 2, ; + COLUMN4.Text1.BackColor = 255,255,217, ; + COLUMN4.Text1.Enabled = .T., ; + COLUMN4.Text1.FontBold = .F., ; + COLUMN4.Text1.FontCharSet = 0, ; + COLUMN4.Text1.FontCondense = .F., ; + COLUMN4.Text1.FontExtend = .F., ; + COLUMN4.Text1.FontItalic = .F., ; + COLUMN4.Text1.FontName = "Arial", ; + COLUMN4.Text1.FontOutline = .F., ; + COLUMN4.Text1.FontShadow = .F., ; + COLUMN4.Text1.FontSize = 9, ; + COLUMN4.Text1.FontStrikethru = .F., ; + COLUMN4.Text1.FontUnderline = .F., ; + COLUMN4.Text1.ForeColor = 0,0,0, ; + COLUMN4.Text1.Name = "Text1", ; + COLUMN4.Text1.ReadOnly = .F., ; + COLUMN4.Text1.RightToLeft = .F., ; + COLUMN4.Text1.Visible = .T., ; + COLUMN4.Visible = .T., ; + COLUMN4.Width = 50, ; + COLUMN5.Alignment = 2, ; + COLUMN5.BackColor = 255,255,217, ; + COLUMN5.ControlSource = "c_ProgrChg", ; + COLUMN5.DynamicBackColor = 'ICASE( c_ProgrChg="S", RGB(0,255,0), c_ProgrChg="N", RGB(255,0,0), RGB(255,255,255) )', ; + COLUMN5.DynamicForeColor = 'ICASE( c_ProgrChg="N", RGB(255,255,255), RGB(0,0,0) )', ; + COLUMN5.Enabled = .T., ; + COLUMN5.FontBold = .F., ; + COLUMN5.FontCharSet = 0, ; + COLUMN5.FontCondense = .F., ; + COLUMN5.FontExtend = .F., ; + COLUMN5.FontItalic = .F., ; + COLUMN5.FontName = "Arial", ; + COLUMN5.FontOutline = .F., ; + COLUMN5.FontShadow = .F., ; + COLUMN5.FontSize = 9, ; + COLUMN5.FontStrikethru = .F., ; + COLUMN5.FontUnderline = .F., ; + COLUMN5.ForeColor = 0,0,0, ; + COLUMN5.Header1.Alignment = 2, ; + COLUMN5.Header1.Caption = "Prg.Chg", ; + COLUMN5.Header1.FontBold = .F., ; + COLUMN5.Header1.FontCharSet = 0, ; + COLUMN5.Header1.FontCondense = .F., ; + COLUMN5.Header1.FontExtend = .F., ; + COLUMN5.Header1.FontItalic = .F., ; + COLUMN5.Header1.FontName = "Arial", ; + COLUMN5.Header1.FontOutline = .F., ; + COLUMN5.Header1.FontShadow = .F., ; + COLUMN5.Header1.FontSize = 9, ; + COLUMN5.Header1.FontStrikethru = .F., ; + COLUMN5.Header1.FontUnderline = .F., ; + COLUMN5.Header1.Name = "Header1", ; + COLUMN5.Name = "COLUMN5", ; + COLUMN5.ReadOnly = .F., ; + COLUMN5.Text1.Alignment = 2, ; + COLUMN5.Text1.BackColor = 255,255,217, ; + COLUMN5.Text1.Enabled = .T., ; + COLUMN5.Text1.FontBold = .F., ; + COLUMN5.Text1.FontCharSet = 0, ; + COLUMN5.Text1.FontCondense = .F., ; + COLUMN5.Text1.FontExtend = .F., ; + COLUMN5.Text1.FontItalic = .F., ; + COLUMN5.Text1.FontName = "Arial", ; + COLUMN5.Text1.FontOutline = .F., ; + COLUMN5.Text1.FontShadow = .F., ; + COLUMN5.Text1.FontSize = 9, ; + COLUMN5.Text1.FontStrikethru = .F., ; + COLUMN5.Text1.FontUnderline = .F., ; + COLUMN5.Text1.ForeColor = 0,0,0, ; + COLUMN5.Text1.Name = "Text1", ; + COLUMN5.Text1.ReadOnly = .F., ; + COLUMN5.Text1.RightToLeft = .F., ; + COLUMN5.Text1.Visible = .T., ; + COLUMN5.Visible = .T., ; + COLUMN5.Width = 50, ; + Column6.Alignment = 2, ; + Column6.BackColor = 255,255,217, ; + Column6.ControlSource = "c_UI", ; + Column6.DynamicBackColor = 'ICASE( c_UI="S", RGB(0,255,0), c_UI="N", RGB(255,0,0), RGB(255,255,255) )', ; + Column6.DynamicForeColor = 'ICASE( c_UI="N", RGB(255,255,255), RGB(0,0,0) )', ; + Column6.Enabled = .T., ; + Column6.FontBold = .F., ; + Column6.FontCharSet = 0, ; + Column6.FontCondense = .F., ; + Column6.FontExtend = .F., ; + Column6.FontItalic = .F., ; + Column6.FontName = "Arial", ; + Column6.FontOutline = .F., ; + Column6.FontShadow = .F., ; + Column6.FontSize = 9, ; + Column6.FontStrikethru = .F., ; + Column6.FontUnderline = .F., ; + Column6.ForeColor = 0,0,0, ; + Column6.Name = "Column6", ; + Column6.ReadOnly = .F., ; + Column6.Visible = .T., ; + Column6.Width = 50 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> + + ADD OBJECT 'Cl_grid1.Column6.Header1' AS header WITH ; + Alignment = 2, ; + Caption = "UI", ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Name = "Header1" + *< END OBJECT: BaseClass="header" /> + + ADD OBJECT 'Cl_grid1.Column6.Text1' AS textbox WITH ; + Alignment = 2, ; + BackColor = 255,255,217, ; + BorderStyle = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Margin = 0, ; + Name = "Text1", ; + RightToLeft = .F., ; + Visible = .T. + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'pgf' AS cl_pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = 384, ; + HelpContextID = 0, ; + Left = 12, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "pgf", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 2, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabIndex = 7, ; + TabOrientation = 1, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 0, ; + Tag = "", ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 268, ; + Page1.BackColor = 240,240,240, ; + Page1.Caption = "Page1", ; + Page1.ColorSource = 4, ; + Page1.Comment = "Sin comentarios", ; + Page1.DragIcon = ..\..\, ; + Page1.DragMode = 0, ; + Page1.Enabled = .T., ; + Page1.FontBold = .F., ; + Page1.FontCharSet = 0, ; + Page1.FontCondense = .F., ; + Page1.FontExtend = .F., ; + Page1.FontItalic = .F., ; + Page1.FontName = "Arial", ; + Page1.FontOutline = .F., ; + Page1.FontShadow = .F., ; + Page1.FontSize = 9, ; + Page1.FontStrikethru = .F., ; + Page1.FontUnderline = .F., ; + Page1.ForeColor = 0,0,0, ; + Page1.HelpContextID = 0, ; + Page1.MouseIcon = ..\..\, ; + Page1.MousePointer = 0, ; + Page1.Name = "Page1", ; + Page1.OLEDragMode = 0, ; + Page1.OLEDragPicture = ..\..\, ; + Page1.OLEDropEffects = 3, ; + Page1.OLEDropMode = 0, ; + Page1.PageOrder = 1, ; + Page1.Picture = ..\..\, ; + Page1.StatusBarText = "", ; + Page1.Tag = "", ; + Page1.ToolTipText = "", ; + Page1.WhatsThisHelpID = -1, ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2", ; + Page2.PageOrder = 2 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> + + ADD OBJECT 'pgf.Page1.checkbox' AS cl_checkbox WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + Caption = "Chk1", ; + Centered = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledPicture = ..\..\, ; + DownPicture = ..\..\, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (21), ; + HelpContextID = 0, ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "checkbox", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\treeview.bmp, ; + PictureMargin = 0, ; + PicturePosition = 4, ; + PictureSpacing = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 1, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (8), ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (199), ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> + + ADD OBJECT 'pgf.Page1.collection' AS cl_collection WITH ; + Left = 218, ; + Name = "collection", ; + Top = 8 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="collection" /> + + ADD OBJECT 'pgf.Page1.combobox' AS cl_combobox WITH ; + Alignment = 0, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + BoundColumn = 1, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 0, ; + ColumnLines = .T., ; + ColumnWidths = "", ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayCount = 0, ; + DisplayValue = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (20), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IncrementalSearch = .T., ; + InputMask = "", ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = (7), ; + Margin = 0, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "combobox", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + Picture = bmps\treeview.bmp, ; + PictureSelectionDisplay = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (35), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (196) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> + + ADD OBJECT 'pgf.Page1.commandbutton' AS cl_commandbutton WITH ; + AutoSize = .F., ; + Caption = "Comando", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + FontSize = 8, ; + Height = (25), ; + Left = (99), ; + Name = "commandbutton", ; + Picture = bmps\treeview.bmp, ; + PicturePosition = 4, ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (63), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (80), ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandbutton" /> + + ADD OBJECT 'pgf.Page1.commandgroup' AS cl_commandgroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (64), ; + HelpContextID = 0, ; + Left = (6), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "commandgroup", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 2, ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (60), ; + Value = 1, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (93), ; + Command1.Alignment = 2, ; + Command1.Anchor = 0, ; + Command1.AutoSize = .F., ; + Command1.BackColor = 192,192,192, ; + Command1.Cancel = .F., ; + Command1.Caption = "Comando1", ; + Command1.ColorScheme = 1, ; + Command1.ColorSource = 4, ; + Command1.Comment = "", ; + Command1.Default = .F., ; + Command1.DisabledBackColor = 240,240,240, ; + Command1.DisabledForeColor = 109,109,109, ; + Command1.DisabledPicture = ..\..\, ; + Command1.DownPicture = ..\..\, ; + Command1.DragIcon = ..\..\, ; + Command1.DragMode = 0, ; + Command1.Enabled = .T., ; + Command1.FontBold = .F., ; + Command1.FontCharSet = 0, ; + Command1.FontCondense = .F., ; + Command1.FontExtend = .F., ; + Command1.FontItalic = .F., ; + Command1.FontName = "Arial", ; + Command1.FontOutline = .F., ; + Command1.FontShadow = .F., ; + Command1.FontSize = 8, ; + Command1.FontStrikethru = .F., ; + Command1.FontUnderline = .F., ; + Command1.ForeColor = 0,0,0, ; + Command1.Height = 25, ; + Command1.HelpContextID = 0, ; + Command1.Left = 1, ; + Command1.MouseIcon = ..\..\, ; + Command1.MousePointer = 0, ; + Command1.Name = "Command1", ; + Command1.OLEDragMode = 0, ; + Command1.OLEDragPicture = ..\..\, ; + Command1.OLEDropEffects = 3, ; + Command1.OLEDropMode = 0, ; + Command1.Picture = bmps\sobrepostal.bmp, ; + Command1.PictureMargin = 0, ; + Command1.PicturePosition = 4, ; + Command1.PictureSpacing = 0, ; + Command1.RightToLeft = .F., ; + Command1.SpecialEffect = 0, ; + Command1.StatusBarText = "", ; + Command1.Style = 0, ; + Command1.TabIndex = 1, ; + Command1.TabStop = .T., ; + Command1.Tag = "", ; + Command1.TerminateRead = .F., ; + Command1.Themes = .T., ; + Command1.ToolTipText = "", ; + Command1.Top = 4, ; + Command1.Visible = .T., ; + Command1.WhatsThisHelpID = -1, ; + Command1.Width = 90, ; + Command1.WordWrap = .F., ; + Command2.AutoSize = .F., ; + Command2.BackColor = 192,192,192, ; + Command2.Caption = "Comando2", ; + Command2.FontSize = 8, ; + Command2.Height = 25, ; + Command2.Left = 1, ; + Command2.Name = "Command2", ; + Command2.Picture = bmps\sobrepostal.bmp, ; + Command2.PicturePosition = 4, ; + Command2.Top = 32, ; + Command2.Width = 90 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> + + ADD OBJECT 'pgf.Page1.container' AS cl_container WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = (24), ; + HelpContextID = 0, ; + Left = (227), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "container", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + SpecialEffect = 2, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 4, ; + TabStop = .T., ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (127), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (20) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" /> + + ADD OBJECT 'pgf.Page1.control' AS cl_control WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ForeColor = 0,0,0, ; + Height = (24), ; + HelpContextID = 0, ; + Left = (199), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "control", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + SpecialEffect = 2, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 5, ; + TabStop = .T., ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (127), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (20) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" /> + + ADD OBJECT 'pgf.Page1.editbox' AS cl_editbox WITH ; + AddLineFeeds = .F., ; + Alignment = 0, ; + AllowTabs = .F., ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + ColorScheme = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (41), ; + HelpContextID = 0, ; + HideSelection = .T., ; + IMEMode = 0, ; + IntegralHeight = .F., ; + Left = (183), ; + Margin = 2, ; + MaxLength = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "editbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + ScrollBars = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (60), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (68) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> + + ADD OBJECT 'pgf.Page1.hyperlink' AS cl_hyperlink WITH ; + Comment = "", ; + Left = 199, ; + Name = "hyperlink", ; + Tag = "", ; + test_aa = .F., ; + Top = 103 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="hyperlink" /> + + ADD OBJECT 'pgf.Page1.image' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (16), ; + HelpContextID = 0, ; + Left = (231), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "image", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\scccheckout.bmp, ; + RotateFlip = 0, ; + StatusBarText = "", ; + Stretch = 0, ; + Tag = "", ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (107), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (16) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'pgf.Page1.label' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = (17), ; + HelpContextID = 0, ; + Left = (6), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "label", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + TabIndex = 7, ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (136), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (104), ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'pgf.Page1.line' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 255,0,0, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .T., ; + Height = (8), ; + HelpContextID = 0, ; + Left = (121), ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "line", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + test_aa = .F., ; + ToolTipText = "", ; + Top = (136), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (50) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'pgf.Page1.listbox' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 128,255,128, ; + BoundColumn = 1, ; + BoundTo = .F., ; + ColorScheme = 1, ; + ColorSource = 4, ; + ColumnCount = 0, ; + ColumnLines = .T., ; + ColumnWidths = "", ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 255,255,255, ; + DisabledForeColor = 109,109,109, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DisplayValue = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = (60), ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "listbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = ..\..\, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 8, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (164), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (224) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'pgf.Page1.option' AS cl_option WITH ; + AutoSize = .F., ; + Caption = "Esta es la opción B", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + FontSize = 8, ; + Height = (16), ; + Left = (123), ; + Name = "option", ; + Top = (232), ; + Width = (110) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optionbutton" /> + + ADD OBJECT 'pgf.Page1.optiongroup' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 2, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + Height = (46), ; + HelpContextID = 0, ; + Left = (7), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "optiongroup", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (232), ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (112), ; + Option1.Alignment = 0, ; + Option1.Anchor = 0, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 192,192,192, ; + Option1.BackStyle = 1, ; + Option1.Caption = "Esta es la opc. 1", ; + Option1.ColorScheme = 1, ; + Option1.ColorSource = 4, ; + Option1.Comment = "", ; + Option1.ControlSource = "", ; + Option1.DisabledBackColor = 240,240,240, ; + Option1.DisabledForeColor = 109,109,109, ; + Option1.DisabledPicture = ..\..\, ; + Option1.DownPicture = ..\..\, ; + Option1.DragIcon = ..\..\, ; + Option1.DragMode = 0, ; + Option1.Enabled = .T., ; + Option1.FontBold = .F., ; + Option1.FontCondense = .F., ; + Option1.FontExtend = .F., ; + Option1.FontItalic = .F., ; + Option1.FontName = "Arial", ; + Option1.FontOutline = .F., ; + Option1.FontShadow = .F., ; + Option1.FontSize = 8, ; + Option1.FontStrikethru = .F., ; + Option1.FontUnderline = .F., ; + Option1.ForeColor = 0,0,0, ; + Option1.Height = 41, ; + Option1.HelpContextID = 0, ; + Option1.Left = 5, ; + Option1.MouseIcon = ..\..\, ; + Option1.MousePointer = 0, ; + Option1.Name = "Option1", ; + Option1.OLEDragMode = 0, ; + Option1.OLEDragPicture = ..\..\, ; + Option1.OLEDropEffects = 3, ; + Option1.OLEDropMode = 0, ; + Option1.Picture = bmps\scccheckout.bmp, ; + Option1.PictureMargin = 0, ; + Option1.PicturePosition = 4, ; + Option1.PictureSpacing = 0, ; + Option1.RightToLeft = .F., ; + Option1.SpecialEffect = 0, ; + Option1.StatusBarText = "", ; + Option1.Style = 1, ; + Option1.TabIndex = 1, ; + Option1.TabStop = .T., ; + Option1.Tag = "", ; + Option1.TerminateRead = .F., ; + Option1.Themes = .T., ; + Option1.ToolTipText = "", ; + Option1.Top = 5, ; + Option1.Value = 0, ; + Option1.Visible = .T., ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 112, ; + Option1.WordWrap = .F., ; + Option2.AutoSize = .F., ; + Option2.BackColor = 192,192,192, ; + Option2.Caption = "Esta es la opc. 2", ; + Option2.FontSize = 8, ; + Option2.Height = 16, ; + Option2.Left = 5, ; + Option2.Name = "Option2", ; + Option2.Picture = bmps\scccheckout.bmp, ; + Option2.PicturePosition = 4, ; + Option2.Style = 1, ; + Option2.Top = 24, ; + Option2.Width = 103 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'pgf.Page1.Pageframe1' AS pageframe WITH ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + ErasePage = .T., ; + Height = (61), ; + Left = (135), ; + MemberClass = "cl_page", ; + MemberClassLibrary = lib_controles.vcx, ; + Name = "Pageframe1", ; + PageCount = 2, ; + TabOrientation = 2, ; + Themes = .F., ; + Top = (284), ; + Width = (117), ; + Cl_page1.Caption = "Pg1", ; + Cl_page1.Name = "Cl_page1", ; + Cl_page2.BackColor = 255,193,132, ; + Cl_page2.Caption = "Pg2", ; + Cl_page2.Name = "Cl_page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'pgf.Page1.Shape1' AS shape WITH ; + Anchor = 0, ; + BackColor = 255,255,196, ; + BackStyle = 1, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 16, ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .T., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = (21), ; + HelpContextID = 0, ; + Left = (115), ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = (99), ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (57) + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'pgf.Page1.spinner' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (19), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = (11), ; + Margin = 0, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "spinner", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabIndex = 9, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (292), ; + Value = 0, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (108) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'pgf.Page1.textbox' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 128,255,128, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = (19), ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = (11), ; + Margin = 0, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "textbox", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabIndex = 1, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + test_aa = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = (320), ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = (108) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'pgf.Page1.timer' AS cl_timer WITH ; + Comment = "", ; + DefHeight = , ; + DefLeft = , ; + DefTop = , ; + DefWidth = , ; + Enabled = .T., ; + Height = (23), ; + Interval = 0, ; + Left = (207), ; + Name = "timer", ; + Tag = "", ; + test_aa = .F., ; + Top = (252), ; + Width = (23) + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="timer" /> + + PROCEDURE Activate + IF NOT THISFORM.l_activated + THISFORM.run_tests() + THISFORM.l_activated = .T. + ENDIF + + ENDPROC + + PROCEDURE add_control + LPARAMETERS toControl + + LOCAL lcCtlPath + + WITH THISFORM + lcCtlPath = SYS(1272, toControl) + + INSERT INTO C_TESTS ; + ( c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg, c_UI ) ; + VALUES ; + ( SUBSTR( lcCtlPath, LEN(.NAME) + 2), 'N', 'N', 'N', 'N', 'N' ) + ENDWITH + + ENDPROC + + PROCEDURE Load + CREATE CURSOR C_TESTS ( c_CtlName C(30), c_Access C(1), c_Assign C(1), c_Value C(1), c_ProgrChg C(1), c_UI C(1) ) + INDEX ON c_CtlName TAG c_CtlName + + ENDPROC + + PROCEDURE run_tests + TRY + LOCAL loEx AS Exception, loCtl + + WITH THISFORM AS Form + *-- c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg + THISFORM.pgf.page1.SETALL( "Tag", "" ) + THISFORM.pgf.ActivePage = 1 + + SCAN + *-- Test UI Enable + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + DO CASE + CASE NOT PEMSTATUS(loCtl, 'UIEnable',5) + REPLACE c_UI WITH "-" + CASE loCtl.Tag = "UI" + REPLACE c_UI WITH "S" + ENDCASE + ENDSCAN + + SCAN + *-- Test Access + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + loCtl.Tag = '' + IF loCtl.test_aa = "ACCESS_OK" + REPLACE c_Access WITH "S" + ENDIF + ENDSCAN + + SCAN + *-- Test Assign + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + loCtl.Tag = '' + loCtl.test_aa = "ASSIGN_OK" + IF loCtl.Tag = "ASSIGN_OK" + REPLACE c_Assign WITH "S" + ENDIF + ENDSCAN + + SCAN + *-- Test Valor/Activate + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + + DO CASE + CASE loCtl.Baseclass == 'Checkbox' + .valor = 1 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Combobox' + .valor = 3 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Commandgroup' + .valor = 2 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Editbox' + .valor = 'Texto editable' + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Listbox' + .valor = 3 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Optiongroup' + .valor = 2 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Spinner' + .valor = 123 + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Textbox' + .valor = "Mi texto" + loCtl.ControlSource = 'THISFORM.valor' + IF loCtl.Value = .valor + REPLACE c_Value WITH "S" + ENDIF + loCtl.ControlSource = '' + + CASE loCtl.Baseclass == 'Page' + loCtl.Parent.ActivePage = 2 + IF loCtl.Tag = 'AC' + REPLACE c_Value WITH "S" + ENDIF + + OTHERWISE + REPLACE c_Value WITH "-" + + ENDCASE + ENDSCAN + + SCAN + *-- Test ProgrammaticChange + loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) + .Tag = '' + DO CASE + CASE loCtl.Baseclass == 'Checkbox' + loCtl.Value = 0 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Combobox' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Commandgroup' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Editbox' + loCtl.Value = 'Editado!' + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Listbox' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Optiongroup' + loCtl.Value = 1 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Spinner' + loCtl.Value = 321 + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + CASE loCtl.Baseclass == 'Textbox' + loCtl.Value = 'Editado!' + IF NOT EMPTY(.tag) + REPLACE c_ProgrChg WITH "S" + ENDIF + + OTHERWISE + REPLACE c_ProgrChg WITH "-" + + ENDCASE + + ENDSCAN + ENDWITH + + + CATCH TO loEx + THISFORM.edit1.Value = 'Error ' + TRANSFORM(loEx.ErrorNo) + CHR(13) ; + + loEx.Message + CHR(13) ; + + loEx.Procedure + ', Line ' + TRANSFORM(loEx.LineNo) + CHR(13) ; + + loEx.Details + + FINALLY + IF USED("C_TESTS") + SELECT C_TESTS + GO TOP + ENDIF + + ENDTRY + + ENDPROC + + PROCEDURE pgf.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.checkbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.collection.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.collection.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.collection.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.combobox.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.combobox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.combobox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.combobox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.combobox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.commandbutton.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.commandgroup.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.container.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.container.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.container.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.container.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.control.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.control.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.control.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.control.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.editbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.editbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.editbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.editbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.editbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.hyperlink.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.image.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.image.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.image.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.image.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.label.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.label.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.label.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.label.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.line.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.line.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.line.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.line.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.listbox.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.listbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.listbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.listbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.listbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.option.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.option.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.option.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.option.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.optiongroup.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Activate + THIS.Tag = 'AC' + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.Init + this.Cl_page2.Init() + + ENDPROC + + PROCEDURE pgf.Page1.Pageframe1.UIEnable + LPARAMETERS lEnable + + IF lEnable + THISFORM.pgf.Tag = 'UI' + ENDIF + + + ENDPROC + + PROCEDURE pgf.Page1.spinner.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.spinner.ProgrammaticChange + THISFORM.Tag = 'PC' + + + ENDPROC + + PROCEDURE pgf.Page1.spinner.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.spinner.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.spinner.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.textbox.Init + THISFORM.add_control( THIS ) + + ENDPROC + + PROCEDURE pgf.Page1.textbox.ProgrammaticChange + THISFORM.Tag = 'PC' + + ENDPROC + + PROCEDURE pgf.Page1.textbox.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.textbox.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.Page1.textbox.UIEnable + LPARAMETERS lEnable + + IF lEnable + THIS.Tag = 'UI' + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.timer.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.Page1.timer.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + + PROCEDURE pgf.test_aa_access + IF EMPTY(THIS.Tag) + RETURN "ACCESS_OK" + ELSE + RETURN THIS.Tag + ENDIF + + ENDPROC + + PROCEDURE pgf.test_aa_assign + LPARAMETERS vNewVal + + THIS.test_aa = m.vNewVal + THIS.Tag = EVL(m.vNewVal,'') + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_form_controles.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_form_controles.vc2 new file mode 100644 index 0000000..94d3506 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_form_controles.vc2 @@ -0,0 +1,3043 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_form_controles AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Label4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Line1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Label4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Line1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Spinner1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Label5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Shape2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Line2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image7" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image8" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image9" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image10" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Spinner2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Spinner1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Label5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Shape2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Line2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image7" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image8" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image9" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Image10" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Spinner2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Label4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Line1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Spinner1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Label5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Shape2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Line2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image7" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image8" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image9" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image10" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Spinner2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_label1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_shape1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_line1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_spinner1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_label2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_shape2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_line2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image7" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image8" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image9" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_image10" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_spinner2" UniqueID="" Timestamp="" /> + + * + AllowOutput = .T. + AlwaysOnBottom = .F. + AlwaysOnTop = .F. + AutoCenter = .F. + BackColor = 192,192,192 + BindControls = .T. + BorderStyle = 3 + BufferMode = 0 + Caption = "Form_y_Controles_Varios_Test" + ClipControls = .T. + Closable = .T. + ColorSource = 4 + Comment = "" + ContinuousScroll = .T. + ControlBox = .T. + DataSession = 1 + DEClass = "cl_dataenvironment" + DEClassLibrary = lib_controles.vcx + DefOleLCID = 0 + Desktop = .F. + Dockable = 0 + DoCreate = .T. + DrawMode = 13 + DrawStyle = 0 + DrawWidth = 1 + Enabled = .T. + FillColor = 0,0,0 + FillStyle = 1 + FontBold = .F. + FontCharSet = 0 + FontCondense = .F. + FontExtend = .F. + FontItalic = .F. + FontName = "Arial" + FontOutline = .F. + FontShadow = .F. + FontSize = 8 + FontStrikethru = .F. + FontUnderline = .F. + ForeColor = 0,0,0 + HalfHeightCaption = .F. + Height = 424 + HelpContextID = 0 + HScrollSmallChange = 10 + Icon = bmps\container.ico + KeyPreview = .F. + Left = 0 + LockScreen = .F. + MacDesktop = 0 + MaxButton = .T. + MaxHeight = -1 + MaxLeft = -1 + MaxTop = -1 + MaxWidth = -1 + MDIForm = .F. + MinButton = .T. + MinHeight = -1 + MinWidth = -1 + MouseIcon = ..\..\ + MousePointer = 0 + Movable = .T. + Name = "F_base1" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + Picture = bmps\fondogris.bmp + RightToLeft = .F. + ScaleMode = 3 + ScrollBars = 0 + ShowInTaskBar = .T. + ShowTips = .F. + ShowWindow = 0 + SizeBox = .F. + TabIndex = 1 + TabStop = .T. + Tag = "" + Themes = .T. + TitleBar = 1 + Top = 0 + Visible = .T. + VScrollSmallChange = 10 + WhatsThisButton = .F. + WhatsThisHelp = .F. + WhatsThisHelpID = -1 + Width = 819 + WindowState = 0 + WindowType = 0 + ZoomBox = .F. + Edit1.Name = "Edit1" + Edit1.RightToLeft = .F. + Label3.Name = "Label3" + Label3.RightToLeft = .F. + Command2.Name = "Command2" + Command2.RightToLeft = .F. + Label1.Caption = "CONTROL NORMAL" + Label1.Name = "Label1" + Label1.RightToLeft = .F. + Label2.Caption = "CONTROL SUBCLASADOS" + Label2.Name = "Label2" + Label2.RightToLeft = .F. + * + + ADD OBJECT 'Cl_image1' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 16, ; + HelpContextID = 0, ; + Left = 312, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image10' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 496, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image10", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 132, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image2' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 32, ; + HelpContextID = 0, ; + Left = 312, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image3' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 388, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image4' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 52, ; + HelpContextID = 0, ; + Left = 348, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image5' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 388, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 132, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image6' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 420, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image7' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 32, ; + HelpContextID = 0, ; + Left = 420, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image7", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image8' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 496, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image8", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_image9' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 52, ; + HelpContextID = 0, ; + Left = 456, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_image9", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_label1' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 312, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_label1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 40, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'Cl_label2' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 420, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_label2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 40, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'Cl_line1' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Height = 8, ; + HelpContextID = 0, ; + Left = 312, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_line1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 80, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'Cl_line2' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + Height = 8, ; + HelpContextID = 0, ; + Left = 420, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_line2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 80, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'Cl_pageframe1' AS cl_pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = 188, ; + HelpContextID = 0, ; + Left = 292, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_pageframe1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 3, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabOrientation = 0, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 200, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 256, ; + Page1.Name = "Page1", ; + Page2.Name = "Page2", ; + Page3.Caption = "Page3", ; + Page3.Name = "Page3" + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image1' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 16, ; + HelpContextID = 0, ; + Left = 19, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image10' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 203, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image10", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image2' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 32, ; + HelpContextID = 0, ; + Left = 19, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 88, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image3' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 95, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image4' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 52, ; + HelpContextID = 0, ; + Left = 55, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image5' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 95, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image6' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 127, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image7' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 32, ; + HelpContextID = 0, ; + Left = 127, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image7", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 88, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image8' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 203, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image8", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Image9' AS cl_image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 52, ; + HelpContextID = 0, ; + Left = 163, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image9", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Label4' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 19, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 8, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Label5' AS cl_label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 127, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 8, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Line1' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Height = 8, ; + HelpContextID = 0, ; + Left = 19, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 48, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Line2' AS cl_line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + Height = 8, ; + HelpContextID = 0, ; + Left = 127, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 48, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Shape1' AS cl_shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 19, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Shape2' AS cl_shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 127, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Spinner1' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 19, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 128, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'Cl_pageframe1.Page2.Spinner2' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 127, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 128, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'Cl_shape1' AS cl_shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 312, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 60, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> + + ADD OBJECT 'Cl_shape2' AS cl_shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 420, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_shape2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 60, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> + + ADD OBJECT 'Cl_spinner1' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 312, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_spinner1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 160, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'Cl_spinner2' AS cl_spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 420, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_spinner2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 160, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> + + ADD OBJECT 'Image1' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 16, ; + HelpContextID = 0, ; + Left = 44, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image10' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 228, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image10", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 132, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image2' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 32, ; + HelpContextID = 0, ; + Left = 44, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image3' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 120, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image4' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 52, ; + HelpContextID = 0, ; + Left = 80, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image5' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 120, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 132, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image6' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 152, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image7' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 32, ; + HelpContextID = 0, ; + Left = 152, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image7", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 120, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image8' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 228, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image8", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Image9' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 52, ; + HelpContextID = 0, ; + Left = 188, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image9", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Label4' AS label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 44, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 40, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Label5' AS label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 152, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 40, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Line1' AS line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Height = 8, ; + HelpContextID = 0, ; + Left = 44, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 80, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="line" /> + + ADD OBJECT 'Line2' AS line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + Height = 8, ; + HelpContextID = 0, ; + Left = 152, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 80, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="line" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ActivePage = 2, ; + Anchor = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + ErasePage = .T., ; + Height = 189, ; + HelpContextID = 0, ; + Left = 20, ; + MemberClass = "cl_page", ; + MemberClassLibrary = lib_controles.vcx, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Pageframe1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PageCount = 3, ; + RightToLeft = .F., ; + StatusBarText = "", ; + TabOrientation = 0, ; + Tabs = .T., ; + TabStop = .T., ; + TabStretch = 1, ; + TabStyle = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 200, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 256, ; + Cl_page1.Name = "Cl_page1", ; + Cl_page2.Name = "Cl_page2", ; + Cl_page3.Name = "Cl_page3" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image1' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 16, ; + HelpContextID = 0, ; + Left = 23, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image10' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 207, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image10", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image2' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 32, ; + HelpContextID = 0, ; + Left = 23, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 88, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image3' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 99, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image3", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image4' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 52, ; + HelpContextID = 0, ; + Left = 59, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image5' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Height = 20, ; + HelpContextID = 0, ; + Left = 99, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 5, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 100, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image6' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 16, ; + HelpContextID = 0, ; + Left = 131, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image6", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 17 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image7' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 32, ; + HelpContextID = 0, ; + Left = 131, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image7", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + StatusBarText = "", ; + Stretch = 1, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 88, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 32 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image8' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 20, ; + HelpContextID = 0, ; + Left = 207, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image8", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 16 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Image9' AS image WITH ; + Anchor = 0, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 0, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + Height = 52, ; + HelpContextID = 0, ; + Left = 167, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Image9", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RotateFlip = 1, ; + StatusBarText = "", ; + Stretch = 2, ; + Tag = "", ; + Themes = .T., ; + ToolTipText = "", ; + Top = 68, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 36 + *< END OBJECT: BaseClass="image" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Label4' AS label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 23, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label4", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 8, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Label5' AS label WITH ; + Alignment = 0, ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderStyle = 0, ; + Caption = "Label4", ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 131, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Label5", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + RightToLeft = .F., ; + Rotation = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 8, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104, ; + WordWrap = .F. + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Line1' AS line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Height = 8, ; + HelpContextID = 0, ; + Left = 23, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 48, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="line" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Line2' AS line WITH ; + Anchor = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorSource = 4, ; + Comment = "", ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + Height = 8, ; + HelpContextID = 0, ; + Left = 131, ; + LineSlant = "\", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Line2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + StatusBarText = "", ; + Tag = "", ; + ToolTipText = "", ; + Top = 48, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="line" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Shape1' AS shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 23, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Shape2' AS shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 131, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 28, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Spinner1' AS spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 23, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 128, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="spinner" /> + + ADD OBJECT 'Pageframe1.Cl_page2.Spinner2' AS spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 131, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 128, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="spinner" /> + + ADD OBJECT 'Shape1' AS shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 44, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 60, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'Shape2' AS shape WITH ; + Anchor = 0, ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + BorderWidth = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + Curvature = 0, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + DrawMode = 13, ; + Enabled = .F., ; + FillColor = 0,0,0, ; + FillStyle = 1, ; + Height = 17, ; + HelpContextID = 0, ; + Left = 152, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Shape2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + PolyPoints = "", ; + Rotation = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + Style = 0, ; + Tag = "", ; + ToolTipText = "", ; + Top = 60, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 105 + *< END OBJECT: BaseClass="shape" /> + + ADD OBJECT 'Spinner1' AS spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 44, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 160, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="spinner" /> + + ADD OBJECT 'Spinner2' AS spinner WITH ; + Alignment = 1, ; + Anchor = 0, ; + BackColor = 255,255,255, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 24, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Increment = 1.00, ; + InputMask = "", ; + KeyboardHighValue = 2147483647, ; + KeyboardLowValue = -2147483647, ; + Left = 152, ; + Margin = 2, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Spinner2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + ReadOnly = .F., ; + RightToLeft = .F., ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 0, ; + SpinnerHighValue = 2147483647.00, ; + SpinnerLowValue = -2147483647.00, ; + StatusBarText = "", ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 160, ; + Value = 123, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 104 + *< END OBJECT: BaseClass="spinner" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_listbox.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_listbox.vc2 new file mode 100644 index 0000000..17219bd --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_listbox.vc2 @@ -0,0 +1,560 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_listbox AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.Cl_ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Container1.ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.ListBox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="ListBox1" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Name = "f_listbox" + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "LISTBOX NORMAL" + Label1.Name = "Label1" + Label2.Caption = "LISTBOX SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_ListBox1' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 308, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "Cl_ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'Container1' AS container WITH ; + Height = 97, ; + Left = 28, ; + Name = "Container1", ; + TabIndex = 9, ; + Top = 128, ; + Width = 512 + *< END OBJECT: BaseClass="container" /> + + ADD OBJECT 'Container1.Cl_ListBox1' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 280, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "Cl_ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'Container1.ListBox1' AS listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 8, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 12, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: BaseClass="listbox" /> + + ADD OBJECT 'ListBox1' AS listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 36, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 44, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: BaseClass="listbox" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 137, ; + Left = 28, ; + Name = "Pageframe1", ; + PageCount = 2, ; + TabIndex = 10, ; + Top = 252, ; + Width = 513, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_ListBox1' AS cl_listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 279, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "Cl_ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 6, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> + + ADD OBJECT 'Pageframe1.Page1.ListBox1' AS listbox WITH ; + Anchor = 0, ; + AutoHideScrollbar = 0, ; + BorderColor = 255,255,0, ; + BoundColumn = 2, ; + BoundTo = .F., ; + ColorScheme = 2, ; + ColorSource = 4, ; + ColumnCount = 2, ; + ColumnLines = .T., ; + ColumnWidths = "150,150", ; + Comment = "", ; + ControlSource = "", ; + DisabledBackColor = 0,128,192, ; + DisabledForeColor = 128,0,255, ; + DisabledItemBackColor = 255,255,255, ; + DisabledItemForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + FirstElement = 1, ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 8, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + Height = 60, ; + HelpContextID = 0, ; + IncrementalSearch = .T., ; + IntegralHeight = .F., ; + ItemBackColor = 255,255,255, ; + ItemForeColor = 0,0,0, ; + ItemTips = .F., ; + Left = 7, ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + MoverBars = .F., ; + MultiSelect = .F., ; + Name = "ListBox1", ; + NullDisplay = "", ; + NumberOfElements = 0, ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + Picture = bmps\sobrepostal.bmp, ; + RightToLeft = .F., ; + RowSource = "", ; + RowSourceType = 0, ; + SelectedItemBackColor = 51,153,255, ; + SelectedItemForeColor = 255,255,255, ; + Sorted = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + TabIndex = 11, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 8, ; + Value = , ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 224 + *< END OBJECT: BaseClass="listbox" /> + + PROCEDURE Cl_ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.Cl_ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Container1.ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.Cl_ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + + PROCEDURE Pageframe1.Page1.ListBox1.Init + this.AddListItem('Este es el valor.A1') + this.AddListItem('Este es el valor.A2', this.NewItemId, 2) + this.AddListItem('Este es el valor.B1') + this.AddListItem('Este es el valor.B2', this.NewItemId, 2) + this.AddListItem('Este es el valor.C1') + this.AddListItem('Este es el valor.C2', this.NewItemId, 2) + this.ListIndex = 2 + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_optiongroup.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_optiongroup.vc2 new file mode 100644 index 0000000..6a81b75 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_optiongroup.vc2 @@ -0,0 +1,1232 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_optiongroup AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_optiongroup2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_optiongroup2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Label2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Optiongroup1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Pageframe1.Page1.Optiongroup2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Optiongroup2" UniqueID="" Timestamp="" /> + + * + Caption = "OptionGroup_Test" + DoCreate = .T. + Height = 424 + Left = 0 + Name = "f_optiongroup" + Top = 0 + Width = 819 + Edit1.Name = "Edit1" + Edit1.Value = * En los OptionGroup subclasados, cuando el Option de la clase de base tiene Autosize=.T. y la instancia tiene Autosize=.F., ocurre esto: - Los option normales deben mantener su longitud y apariencia nuevos - Los option graficos deben mantener su longitud y apariencia, pero pierden en height (bug de VFP) * En los OptionGroup normales, no hay problemas y se deben mantener igual siempre * RECOMENDACIÓN: No usar Autosize=.T. en una clase de base + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "OPTIONGROUP NORMAL" + Label1.Name = "Label1" + Label2.Caption = "OPTIONGROUP SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_optiongroup1' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackStyle = 0, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ControlSource = "", ; + Height = 76, ; + Left = 296, ; + Name = "Cl_optiongroup1", ; + Top = 24, ; + Value = 2, ; + Width = 248, ; + Option1.Alignment = 0, ; + Option1.Anchor = 0, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 240,240,240, ; + Option1.Caption = "La Opción 1", ; + Option1.ColorScheme = 1, ; + Option1.ColorSource = 4, ; + Option1.Comment = "", ; + Option1.ControlSource = "", ; + Option1.DisabledBackColor = 240,240,240, ; + Option1.DisabledForeColor = 109,109,109, ; + Option1.DisabledPicture = ..\..\, ; + Option1.DownPicture = ..\..\, ; + Option1.DragIcon = ..\..\, ; + Option1.DragMode = 0, ; + Option1.Enabled = .T., ; + Option1.FontBold = .F., ; + Option1.FontCharSet = 0, ; + Option1.FontCondense = .F., ; + Option1.FontExtend = .F., ; + Option1.FontItalic = .F., ; + Option1.FontName = "Arial", ; + Option1.FontOutline = .F., ; + Option1.FontShadow = .F., ; + Option1.FontStrikethru = .F., ; + Option1.FontUnderline = .F., ; + Option1.ForeColor = 0,0,0, ; + Option1.Height = 17, ; + Option1.HelpContextID = 0, ; + Option1.Left = 8, ; + Option1.MouseIcon = ..\..\, ; + Option1.MousePointer = 0, ; + Option1.Name = "Option1", ; + Option1.OLEDragMode = 0, ; + Option1.OLEDragPicture = ..\..\, ; + Option1.OLEDropEffects = 3, ; + Option1.OLEDropMode = 0, ; + Option1.Picture = ..\..\, ; + Option1.PictureMargin = 0, ; + Option1.PicturePosition = 13, ; + Option1.PictureSpacing = 0, ; + Option1.RightToLeft = .F., ; + Option1.SpecialEffect = 0, ; + Option1.StatusBarText = "", ; + Option1.Style = 0, ; + Option1.TabStop = .T., ; + Option1.Tag = "", ; + Option1.TerminateRead = .F., ; + Option1.Themes = .T., ; + Option1.ToolTipText = "", ; + Option1.Top = 4, ; + Option1.Value = 0, ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 84, ; + Option1.WordWrap = .F., ; + Option2.Alignment = 0, ; + Option2.Anchor = 0, ; + Option2.AutoSize = .F., ; + Option2.BackColor = 240,240,240, ; + Option2.Caption = "La opción 2 es más larga", ; + Option2.ColorScheme = 1, ; + Option2.ColorSource = 4, ; + Option2.Comment = "", ; + Option2.ControlSource = "", ; + Option2.DisabledBackColor = 240,240,240, ; + Option2.DisabledForeColor = 109,109,109, ; + Option2.DisabledPicture = ..\..\, ; + Option2.DownPicture = ..\..\, ; + Option2.DragIcon = ..\..\, ; + Option2.DragMode = 0, ; + Option2.Enabled = .T., ; + Option2.FontBold = .F., ; + Option2.FontCharSet = 0, ; + Option2.FontCondense = .F., ; + Option2.FontExtend = .F., ; + Option2.FontItalic = .F., ; + Option2.FontName = "Arial", ; + Option2.FontOutline = .F., ; + Option2.FontShadow = .F., ; + Option2.FontStrikethru = .F., ; + Option2.FontUnderline = .F., ; + Option2.ForeColor = 0,0,0, ; + Option2.Height = 17, ; + Option2.HelpContextID = 0, ; + Option2.Left = 8, ; + Option2.MouseIcon = ..\..\, ; + Option2.MousePointer = 0, ; + Option2.Name = "Option2", ; + Option2.OLEDragMode = 0, ; + Option2.OLEDragPicture = ..\..\, ; + Option2.OLEDropEffects = 3, ; + Option2.OLEDropMode = 0, ; + Option2.Picture = ..\..\, ; + Option2.PictureMargin = 0, ; + Option2.PicturePosition = 13, ; + Option2.PictureSpacing = 0, ; + Option2.RightToLeft = .F., ; + Option2.SpecialEffect = 0, ; + Option2.StatusBarText = "", ; + Option2.Style = 0, ; + Option2.TabStop = .T., ; + Option2.Tag = "", ; + Option2.TerminateRead = .F., ; + Option2.Themes = .T., ; + Option2.ToolTipText = "", ; + Option2.Top = 28, ; + Option2.Value = 1, ; + Option2.WhatsThisHelpID = -1, ; + Option2.Width = 158, ; + Option2.WordWrap = .F., ; + Option3.Alignment = 0, ; + Option3.Anchor = 0, ; + Option3.BackColor = 128,255,128, ; + Option3.Caption = "La opción 3 es la más larga de todas", ; + Option3.ColorScheme = 1, ; + Option3.ColorSource = 4, ; + Option3.Comment = "", ; + Option3.ControlSource = "", ; + Option3.DisabledBackColor = 240,240,240, ; + Option3.DisabledForeColor = 109,109,109, ; + Option3.DisabledPicture = ..\..\, ; + Option3.DownPicture = ..\..\, ; + Option3.DragIcon = ..\..\, ; + Option3.DragMode = 0, ; + Option3.Enabled = .T., ; + Option3.FontBold = .F., ; + Option3.FontCharSet = 0, ; + Option3.FontCondense = .F., ; + Option3.FontExtend = .F., ; + Option3.FontItalic = .F., ; + Option3.FontName = "Arial", ; + Option3.FontOutline = .F., ; + Option3.FontShadow = .F., ; + Option3.FontStrikethru = .F., ; + Option3.FontUnderline = .F., ; + Option3.ForeColor = 0,0,0, ; + Option3.Height = 17, ; + Option3.HelpContextID = 0, ; + Option3.Left = 8, ; + Option3.MouseIcon = ..\..\, ; + Option3.MousePointer = 0, ; + Option3.Name = "Option3", ; + Option3.OLEDragMode = 0, ; + Option3.OLEDragPicture = ..\..\, ; + Option3.OLEDropEffects = 3, ; + Option3.OLEDropMode = 0, ; + Option3.Picture = ..\..\, ; + Option3.PictureMargin = 0, ; + Option3.PicturePosition = 13, ; + Option3.PictureSpacing = 0, ; + Option3.RightToLeft = .F., ; + Option3.SpecialEffect = 0, ; + Option3.StatusBarText = "", ; + Option3.Style = 0, ; + Option3.TabStop = .T., ; + Option3.Tag = "", ; + Option3.TerminateRead = .F., ; + Option3.Themes = .T., ; + Option3.ToolTipText = "", ; + Option3.Top = 52, ; + Option3.Value = 0, ; + Option3.WhatsThisHelpID = -1, ; + Option3.Width = 222, ; + Option3.WordWrap = .F. + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'Cl_optiongroup2' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackStyle = 1, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ControlSource = "", ; + Height = 76, ; + Left = 296, ; + Name = "Cl_optiongroup2", ; + Top = 112, ; + Value = 2, ; + Width = 248, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 240,240,240, ; + Option1.Caption = "La Opción 1", ; + Option1.FontBold = .F., ; + Option1.Height = 27, ; + Option1.Left = 8, ; + Option1.Name = "Option1", ; + Option1.SpecialEffect = 0, ; + Option1.Style = 1, ; + Option1.Top = 4, ; + Option1.Value = 0, ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 84, ; + Option2.AutoSize = .F., ; + Option2.BackColor = 240,240,240, ; + Option2.Caption = "La opción 2 es más larga", ; + Option2.FontBold = .F., ; + Option2.Height = 27, ; + Option2.Left = 8, ; + Option2.Name = "Option2", ; + Option2.SpecialEffect = 0, ; + Option2.Style = 1, ; + Option2.Top = 28, ; + Option2.Value = 1, ; + Option2.WhatsThisHelpID = -1, ; + Option2.Width = 158, ; + Option3.AutoSize = .F., ; + Option3.BackColor = 128,255,128, ; + Option3.Caption = "La opción 3 es la más larga de todas", ; + Option3.FontBold = .F., ; + Option3.Height = 21, ; + Option3.Left = 8, ; + Option3.Name = "Option3", ; + Option3.SpecialEffect = 0, ; + Option3.Style = 1, ; + Option3.Top = 52, ; + Option3.WhatsThisHelpID = -1, ; + Option3.Width = 222 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'Optiongroup1' AS optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 24, ; + MemberClass = "cl_option", ; + MemberClassLibrary = lib_controles.vcx, ; + MousePointer = 0, ; + Name = "Optiongroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 24, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 248, ; + Cl_option1.Alignment = 0, ; + Cl_option1.Anchor = 0, ; + Cl_option1.AutoSize = .F., ; + Cl_option1.BackColor = 240,240,240, ; + Cl_option1.BackStyle = 1, ; + Cl_option1.Caption = "La opción 1", ; + Cl_option1.ColorScheme = 1, ; + Cl_option1.ColorSource = 4, ; + Cl_option1.Comment = "", ; + Cl_option1.ControlSource = "", ; + Cl_option1.DisabledBackColor = 0,128,192, ; + Cl_option1.DisabledForeColor = 128,0,255, ; + Cl_option1.DisabledPicture = bmps\treeview.bmp, ; + Cl_option1.DownPicture = ..\..\, ; + Cl_option1.DragIcon = ..\..\, ; + Cl_option1.DragMode = 0, ; + Cl_option1.Enabled = .T., ; + Cl_option1.FontBold = .F., ; + Cl_option1.FontCharSet = 0, ; + Cl_option1.FontCondense = .F., ; + Cl_option1.FontExtend = .F., ; + Cl_option1.FontItalic = .F., ; + Cl_option1.FontName = "Arial", ; + Cl_option1.FontOutline = .F., ; + Cl_option1.FontShadow = .F., ; + Cl_option1.FontSize = 8, ; + Cl_option1.FontStrikethru = .F., ; + Cl_option1.FontUnderline = .F., ; + Cl_option1.ForeColor = 0,0,0, ; + Cl_option1.Height = 16, ; + Cl_option1.HelpContextID = 0, ; + Cl_option1.Left = 16, ; + Cl_option1.MouseIcon = ..\..\, ; + Cl_option1.MousePointer = 0, ; + Cl_option1.Name = "Cl_option1", ; + Cl_option1.OLEDragMode = 0, ; + Cl_option1.OLEDragPicture = ..\..\, ; + Cl_option1.OLEDropEffects = 3, ; + Cl_option1.OLEDropMode = 0, ; + Cl_option1.Picture = bmps\sobrepostal.bmp, ; + Cl_option1.PictureMargin = 0, ; + Cl_option1.PicturePosition = 4, ; + Cl_option1.PictureSpacing = 0, ; + Cl_option1.RightToLeft = .F., ; + Cl_option1.SpecialEffect = 0, ; + Cl_option1.StatusBarText = "", ; + Cl_option1.Style = 0, ; + Cl_option1.TabStop = .T., ; + Cl_option1.Tag = "", ; + Cl_option1.TerminateRead = .F., ; + Cl_option1.Themes = .T., ; + Cl_option1.ToolTipText = "", ; + Cl_option1.Top = 4, ; + Cl_option1.Visible = .T., ; + Cl_option1.WhatsThisHelpID = -1, ; + Cl_option1.Width = 74, ; + Cl_option1.WordWrap = .F., ; + Cl_option2.Alignment = 0, ; + Cl_option2.Anchor = 0, ; + Cl_option2.BackColor = 240,240,240, ; + Cl_option2.BackStyle = 1, ; + Cl_option2.Caption = "La opción 2 es más larga", ; + Cl_option2.ColorScheme = 1, ; + Cl_option2.ColorSource = 4, ; + Cl_option2.Comment = "", ; + Cl_option2.ControlSource = "", ; + Cl_option2.DisabledBackColor = 0,128,192, ; + Cl_option2.DisabledForeColor = 128,0,255, ; + Cl_option2.DisabledPicture = bmps\treeview.bmp, ; + Cl_option2.DownPicture = ..\..\, ; + Cl_option2.DragIcon = ..\..\, ; + Cl_option2.DragMode = 0, ; + Cl_option2.Enabled = .T., ; + Cl_option2.FontBold = .F., ; + Cl_option2.FontCharSet = 0, ; + Cl_option2.FontCondense = .F., ; + Cl_option2.FontExtend = .F., ; + Cl_option2.FontItalic = .F., ; + Cl_option2.FontName = "Arial", ; + Cl_option2.FontOutline = .F., ; + Cl_option2.FontShadow = .F., ; + Cl_option2.FontSize = 8, ; + Cl_option2.FontStrikethru = .F., ; + Cl_option2.FontUnderline = .F., ; + Cl_option2.ForeColor = 0,0,0, ; + Cl_option2.HelpContextID = 0, ; + Cl_option2.Left = 16, ; + Cl_option2.MouseIcon = ..\..\, ; + Cl_option2.MousePointer = 0, ; + Cl_option2.Name = "Cl_option2", ; + Cl_option2.OLEDragMode = 0, ; + Cl_option2.OLEDragPicture = ..\..\, ; + Cl_option2.OLEDropEffects = 3, ; + Cl_option2.OLEDropMode = 0, ; + Cl_option2.Picture = bmps\sobrepostal.bmp, ; + Cl_option2.PictureMargin = 0, ; + Cl_option2.PicturePosition = 4, ; + Cl_option2.PictureSpacing = 0, ; + Cl_option2.RightToLeft = .F., ; + Cl_option2.SpecialEffect = 0, ; + Cl_option2.StatusBarText = "", ; + Cl_option2.Style = 0, ; + Cl_option2.TabStop = .T., ; + Cl_option2.Tag = "", ; + Cl_option2.TerminateRead = .F., ; + Cl_option2.Themes = .T., ; + Cl_option2.ToolTipText = "", ; + Cl_option2.Top = 28, ; + Cl_option2.Value = 1, ; + Cl_option2.Visible = .T., ; + Cl_option2.WhatsThisHelpID = -1, ; + Cl_option2.WordWrap = .F., ; + Cl_option3.Alignment = 0, ; + Cl_option3.Anchor = 0, ; + Cl_option3.AutoSize = .F., ; + Cl_option3.BackColor = 240,240,240, ; + Cl_option3.BackStyle = 1, ; + Cl_option3.Caption = "La opción 3 es la más larga de todas", ; + Cl_option3.ColorScheme = 1, ; + Cl_option3.ColorSource = 4, ; + Cl_option3.Comment = "", ; + Cl_option3.ControlSource = "", ; + Cl_option3.DisabledBackColor = 0,128,192, ; + Cl_option3.DisabledForeColor = 128,0,255, ; + Cl_option3.DisabledPicture = bmps\treeview.bmp, ; + Cl_option3.DownPicture = ..\..\, ; + Cl_option3.DragIcon = ..\..\, ; + Cl_option3.DragMode = 0, ; + Cl_option3.Enabled = .F., ; + Cl_option3.FontBold = .F., ; + Cl_option3.FontCharSet = 0, ; + Cl_option3.FontCondense = .F., ; + Cl_option3.FontExtend = .F., ; + Cl_option3.FontItalic = .F., ; + Cl_option3.FontName = "Arial", ; + Cl_option3.FontOutline = .F., ; + Cl_option3.FontShadow = .F., ; + Cl_option3.FontSize = 8, ; + Cl_option3.FontStrikethru = .F., ; + Cl_option3.FontUnderline = .F., ; + Cl_option3.ForeColor = 0,0,0, ; + Cl_option3.HelpContextID = 0, ; + Cl_option3.Left = 16, ; + Cl_option3.MouseIcon = ..\..\, ; + Cl_option3.MousePointer = 0, ; + Cl_option3.Name = "Cl_option3", ; + Cl_option3.OLEDragMode = 0, ; + Cl_option3.OLEDragPicture = ..\..\, ; + Cl_option3.OLEDropEffects = 3, ; + Cl_option3.OLEDropMode = 0, ; + Cl_option3.Picture = bmps\sobrepostal.bmp, ; + Cl_option3.PictureMargin = 0, ; + Cl_option3.PicturePosition = 4, ; + Cl_option3.PictureSpacing = 0, ; + Cl_option3.RightToLeft = .F., ; + Cl_option3.SpecialEffect = 0, ; + Cl_option3.StatusBarText = "", ; + Cl_option3.Style = 0, ; + Cl_option3.TabStop = .T., ; + Cl_option3.Tag = "", ; + Cl_option3.TerminateRead = .F., ; + Cl_option3.Themes = .T., ; + Cl_option3.ToolTipText = "", ; + Cl_option3.Top = 52, ; + Cl_option3.Visible = .T., ; + Cl_option3.WhatsThisHelpID = -1, ; + Cl_option3.WordWrap = .F. + *< END OBJECT: BaseClass="optiongroup" /> + + ADD OBJECT 'Optiongroup2' AS optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 24, ; + MemberClass = "cl_option", ; + MemberClassLibrary = lib_controles.vcx, ; + MousePointer = 0, ; + Name = "Optiongroup2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 112, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 248, ; + Cl_option1.Alignment = 0, ; + Cl_option1.Anchor = 0, ; + Cl_option1.AutoSize = .F., ; + Cl_option1.BackColor = 240,240,240, ; + Cl_option1.BackStyle = 1, ; + Cl_option1.Caption = "La opción 1", ; + Cl_option1.ColorScheme = 1, ; + Cl_option1.ColorSource = 4, ; + Cl_option1.Comment = "", ; + Cl_option1.ControlSource = "", ; + Cl_option1.DisabledBackColor = 0,128,192, ; + Cl_option1.DisabledForeColor = 128,0,255, ; + Cl_option1.DisabledPicture = bmps\treeview.bmp, ; + Cl_option1.DownPicture = ..\..\, ; + Cl_option1.DragIcon = ..\..\, ; + Cl_option1.DragMode = 0, ; + Cl_option1.Enabled = .T., ; + Cl_option1.FontBold = .F., ; + Cl_option1.FontCharSet = 0, ; + Cl_option1.FontCondense = .F., ; + Cl_option1.FontExtend = .F., ; + Cl_option1.FontItalic = .F., ; + Cl_option1.FontName = "Arial", ; + Cl_option1.FontOutline = .F., ; + Cl_option1.FontShadow = .F., ; + Cl_option1.FontSize = 8, ; + Cl_option1.FontStrikethru = .F., ; + Cl_option1.FontUnderline = .F., ; + Cl_option1.ForeColor = 0,0,0, ; + Cl_option1.Height = 41, ; + Cl_option1.HelpContextID = 0, ; + Cl_option1.Left = 16, ; + Cl_option1.MouseIcon = ..\..\, ; + Cl_option1.MousePointer = 0, ; + Cl_option1.Name = "Cl_option1", ; + Cl_option1.OLEDragMode = 0, ; + Cl_option1.OLEDragPicture = ..\..\, ; + Cl_option1.OLEDropEffects = 3, ; + Cl_option1.OLEDropMode = 0, ; + Cl_option1.Picture = bmps\sobrepostal.bmp, ; + Cl_option1.PictureMargin = 0, ; + Cl_option1.PicturePosition = 4, ; + Cl_option1.PictureSpacing = 0, ; + Cl_option1.RightToLeft = .F., ; + Cl_option1.SpecialEffect = 0, ; + Cl_option1.StatusBarText = "", ; + Cl_option1.Style = 1, ; + Cl_option1.TabStop = .T., ; + Cl_option1.Tag = "", ; + Cl_option1.TerminateRead = .F., ; + Cl_option1.Themes = .T., ; + Cl_option1.ToolTipText = "", ; + Cl_option1.Top = 4, ; + Cl_option1.Visible = .T., ; + Cl_option1.WhatsThisHelpID = -1, ; + Cl_option1.Width = 89, ; + Cl_option1.WordWrap = .F., ; + Cl_option2.Alignment = 0, ; + Cl_option2.Anchor = 0, ; + Cl_option2.BackColor = 240,240,240, ; + Cl_option2.BackStyle = 1, ; + Cl_option2.Caption = "La opción 2 es más larga", ; + Cl_option2.ColorScheme = 1, ; + Cl_option2.ColorSource = 4, ; + Cl_option2.Comment = "", ; + Cl_option2.ControlSource = "", ; + Cl_option2.DisabledBackColor = 0,128,192, ; + Cl_option2.DisabledForeColor = 128,0,255, ; + Cl_option2.DisabledPicture = bmps\treeview.bmp, ; + Cl_option2.DownPicture = ..\..\, ; + Cl_option2.DragIcon = ..\..\, ; + Cl_option2.DragMode = 0, ; + Cl_option2.Enabled = .T., ; + Cl_option2.FontBold = .F., ; + Cl_option2.FontCharSet = 0, ; + Cl_option2.FontCondense = .F., ; + Cl_option2.FontExtend = .F., ; + Cl_option2.FontItalic = .F., ; + Cl_option2.FontName = "Arial", ; + Cl_option2.FontOutline = .F., ; + Cl_option2.FontShadow = .F., ; + Cl_option2.FontSize = 8, ; + Cl_option2.FontStrikethru = .F., ; + Cl_option2.FontUnderline = .F., ; + Cl_option2.ForeColor = 0,0,0, ; + Cl_option2.Height = 41, ; + Cl_option2.HelpContextID = 0, ; + Cl_option2.Left = 16, ; + Cl_option2.MouseIcon = ..\..\, ; + Cl_option2.MousePointer = 0, ; + Cl_option2.Name = "Cl_option2", ; + Cl_option2.OLEDragMode = 0, ; + Cl_option2.OLEDragPicture = ..\..\, ; + Cl_option2.OLEDropEffects = 3, ; + Cl_option2.OLEDropMode = 0, ; + Cl_option2.Picture = bmps\sobrepostal.bmp, ; + Cl_option2.PictureMargin = 0, ; + Cl_option2.PicturePosition = 4, ; + Cl_option2.PictureSpacing = 0, ; + Cl_option2.RightToLeft = .F., ; + Cl_option2.SpecialEffect = 0, ; + Cl_option2.StatusBarText = "", ; + Cl_option2.Style = 1, ; + Cl_option2.TabStop = .T., ; + Cl_option2.Tag = "", ; + Cl_option2.TerminateRead = .F., ; + Cl_option2.Themes = .T., ; + Cl_option2.ToolTipText = "", ; + Cl_option2.Top = 28, ; + Cl_option2.Value = 1, ; + Cl_option2.Visible = .T., ; + Cl_option2.WhatsThisHelpID = -1, ; + Cl_option2.WordWrap = .F., ; + Cl_option3.Alignment = 0, ; + Cl_option3.Anchor = 0, ; + Cl_option3.AutoSize = .F., ; + Cl_option3.BackColor = 240,240,240, ; + Cl_option3.BackStyle = 1, ; + Cl_option3.Caption = "La opción 3 es la más larga de todas", ; + Cl_option3.ColorScheme = 1, ; + Cl_option3.ColorSource = 4, ; + Cl_option3.Comment = "", ; + Cl_option3.ControlSource = "", ; + Cl_option3.DisabledBackColor = 0,128,192, ; + Cl_option3.DisabledForeColor = 128,0,255, ; + Cl_option3.DisabledPicture = bmps\treeview.bmp, ; + Cl_option3.DownPicture = ..\..\, ; + Cl_option3.DragIcon = ..\..\, ; + Cl_option3.DragMode = 0, ; + Cl_option3.Enabled = .F., ; + Cl_option3.FontBold = .F., ; + Cl_option3.FontCharSet = 0, ; + Cl_option3.FontCondense = .F., ; + Cl_option3.FontExtend = .F., ; + Cl_option3.FontItalic = .F., ; + Cl_option3.FontName = "Arial", ; + Cl_option3.FontOutline = .F., ; + Cl_option3.FontShadow = .F., ; + Cl_option3.FontSize = 8, ; + Cl_option3.FontStrikethru = .F., ; + Cl_option3.FontUnderline = .F., ; + Cl_option3.ForeColor = 0,0,0, ; + Cl_option3.Height = 41, ; + Cl_option3.HelpContextID = 0, ; + Cl_option3.Left = 16, ; + Cl_option3.MouseIcon = ..\..\, ; + Cl_option3.MousePointer = 0, ; + Cl_option3.Name = "Cl_option3", ; + Cl_option3.OLEDragMode = 0, ; + Cl_option3.OLEDragPicture = ..\..\, ; + Cl_option3.OLEDropEffects = 3, ; + Cl_option3.OLEDropMode = 0, ; + Cl_option3.Picture = bmps\sobrepostal.bmp, ; + Cl_option3.PictureMargin = 0, ; + Cl_option3.PicturePosition = 4, ; + Cl_option3.PictureSpacing = 0, ; + Cl_option3.RightToLeft = .F., ; + Cl_option3.SpecialEffect = 0, ; + Cl_option3.StatusBarText = "", ; + Cl_option3.Style = 1, ; + Cl_option3.TabStop = .T., ; + Cl_option3.Tag = "", ; + Cl_option3.TerminateRead = .F., ; + Cl_option3.Themes = .T., ; + Cl_option3.ToolTipText = "", ; + Cl_option3.Top = 52, ; + Cl_option3.Visible = .T., ; + Cl_option3.WhatsThisHelpID = -1, ; + Cl_option3.WordWrap = .F. + *< END OBJECT: BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1' AS pageframe WITH ; + ErasePage = .T., ; + Height = 245, ; + Left = 8, ; + Name = "Pageframe1", ; + PageCount = 2, ; + Top = 200, ; + Width = 553, ; + Page1.Caption = "Page1", ; + Page1.Name = "Page1", ; + Page2.Caption = "Page2", ; + Page2.Name = "Page2" + *< END OBJECT: BaseClass="pageframe" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_optiongroup1' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackStyle = 0, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ControlSource = "", ; + Height = 76, ; + Left = 287, ; + Name = "Cl_optiongroup1", ; + Top = 24, ; + Value = 2, ; + Width = 248, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 240,240,240, ; + Option1.Caption = "La Opción 1", ; + Option1.FontBold = .F., ; + Option1.Height = 17, ; + Option1.Left = 8, ; + Option1.Name = "Option1", ; + Option1.SpecialEffect = 0, ; + Option1.Style = 0, ; + Option1.Top = 8, ; + Option1.Value = 0, ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 84, ; + Option2.AutoSize = .F., ; + Option2.BackColor = 240,240,240, ; + Option2.Caption = "La opción 2 es más larga", ; + Option2.FontBold = .F., ; + Option2.Height = 17, ; + Option2.Left = 8, ; + Option2.Name = "Option2", ; + Option2.SpecialEffect = 0, ; + Option2.Style = 0, ; + Option2.Top = 32, ; + Option2.Value = 1, ; + Option2.WhatsThisHelpID = -1, ; + Option2.Width = 158, ; + Option3.BackColor = 128,255,128, ; + Option3.Caption = "La opción 3 es la más larga de todas", ; + Option3.FontBold = .F., ; + Option3.Height = 17, ; + Option3.Left = 8, ; + Option3.Name = "Option3", ; + Option3.SpecialEffect = 0, ; + Option3.Style = 0, ; + Option3.Top = 56, ; + Option3.Value = 0, ; + Option3.WhatsThisHelpID = -1, ; + Option3.Width = 222 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1.Page1.Cl_optiongroup2' AS cl_optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackStyle = 1, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ControlSource = "", ; + Height = 76, ; + Left = 287, ; + Name = "Cl_optiongroup2", ; + Top = 112, ; + Value = 2, ; + Width = 248, ; + Option1.AutoSize = .F., ; + Option1.BackColor = 240,240,240, ; + Option1.Caption = "La Opción 1", ; + Option1.FontBold = .F., ; + Option1.Height = 27, ; + Option1.Left = 8, ; + Option1.Name = "Option1", ; + Option1.SpecialEffect = 0, ; + Option1.Style = 1, ; + Option1.Top = 4, ; + Option1.Value = 0, ; + Option1.WhatsThisHelpID = -1, ; + Option1.Width = 84, ; + Option2.AutoSize = .F., ; + Option2.BackColor = 240,240,240, ; + Option2.Caption = "La opción 2 es más larga", ; + Option2.FontBold = .F., ; + Option2.Height = 27, ; + Option2.Left = 8, ; + Option2.Name = "Option2", ; + Option2.SpecialEffect = 0, ; + Option2.Style = 1, ; + Option2.Top = 28, ; + Option2.Value = 1, ; + Option2.WhatsThisHelpID = -1, ; + Option2.Width = 158, ; + Option3.AutoSize = .F., ; + Option3.BackColor = 128,255,128, ; + Option3.Caption = "La opción 3 es la más larga de todas", ; + Option3.FontBold = .F., ; + Option3.Height = 21, ; + Option3.Left = 8, ; + Option3.Name = "Option3", ; + Option3.SpecialEffect = 0, ; + Option3.Style = 1, ; + Option3.Top = 52, ; + Option3.WhatsThisHelpID = -1, ; + Option3.Width = 222 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1.Page1.Label2' AS label WITH ; + Caption = "OPTIONGROUP SUBCLASADOS", ; + FontBold = .T., ; + Height = 17, ; + Left = 287, ; + Name = "Label2", ; + Top = 8, ; + Width = 248 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'Pageframe1.Page1.Optiongroup1' AS optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 0, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 24, ; + MemberClass = "cl_option", ; + MemberClassLibrary = lib_controles.vcx, ; + MousePointer = 0, ; + Name = "Optiongroup1", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 24, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 248, ; + Cl_option1.Alignment = 0, ; + Cl_option1.Anchor = 0, ; + Cl_option1.AutoSize = .F., ; + Cl_option1.BackColor = 240,240,240, ; + Cl_option1.BackStyle = 1, ; + Cl_option1.Caption = "La opción 1", ; + Cl_option1.ColorScheme = 1, ; + Cl_option1.ColorSource = 4, ; + Cl_option1.Comment = "", ; + Cl_option1.ControlSource = "", ; + Cl_option1.DisabledBackColor = 0,128,192, ; + Cl_option1.DisabledForeColor = 128,0,255, ; + Cl_option1.DisabledPicture = bmps\treeview.bmp, ; + Cl_option1.DownPicture = ..\..\, ; + Cl_option1.DragIcon = ..\..\, ; + Cl_option1.DragMode = 0, ; + Cl_option1.Enabled = .T., ; + Cl_option1.FontBold = .F., ; + Cl_option1.FontCharSet = 0, ; + Cl_option1.FontCondense = .F., ; + Cl_option1.FontExtend = .F., ; + Cl_option1.FontItalic = .F., ; + Cl_option1.FontName = "Arial", ; + Cl_option1.FontOutline = .F., ; + Cl_option1.FontShadow = .F., ; + Cl_option1.FontSize = 8, ; + Cl_option1.FontStrikethru = .F., ; + Cl_option1.FontUnderline = .F., ; + Cl_option1.ForeColor = 0,0,0, ; + Cl_option1.Height = 16, ; + Cl_option1.HelpContextID = 0, ; + Cl_option1.Left = 16, ; + Cl_option1.MouseIcon = ..\..\, ; + Cl_option1.MousePointer = 0, ; + Cl_option1.Name = "Cl_option1", ; + Cl_option1.OLEDragMode = 0, ; + Cl_option1.OLEDragPicture = ..\..\, ; + Cl_option1.OLEDropEffects = 3, ; + Cl_option1.OLEDropMode = 0, ; + Cl_option1.Picture = bmps\sobrepostal.bmp, ; + Cl_option1.PictureMargin = 0, ; + Cl_option1.PicturePosition = 4, ; + Cl_option1.PictureSpacing = 0, ; + Cl_option1.RightToLeft = .F., ; + Cl_option1.SpecialEffect = 0, ; + Cl_option1.StatusBarText = "", ; + Cl_option1.Style = 0, ; + Cl_option1.TabStop = .T., ; + Cl_option1.Tag = "", ; + Cl_option1.TerminateRead = .F., ; + Cl_option1.Themes = .T., ; + Cl_option1.ToolTipText = "", ; + Cl_option1.Top = 4, ; + Cl_option1.Visible = .T., ; + Cl_option1.WhatsThisHelpID = -1, ; + Cl_option1.Width = 74, ; + Cl_option1.WordWrap = .F., ; + Cl_option2.Alignment = 0, ; + Cl_option2.Anchor = 0, ; + Cl_option2.BackColor = 240,240,240, ; + Cl_option2.BackStyle = 1, ; + Cl_option2.Caption = "La opción 2 es más larga", ; + Cl_option2.ColorScheme = 1, ; + Cl_option2.ColorSource = 4, ; + Cl_option2.Comment = "", ; + Cl_option2.ControlSource = "", ; + Cl_option2.DisabledBackColor = 0,128,192, ; + Cl_option2.DisabledForeColor = 128,0,255, ; + Cl_option2.DisabledPicture = bmps\treeview.bmp, ; + Cl_option2.DownPicture = ..\..\, ; + Cl_option2.DragIcon = ..\..\, ; + Cl_option2.DragMode = 0, ; + Cl_option2.Enabled = .T., ; + Cl_option2.FontBold = .F., ; + Cl_option2.FontCharSet = 0, ; + Cl_option2.FontCondense = .F., ; + Cl_option2.FontExtend = .F., ; + Cl_option2.FontItalic = .F., ; + Cl_option2.FontName = "Arial", ; + Cl_option2.FontOutline = .F., ; + Cl_option2.FontShadow = .F., ; + Cl_option2.FontSize = 8, ; + Cl_option2.FontStrikethru = .F., ; + Cl_option2.FontUnderline = .F., ; + Cl_option2.ForeColor = 0,0,0, ; + Cl_option2.HelpContextID = 0, ; + Cl_option2.Left = 16, ; + Cl_option2.MouseIcon = ..\..\, ; + Cl_option2.MousePointer = 0, ; + Cl_option2.Name = "Cl_option2", ; + Cl_option2.OLEDragMode = 0, ; + Cl_option2.OLEDragPicture = ..\..\, ; + Cl_option2.OLEDropEffects = 3, ; + Cl_option2.OLEDropMode = 0, ; + Cl_option2.Picture = bmps\sobrepostal.bmp, ; + Cl_option2.PictureMargin = 0, ; + Cl_option2.PicturePosition = 4, ; + Cl_option2.PictureSpacing = 0, ; + Cl_option2.RightToLeft = .F., ; + Cl_option2.SpecialEffect = 0, ; + Cl_option2.StatusBarText = "", ; + Cl_option2.Style = 0, ; + Cl_option2.TabStop = .T., ; + Cl_option2.Tag = "", ; + Cl_option2.TerminateRead = .F., ; + Cl_option2.Themes = .T., ; + Cl_option2.ToolTipText = "", ; + Cl_option2.Top = 28, ; + Cl_option2.Value = 1, ; + Cl_option2.Visible = .T., ; + Cl_option2.WhatsThisHelpID = -1, ; + Cl_option2.WordWrap = .F., ; + Cl_option3.Alignment = 0, ; + Cl_option3.Anchor = 0, ; + Cl_option3.AutoSize = .F., ; + Cl_option3.BackColor = 240,240,240, ; + Cl_option3.BackStyle = 1, ; + Cl_option3.Caption = "La opción 3 es la más larga de todas", ; + Cl_option3.ColorScheme = 1, ; + Cl_option3.ColorSource = 4, ; + Cl_option3.Comment = "", ; + Cl_option3.ControlSource = "", ; + Cl_option3.DisabledBackColor = 0,128,192, ; + Cl_option3.DisabledForeColor = 128,0,255, ; + Cl_option3.DisabledPicture = bmps\treeview.bmp, ; + Cl_option3.DownPicture = ..\..\, ; + Cl_option3.DragIcon = ..\..\, ; + Cl_option3.DragMode = 0, ; + Cl_option3.Enabled = .F., ; + Cl_option3.FontBold = .F., ; + Cl_option3.FontCharSet = 0, ; + Cl_option3.FontCondense = .F., ; + Cl_option3.FontExtend = .F., ; + Cl_option3.FontItalic = .F., ; + Cl_option3.FontName = "Arial", ; + Cl_option3.FontOutline = .F., ; + Cl_option3.FontShadow = .F., ; + Cl_option3.FontSize = 8, ; + Cl_option3.FontStrikethru = .F., ; + Cl_option3.FontUnderline = .F., ; + Cl_option3.ForeColor = 0,0,0, ; + Cl_option3.HelpContextID = 0, ; + Cl_option3.Left = 16, ; + Cl_option3.MouseIcon = ..\..\, ; + Cl_option3.MousePointer = 0, ; + Cl_option3.Name = "Cl_option3", ; + Cl_option3.OLEDragMode = 0, ; + Cl_option3.OLEDragPicture = ..\..\, ; + Cl_option3.OLEDropEffects = 3, ; + Cl_option3.OLEDropMode = 0, ; + Cl_option3.Picture = bmps\sobrepostal.bmp, ; + Cl_option3.PictureMargin = 0, ; + Cl_option3.PicturePosition = 4, ; + Cl_option3.PictureSpacing = 0, ; + Cl_option3.RightToLeft = .F., ; + Cl_option3.SpecialEffect = 0, ; + Cl_option3.StatusBarText = "", ; + Cl_option3.Style = 0, ; + Cl_option3.TabStop = .T., ; + Cl_option3.Tag = "", ; + Cl_option3.TerminateRead = .F., ; + Cl_option3.Themes = .T., ; + Cl_option3.ToolTipText = "", ; + Cl_option3.Top = 52, ; + Cl_option3.Visible = .T., ; + Cl_option3.WhatsThisHelpID = -1, ; + Cl_option3.WordWrap = .F. + *< END OBJECT: BaseClass="optiongroup" /> + + ADD OBJECT 'Pageframe1.Page1.Optiongroup2' AS optiongroup WITH ; + Anchor = 0, ; + AutoSize = .F., ; + BackColor = 240,240,240, ; + BackStyle = 1, ; + BorderColor = 100,100,100, ; + BorderStyle = 1, ; + ButtonCount = 3, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DragMode = 0, ; + Enabled = .T., ; + Height = 76, ; + HelpContextID = 0, ; + Left = 24, ; + MemberClass = "cl_option", ; + MemberClassLibrary = lib_controles.vcx, ; + MousePointer = 0, ; + Name = "Optiongroup2", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + SpecialEffect = 0, ; + StatusBarText = "", ; + TabIndex = 1, ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .T., ; + ToolTipText = "", ; + Top = 112, ; + Value = 2, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 248, ; + Cl_option1.Alignment = 0, ; + Cl_option1.Anchor = 0, ; + Cl_option1.AutoSize = .F., ; + Cl_option1.BackColor = 240,240,240, ; + Cl_option1.BackStyle = 1, ; + Cl_option1.Caption = "La opción 1", ; + Cl_option1.ColorScheme = 1, ; + Cl_option1.ColorSource = 4, ; + Cl_option1.Comment = "", ; + Cl_option1.ControlSource = "", ; + Cl_option1.DisabledBackColor = 0,128,192, ; + Cl_option1.DisabledForeColor = 128,0,255, ; + Cl_option1.DisabledPicture = bmps\treeview.bmp, ; + Cl_option1.DownPicture = ..\..\, ; + Cl_option1.DragIcon = ..\..\, ; + Cl_option1.DragMode = 0, ; + Cl_option1.Enabled = .T., ; + Cl_option1.FontBold = .F., ; + Cl_option1.FontCharSet = 0, ; + Cl_option1.FontCondense = .F., ; + Cl_option1.FontExtend = .F., ; + Cl_option1.FontItalic = .F., ; + Cl_option1.FontName = "Arial", ; + Cl_option1.FontOutline = .F., ; + Cl_option1.FontShadow = .F., ; + Cl_option1.FontSize = 8, ; + Cl_option1.FontStrikethru = .F., ; + Cl_option1.FontUnderline = .F., ; + Cl_option1.ForeColor = 0,0,0, ; + Cl_option1.Height = 41, ; + Cl_option1.HelpContextID = 0, ; + Cl_option1.Left = 16, ; + Cl_option1.MouseIcon = ..\..\, ; + Cl_option1.MousePointer = 0, ; + Cl_option1.Name = "Cl_option1", ; + Cl_option1.OLEDragMode = 0, ; + Cl_option1.OLEDragPicture = ..\..\, ; + Cl_option1.OLEDropEffects = 3, ; + Cl_option1.OLEDropMode = 0, ; + Cl_option1.Picture = bmps\sobrepostal.bmp, ; + Cl_option1.PictureMargin = 0, ; + Cl_option1.PicturePosition = 4, ; + Cl_option1.PictureSpacing = 0, ; + Cl_option1.RightToLeft = .F., ; + Cl_option1.SpecialEffect = 0, ; + Cl_option1.StatusBarText = "", ; + Cl_option1.Style = 1, ; + Cl_option1.TabStop = .T., ; + Cl_option1.Tag = "", ; + Cl_option1.TerminateRead = .F., ; + Cl_option1.Themes = .T., ; + Cl_option1.ToolTipText = "", ; + Cl_option1.Top = 4, ; + Cl_option1.Visible = .T., ; + Cl_option1.WhatsThisHelpID = -1, ; + Cl_option1.Width = 89, ; + Cl_option1.WordWrap = .F., ; + Cl_option2.Alignment = 0, ; + Cl_option2.Anchor = 0, ; + Cl_option2.BackColor = 240,240,240, ; + Cl_option2.BackStyle = 1, ; + Cl_option2.Caption = "La opción 2 es más larga", ; + Cl_option2.ColorScheme = 1, ; + Cl_option2.ColorSource = 4, ; + Cl_option2.Comment = "", ; + Cl_option2.ControlSource = "", ; + Cl_option2.DisabledBackColor = 0,128,192, ; + Cl_option2.DisabledForeColor = 128,0,255, ; + Cl_option2.DisabledPicture = bmps\treeview.bmp, ; + Cl_option2.DownPicture = ..\..\, ; + Cl_option2.DragIcon = ..\..\, ; + Cl_option2.DragMode = 0, ; + Cl_option2.Enabled = .T., ; + Cl_option2.FontBold = .F., ; + Cl_option2.FontCharSet = 0, ; + Cl_option2.FontCondense = .F., ; + Cl_option2.FontExtend = .F., ; + Cl_option2.FontItalic = .F., ; + Cl_option2.FontName = "Arial", ; + Cl_option2.FontOutline = .F., ; + Cl_option2.FontShadow = .F., ; + Cl_option2.FontSize = 8, ; + Cl_option2.FontStrikethru = .F., ; + Cl_option2.FontUnderline = .F., ; + Cl_option2.ForeColor = 0,0,0, ; + Cl_option2.Height = 41, ; + Cl_option2.HelpContextID = 0, ; + Cl_option2.Left = 16, ; + Cl_option2.MouseIcon = ..\..\, ; + Cl_option2.MousePointer = 0, ; + Cl_option2.Name = "Cl_option2", ; + Cl_option2.OLEDragMode = 0, ; + Cl_option2.OLEDragPicture = ..\..\, ; + Cl_option2.OLEDropEffects = 3, ; + Cl_option2.OLEDropMode = 0, ; + Cl_option2.Picture = bmps\sobrepostal.bmp, ; + Cl_option2.PictureMargin = 0, ; + Cl_option2.PicturePosition = 4, ; + Cl_option2.PictureSpacing = 0, ; + Cl_option2.RightToLeft = .F., ; + Cl_option2.SpecialEffect = 0, ; + Cl_option2.StatusBarText = "", ; + Cl_option2.Style = 1, ; + Cl_option2.TabStop = .T., ; + Cl_option2.Tag = "", ; + Cl_option2.TerminateRead = .F., ; + Cl_option2.Themes = .T., ; + Cl_option2.ToolTipText = "", ; + Cl_option2.Top = 28, ; + Cl_option2.Value = 1, ; + Cl_option2.Visible = .T., ; + Cl_option2.WhatsThisHelpID = -1, ; + Cl_option2.WordWrap = .F., ; + Cl_option3.Alignment = 0, ; + Cl_option3.Anchor = 0, ; + Cl_option3.AutoSize = .F., ; + Cl_option3.BackColor = 240,240,240, ; + Cl_option3.BackStyle = 1, ; + Cl_option3.Caption = "La opción 3 es la más larga de todas", ; + Cl_option3.ColorScheme = 1, ; + Cl_option3.ColorSource = 4, ; + Cl_option3.Comment = "", ; + Cl_option3.ControlSource = "", ; + Cl_option3.DisabledBackColor = 0,128,192, ; + Cl_option3.DisabledForeColor = 128,0,255, ; + Cl_option3.DisabledPicture = bmps\treeview.bmp, ; + Cl_option3.DownPicture = ..\..\, ; + Cl_option3.DragIcon = ..\..\, ; + Cl_option3.DragMode = 0, ; + Cl_option3.Enabled = .F., ; + Cl_option3.FontBold = .F., ; + Cl_option3.FontCharSet = 0, ; + Cl_option3.FontCondense = .F., ; + Cl_option3.FontExtend = .F., ; + Cl_option3.FontItalic = .F., ; + Cl_option3.FontName = "Arial", ; + Cl_option3.FontOutline = .F., ; + Cl_option3.FontShadow = .F., ; + Cl_option3.FontSize = 8, ; + Cl_option3.FontStrikethru = .F., ; + Cl_option3.FontUnderline = .F., ; + Cl_option3.ForeColor = 0,0,0, ; + Cl_option3.Height = 41, ; + Cl_option3.HelpContextID = 0, ; + Cl_option3.Left = 16, ; + Cl_option3.MouseIcon = ..\..\, ; + Cl_option3.MousePointer = 0, ; + Cl_option3.Name = "Cl_option3", ; + Cl_option3.OLEDragMode = 0, ; + Cl_option3.OLEDragPicture = ..\..\, ; + Cl_option3.OLEDropEffects = 3, ; + Cl_option3.OLEDropMode = 0, ; + Cl_option3.Picture = bmps\sobrepostal.bmp, ; + Cl_option3.PictureMargin = 0, ; + Cl_option3.PicturePosition = 4, ; + Cl_option3.PictureSpacing = 0, ; + Cl_option3.RightToLeft = .F., ; + Cl_option3.SpecialEffect = 0, ; + Cl_option3.StatusBarText = "", ; + Cl_option3.Style = 1, ; + Cl_option3.TabStop = .T., ; + Cl_option3.Tag = "", ; + Cl_option3.TerminateRead = .F., ; + Cl_option3.Themes = .T., ; + Cl_option3.ToolTipText = "", ; + Cl_option3.Top = 52, ; + Cl_option3.Visible = .T., ; + Cl_option3.WhatsThisHelpID = -1, ; + Cl_option3.WordWrap = .F. + *< END OBJECT: BaseClass="optiongroup" /> + + PROCEDURE Refresh + DOEVENTS FORCE + this.capturarpantallaabitmap( THISFORM.c_testname ) + + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.f_textbox.vc2 b/TESTS/DATOS_READONLY/lib_controles.f_textbox.vc2 new file mode 100644 index 0000000..58c4448 --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles.f_textbox.vc2 @@ -0,0 +1,980 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_textbox AS f_base OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Cl_textbox1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Text1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_textbox2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Text2" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_textbox3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Text3" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_textbox4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Text4" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_textbox5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Text5" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cl_textbox6" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Text6" UniqueID="" Timestamp="" /> + + * + DoCreate = .T. + Left = 0 + Name = "f_textbox" + Top = 0 + Edit1.Name = "Edit1" + Label3.Name = "Label3" + Command2.Name = "Command2" + Label1.Caption = "TEXTBOX NORMAL" + Label1.Name = "Label1" + Label2.Caption = "TEXTBOX SUBCLASADOS" + Label2.Name = "Label2" + * + + ADD OBJECT 'Cl_textbox1' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 348, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 64, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Cl_textbox2' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 348, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 96, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Cl_textbox3' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 348, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox3", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 156, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Cl_textbox4' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 348, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox4", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 188, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Cl_textbox5' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 348, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox5", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 252, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Cl_textbox6' AS cl_textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 348, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Cl_textbox6", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 284, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> + + ADD OBJECT 'Text1' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 84, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text1", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 64, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Text2' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 84, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text2", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 96, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Text3' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 84, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text3", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 156, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Text4' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .F., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 84, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text4", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .F., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 188, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Text5' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 84, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text5", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + ToolTipText = "", ; + Top = 252, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: BaseClass="textbox" /> + + ADD OBJECT 'Text6' AS textbox WITH ; + Alignment = 3, ; + Anchor = 0, ; + AutoComplete = 0, ; + AutoCompSource = "", ; + AutoCompTable = "", ; + BackColor = 255,255,255, ; + BackStyle = 1, ; + BorderColor = 0,128,255, ; + BorderStyle = 1, ; + Century = 1, ; + ColorScheme = 1, ; + ColorSource = 4, ; + Comment = "", ; + ControlSource = "", ; + DateFormat = 0, ; + DateMark = "", ; + DisabledBackColor = 240,240,240, ; + DisabledForeColor = 109,109,109, ; + DragIcon = ..\..\, ; + DragMode = 0, ; + Enabled = .T., ; + EnableHyperlinks = .F., ; + FontBold = .F., ; + FontCharSet = 0, ; + FontCondense = .F., ; + FontExtend = .F., ; + FontItalic = .F., ; + FontName = "Arial", ; + FontOutline = .F., ; + FontShadow = .F., ; + FontSize = 9, ; + FontStrikethru = .F., ; + FontUnderline = .F., ; + ForeColor = 0,0,0, ; + Format = "", ; + Height = 23, ; + HelpContextID = 0, ; + HideSelection = .T., ; + Hours = 0, ; + IMEMode = 0, ; + InputMask = "", ; + IntegralHeight = .F., ; + Left = 84, ; + Margin = 2, ; + MaxLength = 0, ; + MemoWindow = "", ; + MouseIcon = ..\..\, ; + MousePointer = 0, ; + Name = "Text6", ; + NullDisplay = "", ; + OLEDragMode = 0, ; + OLEDragPicture = ..\..\, ; + OLEDropEffects = 3, ; + OLEDropMode = 0, ; + OLEDropTextInsertion = 0, ; + OpenWindow = .F., ; + PasswordChar = "", ; + ReadOnly = .T., ; + RightToLeft = .F., ; + Seconds = 2, ; + SelectedBackColor = 51,153,255, ; + SelectedForeColor = 255,255,255, ; + SelectOnEntry = .F., ; + SpecialEffect = 1, ; + StatusBarText = "", ; + StrictDateEntry = 1, ; + Style = 0, ; + TabStop = .T., ; + Tag = "", ; + TerminateRead = .F., ; + Themes = .F., ; + ToolTipText = "", ; + Top = 284, ; + Value = Un valor cualquiera, ; + Visible = .T., ; + WhatsThisHelpID = -1, ; + Width = 132 + *< END OBJECT: BaseClass="textbox" /> + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles.vc2 b/TESTS/DATOS_READONLY/lib_controles.vc2 index 7f6e9fd..f279868 100644 --- a/TESTS/DATOS_READONLY/lib_controles.vc2 +++ b/TESTS/DATOS_READONLY/lib_controles.vc2 @@ -4,16136 +4,50 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS cl_checkbox AS checkbox - *< CLASSDATA: Baseclass="checkbox" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Alignment = 0 - AutoSize = .T. - Caption = "Chk1" - Height = 17 - Name = "cl_checkbox" - test_aa = .F. - Width = 47 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_collection AS collection - *< CLASSDATA: Baseclass="collection" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Height = 23 - Name = "cl_collection" - test_aa = .F. - Width = 23 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_combobox AS combobox - *< CLASSDATA: Baseclass="combobox" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Alignment = 0 - Anchor = 0 - BackColor = 255,255,255 - BorderColor = 255,0,0 - BorderStyle = 1 - BoundColumn = 1 - BoundTo = .F. - ColorScheme = 2 - ColorSource = 4 - ColumnCount = 0 - ColumnLines = .T. - ColumnWidths = "" - Comment = "" - ControlSource = "" - DisabledBackColor = 240,240,240 - DisabledForeColor = 109,109,109 - DisabledItemBackColor = 255,255,255 - DisabledItemForeColor = 109,109,109 - DisplayCount = 0 - DisplayValue = cl_combobox - DragIcon = ..\..\ - DragMode = 0 - Enabled = .T. - FirstElement = 1 - FontBold = .F. - FontCharSet = 0 - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 9 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - Format = "" - Height = 24 - HelpContextID = 0 - HideSelection = .T. - IMEMode = 0 - IncrementalSearch = .T. - InputMask = "" - ItemBackColor = 255,255,255 - ItemForeColor = 0,0,0 - ItemTips = .F. - Margin = 2 - MaxLength = 0 - MouseIcon = ..\..\ - MousePointer = 0 - Name = "cl_combobox" - NullDisplay = "" - NumberOfElements = 0 - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - OLEDropTextInsertion = 0 - Picture = ..\..\ - PictureSelectionDisplay = 0 - ReadOnly = .F. - RightToLeft = .F. - RowSource = "" - RowSourceType = 0 - SelectedBackColor = 51,153,255 - SelectedForeColor = 255,255,255 - SelectedItemBackColor = 51,153,255 - SelectedItemForeColor = 255,255,255 - SelectOnEntry = .F. - Sorted = .F. - SpecialEffect = 0 - StatusBarText = "" - Style = 0 - TabIndex = 1 - TabStop = .T. - Tag = "" - TerminateRead = .F. - test_aa = .F. - Themes = .T. - ToolTipText = "" - Value = - Visible = .T. - WhatsThisHelpID = -1 - Width = 60 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_commandbutton AS commandbutton - *< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - AutoSize = .T. - Caption = "Cmd1" - Height = 27 - Name = "cl_commandbutton" - test_aa = .F. - Width = 52 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_commandgroup AS commandgroup - *< CLASSDATA: Baseclass="commandgroup" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - AutoSize = .T. - ButtonCount = 2 - Height = 66 - Name = "cl_commandgroup" - test_aa = .F. - Value = 1 - Width = 62 - Command1.AutoSize = .T. - Command1.BackColor = 255,128,128 - Command1.Caption = "Cmd1" - Command1.Height = 27 - Command1.Left = 5 - Command1.Name = "Command1" - Command1.Top = 5 - Command1.Width = 52 - Command2.AutoSize = .T. - Command2.BackColor = 255,128,128 - Command2.Caption = "Cmd2" - Command2.DisabledBackColor = 240,240,240 - Command2.DisabledForeColor = 109,109,109 - Command2.Height = 27 - Command2.Left = 5 - Command2.Name = "Command2" - Command2.Top = 34 - Command2.Width = 52 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_container AS container - *< CLASSDATA: Baseclass="container" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Height = 33 - Name = "cl_container" - test_aa = .F. - Width = 123 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_control AS control - *< CLASSDATA: Baseclass="control" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Height = 32 - Name = "cl_control" - test_aa = .F. - Width = 77 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_cursor AS cursor - *< CLASSDATA: Baseclass="cursor" Timestamp="" Scale="Pixels" Uniqueid="" /> - - Alias = "_alias" - BufferModeOverride = 1 - Comment = "" - CursorSource = ..\..\.dbf - Database = ..\..\ - Exclusive = .F. - Filter = "" - Height = 23 - Name = "cl_cursor" - NoDataOnLoad = .F. - Order = "" - OrderDirection = 0 - ReadOnly = .F. - Tag = "" - Width = 23 - -ENDDEFINE - -DEFINE CLASS cl_cursoradapter AS cursoradapter - *< CLASSDATA: Baseclass="cursoradapter" Timestamp="" Scale="Pixels" Uniqueid="" /> - - ADOCodePage = 0 - Alias = "h" - AllowDelete = .T. - AllowInsert = .T. - AllowSimultaneousFetch = .F. - AllowUpdate = .T. - BatchUpdateCount = 1 - BreakOnError = .F. - BufferModeOverride = 3 - Comment = "" - CompareMemo = .T. - ConflictCheckCmd = - ConflictCheckType = 0 - ConversionFunc = - CursorSchema = - DataSource = .NULL. - DataSourceType = "" - DeleteCmd = - DeleteCmdDataSource = .NULL. - DeleteCmdDataSourceType = "" - FetchAsNeeded = .F. - FetchMemo = .T. - FetchMemoCmdList = - FetchMemoDataSource = .NULL. - FetchMemoDataSourceType = "" - FetchSize = 100 - Flags = 0 - Height = 22 - InsertCmd = - InsertCmdDataSource = .NULL. - InsertCmdDataSourceType = "" - InsertCmdRefreshCmd = - InsertCmdRefreshFieldList = - InsertCmdRefreshKeyFieldList = - KeyFieldList = - MapBinary = .F. - MapVarchar = .F. - MaxRecords = -1 - Name = "cl_cursoradapter" - NoData = .F. - Prepared = .F. - RefreshCmd = - RefreshCmdDataSource = .NULL. - RefreshCmdDataSourceType = "" - RefreshIgnoreFieldList = - RefreshTimestamp = .F. - SelectCmd = - SendUpdates = .T. - Tables = - Tag = "" - TimestampFieldList = - UpdatableFieldList = - UpdateCmd = - UpdateCmdDataSource = .NULL. - UpdateCmdDataSourceType = "" - UpdateCmdRefreshCmd = - UpdateCmdRefreshFieldList = - UpdateCmdRefreshKeyFieldList = - UpdateGramSchemaLocation = "" - UpdateNameList = - UpdateType = 1 - UseCursorSchema = .F. - UseDeDataSource = .F. - UseMemoSize = 255 - UseTransactions = .T. - WhereType = 3 - Width = 23 - -ENDDEFINE - -DEFINE CLASS cl_dataenvironment AS dataenvironment - *< CLASSDATA: Baseclass="dataenvironment" Timestamp="" Scale="Pixels" Uniqueid="" /> - - DataSource = .NULL. - Name = "cl_dataenvironment" - -ENDDEFINE - -DEFINE CLASS cl_editbox AS editbox - *< CLASSDATA: Baseclass="editbox" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Height = 41 - Name = "cl_editbox" - test_aa = .F. - Width = 75 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_grid AS grid - *< CLASSDATA: Baseclass="grid" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Column1.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column1.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column2.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column2.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column3.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column3.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column4.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column4.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column5.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Column5.Text1" UniqueID="" Timestamp="" /> - - ColumnCount = 5 - Height = 160 - Left = 36 - Name = "grdEncuestas" - RecordSource = "encuestas" - RecordSourceType = 1 - Top = 44 - Width = 228 - Column1.ControlSource = "encuestas.promotor" - Column1.Name = "Column1" - Column2.ControlSource = "encuestas.idenc" - Column2.Name = "Column2" - Column3.ControlSource = "encuestas.calific" - Column3.Name = "Column3" - Column4.ControlSource = "encuestas.fecha" - Column4.Name = "Column4" - Column5.ControlSource = "encuestas.resultado" - Column5.Name = "Column5" - - ADD OBJECT 'Column1.Header1' AS header WITH ; - Caption = "promotor", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Column1.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Column2.Header1' AS header WITH ; - Caption = "idenc", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Column2.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Column3.Header1' AS header WITH ; - Caption = "calific", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Column3.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Column4.Header1' AS header WITH ; - Caption = "fecha", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Column4.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Column5.Header1' AS header WITH ; - Caption = "resultado", ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Column5.Text1' AS textbox WITH ; - BackColor = 255,255,255, ; - BorderStyle = 0, ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1" - *< END OBJECT: BaseClass="textbox" /> - -ENDDEFINE - -DEFINE CLASS cl_hyperlink AS hyperlink - *< CLASSDATA: Baseclass="hyperlink" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Height = 23 - Name = "cl_hyperlink" - test_aa = .F. - Width = 23 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_image AS image - *< CLASSDATA: Baseclass="image" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Height = 12 - Name = "cl_image" - test_aa = .F. - Width = 12 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_label AS label - *< CLASSDATA: Baseclass="label" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Caption = "Label4" - Height = 17 - Name = "cl_label" - test_aa = .F. - Width = 104 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_line AS line - *< CLASSDATA: Baseclass="line" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - BorderColor = 255,0,0 - Height = 8 - Name = "cl_line" - test_aa = .F. - Width = 50 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_listbox AS listbox - *< CLASSDATA: Baseclass="listbox" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - BorderColor = 255,0,0 - Height = 24 - Name = "cl_listbox" - SpecialEffect = 1 - test_aa = .F. - Width = 95 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_olebound AS oleboundcontrol - *< CLASSDATA: Baseclass="oleboundcontrol" Timestamp="" Scale="Pixels" Uniqueid="" /> - - Height = 25 - Name = "cl_olebound" - Width = 100 - -ENDDEFINE - -DEFINE CLASS cl_option AS optionbutton - *< CLASSDATA: Baseclass="optionbutton" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Alignment = 0 - Anchor = 0 - AutoSize = .T. - BackColor = 240,240,240 - BackStyle = 1 - Caption = "Option1" - ColorScheme = 1 - ColorSource = 4 - Comment = "" - ControlSource = "" - DisabledBackColor = 240,240,240 - DisabledForeColor = 109,109,109 - DisabledPicture = ..\..\ - DownPicture = ..\..\ - DragIcon = ..\..\ - DragMode = 0 - Enabled = .T. - FontBold = .F. - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 9 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - Height = 17 - HelpContextID = 0 - MouseIcon = ..\..\ - MousePointer = 0 - Name = "cl_option" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - Picture = ..\..\ - PictureMargin = 0 - PicturePosition = 13 - PictureSpacing = 0 - RightToLeft = .F. - SpecialEffect = 0 - StatusBarText = "" - Style = 0 - TabIndex = 1 - TabStop = .T. - Tag = "" - TerminateRead = .F. - test_aa = .F. - Themes = .T. - ToolTipText = "" - Value = 0 - Visible = .T. - WhatsThisHelpID = -1 - Width = 61 - WordWrap = .F. - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_optiongroup AS optiongroup - *< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Anchor = 0 - AutoSize = .F. - BackColor = 240,240,240 - BackStyle = 1 - BorderColor = 100,100,100 - BorderStyle = 1 - ButtonCount = 2 - ColorSource = 4 - Comment = "" - ControlSource = "" - DragIcon = ..\..\ - DragMode = 0 - Enabled = .T. - Height = 46 - HelpContextID = 0 - MemberClassLibrary = ..\..\ - MouseIcon = ..\..\ - MousePointer = 0 - Name = "cl_optiongroup" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - SpecialEffect = 0 - StatusBarText = "" - TabIndex = 1 - Tag = "" - TerminateRead = .F. - test_aa = .F. - Themes = .T. - ToolTipText = "" - Value = 0 - Visible = .T. - WhatsThisHelpID = -1 - Width = 71 - Option1.Alignment = 0 - Option1.Anchor = 0 - Option1.AutoSize = .T. - Option1.BackColor = 240,240,240 - Option1.BackStyle = 1 - Option1.Caption = "Opt1" - Option1.ColorScheme = 1 - Option1.ColorSource = 4 - Option1.Comment = "" - Option1.ControlSource = "" - Option1.DisabledBackColor = 240,240,240 - Option1.DisabledForeColor = 109,109,109 - Option1.DisabledPicture = ..\..\ - Option1.DownPicture = ..\..\ - Option1.DragIcon = ..\..\ - Option1.DragMode = 0 - Option1.Enabled = .T. - Option1.FontBold = .F. - Option1.FontCharSet = 0 - Option1.FontCondense = .F. - Option1.FontExtend = .F. - Option1.FontItalic = .F. - Option1.FontName = "Arial" - Option1.FontOutline = .F. - Option1.FontShadow = .F. - Option1.FontSize = 9 - Option1.FontStrikethru = .F. - Option1.FontUnderline = .F. - Option1.ForeColor = 0,0,0 - Option1.Height = 17 - Option1.HelpContextID = 0 - Option1.Left = 5 - Option1.MouseIcon = ..\..\ - Option1.MousePointer = 0 - Option1.Name = "Option1" - Option1.OLEDragMode = 0 - Option1.OLEDragPicture = ..\..\ - Option1.OLEDropEffects = 3 - Option1.OLEDropMode = 0 - Option1.Picture = ..\..\ - Option1.PictureMargin = 0 - Option1.PicturePosition = 13 - Option1.PictureSpacing = 0 - Option1.RightToLeft = .F. - Option1.SpecialEffect = 0 - Option1.StatusBarText = "" - Option1.Style = 0 - Option1.TabStop = .T. - Option1.Tag = "" - Option1.TerminateRead = .F. - Option1.Themes = .T. - Option1.ToolTipText = "" - Option1.Top = 5 - Option1.Value = 0 - Option1.Visible = .T. - Option1.WhatsThisHelpID = -1 - Option1.Width = 44 - Option1.WordWrap = .F. - Option2.Alignment = 0 - Option2.Anchor = 0 - Option2.BackColor = 255,128,128 - Option2.BackStyle = 1 - Option2.Caption = "Opt2" - Option2.ColorScheme = 1 - Option2.ColorSource = 4 - Option2.Comment = "" - Option2.ControlSource = "" - Option2.DisabledBackColor = 240,240,240 - Option2.DisabledForeColor = 109,109,109 - Option2.DisabledPicture = ..\..\ - Option2.DownPicture = ..\..\ - Option2.DragIcon = ..\..\ - Option2.DragMode = 0 - Option2.Enabled = .T. - Option2.FontBold = .F. - Option2.FontCharSet = 0 - Option2.FontCondense = .F. - Option2.FontExtend = .F. - Option2.FontItalic = .F. - Option2.FontName = "Arial" - Option2.FontOutline = .F. - Option2.FontShadow = .F. - Option2.FontSize = 9 - Option2.FontStrikethru = .F. - Option2.FontUnderline = .F. - Option2.ForeColor = 0,0,0 - Option2.Height = 17 - Option2.HelpContextID = 0 - Option2.Left = 5 - Option2.MouseIcon = ..\..\ - Option2.MousePointer = 0 - Option2.Name = "Option2" - Option2.OLEDragMode = 0 - Option2.OLEDragPicture = ..\..\ - Option2.OLEDropEffects = 3 - Option2.OLEDropMode = 0 - Option2.Picture = ..\..\ - Option2.PictureMargin = 0 - Option2.PicturePosition = 13 - Option2.PictureSpacing = 0 - Option2.RightToLeft = .F. - Option2.SpecialEffect = 0 - Option2.StatusBarText = "" - Option2.Style = 0 - Option2.TabStop = .T. - Option2.Tag = "" - Option2.TerminateRead = .F. - Option2.Themes = .T. - Option2.ToolTipText = "" - Option2.Top = 24 - Option2.Value = 0 - Option2.Visible = .T. - Option2.WhatsThisHelpID = -1 - Option2.Width = 44 - Option2.WordWrap = .F. - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_page AS page - *< CLASSDATA: Baseclass="page" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Caption = "Page1" - Height = 44 - Name = "cl_page" - test_aa = .F. - Width = 89 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_pageframe AS pageframe - *< CLASSDATA: Baseclass="pageframe" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - ErasePage = .T. - Height = 111 - Name = "cl_pageframe" - PageCount = 2 - test_aa = .F. - Width = 175 - Page1.Caption = "Page1" - Page1.Name = "Page1" - Page2.Caption = "Page2" - Page2.Name = "Page2" - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_projecthook AS projecthook - *< CLASSDATA: Baseclass="projecthook" Timestamp="" Scale="Pixels" Uniqueid="" /> - - Comment = "" - Height = 22 - Name = "cl_projecthook" - OLEDropEffects = 3 - OLEDropMode = 1 - Tag = "" - Width = 23 - -ENDDEFINE - -DEFINE CLASS cl_relation AS relation - *< CLASSDATA: Baseclass="relation" Timestamp="" Scale="Pixels" Uniqueid="" /> - - ChildAlias = "" - ChildOrder = "" - Comment = "" - Height = 23 - Name = "cl_relation" - OneToMany = .F. - ParentAlias = "" - RelationalExpr = "" - Tag = "" - Width = 23 - -ENDDEFINE - -DEFINE CLASS cl_reportlistener AS reportlistener - *< CLASSDATA: Baseclass="reportlistener" Timestamp="" Scale="Pixels" Uniqueid="" /> - - AllowModalMessages = .F. - CallAdjustObjectSize = 0 - CallEvaluateContents = 0 - CommandClauses = .NULL. - Comment = "" - CurrentDataSession = 1 - CurrentPass = 0 - DynamicLineHeight = .T. - FRXDataSession = -1 - Height = 23 - Name = "cl_reportlistener" - PreviewContainer = .NULL. - PrintJobName = "" - QuietMode = .F. - SendGDIPlusImage = 0 - Tag = "" - TwoPassProcess = .F. - Width = 23 - -ENDDEFINE - -DEFINE CLASS cl_separator AS separator - *< CLASSDATA: Baseclass="separator" Timestamp="" Scale="Pixels" Uniqueid="" /> - - Comment = "" - Enabled = .T. - Height = 0 - Name = "cl_separator" - Style = 0 - Tag = "" - Visible = .T. - Width = 0 - -ENDDEFINE - -DEFINE CLASS cl_shape AS shape - *< CLASSDATA: Baseclass="shape" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Height = 17 - Name = "cl_shape" - SpecialEffect = 0 - Style = 0 - test_aa = .F. - Width = 50 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_spinner AS spinner - *< CLASSDATA: Baseclass="spinner" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - FontSize = 12 - Height = 28 - Name = "cl_spinner" - test_aa = .F. - Width = 50 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_textbox AS textbox - *< CLASSDATA: Baseclass="textbox" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Alignment = 3 - Anchor = 0 - AutoComplete = 0 - AutoCompSource = "" - AutoCompTable = "" - BackColor = 255,255,255 - BackStyle = 1 - BorderColor = 100,100,100 - BorderStyle = 1 - Century = 1 - ColorScheme = 1 - ColorSource = 4 - Comment = "" - ControlSource = "" - DateFormat = 0 - DateMark = "" - DisabledBackColor = 240,240,240 - DisabledForeColor = 109,109,109 - DragIcon = ..\..\ - DragMode = 0 - Enabled = .T. - EnableHyperlinks = .F. - FontBold = .F. - FontCharSet = 0 - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 9 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - Format = "" - Height = 23 - HelpContextID = 0 - HideSelection = .T. - Hours = 0 - IMEMode = 0 - InputMask = "" - IntegralHeight = .F. - Margin = 2 - MaxLength = 0 - MemoWindow = "" - MouseIcon = ..\..\ - MousePointer = 0 - Name = "cl_textbox" - NullDisplay = "" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - OLEDropTextInsertion = 0 - OpenWindow = .F. - PasswordChar = "" - ReadOnly = .F. - RightToLeft = .F. - Seconds = 2 - SelectedBackColor = 51,153,255 - SelectedForeColor = 255,255,255 - SelectOnEntry = .F. - SpecialEffect = 0 - StatusBarText = "" - StrictDateEntry = 1 - Style = 0 - TabIndex = 1 - TabStop = .T. - Tag = "" - TerminateRead = .F. - test_aa = .F. - Themes = .T. - ToolTipText = "" - Value = - Visible = .T. - WhatsThisHelpID = -1 - Width = 50 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_timer AS timer - *< CLASSDATA: Baseclass="timer" Timestamp="" Scale="Pixels" Uniqueid="" /> - - * - *m: test_aa_access - *m: test_aa_assign - *p: test_aa - * - - Height = 23 - Name = "cl_timer" - test_aa = .F. - Width = 23 - - PROCEDURE test_aa_access - *To do: Modify this routine for the Access method - RETURN THIS.test_aa - - ENDPROC - - PROCEDURE test_aa_assign - LPARAMETERS vNewVal - *To do: Modify this routine for the Assign method - THIS.test_aa = m.vNewVal - - ENDPROC - -ENDDEFINE - -DEFINE CLASS cl_toolbar AS toolbar - *< CLASSDATA: Baseclass="toolbar" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_separator1" UniqueID="" Timestamp="" /> - - BackColor = 240,240,240 - Caption = "Toolbar1" - ColorSource = 4 - Comment = "" - ControlBox = .T. - DataSession = 1 - DefLeft = - DefTop = - Enabled = .T. - ForeColor = 0,0,0 - HelpContextID = 0 - KeyPreview = .F. - Left = (0) - LockScreen = .F. - MouseIcon = ..\..\ - MousePointer = 0 - Movable = .T. - Name = "cl_toolbar" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - ScaleMode = 3 - ShowTips = .T. - ShowWindow = 0 - Sizable = .T. - Tag = "" - Themes = .T. - Top = (0) - Visible = .T. - WhatsThisHelpID = -1 - - ADD OBJECT 'Cl_separator1' AS cl_separator WITH ; - Comment = "Separador de Toolbar", ; - Enabled = .T., ; - Height = 0, ; - Left = 5, ; - Name = "Cl_separator1", ; - Style = 0, ; - Tag = "", ; - Top = 3, ; - Visible = .T., ; - Width = 0 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="separator" /> - -ENDDEFINE - -DEFINE CLASS cl_xmladapter AS xmladapter - *< CLASSDATA: Baseclass="xmladapter" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Tables" UniqueID="" Timestamp="" /> - - CodePage = 0 - Comment = "" - DeclareXMLPrefix = .F. - DisableEncode = .F. - ForceCloseTag = .F. - FormattedOutput = .T. - Height = 56 - IsDiffgram = .F. - MapBinary = .F. - MapN19_4ToCurrency = .F. - MapVarchar = .F. - Name = "cl_xmladapter" - NoCpTrans = .F. - PreserveWhiteSpace = .F. - RespectCursorCP = .F. - RespectNesting = .F. - SelectionNamespaces = - Tag = "" - Unicode = .F. - UseCodePage = .F. - UTF8Encoded = .F. - Width = 56 - WrapCharInCDATA = .F. - WrapMemoInCDATA = .F. - XMLName = - XMLNameIsXPath = .F. - XMLNamespace = - XMLPrefix = - XMLSchemaLocation = ..\..\ - - ADD OBJECT 'Tables' AS collection WITH ; - Comment = "", ; - Height = 23, ; - KeySort = 0, ; - Left = 23, ; - Name = "Tables", ; - Tag = "", ; - Top = 23, ; - Width = 23 - *< END OBJECT: BaseClass="collection" /> - -ENDDEFINE - -DEFINE CLASS cl_xmlfield AS xmlfield - *< CLASSDATA: Baseclass="xmlfield" Timestamp="" Scale="Pixels" Uniqueid="" /> - - Alias = "" - CodePage = 0 - Comment = "" - DataType = "" - DisableEncode = .F. - FractionDigits = -1 - Height = 23 - IsAttribute = .F. - IsBase64 = .F. - IsBinary = .F. - IsNull = .F. - Keyfield = .F. - MaxLength = -1 - Name = "cl_xmlfield" - NoCpTrans = .F. - Tag = "" - Unicode = .F. - Width = 23 - WrapInCDATA = .F. - XMLName = - XMLNameIsXPath = .F. - XSDfractionDigits = "" - XSDmaxLength = "" - XSDtotalDigits = "" - XSDtype = "" - -ENDDEFINE - -DEFINE CLASS cl_xmltable AS xmltable - *< CLASSDATA: Baseclass="xmltable" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Fields" UniqueID="" Timestamp="" /> - - Alias = "" - ChildTable = .NULL. - CodePage = 0 - Comment = "" - DeclareXMLPrefix = .F. - FirstNestedTable = .NULL. - Height = 56 - Name = "cl_xmltable" - NestedInto = .NULL. - NextSiblingTable = .NULL. - Tag = "" - Width = 56 - XMLName = - XMLNameIsXPath = .F. - XMLNamespace = - XMLPrefix = - - ADD OBJECT 'Fields' AS collection WITH ; - Height = 23, ; - Left = 23, ; - Name = "Fields", ; - Top = 23, ; - Width = 23 - *< END OBJECT: BaseClass="collection" /> - -ENDDEFINE - -DEFINE CLASS f_base AS form - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Edit1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Label3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="cmdCapturar" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Label2" UniqueID="" Timestamp="" /> - - * - *m: capturarpantallaabitmap - *p: c_testname - * - - AlwaysOnTop = .T. - BackColor = 192,192,192 - Caption = "OptionGroup_Test" - c_testname = OptionGroup_Test - DoCreate = .T. - Height = 424 - Left = 0 - Name = "f_base" - Top = 0 - Width = 819 - - ADD OBJECT 'cmdCapturar' AS commandbutton WITH ; - Caption = "Capturar Pantalla", ; - Height = 27, ; - Left = 564, ; - Name = "cmdCapturar", ; - TabIndex = 1, ; - Top = 392, ; - Width = 248 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'Edit1' AS editbox WITH ; - Height = 356, ; - Left = 564, ; - Name = "Edit1", ; - ReadOnly = .T., ; - TabIndex = 2, ; - Top = 32, ; - Value = , ; - Width = 249 - *< END OBJECT: BaseClass="editbox" /> - - ADD OBJECT 'Label1' AS label WITH ; - Alignment = 2, ; - Caption = "OPTIONGROUP NORMAL", ; - FontBold = .T., ; - Height = 17, ; - Left = 28, ; - Name = "Label1", ; - TabIndex = 4, ; - Top = 8, ; - Width = 244 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Label2' AS label WITH ; - Alignment = 2, ; - Caption = "OPTIONGROUP SUBCLASADOS", ; - FontBold = .T., ; - Height = 17, ; - Left = 296, ; - Name = "Label2", ; - TabIndex = 5, ; - Top = 8, ; - Width = 248 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Label3' AS label WITH ; - Alignment = 2, ; - Caption = "OBSERVACIONES", ; - FontBold = .T., ; - Height = 17, ; - Left = 564, ; - Name = "Label3", ; - TabIndex = 3, ; - Top = 8, ; - Width = 248 - *< END OBJECT: BaseClass="label" /> - - PROCEDURE capturarpantallaabitmap - LPARAMETERS tcFilename - - LOCAL retVal - tcFilename = EVL(tcFilename, 'optiongroup') - - IF NOT '\' $ tcFilename - tcFilename = SYS(5) + ADDBS(CURDIR()) + "TESTS\DATOS_TEST\" + tcFilename + '.bmp' - ENDIF - - Declare Integer formtobmp IN "PCT_DLL.dll" integer hwnd,String bmpFileName - retVal = formtobmp( THISFORM.HWnd, tcFilename ) - - *Declare Integer formtobmpA IN "TESTS\PCT_DLL.dll" string bmpfilename,integer nX,integer nY,integer nX2,integer nY2 - - *retVal = formtobmpA( "c:\desa\foxbin2prg\screen0.bmp" ; - , THIS.Left ; - , this.Top ; - , this.Left + this.Width ; - , this.Top + this.Height ) && Save screen to file c:\screen.bmp - CLEAR DLLS formtobmp - - RETURN retVal - - ENDPROC - - PROCEDURE Init - SET PATH TO (FULLPATH("..\", THIS.ClassLibrary)) ADDITIVE - THISFORM.cmdCapturar.SetFocus() - - ENDPROC - - PROCEDURE Refresh - DODEFAULT() - INKEY(0.01,"S") - DOEVENTS FORCE - this.capturarpantallaabitmap( THISFORM.c_testname ) - - ENDPROC - - PROCEDURE cmdCapturar.Click - THISFORM.capturarpantallaabitmap() - - ENDPROC - -ENDDEFINE - -DEFINE CLASS f_checkbox AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_checkbox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Check1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_checkbox2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Check2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_checkbox3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Check3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_checkbox4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Check4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Check5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_checkbox6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Check6" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Left = 0 - Name = "f_checkbox" - Top = 1 - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "CHECKBOX NORMAL" - Label1.Name = "Label1" - Label2.Caption = "CHECKBOX SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Check1' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 64, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 72, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Check2' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 64, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 96, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Cl_checkbox1' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 340, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 72, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Cl_checkbox2' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 340, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 96, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 76, ; - Left = 24, ; - Name = "Container1", ; - Top = 152, ; - Width = 516 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Check3' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 40, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Container1.Check4' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 40, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 40, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Container1.Cl_checkbox3' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 316, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Container1.Cl_checkbox4' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 316, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 40, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 113, ; - Left = 24, ; - Name = "Pageframe1", ; - PageCount = 2, ; - Top = 276, ; - Width = 517, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Check5' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 35, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Pageframe1.Page1.Check6' AS checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox normal", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 35, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Check6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 40, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 152, ; - WordWrap = .F. - *< END OBJECT: BaseClass="checkbox" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_checkbox5' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 311, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 16, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_checkbox6' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Checkbox subclasado", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 21, ; - HelpContextID = 0, ; - Left = 311, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_checkbox6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - PictureMargin = 0, ; - PicturePosition = 13, ; - PictureSpacing = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 40, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 156, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - -ENDDEFINE - -DEFINE CLASS f_combobox AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.ComboList1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.ComboDropdown1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="ComboDropdown1" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Name = "f_combobox" - Edit1.Name = "Edit1" - Edit1.TabIndex = 2 - Label3.Name = "Label3" - Label3.TabIndex = 3 - Command2.Name = "Command2" - Command2.TabIndex = 1 - Label1.Caption = "COMBOBOX NORMAL" - Label1.Name = "Label1" - Label1.TabIndex = 4 - Label2.Caption = "COMBOBOX SUBCLASADOS" - Label2.Name = "Label2" - Label2.TabIndex = 5 - - ADD OBJECT 'Cl_ComboDropdown1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 328, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Cl_ComboList1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 328, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 7, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 76, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'ComboDropdown1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 48, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'ComboList1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 48, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 76, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 97, ; - Left = 28, ; - Name = "Container1", ; - TabIndex = 9, ; - Top = 116, ; - Width = 512 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Cl_ComboDropdown1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 300, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 20, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Container1.Cl_ComboList1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 300, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 7, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 52, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Container1.ComboDropdown1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 20, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 20, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'Container1.ComboList1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 20, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 52, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 153, ; - Left = 28, ; - Name = "Pageframe1", ; - PageCount = 2, ; - TabIndex = 10, ; - Top = 236, ; - Width = 513, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_ComboDropdown1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 299, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_ComboList1' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 299, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 7, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'Pageframe1.Page1.ComboDropdown1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 19, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboDropdown1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .T., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - ADD OBJECT 'Pageframe1.Page1.ComboList1' AS combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 255,255,0, ; - BorderStyle = 1, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 19, ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "ComboList1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\sobrepostal.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 2, ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 200 - *< END OBJECT: BaseClass="combobox" /> - - PROCEDURE Cl_ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Cl_ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.Cl_ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.Cl_ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.Cl_ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.Cl_ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.ComboDropdown1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.ComboList1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - -ENDDEFINE - -DEFINE CLASS f_commandgroup AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_commandgroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Commandgroup1" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Left = 0 - Name = "f_commandgroup" - Top = 0 - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "COMMANDGROUP NORMAL" - Label1.Name = "Label1" - Label2.Caption = "COMMANDGROUP SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_commandgroup1' AS cl_commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 304, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 128,255,128, ; - Command1.Cancel = .F., ; - Command1.Caption = "Este es el botón de comando 1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 0,128,192, ; - Command1.DisabledForeColor = 128,0,255, ; - Command1.DisabledPicture = bmps\treeview.bmp, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 21, ; - Command1.HelpContextID = 0, ; - Command1.Left = 4, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 200, ; - Command1.WordWrap = .F., ; - Command2.Alignment = 2, ; - Command2.Anchor = 0, ; - Command2.AutoSize = .F., ; - Command2.BackColor = 128,255,128, ; - Command2.Cancel = .F., ; - Command2.Caption = "Este es el botón de comando 2", ; - Command2.ColorScheme = 1, ; - Command2.ColorSource = 4, ; - Command2.Comment = "", ; - Command2.Default = .F., ; - Command2.DisabledBackColor = 0,128,192, ; - Command2.DisabledForeColor = 128,0,255, ; - Command2.DisabledPicture = bmps\treeview.bmp, ; - Command2.DownPicture = ..\..\, ; - Command2.DragIcon = ..\..\, ; - Command2.DragMode = 0, ; - Command2.Enabled = .F., ; - Command2.FontBold = .F., ; - Command2.FontCharSet = 0, ; - Command2.FontCondense = .F., ; - Command2.FontExtend = .F., ; - Command2.FontItalic = .F., ; - Command2.FontName = "Arial", ; - Command2.FontOutline = .F., ; - Command2.FontShadow = .F., ; - Command2.FontSize = 8, ; - Command2.FontStrikethru = .F., ; - Command2.FontUnderline = .F., ; - Command2.ForeColor = 0,0,0, ; - Command2.Height = 21, ; - Command2.HelpContextID = 0, ; - Command2.Left = 4, ; - Command2.MouseIcon = ..\..\, ; - Command2.MousePointer = 0, ; - Command2.Name = "Command2", ; - Command2.OLEDragMode = 0, ; - Command2.OLEDragPicture = ..\..\, ; - Command2.OLEDropEffects = 3, ; - Command2.OLEDropMode = 0, ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PictureMargin = 0, ; - Command2.PicturePosition = 4, ; - Command2.PictureSpacing = 0, ; - Command2.RightToLeft = .F., ; - Command2.SpecialEffect = 0, ; - Command2.StatusBarText = "", ; - Command2.Style = 0, ; - Command2.TabStop = .T., ; - Command2.Tag = "", ; - Command2.TerminateRead = .F., ; - Command2.Themes = .T., ; - Command2.ToolTipText = "", ; - Command2.Top = 28, ; - Command2.Visible = .T., ; - Command2.WhatsThisHelpID = -1, ; - Command2.Width = 200, ; - Command2.WordWrap = .F., ; - Command3.Alignment = 2, ; - Command3.Anchor = 0, ; - Command3.AutoSize = .F., ; - Command3.BackColor = 128,255,128, ; - Command3.Cancel = .F., ; - Command3.Caption = "Este es el botón de comando 3", ; - Command3.ColorScheme = 1, ; - Command3.ColorSource = 4, ; - Command3.Comment = "", ; - Command3.Default = .F., ; - Command3.DisabledBackColor = 0,128,192, ; - Command3.DisabledForeColor = 128,0,255, ; - Command3.DisabledPicture = bmps\treeview.bmp, ; - Command3.DownPicture = ..\..\, ; - Command3.DragIcon = ..\..\, ; - Command3.DragMode = 0, ; - Command3.Enabled = .T., ; - Command3.FontBold = .F., ; - Command3.FontCharSet = 0, ; - Command3.FontCondense = .F., ; - Command3.FontExtend = .F., ; - Command3.FontItalic = .F., ; - Command3.FontName = "Arial", ; - Command3.FontOutline = .F., ; - Command3.FontShadow = .F., ; - Command3.FontSize = 8, ; - Command3.FontStrikethru = .F., ; - Command3.FontUnderline = .F., ; - Command3.ForeColor = 0,0,0, ; - Command3.Height = 21, ; - Command3.HelpContextID = 0, ; - Command3.Left = 4, ; - Command3.MouseIcon = ..\..\, ; - Command3.MousePointer = 0, ; - Command3.Name = "Command3", ; - Command3.OLEDragMode = 0, ; - Command3.OLEDragPicture = ..\..\, ; - Command3.OLEDropEffects = 3, ; - Command3.OLEDropMode = 0, ; - Command3.Picture = bmps\sobrepostal.bmp, ; - Command3.PictureMargin = 0, ; - Command3.PicturePosition = 4, ; - Command3.PictureSpacing = 0, ; - Command3.RightToLeft = .F., ; - Command3.SpecialEffect = 0, ; - Command3.StatusBarText = "", ; - Command3.Style = 0, ; - Command3.TabStop = .T., ; - Command3.Tag = "", ; - Command3.TerminateRead = .F., ; - Command3.Themes = .T., ; - Command3.ToolTipText = "", ; - Command3.Top = 52, ; - Command3.Visible = .T., ; - Command3.WhatsThisHelpID = -1, ; - Command3.Width = 200, ; - Command3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'Commandgroup1' AS commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 36, ; - MemberClass = "cl_commandbutton", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Cl_commandbutton1.Alignment = 2, ; - Cl_commandbutton1.Anchor = 0, ; - Cl_commandbutton1.AutoSize = .F., ; - Cl_commandbutton1.BackColor = 128,255,128, ; - Cl_commandbutton1.Cancel = .F., ; - Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; - Cl_commandbutton1.ColorScheme = 1, ; - Cl_commandbutton1.ColorSource = 4, ; - Cl_commandbutton1.Comment = "", ; - Cl_commandbutton1.Default = .F., ; - Cl_commandbutton1.DisabledBackColor = 0,128,192, ; - Cl_commandbutton1.DisabledForeColor = 128,0,255, ; - Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton1.DownPicture = ..\..\, ; - Cl_commandbutton1.DragIcon = ..\..\, ; - Cl_commandbutton1.DragMode = 0, ; - Cl_commandbutton1.Enabled = .T., ; - Cl_commandbutton1.FontBold = .F., ; - Cl_commandbutton1.FontCharSet = 0, ; - Cl_commandbutton1.FontCondense = .F., ; - Cl_commandbutton1.FontExtend = .F., ; - Cl_commandbutton1.FontItalic = .F., ; - Cl_commandbutton1.FontName = "Arial", ; - Cl_commandbutton1.FontOutline = .F., ; - Cl_commandbutton1.FontShadow = .F., ; - Cl_commandbutton1.FontSize = 8, ; - Cl_commandbutton1.FontStrikethru = .F., ; - Cl_commandbutton1.FontUnderline = .F., ; - Cl_commandbutton1.Height = 21, ; - Cl_commandbutton1.HelpContextID = 0, ; - Cl_commandbutton1.Left = 8, ; - Cl_commandbutton1.MouseIcon = ..\..\, ; - Cl_commandbutton1.MousePointer = 0, ; - Cl_commandbutton1.Name = "Cl_commandbutton1", ; - Cl_commandbutton1.OLEDragMode = 0, ; - Cl_commandbutton1.OLEDragPicture = ..\..\, ; - Cl_commandbutton1.OLEDropEffects = 3, ; - Cl_commandbutton1.OLEDropMode = 0, ; - Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton1.PictureMargin = 0, ; - Cl_commandbutton1.PicturePosition = 4, ; - Cl_commandbutton1.PictureSpacing = 0, ; - Cl_commandbutton1.RightToLeft = .F., ; - Cl_commandbutton1.SpecialEffect = 0, ; - Cl_commandbutton1.StatusBarText = "", ; - Cl_commandbutton1.Style = 0, ; - Cl_commandbutton1.TabStop = .T., ; - Cl_commandbutton1.Tag = "", ; - Cl_commandbutton1.TerminateRead = .F., ; - Cl_commandbutton1.Themes = .T., ; - Cl_commandbutton1.ToolTipText = "", ; - Cl_commandbutton1.Top = 4, ; - Cl_commandbutton1.Visible = .T., ; - Cl_commandbutton1.WhatsThisHelpID = -1, ; - Cl_commandbutton1.Width = 200, ; - Cl_commandbutton1.WordWrap = .F., ; - Cl_commandbutton2.Alignment = 2, ; - Cl_commandbutton2.Anchor = 0, ; - Cl_commandbutton2.AutoSize = .F., ; - Cl_commandbutton2.BackColor = 128,255,128, ; - Cl_commandbutton2.Cancel = .F., ; - Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; - Cl_commandbutton2.ColorScheme = 1, ; - Cl_commandbutton2.ColorSource = 4, ; - Cl_commandbutton2.Comment = "", ; - Cl_commandbutton2.Default = .F., ; - Cl_commandbutton2.DisabledBackColor = 0,128,192, ; - Cl_commandbutton2.DisabledForeColor = 128,0,255, ; - Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton2.DownPicture = ..\..\, ; - Cl_commandbutton2.DragIcon = ..\..\, ; - Cl_commandbutton2.DragMode = 0, ; - Cl_commandbutton2.Enabled = .F., ; - Cl_commandbutton2.FontBold = .F., ; - Cl_commandbutton2.FontCharSet = 0, ; - Cl_commandbutton2.FontCondense = .F., ; - Cl_commandbutton2.FontExtend = .F., ; - Cl_commandbutton2.FontItalic = .F., ; - Cl_commandbutton2.FontName = "Arial", ; - Cl_commandbutton2.FontOutline = .F., ; - Cl_commandbutton2.FontShadow = .F., ; - Cl_commandbutton2.FontSize = 8, ; - Cl_commandbutton2.FontStrikethru = .F., ; - Cl_commandbutton2.FontUnderline = .F., ; - Cl_commandbutton2.Height = 21, ; - Cl_commandbutton2.HelpContextID = 0, ; - Cl_commandbutton2.Left = 8, ; - Cl_commandbutton2.MouseIcon = ..\..\, ; - Cl_commandbutton2.MousePointer = 0, ; - Cl_commandbutton2.Name = "Cl_commandbutton2", ; - Cl_commandbutton2.OLEDragMode = 0, ; - Cl_commandbutton2.OLEDragPicture = ..\..\, ; - Cl_commandbutton2.OLEDropEffects = 3, ; - Cl_commandbutton2.OLEDropMode = 0, ; - Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton2.PictureMargin = 0, ; - Cl_commandbutton2.PicturePosition = 4, ; - Cl_commandbutton2.PictureSpacing = 0, ; - Cl_commandbutton2.RightToLeft = .F., ; - Cl_commandbutton2.SpecialEffect = 0, ; - Cl_commandbutton2.StatusBarText = "", ; - Cl_commandbutton2.Style = 0, ; - Cl_commandbutton2.TabStop = .T., ; - Cl_commandbutton2.Tag = "", ; - Cl_commandbutton2.TerminateRead = .F., ; - Cl_commandbutton2.Themes = .T., ; - Cl_commandbutton2.ToolTipText = "", ; - Cl_commandbutton2.Top = 28, ; - Cl_commandbutton2.Visible = .T., ; - Cl_commandbutton2.WhatsThisHelpID = -1, ; - Cl_commandbutton2.Width = 200, ; - Cl_commandbutton2.WordWrap = .F., ; - Cl_commandbutton3.Alignment = 2, ; - Cl_commandbutton3.Anchor = 0, ; - Cl_commandbutton3.AutoSize = .F., ; - Cl_commandbutton3.BackColor = 128,255,128, ; - Cl_commandbutton3.Cancel = .F., ; - Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; - Cl_commandbutton3.ColorScheme = 1, ; - Cl_commandbutton3.ColorSource = 4, ; - Cl_commandbutton3.Comment = "", ; - Cl_commandbutton3.Default = .F., ; - Cl_commandbutton3.DisabledBackColor = 0,128,192, ; - Cl_commandbutton3.DisabledForeColor = 128,0,255, ; - Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton3.DownPicture = ..\..\, ; - Cl_commandbutton3.DragIcon = ..\..\, ; - Cl_commandbutton3.DragMode = 0, ; - Cl_commandbutton3.Enabled = .T., ; - Cl_commandbutton3.FontBold = .F., ; - Cl_commandbutton3.FontCharSet = 0, ; - Cl_commandbutton3.FontCondense = .F., ; - Cl_commandbutton3.FontExtend = .F., ; - Cl_commandbutton3.FontItalic = .F., ; - Cl_commandbutton3.FontName = "Arial", ; - Cl_commandbutton3.FontOutline = .F., ; - Cl_commandbutton3.FontShadow = .F., ; - Cl_commandbutton3.FontSize = 8, ; - Cl_commandbutton3.FontStrikethru = .F., ; - Cl_commandbutton3.FontUnderline = .F., ; - Cl_commandbutton3.Height = 21, ; - Cl_commandbutton3.HelpContextID = 0, ; - Cl_commandbutton3.Left = 8, ; - Cl_commandbutton3.MouseIcon = ..\..\, ; - Cl_commandbutton3.MousePointer = 0, ; - Cl_commandbutton3.Name = "Cl_commandbutton3", ; - Cl_commandbutton3.OLEDragMode = 0, ; - Cl_commandbutton3.OLEDragPicture = ..\..\, ; - Cl_commandbutton3.OLEDropEffects = 3, ; - Cl_commandbutton3.OLEDropMode = 0, ; - Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton3.PictureMargin = 0, ; - Cl_commandbutton3.PicturePosition = 4, ; - Cl_commandbutton3.PictureSpacing = 0, ; - Cl_commandbutton3.RightToLeft = .F., ; - Cl_commandbutton3.SpecialEffect = 0, ; - Cl_commandbutton3.StatusBarText = "", ; - Cl_commandbutton3.Style = 0, ; - Cl_commandbutton3.TabStop = .T., ; - Cl_commandbutton3.Tag = "", ; - Cl_commandbutton3.TerminateRead = .F., ; - Cl_commandbutton3.Themes = .T., ; - Cl_commandbutton3.ToolTipText = "", ; - Cl_commandbutton3.Top = 52, ; - Cl_commandbutton3.Visible = .T., ; - Cl_commandbutton3.WhatsThisHelpID = -1, ; - Cl_commandbutton3.Width = 200, ; - Cl_commandbutton3.WordWrap = .F. - *< END OBJECT: BaseClass="commandgroup" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 101, ; - Left = 28, ; - Name = "Container1", ; - Top = 140, ; - Width = 517 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Cl_commandgroup1' AS cl_commandgroup WITH ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 0, ; - ButtonCount = 3, ; - Enabled = .F., ; - Height = 76, ; - Left = 276, ; - Name = "Cl_commandgroup1", ; - Top = 12, ; - Width = 228, ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 128,255,128, ; - Command1.Cancel = .F., ; - Command1.Caption = "Este es el botón de comando 1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 0,128,192, ; - Command1.DisabledForeColor = 128,0,255, ; - Command1.DisabledPicture = bmps\treeview.bmp, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 21, ; - Command1.HelpContextID = 0, ; - Command1.Left = 4, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 200, ; - Command1.WordWrap = .F., ; - Command2.Alignment = 2, ; - Command2.Anchor = 0, ; - Command2.AutoSize = .F., ; - Command2.BackColor = 128,255,128, ; - Command2.Cancel = .F., ; - Command2.Caption = "Este es el botón de comando 2", ; - Command2.ColorScheme = 1, ; - Command2.ColorSource = 4, ; - Command2.Comment = "", ; - Command2.Default = .F., ; - Command2.DisabledBackColor = 0,128,192, ; - Command2.DisabledForeColor = 128,0,255, ; - Command2.DisabledPicture = bmps\treeview.bmp, ; - Command2.DownPicture = ..\..\, ; - Command2.DragIcon = ..\..\, ; - Command2.DragMode = 0, ; - Command2.Enabled = .F., ; - Command2.FontBold = .F., ; - Command2.FontCharSet = 0, ; - Command2.FontCondense = .F., ; - Command2.FontExtend = .F., ; - Command2.FontItalic = .F., ; - Command2.FontName = "Arial", ; - Command2.FontOutline = .F., ; - Command2.FontShadow = .F., ; - Command2.FontSize = 8, ; - Command2.FontStrikethru = .F., ; - Command2.FontUnderline = .F., ; - Command2.ForeColor = 0,0,0, ; - Command2.Height = 21, ; - Command2.HelpContextID = 0, ; - Command2.Left = 4, ; - Command2.MouseIcon = ..\..\, ; - Command2.MousePointer = 0, ; - Command2.Name = "Command2", ; - Command2.OLEDragMode = 0, ; - Command2.OLEDragPicture = ..\..\, ; - Command2.OLEDropEffects = 3, ; - Command2.OLEDropMode = 0, ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PictureMargin = 0, ; - Command2.PicturePosition = 4, ; - Command2.PictureSpacing = 0, ; - Command2.RightToLeft = .F., ; - Command2.SpecialEffect = 0, ; - Command2.StatusBarText = "", ; - Command2.Style = 0, ; - Command2.TabStop = .T., ; - Command2.Tag = "", ; - Command2.TerminateRead = .F., ; - Command2.Themes = .T., ; - Command2.ToolTipText = "", ; - Command2.Top = 28, ; - Command2.Visible = .T., ; - Command2.WhatsThisHelpID = -1, ; - Command2.Width = 200, ; - Command2.WordWrap = .F., ; - Command3.Alignment = 2, ; - Command3.Anchor = 0, ; - Command3.AutoSize = .F., ; - Command3.BackColor = 128,255,128, ; - Command3.Cancel = .F., ; - Command3.Caption = "Este es el botón de comando 3", ; - Command3.ColorScheme = 1, ; - Command3.ColorSource = 4, ; - Command3.Comment = "", ; - Command3.Default = .F., ; - Command3.DisabledBackColor = 0,128,192, ; - Command3.DisabledForeColor = 128,0,255, ; - Command3.DisabledPicture = bmps\treeview.bmp, ; - Command3.DownPicture = ..\..\, ; - Command3.DragIcon = ..\..\, ; - Command3.DragMode = 0, ; - Command3.Enabled = .T., ; - Command3.FontBold = .F., ; - Command3.FontCharSet = 0, ; - Command3.FontCondense = .F., ; - Command3.FontExtend = .F., ; - Command3.FontItalic = .F., ; - Command3.FontName = "Arial", ; - Command3.FontOutline = .F., ; - Command3.FontShadow = .F., ; - Command3.FontSize = 8, ; - Command3.FontStrikethru = .F., ; - Command3.FontUnderline = .F., ; - Command3.ForeColor = 0,0,0, ; - Command3.Height = 21, ; - Command3.HelpContextID = 0, ; - Command3.Left = 4, ; - Command3.MouseIcon = ..\..\, ; - Command3.MousePointer = 0, ; - Command3.Name = "Command3", ; - Command3.OLEDragMode = 0, ; - Command3.OLEDragPicture = ..\..\, ; - Command3.OLEDropEffects = 3, ; - Command3.OLEDropMode = 0, ; - Command3.Picture = bmps\sobrepostal.bmp, ; - Command3.PictureMargin = 0, ; - Command3.PicturePosition = 4, ; - Command3.PictureSpacing = 0, ; - Command3.RightToLeft = .F., ; - Command3.SpecialEffect = 0, ; - Command3.StatusBarText = "", ; - Command3.Style = 0, ; - Command3.TabStop = .T., ; - Command3.Tag = "", ; - Command3.TerminateRead = .F., ; - Command3.Themes = .T., ; - Command3.ToolTipText = "", ; - Command3.Top = 52, ; - Command3.Visible = .T., ; - Command3.WhatsThisHelpID = -1, ; - Command3.Width = 200, ; - Command3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'Container1.Commandgroup1' AS commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 8, ; - MemberClass = "cl_commandbutton", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Cl_commandbutton1.Alignment = 2, ; - Cl_commandbutton1.Anchor = 0, ; - Cl_commandbutton1.AutoSize = .F., ; - Cl_commandbutton1.BackColor = 128,255,128, ; - Cl_commandbutton1.Cancel = .F., ; - Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; - Cl_commandbutton1.ColorScheme = 1, ; - Cl_commandbutton1.ColorSource = 4, ; - Cl_commandbutton1.Comment = "", ; - Cl_commandbutton1.Default = .F., ; - Cl_commandbutton1.DisabledBackColor = 0,128,192, ; - Cl_commandbutton1.DisabledForeColor = 128,0,255, ; - Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton1.DownPicture = ..\..\, ; - Cl_commandbutton1.DragIcon = ..\..\, ; - Cl_commandbutton1.DragMode = 0, ; - Cl_commandbutton1.Enabled = .T., ; - Cl_commandbutton1.FontBold = .F., ; - Cl_commandbutton1.FontCharSet = 0, ; - Cl_commandbutton1.FontCondense = .F., ; - Cl_commandbutton1.FontExtend = .F., ; - Cl_commandbutton1.FontItalic = .F., ; - Cl_commandbutton1.FontName = "Arial", ; - Cl_commandbutton1.FontOutline = .F., ; - Cl_commandbutton1.FontShadow = .F., ; - Cl_commandbutton1.FontSize = 8, ; - Cl_commandbutton1.FontStrikethru = .F., ; - Cl_commandbutton1.FontUnderline = .F., ; - Cl_commandbutton1.Height = 21, ; - Cl_commandbutton1.HelpContextID = 0, ; - Cl_commandbutton1.Left = 8, ; - Cl_commandbutton1.MouseIcon = ..\..\, ; - Cl_commandbutton1.MousePointer = 0, ; - Cl_commandbutton1.Name = "Cl_commandbutton1", ; - Cl_commandbutton1.OLEDragMode = 0, ; - Cl_commandbutton1.OLEDragPicture = ..\..\, ; - Cl_commandbutton1.OLEDropEffects = 3, ; - Cl_commandbutton1.OLEDropMode = 0, ; - Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton1.PictureMargin = 0, ; - Cl_commandbutton1.PicturePosition = 4, ; - Cl_commandbutton1.PictureSpacing = 0, ; - Cl_commandbutton1.RightToLeft = .F., ; - Cl_commandbutton1.SpecialEffect = 0, ; - Cl_commandbutton1.StatusBarText = "", ; - Cl_commandbutton1.Style = 0, ; - Cl_commandbutton1.TabStop = .T., ; - Cl_commandbutton1.Tag = "", ; - Cl_commandbutton1.TerminateRead = .F., ; - Cl_commandbutton1.Themes = .T., ; - Cl_commandbutton1.ToolTipText = "", ; - Cl_commandbutton1.Top = 4, ; - Cl_commandbutton1.Visible = .T., ; - Cl_commandbutton1.WhatsThisHelpID = -1, ; - Cl_commandbutton1.Width = 200, ; - Cl_commandbutton1.WordWrap = .F., ; - Cl_commandbutton2.Alignment = 2, ; - Cl_commandbutton2.Anchor = 0, ; - Cl_commandbutton2.AutoSize = .F., ; - Cl_commandbutton2.BackColor = 128,255,128, ; - Cl_commandbutton2.Cancel = .F., ; - Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; - Cl_commandbutton2.ColorScheme = 1, ; - Cl_commandbutton2.ColorSource = 4, ; - Cl_commandbutton2.Comment = "", ; - Cl_commandbutton2.Default = .F., ; - Cl_commandbutton2.DisabledBackColor = 0,128,192, ; - Cl_commandbutton2.DisabledForeColor = 128,0,255, ; - Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton2.DownPicture = ..\..\, ; - Cl_commandbutton2.DragIcon = ..\..\, ; - Cl_commandbutton2.DragMode = 0, ; - Cl_commandbutton2.Enabled = .F., ; - Cl_commandbutton2.FontBold = .F., ; - Cl_commandbutton2.FontCharSet = 0, ; - Cl_commandbutton2.FontCondense = .F., ; - Cl_commandbutton2.FontExtend = .F., ; - Cl_commandbutton2.FontItalic = .F., ; - Cl_commandbutton2.FontName = "Arial", ; - Cl_commandbutton2.FontOutline = .F., ; - Cl_commandbutton2.FontShadow = .F., ; - Cl_commandbutton2.FontSize = 8, ; - Cl_commandbutton2.FontStrikethru = .F., ; - Cl_commandbutton2.FontUnderline = .F., ; - Cl_commandbutton2.Height = 21, ; - Cl_commandbutton2.HelpContextID = 0, ; - Cl_commandbutton2.Left = 8, ; - Cl_commandbutton2.MouseIcon = ..\..\, ; - Cl_commandbutton2.MousePointer = 0, ; - Cl_commandbutton2.Name = "Cl_commandbutton2", ; - Cl_commandbutton2.OLEDragMode = 0, ; - Cl_commandbutton2.OLEDragPicture = ..\..\, ; - Cl_commandbutton2.OLEDropEffects = 3, ; - Cl_commandbutton2.OLEDropMode = 0, ; - Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton2.PictureMargin = 0, ; - Cl_commandbutton2.PicturePosition = 4, ; - Cl_commandbutton2.PictureSpacing = 0, ; - Cl_commandbutton2.RightToLeft = .F., ; - Cl_commandbutton2.SpecialEffect = 0, ; - Cl_commandbutton2.StatusBarText = "", ; - Cl_commandbutton2.Style = 0, ; - Cl_commandbutton2.TabStop = .T., ; - Cl_commandbutton2.Tag = "", ; - Cl_commandbutton2.TerminateRead = .F., ; - Cl_commandbutton2.Themes = .T., ; - Cl_commandbutton2.ToolTipText = "", ; - Cl_commandbutton2.Top = 28, ; - Cl_commandbutton2.Visible = .T., ; - Cl_commandbutton2.WhatsThisHelpID = -1, ; - Cl_commandbutton2.Width = 200, ; - Cl_commandbutton2.WordWrap = .F., ; - Cl_commandbutton3.Alignment = 2, ; - Cl_commandbutton3.Anchor = 0, ; - Cl_commandbutton3.AutoSize = .F., ; - Cl_commandbutton3.BackColor = 128,255,128, ; - Cl_commandbutton3.Cancel = .F., ; - Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; - Cl_commandbutton3.ColorScheme = 1, ; - Cl_commandbutton3.ColorSource = 4, ; - Cl_commandbutton3.Comment = "", ; - Cl_commandbutton3.Default = .F., ; - Cl_commandbutton3.DisabledBackColor = 0,128,192, ; - Cl_commandbutton3.DisabledForeColor = 128,0,255, ; - Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton3.DownPicture = ..\..\, ; - Cl_commandbutton3.DragIcon = ..\..\, ; - Cl_commandbutton3.DragMode = 0, ; - Cl_commandbutton3.Enabled = .T., ; - Cl_commandbutton3.FontBold = .F., ; - Cl_commandbutton3.FontCharSet = 0, ; - Cl_commandbutton3.FontCondense = .F., ; - Cl_commandbutton3.FontExtend = .F., ; - Cl_commandbutton3.FontItalic = .F., ; - Cl_commandbutton3.FontName = "Arial", ; - Cl_commandbutton3.FontOutline = .F., ; - Cl_commandbutton3.FontShadow = .F., ; - Cl_commandbutton3.FontSize = 8, ; - Cl_commandbutton3.FontStrikethru = .F., ; - Cl_commandbutton3.FontUnderline = .F., ; - Cl_commandbutton3.Height = 21, ; - Cl_commandbutton3.HelpContextID = 0, ; - Cl_commandbutton3.Left = 8, ; - Cl_commandbutton3.MouseIcon = ..\..\, ; - Cl_commandbutton3.MousePointer = 0, ; - Cl_commandbutton3.Name = "Cl_commandbutton3", ; - Cl_commandbutton3.OLEDragMode = 0, ; - Cl_commandbutton3.OLEDragPicture = ..\..\, ; - Cl_commandbutton3.OLEDropEffects = 3, ; - Cl_commandbutton3.OLEDropMode = 0, ; - Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton3.PictureMargin = 0, ; - Cl_commandbutton3.PicturePosition = 4, ; - Cl_commandbutton3.PictureSpacing = 0, ; - Cl_commandbutton3.RightToLeft = .F., ; - Cl_commandbutton3.SpecialEffect = 0, ; - Cl_commandbutton3.StatusBarText = "", ; - Cl_commandbutton3.Style = 0, ; - Cl_commandbutton3.TabStop = .T., ; - Cl_commandbutton3.Tag = "", ; - Cl_commandbutton3.TerminateRead = .F., ; - Cl_commandbutton3.Themes = .T., ; - Cl_commandbutton3.ToolTipText = "", ; - Cl_commandbutton3.Top = 52, ; - Cl_commandbutton3.Visible = .T., ; - Cl_commandbutton3.WhatsThisHelpID = -1, ; - Cl_commandbutton3.Width = 200, ; - Cl_commandbutton3.WordWrap = .F. - *< END OBJECT: BaseClass="commandgroup" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 132, ; - Left = 28, ; - Name = "Pageframe1", ; - PageCount = 2, ; - Top = 256, ; - Width = 517, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_commandgroup1' AS cl_commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 275, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 128,255,128, ; - Command1.Cancel = .F., ; - Command1.Caption = "Este es el botón de comando 1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 0,128,192, ; - Command1.DisabledForeColor = 128,0,255, ; - Command1.DisabledPicture = bmps\treeview.bmp, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 21, ; - Command1.HelpContextID = 0, ; - Command1.Left = 4, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 200, ; - Command1.WordWrap = .F., ; - Command2.Alignment = 2, ; - Command2.Anchor = 0, ; - Command2.AutoSize = .F., ; - Command2.BackColor = 128,255,128, ; - Command2.Cancel = .F., ; - Command2.Caption = "Este es el botón de comando 2", ; - Command2.ColorScheme = 1, ; - Command2.ColorSource = 4, ; - Command2.Comment = "", ; - Command2.Default = .F., ; - Command2.DisabledBackColor = 0,128,192, ; - Command2.DisabledForeColor = 128,0,255, ; - Command2.DisabledPicture = bmps\treeview.bmp, ; - Command2.DownPicture = ..\..\, ; - Command2.DragIcon = ..\..\, ; - Command2.DragMode = 0, ; - Command2.Enabled = .F., ; - Command2.FontBold = .F., ; - Command2.FontCharSet = 0, ; - Command2.FontCondense = .F., ; - Command2.FontExtend = .F., ; - Command2.FontItalic = .F., ; - Command2.FontName = "Arial", ; - Command2.FontOutline = .F., ; - Command2.FontShadow = .F., ; - Command2.FontSize = 8, ; - Command2.FontStrikethru = .F., ; - Command2.FontUnderline = .F., ; - Command2.ForeColor = 0,0,0, ; - Command2.Height = 21, ; - Command2.HelpContextID = 0, ; - Command2.Left = 4, ; - Command2.MouseIcon = ..\..\, ; - Command2.MousePointer = 0, ; - Command2.Name = "Command2", ; - Command2.OLEDragMode = 0, ; - Command2.OLEDragPicture = ..\..\, ; - Command2.OLEDropEffects = 3, ; - Command2.OLEDropMode = 0, ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PictureMargin = 0, ; - Command2.PicturePosition = 4, ; - Command2.PictureSpacing = 0, ; - Command2.RightToLeft = .F., ; - Command2.SpecialEffect = 0, ; - Command2.StatusBarText = "", ; - Command2.Style = 0, ; - Command2.TabStop = .T., ; - Command2.Tag = "", ; - Command2.TerminateRead = .F., ; - Command2.Themes = .T., ; - Command2.ToolTipText = "", ; - Command2.Top = 28, ; - Command2.Visible = .T., ; - Command2.WhatsThisHelpID = -1, ; - Command2.Width = 200, ; - Command2.WordWrap = .F., ; - Command3.Alignment = 2, ; - Command3.Anchor = 0, ; - Command3.AutoSize = .F., ; - Command3.BackColor = 128,255,128, ; - Command3.Cancel = .F., ; - Command3.Caption = "Este es el botón de comando 3", ; - Command3.ColorScheme = 1, ; - Command3.ColorSource = 4, ; - Command3.Comment = "", ; - Command3.Default = .F., ; - Command3.DisabledBackColor = 0,128,192, ; - Command3.DisabledForeColor = 128,0,255, ; - Command3.DisabledPicture = bmps\treeview.bmp, ; - Command3.DownPicture = ..\..\, ; - Command3.DragIcon = ..\..\, ; - Command3.DragMode = 0, ; - Command3.Enabled = .T., ; - Command3.FontBold = .F., ; - Command3.FontCharSet = 0, ; - Command3.FontCondense = .F., ; - Command3.FontExtend = .F., ; - Command3.FontItalic = .F., ; - Command3.FontName = "Arial", ; - Command3.FontOutline = .F., ; - Command3.FontShadow = .F., ; - Command3.FontSize = 8, ; - Command3.FontStrikethru = .F., ; - Command3.FontUnderline = .F., ; - Command3.ForeColor = 0,0,0, ; - Command3.Height = 21, ; - Command3.HelpContextID = 0, ; - Command3.Left = 4, ; - Command3.MouseIcon = ..\..\, ; - Command3.MousePointer = 0, ; - Command3.Name = "Command3", ; - Command3.OLEDragMode = 0, ; - Command3.OLEDragPicture = ..\..\, ; - Command3.OLEDropEffects = 3, ; - Command3.OLEDropMode = 0, ; - Command3.Picture = bmps\sobrepostal.bmp, ; - Command3.PictureMargin = 0, ; - Command3.PicturePosition = 4, ; - Command3.PictureSpacing = 0, ; - Command3.RightToLeft = .F., ; - Command3.SpecialEffect = 0, ; - Command3.StatusBarText = "", ; - Command3.Style = 0, ; - Command3.TabStop = .T., ; - Command3.Tag = "", ; - Command3.TerminateRead = .F., ; - Command3.Themes = .T., ; - Command3.ToolTipText = "", ; - Command3.Top = 52, ; - Command3.Visible = .T., ; - Command3.WhatsThisHelpID = -1, ; - Command3.Width = 200, ; - Command3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'Pageframe1.Page1.Commandgroup1' AS commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 255,128,0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 11, ; - MemberClass = "cl_commandbutton", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Commandgroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 228, ; - Cl_commandbutton1.Alignment = 2, ; - Cl_commandbutton1.Anchor = 0, ; - Cl_commandbutton1.AutoSize = .F., ; - Cl_commandbutton1.BackColor = 128,255,128, ; - Cl_commandbutton1.Cancel = .F., ; - Cl_commandbutton1.Caption = "Este es el botón de comando 1", ; - Cl_commandbutton1.ColorScheme = 1, ; - Cl_commandbutton1.ColorSource = 4, ; - Cl_commandbutton1.Comment = "", ; - Cl_commandbutton1.Default = .F., ; - Cl_commandbutton1.DisabledBackColor = 0,128,192, ; - Cl_commandbutton1.DisabledForeColor = 128,0,255, ; - Cl_commandbutton1.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton1.DownPicture = ..\..\, ; - Cl_commandbutton1.DragIcon = ..\..\, ; - Cl_commandbutton1.DragMode = 0, ; - Cl_commandbutton1.Enabled = .T., ; - Cl_commandbutton1.FontBold = .F., ; - Cl_commandbutton1.FontCharSet = 0, ; - Cl_commandbutton1.FontCondense = .F., ; - Cl_commandbutton1.FontExtend = .F., ; - Cl_commandbutton1.FontItalic = .F., ; - Cl_commandbutton1.FontName = "Arial", ; - Cl_commandbutton1.FontOutline = .F., ; - Cl_commandbutton1.FontShadow = .F., ; - Cl_commandbutton1.FontSize = 8, ; - Cl_commandbutton1.FontStrikethru = .F., ; - Cl_commandbutton1.FontUnderline = .F., ; - Cl_commandbutton1.Height = 21, ; - Cl_commandbutton1.HelpContextID = 0, ; - Cl_commandbutton1.Left = 8, ; - Cl_commandbutton1.MouseIcon = ..\..\, ; - Cl_commandbutton1.MousePointer = 0, ; - Cl_commandbutton1.Name = "Cl_commandbutton1", ; - Cl_commandbutton1.OLEDragMode = 0, ; - Cl_commandbutton1.OLEDragPicture = ..\..\, ; - Cl_commandbutton1.OLEDropEffects = 3, ; - Cl_commandbutton1.OLEDropMode = 0, ; - Cl_commandbutton1.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton1.PictureMargin = 0, ; - Cl_commandbutton1.PicturePosition = 4, ; - Cl_commandbutton1.PictureSpacing = 0, ; - Cl_commandbutton1.RightToLeft = .F., ; - Cl_commandbutton1.SpecialEffect = 0, ; - Cl_commandbutton1.StatusBarText = "", ; - Cl_commandbutton1.Style = 0, ; - Cl_commandbutton1.TabStop = .T., ; - Cl_commandbutton1.Tag = "", ; - Cl_commandbutton1.TerminateRead = .F., ; - Cl_commandbutton1.Themes = .T., ; - Cl_commandbutton1.ToolTipText = "", ; - Cl_commandbutton1.Top = 4, ; - Cl_commandbutton1.Visible = .T., ; - Cl_commandbutton1.WhatsThisHelpID = -1, ; - Cl_commandbutton1.Width = 200, ; - Cl_commandbutton1.WordWrap = .F., ; - Cl_commandbutton2.Alignment = 2, ; - Cl_commandbutton2.Anchor = 0, ; - Cl_commandbutton2.AutoSize = .F., ; - Cl_commandbutton2.BackColor = 128,255,128, ; - Cl_commandbutton2.Cancel = .F., ; - Cl_commandbutton2.Caption = "Este es el botón de comando 2", ; - Cl_commandbutton2.ColorScheme = 1, ; - Cl_commandbutton2.ColorSource = 4, ; - Cl_commandbutton2.Comment = "", ; - Cl_commandbutton2.Default = .F., ; - Cl_commandbutton2.DisabledBackColor = 0,128,192, ; - Cl_commandbutton2.DisabledForeColor = 128,0,255, ; - Cl_commandbutton2.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton2.DownPicture = ..\..\, ; - Cl_commandbutton2.DragIcon = ..\..\, ; - Cl_commandbutton2.DragMode = 0, ; - Cl_commandbutton2.Enabled = .F., ; - Cl_commandbutton2.FontBold = .F., ; - Cl_commandbutton2.FontCharSet = 0, ; - Cl_commandbutton2.FontCondense = .F., ; - Cl_commandbutton2.FontExtend = .F., ; - Cl_commandbutton2.FontItalic = .F., ; - Cl_commandbutton2.FontName = "Arial", ; - Cl_commandbutton2.FontOutline = .F., ; - Cl_commandbutton2.FontShadow = .F., ; - Cl_commandbutton2.FontSize = 8, ; - Cl_commandbutton2.FontStrikethru = .F., ; - Cl_commandbutton2.FontUnderline = .F., ; - Cl_commandbutton2.Height = 21, ; - Cl_commandbutton2.HelpContextID = 0, ; - Cl_commandbutton2.Left = 8, ; - Cl_commandbutton2.MouseIcon = ..\..\, ; - Cl_commandbutton2.MousePointer = 0, ; - Cl_commandbutton2.Name = "Cl_commandbutton2", ; - Cl_commandbutton2.OLEDragMode = 0, ; - Cl_commandbutton2.OLEDragPicture = ..\..\, ; - Cl_commandbutton2.OLEDropEffects = 3, ; - Cl_commandbutton2.OLEDropMode = 0, ; - Cl_commandbutton2.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton2.PictureMargin = 0, ; - Cl_commandbutton2.PicturePosition = 4, ; - Cl_commandbutton2.PictureSpacing = 0, ; - Cl_commandbutton2.RightToLeft = .F., ; - Cl_commandbutton2.SpecialEffect = 0, ; - Cl_commandbutton2.StatusBarText = "", ; - Cl_commandbutton2.Style = 0, ; - Cl_commandbutton2.TabStop = .T., ; - Cl_commandbutton2.Tag = "", ; - Cl_commandbutton2.TerminateRead = .F., ; - Cl_commandbutton2.Themes = .T., ; - Cl_commandbutton2.ToolTipText = "", ; - Cl_commandbutton2.Top = 28, ; - Cl_commandbutton2.Visible = .T., ; - Cl_commandbutton2.WhatsThisHelpID = -1, ; - Cl_commandbutton2.Width = 200, ; - Cl_commandbutton2.WordWrap = .F., ; - Cl_commandbutton3.Alignment = 2, ; - Cl_commandbutton3.Anchor = 0, ; - Cl_commandbutton3.AutoSize = .F., ; - Cl_commandbutton3.BackColor = 128,255,128, ; - Cl_commandbutton3.Cancel = .F., ; - Cl_commandbutton3.Caption = "Este es el botón de comando 3", ; - Cl_commandbutton3.ColorScheme = 1, ; - Cl_commandbutton3.ColorSource = 4, ; - Cl_commandbutton3.Comment = "", ; - Cl_commandbutton3.Default = .F., ; - Cl_commandbutton3.DisabledBackColor = 0,128,192, ; - Cl_commandbutton3.DisabledForeColor = 128,0,255, ; - Cl_commandbutton3.DisabledPicture = bmps\treeview.bmp, ; - Cl_commandbutton3.DownPicture = ..\..\, ; - Cl_commandbutton3.DragIcon = ..\..\, ; - Cl_commandbutton3.DragMode = 0, ; - Cl_commandbutton3.Enabled = .T., ; - Cl_commandbutton3.FontBold = .F., ; - Cl_commandbutton3.FontCharSet = 0, ; - Cl_commandbutton3.FontCondense = .F., ; - Cl_commandbutton3.FontExtend = .F., ; - Cl_commandbutton3.FontItalic = .F., ; - Cl_commandbutton3.FontName = "Arial", ; - Cl_commandbutton3.FontOutline = .F., ; - Cl_commandbutton3.FontShadow = .F., ; - Cl_commandbutton3.FontSize = 8, ; - Cl_commandbutton3.FontStrikethru = .F., ; - Cl_commandbutton3.FontUnderline = .F., ; - Cl_commandbutton3.Height = 21, ; - Cl_commandbutton3.HelpContextID = 0, ; - Cl_commandbutton3.Left = 8, ; - Cl_commandbutton3.MouseIcon = ..\..\, ; - Cl_commandbutton3.MousePointer = 0, ; - Cl_commandbutton3.Name = "Cl_commandbutton3", ; - Cl_commandbutton3.OLEDragMode = 0, ; - Cl_commandbutton3.OLEDragPicture = ..\..\, ; - Cl_commandbutton3.OLEDropEffects = 3, ; - Cl_commandbutton3.OLEDropMode = 0, ; - Cl_commandbutton3.Picture = bmps\sobrepostal.bmp, ; - Cl_commandbutton3.PictureMargin = 0, ; - Cl_commandbutton3.PicturePosition = 4, ; - Cl_commandbutton3.PictureSpacing = 0, ; - Cl_commandbutton3.RightToLeft = .F., ; - Cl_commandbutton3.SpecialEffect = 0, ; - Cl_commandbutton3.StatusBarText = "", ; - Cl_commandbutton3.Style = 0, ; - Cl_commandbutton3.TabStop = .T., ; - Cl_commandbutton3.Tag = "", ; - Cl_commandbutton3.TerminateRead = .F., ; - Cl_commandbutton3.Themes = .T., ; - Cl_commandbutton3.ToolTipText = "", ; - Cl_commandbutton3.Top = 52, ; - Cl_commandbutton3.Visible = .T., ; - Cl_commandbutton3.WhatsThisHelpID = -1, ; - Cl_commandbutton3.Width = 200, ; - Cl_commandbutton3.WordWrap = .F. - *< END OBJECT: BaseClass="commandgroup" /> - -ENDDEFINE - -DEFINE CLASS f_form_aa AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_grid1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.checkbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.collection" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.combobox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.commandgroup" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.commandbutton" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.container" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.control" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.editbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.hyperlink" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.image" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.label" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.line" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.listbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.optiongroup" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.option" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.spinner" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.textbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.timer" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.Cl_optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" /> - - * - *m: add_control - *m: run_tests - *p: l_activated - *p: n_controles_count - *p: valor - *a: a_controles[1,0] - * - - AllowOutput = .T. - AlwaysOnBottom = .F. - AlwaysOnTop = .F. - AutoCenter = .F. - BackColor = 192,192,192 - BindControls = .T. - BorderStyle = 3 - BufferMode = 0 - Caption = "AllControls_Test" - ClipControls = .T. - Closable = .T. - ColorSource = 4 - Comment = "" - ContinuousScroll = .T. - ControlBox = .T. - c_testname = AllControls_Test - DataSession = 2 - DEClass = "cl_dataenvironment" - DEClassLibrary = lib_controles.vcx - DefHeight = - DefLeft = - DefOleLCID = 0 - DefTop = - Desktop = .F. - Dockable = 0 - DoCreate = .T. - DrawMode = 13 - DrawStyle = 0 - DrawWidth = 1 - Enabled = .T. - FillColor = 0,0,0 - FillStyle = 1 - FontBold = .F. - FontCharSet = 0 - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 9 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - HalfHeightCaption = .F. - Height = (460) - HelpContextID = 0 - HScrollSmallChange = 10 - Icon = bmps\container.ico - KeyPreview = .F. - Left = (2) - LockScreen = .F. - l_activated = .F. - MacDesktop = 0 - MaxButton = .T. - MaxHeight = -1 - MaxLeft = -1 - MaxTop = -1 - MaxWidth = -1 - MDIForm = .F. - MinButton = .T. - MinHeight = -1 - MinWidth = -1 - MouseIcon = ..\..\ - MousePointer = 0 - Movable = .T. - Name = "f_form_aa" - n_controles_count = 0 - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - Picture = bmps\fondogris.bmp - RightToLeft = .F. - ScaleMode = 3 - ScrollBars = 3 - ShowInTaskBar = .T. - ShowTips = .F. - ShowWindow = 0 - SizeBox = .F. - TabIndex = 1 - TabStop = .T. - Tag = "" - Themes = .T. - TitleBar = 1 - Top = (4) - valor = .F. - Visible = .T. - VScrollSmallChange = 10 - WhatsThisButton = .F. - WhatsThisHelp = .F. - WhatsThisHelpID = -1 - Width = 998 - WindowState = 0 - WindowType = 0 - ZoomBox = .F. - Edit1.Height = 144 - Edit1.Left = 764 - Edit1.Name = "Edit1" - Edit1.RightToLeft = .F. - Edit1.Top = 32 - Edit1.Width = 212 - Label3.BackColor = 128,255,128 - Label3.Height = 17 - Label3.Left = 764 - Label3.Name = "Label3" - Label3.RightToLeft = .F. - Label3.Top = 8 - Label3.Width = 212 - cmdCapturar.Height = 27 - cmdCapturar.Left = 764 - cmdCapturar.Name = "cmdCapturar" - cmdCapturar.RightToLeft = .F. - cmdCapturar.Top = 392 - cmdCapturar.Width = 212 - Label1.BackColor = 128,255,128 - Label1.Caption = "CONTROLES" - Label1.Height = 17 - Label1.Left = 12 - Label1.Name = "Label1" - Label1.RightToLeft = .F. - Label1.Top = 8 - Label1.Width = 268 - Label2.BackColor = 128,255,128 - Label2.Caption = "TESTS" - Label2.Height = 17 - Label2.Left = 296 - Label2.Name = "Label2" - Label2.RightToLeft = .F. - Label2.Top = 8 - Label2.Width = 460 - - ADD OBJECT 'Cl_grid1' AS cl_grid WITH ; - AllowAddNew = .F., ; - AllowAutoColumnFit = 0, ; - AllowCellSelection = .T., ; - AllowHeaderSizing = .F., ; - AllowRowSizing = .F., ; - Anchor = 0, ; - BackColor = 255,255,217, ; - ChildOrder = "", ; - ColumnCount = 6, ; - Comment = "", ; - DeleteMark = .F., ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - GridLineColor = 0,0,0, ; - GridLines = 3, ; - GridLineWidth = 1, ; - HeaderHeight = 18, ; - Height = 420, ; - HelpContextID = 0, ; - Highlight = .T., ; - HighlightBackColor = 51,153,255, ; - HighlightForeColor = 255,255,255, ; - HighlightRow = .T., ; - HighlightRowLineWidth = 1, ; - HighlightStyle = 0, ; - Left = 296, ; - LinkMaster = "", ; - LockColumns = 0, ; - LockColumnsLeft = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_grid1", ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Optimize = .F., ; - Panel = 1, ; - PanelLink = .T., ; - Partition = 0, ; - ReadOnly = .F., ; - RecordMark = .T., ; - RecordSource = "C_TESTS", ; - RecordSourceType = 1, ; - RelationalExpr = "", ; - RightToLeft = .F., ; - RowHeight = 18, ; - ScrollBars = 2, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SplitBar = .F., ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 32, ; - Value = 0, ; - View = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 460, ; - COLUMN1.Alignment = 3, ; - COLUMN1.BackColor = 255,255,217, ; - COLUMN1.Bound = .T., ; - COLUMN1.ColumnOrder = 1, ; - COLUMN1.Comment = "", ; - COLUMN1.ControlSource = "c_ctlname", ; - COLUMN1.CurrentControl = "Text1", ; - COLUMN1.DynamicAlignment = "", ; - COLUMN1.DynamicBackColor = "", ; - COLUMN1.DynamicCurrentControl = "", ; - COLUMN1.DynamicFontBold = "", ; - COLUMN1.DynamicFontItalic = "", ; - COLUMN1.DynamicFontName = "", ; - COLUMN1.DynamicFontOutline = "", ; - COLUMN1.DynamicFontShadow = "", ; - COLUMN1.DynamicFontSize = "", ; - COLUMN1.DynamicFontStrikethru = "", ; - COLUMN1.DynamicFontUnderline = "", ; - COLUMN1.DynamicForeColor = "", ; - COLUMN1.DynamicInputMask = "", ; - COLUMN1.Enabled = .T., ; - COLUMN1.FontBold = .F., ; - COLUMN1.FontCharSet = 0, ; - COLUMN1.FontCondense = .F., ; - COLUMN1.FontExtend = .F., ; - COLUMN1.FontItalic = .F., ; - COLUMN1.FontName = "Arial", ; - COLUMN1.FontOutline = .F., ; - COLUMN1.FontShadow = .F., ; - COLUMN1.FontSize = 9, ; - COLUMN1.FontStrikethru = .F., ; - COLUMN1.FontUnderline = .F., ; - COLUMN1.ForeColor = 0,0,0, ; - COLUMN1.Format = "", ; - COLUMN1.Header1.Alignment = 0, ; - COLUMN1.Header1.BackColor = 240,240,240, ; - COLUMN1.Header1.Caption = "Control", ; - COLUMN1.Header1.Comment = "", ; - COLUMN1.Header1.FontBold = .F., ; - COLUMN1.Header1.FontCharSet = 0, ; - COLUMN1.Header1.FontCondense = .F., ; - COLUMN1.Header1.FontExtend = .F., ; - COLUMN1.Header1.FontItalic = .F., ; - COLUMN1.Header1.FontName = "Arial", ; - COLUMN1.Header1.FontOutline = .F., ; - COLUMN1.Header1.FontShadow = .F., ; - COLUMN1.Header1.FontSize = 9, ; - COLUMN1.Header1.FontStrikethru = .F., ; - COLUMN1.Header1.FontUnderline = .F., ; - COLUMN1.Header1.ForeColor = 0,0,0, ; - COLUMN1.Header1.MouseIcon = ..\..\, ; - COLUMN1.Header1.MousePointer = 0, ; - COLUMN1.Header1.Name = "Header1", ; - COLUMN1.Header1.Picture = ..\..\, ; - COLUMN1.Header1.StatusBarText = "", ; - COLUMN1.Header1.Tag = "", ; - COLUMN1.Header1.ToolTipText = "", ; - COLUMN1.Header1.WordWrap = .F., ; - COLUMN1.InputMask = "", ; - COLUMN1.MouseIcon = ..\..\, ; - COLUMN1.MousePointer = 0, ; - COLUMN1.Movable = .T., ; - COLUMN1.Name = "COLUMN1", ; - COLUMN1.ReadOnly = .F., ; - COLUMN1.Resizable = .T., ; - COLUMN1.SelectOnEntry = .T., ; - COLUMN1.Sparse = .T., ; - COLUMN1.StatusBarText = "", ; - COLUMN1.Tag = "", ; - COLUMN1.Text1.Alignment = 3, ; - COLUMN1.Text1.Anchor = 0, ; - COLUMN1.Text1.AutoComplete = 0, ; - COLUMN1.Text1.AutoCompSource = "", ; - COLUMN1.Text1.AutoCompTable = "", ; - COLUMN1.Text1.BackColor = 255,255,217, ; - COLUMN1.Text1.BackStyle = 1, ; - COLUMN1.Text1.BorderColor = 100,100,100, ; - COLUMN1.Text1.BorderStyle = 0, ; - COLUMN1.Text1.Century = 1, ; - COLUMN1.Text1.ColorScheme = 1, ; - COLUMN1.Text1.ColorSource = 4, ; - COLUMN1.Text1.Comment = "", ; - COLUMN1.Text1.DateFormat = 0, ; - COLUMN1.Text1.DateMark = "", ; - COLUMN1.Text1.DisabledBackColor = 255,255,255, ; - COLUMN1.Text1.DisabledForeColor = 109,109,109, ; - COLUMN1.Text1.DragIcon = ..\..\, ; - COLUMN1.Text1.DragMode = 0, ; - COLUMN1.Text1.Enabled = .T., ; - COLUMN1.Text1.EnableHyperlinks = .F., ; - COLUMN1.Text1.FontBold = .F., ; - COLUMN1.Text1.FontCharSet = 0, ; - COLUMN1.Text1.FontCondense = .F., ; - COLUMN1.Text1.FontExtend = .F., ; - COLUMN1.Text1.FontItalic = .F., ; - COLUMN1.Text1.FontName = "Arial", ; - COLUMN1.Text1.FontOutline = .F., ; - COLUMN1.Text1.FontShadow = .F., ; - COLUMN1.Text1.FontSize = 9, ; - COLUMN1.Text1.FontStrikethru = .F., ; - COLUMN1.Text1.FontUnderline = .F., ; - COLUMN1.Text1.ForeColor = 0,0,0, ; - COLUMN1.Text1.Format = "", ; - COLUMN1.Text1.HelpContextID = 0, ; - COLUMN1.Text1.HideSelection = .T., ; - COLUMN1.Text1.Hours = 0, ; - COLUMN1.Text1.IMEMode = 0, ; - COLUMN1.Text1.InputMask = "", ; - COLUMN1.Text1.IntegralHeight = .F., ; - COLUMN1.Text1.MemoWindow = "", ; - COLUMN1.Text1.MouseIcon = ..\..\, ; - COLUMN1.Text1.MousePointer = 0, ; - COLUMN1.Text1.Name = "Text1", ; - COLUMN1.Text1.NullDisplay = "", ; - COLUMN1.Text1.OLEDragMode = 0, ; - COLUMN1.Text1.OLEDragPicture = ..\..\, ; - COLUMN1.Text1.OLEDropEffects = 3, ; - COLUMN1.Text1.OLEDropMode = 0, ; - COLUMN1.Text1.OLEDropTextInsertion = 0, ; - COLUMN1.Text1.OpenWindow = .F., ; - COLUMN1.Text1.PasswordChar = "", ; - COLUMN1.Text1.ReadOnly = .F., ; - COLUMN1.Text1.RightToLeft = .F., ; - COLUMN1.Text1.Seconds = 2, ; - COLUMN1.Text1.SelectedBackColor = 51,153,255, ; - COLUMN1.Text1.SelectedForeColor = 255,255,255, ; - COLUMN1.Text1.SelectOnEntry = .F., ; - COLUMN1.Text1.SpecialEffect = 0, ; - COLUMN1.Text1.StatusBarText = "", ; - COLUMN1.Text1.StrictDateEntry = 1, ; - COLUMN1.Text1.Style = 0, ; - COLUMN1.Text1.TabIndex = 1, ; - COLUMN1.Text1.TabStop = .T., ; - COLUMN1.Text1.Tag = "", ; - COLUMN1.Text1.TerminateRead = .F., ; - COLUMN1.Text1.Themes = .T., ; - COLUMN1.Text1.ToolTipText = "", ; - COLUMN1.Text1.Value = , ; - COLUMN1.Text1.Visible = .T., ; - COLUMN1.ToolTipText = "", ; - COLUMN1.Visible = .T., ; - COLUMN1.Width = 170, ; - COLUMN2.Alignment = 2, ; - COLUMN2.BackColor = 255,255,217, ; - COLUMN2.ControlSource = "c_Access", ; - COLUMN2.DynamicBackColor = 'ICASE( c_access="S", RGB(0,255,0), c_access="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN2.DynamicForeColor = 'ICASE( c_access="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN2.Enabled = .T., ; - COLUMN2.FontBold = .F., ; - COLUMN2.FontCharSet = 0, ; - COLUMN2.FontCondense = .F., ; - COLUMN2.FontExtend = .F., ; - COLUMN2.FontItalic = .F., ; - COLUMN2.FontName = "Arial", ; - COLUMN2.FontOutline = .F., ; - COLUMN2.FontShadow = .F., ; - COLUMN2.FontSize = 9, ; - COLUMN2.FontStrikethru = .F., ; - COLUMN2.FontUnderline = .F., ; - COLUMN2.ForeColor = 0,0,0, ; - COLUMN2.Header1.Alignment = 2, ; - COLUMN2.Header1.BackColor = 240,240,240, ; - COLUMN2.Header1.Caption = "Access", ; - COLUMN2.Header1.FontBold = .F., ; - COLUMN2.Header1.FontCharSet = 0, ; - COLUMN2.Header1.FontCondense = .F., ; - COLUMN2.Header1.FontExtend = .F., ; - COLUMN2.Header1.FontItalic = .F., ; - COLUMN2.Header1.FontName = "Arial", ; - COLUMN2.Header1.FontOutline = .F., ; - COLUMN2.Header1.FontShadow = .F., ; - COLUMN2.Header1.FontSize = 9, ; - COLUMN2.Header1.FontStrikethru = .F., ; - COLUMN2.Header1.FontUnderline = .F., ; - COLUMN2.Header1.Name = "Header1", ; - COLUMN2.Name = "COLUMN2", ; - COLUMN2.ReadOnly = .F., ; - COLUMN2.Text1.Alignment = 2, ; - COLUMN2.Text1.BackColor = 255,255,217, ; - COLUMN2.Text1.Enabled = .T., ; - COLUMN2.Text1.FontBold = .F., ; - COLUMN2.Text1.FontCharSet = 0, ; - COLUMN2.Text1.FontCondense = .F., ; - COLUMN2.Text1.FontExtend = .F., ; - COLUMN2.Text1.FontItalic = .F., ; - COLUMN2.Text1.FontName = "Arial", ; - COLUMN2.Text1.FontOutline = .F., ; - COLUMN2.Text1.FontShadow = .F., ; - COLUMN2.Text1.FontSize = 9, ; - COLUMN2.Text1.FontStrikethru = .F., ; - COLUMN2.Text1.FontUnderline = .F., ; - COLUMN2.Text1.ForeColor = 0,0,0, ; - COLUMN2.Text1.Name = "Text1", ; - COLUMN2.Text1.ReadOnly = .F., ; - COLUMN2.Text1.RightToLeft = .F., ; - COLUMN2.Text1.Visible = .T., ; - COLUMN2.Visible = .T., ; - COLUMN2.Width = 50, ; - COLUMN3.Alignment = 2, ; - COLUMN3.BackColor = 255,255,217, ; - COLUMN3.ControlSource = "c_Assign", ; - COLUMN3.DynamicBackColor = 'ICASE( c_assign="S", RGB(0,255,0), c_assign="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN3.DynamicForeColor = 'ICASE( c_assign="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN3.Enabled = .T., ; - COLUMN3.FontBold = .F., ; - COLUMN3.FontCharSet = 0, ; - COLUMN3.FontCondense = .F., ; - COLUMN3.FontExtend = .F., ; - COLUMN3.FontItalic = .F., ; - COLUMN3.FontName = "Arial", ; - COLUMN3.FontOutline = .F., ; - COLUMN3.FontShadow = .F., ; - COLUMN3.FontSize = 9, ; - COLUMN3.FontStrikethru = .F., ; - COLUMN3.FontUnderline = .F., ; - COLUMN3.ForeColor = 0,0,0, ; - COLUMN3.Header1.Alignment = 2, ; - COLUMN3.Header1.Caption = "Assign", ; - COLUMN3.Header1.FontBold = .F., ; - COLUMN3.Header1.FontCharSet = 0, ; - COLUMN3.Header1.FontCondense = .F., ; - COLUMN3.Header1.FontExtend = .F., ; - COLUMN3.Header1.FontItalic = .F., ; - COLUMN3.Header1.FontName = "Arial", ; - COLUMN3.Header1.FontOutline = .F., ; - COLUMN3.Header1.FontShadow = .F., ; - COLUMN3.Header1.FontSize = 9, ; - COLUMN3.Header1.FontStrikethru = .F., ; - COLUMN3.Header1.FontUnderline = .F., ; - COLUMN3.Header1.Name = "Header1", ; - COLUMN3.Name = "COLUMN3", ; - COLUMN3.ReadOnly = .F., ; - COLUMN3.Text1.Alignment = 2, ; - COLUMN3.Text1.BackColor = 255,255,217, ; - COLUMN3.Text1.Enabled = .T., ; - COLUMN3.Text1.FontBold = .F., ; - COLUMN3.Text1.FontCharSet = 0, ; - COLUMN3.Text1.FontCondense = .F., ; - COLUMN3.Text1.FontExtend = .F., ; - COLUMN3.Text1.FontItalic = .F., ; - COLUMN3.Text1.FontName = "Arial", ; - COLUMN3.Text1.FontOutline = .F., ; - COLUMN3.Text1.FontShadow = .F., ; - COLUMN3.Text1.FontSize = 9, ; - COLUMN3.Text1.FontStrikethru = .F., ; - COLUMN3.Text1.FontUnderline = .F., ; - COLUMN3.Text1.ForeColor = 0,0,0, ; - COLUMN3.Text1.Name = "Text1", ; - COLUMN3.Text1.ReadOnly = .F., ; - COLUMN3.Text1.RightToLeft = .F., ; - COLUMN3.Text1.Visible = .T., ; - COLUMN3.Visible = .T., ; - COLUMN3.Width = 50, ; - COLUMN4.Alignment = 2, ; - COLUMN4.BackColor = 255,255,217, ; - COLUMN4.ControlSource = "c_Value", ; - COLUMN4.DynamicBackColor = 'ICASE( c_value="S", RGB(0,255,0), c_value="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN4.DynamicForeColor = 'ICASE( c_value="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN4.Enabled = .T., ; - COLUMN4.FontBold = .F., ; - COLUMN4.FontCharSet = 0, ; - COLUMN4.FontCondense = .F., ; - COLUMN4.FontExtend = .F., ; - COLUMN4.FontItalic = .F., ; - COLUMN4.FontName = "Arial", ; - COLUMN4.FontOutline = .F., ; - COLUMN4.FontShadow = .F., ; - COLUMN4.FontSize = 9, ; - COLUMN4.FontStrikethru = .F., ; - COLUMN4.FontUnderline = .F., ; - COLUMN4.ForeColor = 0,0,0, ; - COLUMN4.Header1.Alignment = 2, ; - COLUMN4.Header1.Caption = "Value/Act", ; - COLUMN4.Header1.FontBold = .F., ; - COLUMN4.Header1.FontCharSet = 0, ; - COLUMN4.Header1.FontCondense = .F., ; - COLUMN4.Header1.FontExtend = .F., ; - COLUMN4.Header1.FontItalic = .F., ; - COLUMN4.Header1.FontName = "Arial", ; - COLUMN4.Header1.FontOutline = .F., ; - COLUMN4.Header1.FontShadow = .F., ; - COLUMN4.Header1.FontSize = 9, ; - COLUMN4.Header1.FontStrikethru = .F., ; - COLUMN4.Header1.FontUnderline = .F., ; - COLUMN4.Header1.Name = "Header1", ; - COLUMN4.Name = "COLUMN4", ; - COLUMN4.ReadOnly = .F., ; - COLUMN4.Text1.Alignment = 2, ; - COLUMN4.Text1.BackColor = 255,255,217, ; - COLUMN4.Text1.Enabled = .T., ; - COLUMN4.Text1.FontBold = .F., ; - COLUMN4.Text1.FontCharSet = 0, ; - COLUMN4.Text1.FontCondense = .F., ; - COLUMN4.Text1.FontExtend = .F., ; - COLUMN4.Text1.FontItalic = .F., ; - COLUMN4.Text1.FontName = "Arial", ; - COLUMN4.Text1.FontOutline = .F., ; - COLUMN4.Text1.FontShadow = .F., ; - COLUMN4.Text1.FontSize = 9, ; - COLUMN4.Text1.FontStrikethru = .F., ; - COLUMN4.Text1.FontUnderline = .F., ; - COLUMN4.Text1.ForeColor = 0,0,0, ; - COLUMN4.Text1.Name = "Text1", ; - COLUMN4.Text1.ReadOnly = .F., ; - COLUMN4.Text1.RightToLeft = .F., ; - COLUMN4.Text1.Visible = .T., ; - COLUMN4.Visible = .T., ; - COLUMN4.Width = 50, ; - COLUMN5.Alignment = 2, ; - COLUMN5.BackColor = 255,255,217, ; - COLUMN5.ControlSource = "c_ProgrChg", ; - COLUMN5.DynamicBackColor = 'ICASE( c_ProgrChg="S", RGB(0,255,0), c_ProgrChg="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN5.DynamicForeColor = 'ICASE( c_ProgrChg="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN5.Enabled = .T., ; - COLUMN5.FontBold = .F., ; - COLUMN5.FontCharSet = 0, ; - COLUMN5.FontCondense = .F., ; - COLUMN5.FontExtend = .F., ; - COLUMN5.FontItalic = .F., ; - COLUMN5.FontName = "Arial", ; - COLUMN5.FontOutline = .F., ; - COLUMN5.FontShadow = .F., ; - COLUMN5.FontSize = 9, ; - COLUMN5.FontStrikethru = .F., ; - COLUMN5.FontUnderline = .F., ; - COLUMN5.ForeColor = 0,0,0, ; - COLUMN5.Header1.Alignment = 2, ; - COLUMN5.Header1.Caption = "Prg.Chg", ; - COLUMN5.Header1.FontBold = .F., ; - COLUMN5.Header1.FontCharSet = 0, ; - COLUMN5.Header1.FontCondense = .F., ; - COLUMN5.Header1.FontExtend = .F., ; - COLUMN5.Header1.FontItalic = .F., ; - COLUMN5.Header1.FontName = "Arial", ; - COLUMN5.Header1.FontOutline = .F., ; - COLUMN5.Header1.FontShadow = .F., ; - COLUMN5.Header1.FontSize = 9, ; - COLUMN5.Header1.FontStrikethru = .F., ; - COLUMN5.Header1.FontUnderline = .F., ; - COLUMN5.Header1.Name = "Header1", ; - COLUMN5.Name = "COLUMN5", ; - COLUMN5.ReadOnly = .F., ; - COLUMN5.Text1.Alignment = 2, ; - COLUMN5.Text1.BackColor = 255,255,217, ; - COLUMN5.Text1.Enabled = .T., ; - COLUMN5.Text1.FontBold = .F., ; - COLUMN5.Text1.FontCharSet = 0, ; - COLUMN5.Text1.FontCondense = .F., ; - COLUMN5.Text1.FontExtend = .F., ; - COLUMN5.Text1.FontItalic = .F., ; - COLUMN5.Text1.FontName = "Arial", ; - COLUMN5.Text1.FontOutline = .F., ; - COLUMN5.Text1.FontShadow = .F., ; - COLUMN5.Text1.FontSize = 9, ; - COLUMN5.Text1.FontStrikethru = .F., ; - COLUMN5.Text1.FontUnderline = .F., ; - COLUMN5.Text1.ForeColor = 0,0,0, ; - COLUMN5.Text1.Name = "Text1", ; - COLUMN5.Text1.ReadOnly = .F., ; - COLUMN5.Text1.RightToLeft = .F., ; - COLUMN5.Text1.Visible = .T., ; - COLUMN5.Visible = .T., ; - COLUMN5.Width = 50, ; - Column6.Alignment = 2, ; - Column6.BackColor = 255,255,217, ; - Column6.ControlSource = "c_UI", ; - Column6.DynamicBackColor = 'ICASE( c_UI="S", RGB(0,255,0), c_UI="N", RGB(255,0,0), RGB(255,255,255) )', ; - Column6.DynamicForeColor = 'ICASE( c_UI="N", RGB(255,255,255), RGB(0,0,0) )', ; - Column6.Enabled = .T., ; - Column6.FontBold = .F., ; - Column6.FontCharSet = 0, ; - Column6.FontCondense = .F., ; - Column6.FontExtend = .F., ; - Column6.FontItalic = .F., ; - Column6.FontName = "Arial", ; - Column6.FontOutline = .F., ; - Column6.FontShadow = .F., ; - Column6.FontSize = 9, ; - Column6.FontStrikethru = .F., ; - Column6.FontUnderline = .F., ; - Column6.ForeColor = 0,0,0, ; - Column6.Name = "Column6", ; - Column6.ReadOnly = .F., ; - Column6.Visible = .T., ; - Column6.Width = 50 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> - - ADD OBJECT 'Cl_grid1.Column6.Header1' AS header WITH ; - Alignment = 2, ; - Caption = "UI", ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Cl_grid1.Column6.Text1' AS textbox WITH ; - Alignment = 2, ; - BackColor = 255,255,217, ; - BorderStyle = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - RightToLeft = .F., ; - Visible = .T. - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Cl_image1' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 255,0,0, ; - BorderStyle = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 104, ; - HelpContextID = 0, ; - Left = 764, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\vfpxlogo.bmp, ; - RotateFlip = 0, ; - StatusBarText = "", ; - Stretch = 0, ; - Tag = "", ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 284, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 212, ; - ZOrderSet = 0 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Image1' AS image WITH ; - BorderColor = 255,0,0, ; - BorderStyle = 1, ; - Height = 104, ; - Left = 764, ; - Name = "Image1", ; - Picture = bmps\vfpxlogo.bmp, ; - Top = 180, ; - Width = 212 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'pgf' AS cl_pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = 384, ; - HelpContextID = 0, ; - Left = 12, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "pgf", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 2, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabIndex = 7, ; - TabOrientation = 1, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 0, ; - Tag = "", ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 268, ; - Page1.BackColor = 240,240,240, ; - Page1.Caption = "Page1", ; - Page1.ColorSource = 4, ; - Page1.Comment = "Sin comentarios", ; - Page1.DragIcon = ..\..\, ; - Page1.DragMode = 0, ; - Page1.Enabled = .T., ; - Page1.FontBold = .F., ; - Page1.FontCharSet = 0, ; - Page1.FontCondense = .F., ; - Page1.FontExtend = .F., ; - Page1.FontItalic = .F., ; - Page1.FontName = "Arial", ; - Page1.FontOutline = .F., ; - Page1.FontShadow = .F., ; - Page1.FontSize = 9, ; - Page1.FontStrikethru = .F., ; - Page1.FontUnderline = .F., ; - Page1.ForeColor = 0,0,0, ; - Page1.HelpContextID = 0, ; - Page1.MouseIcon = ..\..\, ; - Page1.MousePointer = 0, ; - Page1.Name = "Page1", ; - Page1.OLEDragMode = 0, ; - Page1.OLEDragPicture = ..\..\, ; - Page1.OLEDropEffects = 3, ; - Page1.OLEDropMode = 0, ; - Page1.PageOrder = 1, ; - Page1.Picture = ..\..\, ; - Page1.StatusBarText = "", ; - Page1.Tag = "", ; - Page1.ToolTipText = "", ; - Page1.WhatsThisHelpID = -1, ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2", ; - Page2.PageOrder = 2 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> - - ADD OBJECT 'pgf.Page1.checkbox' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Chk1", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (21), ; - HelpContextID = 0, ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "checkbox", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\treeview.bmp, ; - PictureMargin = 0, ; - PicturePosition = 4, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (8), ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (199), ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'pgf.Page1.Cl_optiongroup1' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (46), ; - HelpContextID = 0, ; - Left = 123, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_optiongroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 231, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (112), ; - Option1.Alignment = 0, ; - Option1.Anchor = 0, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 192,192,192, ; - Option1.BackStyle = 1, ; - Option1.Caption = "Esta es la opc. 1", ; - Option1.ColorScheme = 1, ; - Option1.ColorSource = 4, ; - Option1.Comment = "", ; - Option1.ControlSource = "", ; - Option1.DisabledBackColor = 240,240,240, ; - Option1.DisabledForeColor = 109,109,109, ; - Option1.DisabledPicture = ..\..\, ; - Option1.DownPicture = ..\..\, ; - Option1.DragIcon = ..\..\, ; - Option1.DragMode = 0, ; - Option1.Enabled = .T., ; - Option1.FontBold = .F., ; - Option1.FontCondense = .F., ; - Option1.FontExtend = .F., ; - Option1.FontItalic = .F., ; - Option1.FontName = "Arial", ; - Option1.FontOutline = .F., ; - Option1.FontShadow = .F., ; - Option1.FontSize = 8, ; - Option1.FontStrikethru = .F., ; - Option1.FontUnderline = .F., ; - Option1.ForeColor = 0,0,0, ; - Option1.Height = 16, ; - Option1.HelpContextID = 0, ; - Option1.Left = 5, ; - Option1.MouseIcon = ..\..\, ; - Option1.MousePointer = 0, ; - Option1.Name = "Option1", ; - Option1.OLEDragMode = 0, ; - Option1.OLEDragPicture = ..\..\, ; - Option1.OLEDropEffects = 3, ; - Option1.OLEDropMode = 0, ; - Option1.Picture = bmps\scccheckout.bmp, ; - Option1.PictureMargin = 0, ; - Option1.PicturePosition = 4, ; - Option1.PictureSpacing = 0, ; - Option1.RightToLeft = .F., ; - Option1.SpecialEffect = 0, ; - Option1.StatusBarText = "", ; - Option1.Style = 0, ; - Option1.TabIndex = 1, ; - Option1.TabStop = .T., ; - Option1.Tag = "", ; - Option1.TerminateRead = .F., ; - Option1.Themes = .T., ; - Option1.ToolTipText = "", ; - Option1.Top = 5, ; - Option1.Value = 0, ; - Option1.Visible = .T., ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 98, ; - Option1.WordWrap = .F., ; - Option2.AutoSize = .F., ; - Option2.BackColor = 192,192,192, ; - Option2.Caption = "Esta es la opc. 2", ; - Option2.FontSize = 8, ; - Option2.Height = 16, ; - Option2.Left = 5, ; - Option2.Name = "Option2", ; - Option2.Picture = bmps\scccheckout.bmp, ; - Option2.PicturePosition = 4, ; - Option2.Style = 0, ; - Option2.Top = 24, ; - Option2.Value = 1, ; - Option2.Width = 102 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'pgf.Page1.collection' AS cl_collection WITH ; - Left = 218, ; - Name = "collection", ; - Top = 8 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="collection" /> - - ADD OBJECT 'pgf.Page1.combobox' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - BoundColumn = 1, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 0, ; - ColumnLines = .T., ; - ColumnWidths = "", ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DisplayValue = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (20), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = (7), ; - Margin = 0, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "combobox", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\treeview.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (35), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (196) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'pgf.Page1.commandbutton' AS cl_commandbutton WITH ; - AutoSize = .F., ; - Caption = "Comando", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - FontSize = 8, ; - Height = (25), ; - Left = (99), ; - Name = "commandbutton", ; - Picture = bmps\treeview.bmp, ; - PicturePosition = 4, ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (63), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (80), ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandbutton" /> - - ADD OBJECT 'pgf.Page1.commandgroup' AS cl_commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (64), ; - HelpContextID = 0, ; - Left = (6), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "commandgroup", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 2, ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (60), ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (93), ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 192,192,192, ; - Command1.Cancel = .F., ; - Command1.Caption = "Comando1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 240,240,240, ; - Command1.DisabledForeColor = 109,109,109, ; - Command1.DisabledPicture = ..\..\, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 25, ; - Command1.HelpContextID = 0, ; - Command1.Left = 1, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabIndex = 1, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 90, ; - Command1.WordWrap = .F., ; - Command2.AutoSize = .F., ; - Command2.BackColor = 192,192,192, ; - Command2.Caption = "Comando2", ; - Command2.FontSize = 8, ; - Command2.Height = 25, ; - Command2.Left = 1, ; - Command2.Name = "Command2", ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PicturePosition = 4, ; - Command2.Top = 32, ; - Command2.Width = 90 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'pgf.Page1.container' AS cl_container WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = (24), ; - HelpContextID = 0, ; - Left = (227), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "container", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - SpecialEffect = 2, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 4, ; - TabStop = .T., ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (127), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (20) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" /> - - ADD OBJECT 'pgf.Page1.control' AS cl_control WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = (24), ; - HelpContextID = 0, ; - Left = (199), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "control", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - SpecialEffect = 2, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 5, ; - TabStop = .T., ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (127), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (20) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" /> - - ADD OBJECT 'pgf.Page1.editbox' AS cl_editbox WITH ; - AddLineFeeds = .F., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (41), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = (183), ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "editbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (60), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (68) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> - - ADD OBJECT 'pgf.Page1.hyperlink' AS cl_hyperlink WITH ; - Comment = "", ; - Left = 199, ; - Name = "hyperlink", ; - Tag = "", ; - test_aa = .F., ; - Top = 103 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="hyperlink" /> - - ADD OBJECT 'pgf.Page1.image' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 231, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "image", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\scccheckout.bmp, ; - RotateFlip = 0, ; - StatusBarText = "", ; - Stretch = 0, ; - Tag = "", ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 107, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'pgf.Page1.label' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (17), ; - HelpContextID = 0, ; - Left = (6), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "label", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 7, ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (136), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (104), ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'pgf.Page1.line' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 255,0,0, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .T., ; - Height = (8), ; - HelpContextID = 0, ; - Left = (121), ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "line", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (136), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (50) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'pgf.Page1.listbox' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 128,255,128, ; - BoundColumn = 1, ; - BoundTo = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - ColumnCount = 0, ; - ColumnLines = .T., ; - ColumnWidths = "", ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 255,255,255, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayValue = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = (60), ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "listbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (164), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (224) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'pgf.Page1.option' AS cl_option WITH ; - AutoSize = .F., ; - Caption = "Esta es la opción B", ; - DefHeight = , ; - DefWidth = , ; - FontSize = 8, ; - Height = (16), ; - Left = 11, ; - Name = "option", ; - Top = 283, ; - Width = (110) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optionbutton" /> - - ADD OBJECT 'pgf.Page1.optiongroup' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (46), ; - HelpContextID = 0, ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "optiongroup", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (232), ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (112), ; - Option1.Alignment = 0, ; - Option1.Anchor = 0, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 192,192,192, ; - Option1.BackStyle = 1, ; - Option1.Caption = "Esta es la opc. 1", ; - Option1.ColorScheme = 1, ; - Option1.ColorSource = 4, ; - Option1.Comment = "", ; - Option1.ControlSource = "", ; - Option1.DisabledBackColor = 240,240,240, ; - Option1.DisabledForeColor = 109,109,109, ; - Option1.DisabledPicture = ..\..\, ; - Option1.DownPicture = ..\..\, ; - Option1.DragIcon = ..\..\, ; - Option1.DragMode = 0, ; - Option1.Enabled = .T., ; - Option1.FontBold = .F., ; - Option1.FontCondense = .F., ; - Option1.FontExtend = .F., ; - Option1.FontItalic = .F., ; - Option1.FontName = "Arial", ; - Option1.FontOutline = .F., ; - Option1.FontShadow = .F., ; - Option1.FontSize = 8, ; - Option1.FontStrikethru = .F., ; - Option1.FontUnderline = .F., ; - Option1.ForeColor = 0,0,0, ; - Option1.Height = 41, ; - Option1.HelpContextID = 0, ; - Option1.Left = 5, ; - Option1.MouseIcon = ..\..\, ; - Option1.MousePointer = 0, ; - Option1.Name = "Option1", ; - Option1.OLEDragMode = 0, ; - Option1.OLEDragPicture = ..\..\, ; - Option1.OLEDropEffects = 3, ; - Option1.OLEDropMode = 0, ; - Option1.Picture = bmps\scccheckout.bmp, ; - Option1.PictureMargin = 0, ; - Option1.PicturePosition = 4, ; - Option1.PictureSpacing = 0, ; - Option1.RightToLeft = .F., ; - Option1.SpecialEffect = 0, ; - Option1.StatusBarText = "", ; - Option1.Style = 1, ; - Option1.TabIndex = 1, ; - Option1.TabStop = .T., ; - Option1.Tag = "", ; - Option1.TerminateRead = .F., ; - Option1.Themes = .T., ; - Option1.ToolTipText = "", ; - Option1.Top = 5, ; - Option1.Value = 0, ; - Option1.Visible = .T., ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 112, ; - Option1.WordWrap = .F., ; - Option2.AutoSize = .F., ; - Option2.BackColor = 192,192,192, ; - Option2.Caption = "Esta es la opc. 2", ; - Option2.FontSize = 8, ; - Option2.Height = 16, ; - Option2.Left = 5, ; - Option2.Name = "Option2", ; - Option2.Picture = bmps\scccheckout.bmp, ; - Option2.PicturePosition = 4, ; - Option2.Style = 1, ; - Option2.Top = 24, ; - Option2.Value = 1, ; - Option2.Width = 103 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'pgf.Page1.Pageframe1' AS pageframe WITH ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - ErasePage = .T., ; - Height = (61), ; - Left = (135), ; - MemberClass = "cl_page", ; - MemberClassLibrary = lib_controles.vcx, ; - Name = "Pageframe1", ; - PageCount = 2, ; - TabOrientation = 2, ; - Themes = .F., ; - Top = (284), ; - Width = (117), ; - Cl_page1.Caption = "Pg1", ; - Cl_page1.Name = "Cl_page1", ; - Cl_page2.BackColor = 255,193,132, ; - Cl_page2.Caption = "Pg2", ; - Cl_page2.Name = "Cl_page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'pgf.Page1.spinner' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (19), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 11, ; - Margin = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "spinner", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabIndex = 9, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 303, ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (108) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'pgf.Page1.textbox' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DefHeight = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (19), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 11, ; - Margin = 0, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "textbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 327, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (108) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'pgf.Page1.timer' AS cl_timer WITH ; - Comment = "", ; - DefHeight = , ; - DefWidth = , ; - Enabled = .T., ; - Height = (23), ; - Interval = 0, ; - Left = 235, ; - Name = "timer", ; - Tag = "", ; - test_aa = .F., ; - Top = 255, ; - Width = (23) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="timer" /> - - PROCEDURE Activate - IF NOT THISFORM.l_activated - THISFORM.run_tests() - THISFORM.l_activated = .T. - ENDIF - - ENDPROC - - PROCEDURE add_control - LPARAMETERS toControl - - LOCAL lcCtlPath - - WITH THISFORM - lcCtlPath = SYS(1272, toControl) - - INSERT INTO C_TESTS ; - ( c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg, c_UI ) ; - VALUES ; - ( SUBSTR( lcCtlPath, LEN(.NAME) + 2), 'N', 'N', 'N', 'N', 'N' ) - ENDWITH - - ENDPROC - - PROCEDURE Load - CREATE CURSOR C_TESTS ( c_CtlName C(30), c_Access C(1), c_Assign C(1), c_Value C(1), c_ProgrChg C(1), c_UI C(1) ) - INDEX ON c_CtlName TAG c_CtlName - - ENDPROC - - PROCEDURE run_tests - TRY - LOCAL loEx AS Exception, loCtl - - WITH THISFORM AS Form - *-- c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg - THISFORM.pgf.page1.SETALL( "Tag", "" ) - THISFORM.pgf.ActivePage = 1 - - SCAN - *-- Test UI Enable - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - DO CASE - CASE NOT PEMSTATUS(loCtl, 'UIEnable',5) - REPLACE c_UI WITH "-" - CASE loCtl.Tag = "UI" - REPLACE c_UI WITH "S" - ENDCASE - ENDSCAN - - SCAN - *-- Test Access - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - loCtl.Tag = '' - IF loCtl.test_aa = "ACCESS_OK" - REPLACE c_Access WITH "S" - ENDIF - ENDSCAN - - SCAN - *-- Test Assign - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - loCtl.Tag = '' - loCtl.test_aa = "ASSIGN_OK" - IF loCtl.Tag = "ASSIGN_OK" - REPLACE c_Assign WITH "S" - ENDIF - ENDSCAN - - SCAN - *-- Test Valor/Activate - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - - DO CASE - CASE loCtl.Baseclass == 'Checkbox' - .valor = 1 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Combobox' - .valor = 3 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Commandgroup' - .valor = 2 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Editbox' - .valor = 'Texto editable' - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Listbox' - .valor = 3 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Optiongroup' - .valor = 2 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Spinner' - .valor = 123 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Textbox' - .valor = "Mi texto" - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Page' - loCtl.Parent.ActivePage = 2 - IF loCtl.Tag = 'AC' - REPLACE c_Value WITH "S" - ENDIF - - OTHERWISE - REPLACE c_Value WITH "-" - - ENDCASE - ENDSCAN - - SCAN - *-- Test ProgrammaticChange - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - .Tag = '' - DO CASE - CASE loCtl.Baseclass == 'Checkbox' - loCtl.Value = 0 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Combobox' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Commandgroup' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Editbox' - loCtl.Value = 'Editado!' - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Listbox' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Optiongroup' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Spinner' - loCtl.Value = 321 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Textbox' - loCtl.Value = 'Editado!' - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - OTHERWISE - REPLACE c_ProgrChg WITH "-" - - ENDCASE - - ENDSCAN - ENDWITH - - - CATCH TO loEx - THISFORM.edit1.Value = 'Error ' + TRANSFORM(loEx.ErrorNo) + CHR(13) ; - + loEx.Message + CHR(13) ; - + loEx.Procedure + ', Line ' + TRANSFORM(loEx.LineNo) + CHR(13) ; - + loEx.Details - - FINALLY - IF USED("C_TESTS") - SELECT C_TESTS - GO TOP - ENDIF - - ENDTRY - - ENDPROC - - PROCEDURE pgf.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.Cl_optiongroup1.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.collection.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.collection.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.collection.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.combobox.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.combobox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.combobox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.combobox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.combobox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.container.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.container.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.container.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.container.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.control.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.control.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.control.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.control.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.editbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.editbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.editbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.editbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.editbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.image.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.image.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.image.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.image.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.label.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.label.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.label.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.label.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.line.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.line.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.line.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.line.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.listbox.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.listbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.listbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.listbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.listbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.option.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.option.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.option.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.option.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Activate - THIS.Tag = 'AC' - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Init - this.Cl_page2.Init() - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.UIEnable - LPARAMETERS lEnable - - IF lEnable - THISFORM.pgf.Tag = 'UI' - ENDIF - - - ENDPROC - - PROCEDURE pgf.Page1.spinner.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.spinner.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.spinner.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.spinner.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.spinner.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.textbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.textbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.textbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.textbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.textbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.timer.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.timer.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - -ENDDEFINE - -DEFINE CLASS f_form_aa_ AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_grid1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Header1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_grid1.Column6.Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.checkbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.collection" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.combobox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.commandgroup" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.commandbutton" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.container" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.control" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.editbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.hyperlink" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.image" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.label" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.line" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.listbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.optiongroup" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.option" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.spinner" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.textbox" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.timer" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="pgf.Page1.Shape1" UniqueID="" Timestamp="" /> - - * - *m: add_control - *m: run_tests - *p: l_activated - *p: n_controles_count - *p: valor - *a: a_controles[1,0] - * - - AllowOutput = .T. - AlwaysOnBottom = .F. - AlwaysOnTop = .F. - AutoCenter = .F. - BackColor = 192,192,192 - BindControls = .T. - BorderStyle = 3 - BufferMode = 0 - Caption = "AllControls_Test" - ClipControls = .T. - Closable = .T. - ColorSource = 4 - Comment = "" - ContinuousScroll = .T. - ControlBox = .T. - c_testname = AllControls_Test - DataSession = 2 - DEClass = "cl_dataenvironment" - DEClassLibrary = lib_controles.vcx - DefHeight = - DefLeft = - DefOleLCID = 0 - DefTop = - DefWidth = - Desktop = .F. - Dockable = 0 - DoCreate = .T. - DrawMode = 13 - DrawStyle = 0 - DrawWidth = 1 - Enabled = .T. - FillColor = 0,0,0 - FillStyle = 1 - FontBold = .F. - FontCharSet = 0 - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 9 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - HalfHeightCaption = .F. - Height = (424) - HelpContextID = 0 - HScrollSmallChange = 10 - Icon = bmps\container.ico - KeyPreview = .F. - Left = (2) - LockScreen = .F. - l_activated = .F. - MacDesktop = 0 - MaxButton = .T. - MaxHeight = -1 - MaxLeft = -1 - MaxTop = -1 - MaxWidth = -1 - MDIForm = .F. - MinButton = .T. - MinHeight = -1 - MinWidth = -1 - MouseIcon = ..\..\ - MousePointer = 0 - Movable = .T. - Name = "f_form_aa" - n_controles_count = 0 - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - Picture = bmps\fondogris.bmp - RightToLeft = .F. - ScaleMode = 3 - ScrollBars = 3 - ShowInTaskBar = .T. - ShowTips = .F. - ShowWindow = 0 - SizeBox = .F. - TabIndex = 1 - TabStop = .T. - Tag = "" - Themes = .T. - TitleBar = 1 - Top = (4) - valor = .F. - Visible = .T. - VScrollSmallChange = 10 - WhatsThisButton = .F. - WhatsThisHelp = .F. - WhatsThisHelpID = -1 - Width = (980) - WindowState = 0 - WindowType = 0 - ZoomBox = .F. - Edit1.Height = 356 - Edit1.Left = 764 - Edit1.Name = "Edit1" - Edit1.RightToLeft = .F. - Edit1.Top = 32 - Edit1.Width = 212 - Label3.BackColor = 128,255,128 - Label3.Height = 17 - Label3.Left = 764 - Label3.Name = "Label3" - Label3.RightToLeft = .F. - Label3.Top = 8 - Label3.Width = 212 - cmdCapturar.Height = 27 - cmdCapturar.Left = 764 - cmdCapturar.Name = "cmdCapturar" - cmdCapturar.RightToLeft = .F. - cmdCapturar.Top = 392 - cmdCapturar.Width = 212 - Label1.BackColor = 128,255,128 - Label1.Caption = "CONTROLES" - Label1.Height = 17 - Label1.Left = 12 - Label1.Name = "Label1" - Label1.RightToLeft = .F. - Label1.Top = 8 - Label1.Width = 268 - Label2.BackColor = 128,255,128 - Label2.Caption = "TESTS" - Label2.Height = 17 - Label2.Left = 296 - Label2.Name = "Label2" - Label2.RightToLeft = .F. - Label2.Top = 8 - Label2.Width = 460 - - ADD OBJECT 'Cl_grid1' AS cl_grid WITH ; - AllowAddNew = .F., ; - AllowAutoColumnFit = 0, ; - AllowCellSelection = .T., ; - AllowHeaderSizing = .F., ; - AllowRowSizing = .F., ; - Anchor = 0, ; - BackColor = 255,255,217, ; - ChildOrder = "", ; - ColumnCount = 6, ; - Comment = "", ; - DeleteMark = .F., ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - GridLineColor = 0,0,0, ; - GridLines = 3, ; - GridLineWidth = 1, ; - HeaderHeight = 18, ; - Height = 384, ; - HelpContextID = 0, ; - Highlight = .T., ; - HighlightBackColor = 51,153,255, ; - HighlightForeColor = 255,255,255, ; - HighlightRow = .T., ; - HighlightRowLineWidth = 1, ; - HighlightStyle = 0, ; - Left = 296, ; - LinkMaster = "", ; - LockColumns = 0, ; - LockColumnsLeft = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_grid1", ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Optimize = .F., ; - Panel = 1, ; - PanelLink = .T., ; - Partition = 0, ; - ReadOnly = .F., ; - RecordMark = .T., ; - RecordSource = "C_TESTS", ; - RecordSourceType = 1, ; - RelationalExpr = "", ; - RightToLeft = .F., ; - RowHeight = 18, ; - ScrollBars = 2, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SplitBar = .F., ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 32, ; - Value = 0, ; - View = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 460, ; - COLUMN1.Alignment = 3, ; - COLUMN1.BackColor = 255,255,217, ; - COLUMN1.Bound = .T., ; - COLUMN1.ColumnOrder = 1, ; - COLUMN1.Comment = "", ; - COLUMN1.ControlSource = "c_ctlname", ; - COLUMN1.CurrentControl = "Text1", ; - COLUMN1.DynamicAlignment = "", ; - COLUMN1.DynamicBackColor = "", ; - COLUMN1.DynamicCurrentControl = "", ; - COLUMN1.DynamicFontBold = "", ; - COLUMN1.DynamicFontItalic = "", ; - COLUMN1.DynamicFontName = "", ; - COLUMN1.DynamicFontOutline = "", ; - COLUMN1.DynamicFontShadow = "", ; - COLUMN1.DynamicFontSize = "", ; - COLUMN1.DynamicFontStrikethru = "", ; - COLUMN1.DynamicFontUnderline = "", ; - COLUMN1.DynamicForeColor = "", ; - COLUMN1.DynamicInputMask = "", ; - COLUMN1.Enabled = .T., ; - COLUMN1.FontBold = .F., ; - COLUMN1.FontCharSet = 0, ; - COLUMN1.FontCondense = .F., ; - COLUMN1.FontExtend = .F., ; - COLUMN1.FontItalic = .F., ; - COLUMN1.FontName = "Arial", ; - COLUMN1.FontOutline = .F., ; - COLUMN1.FontShadow = .F., ; - COLUMN1.FontSize = 9, ; - COLUMN1.FontStrikethru = .F., ; - COLUMN1.FontUnderline = .F., ; - COLUMN1.ForeColor = 0,0,0, ; - COLUMN1.Format = "", ; - COLUMN1.Header1.Alignment = 0, ; - COLUMN1.Header1.BackColor = 240,240,240, ; - COLUMN1.Header1.Caption = "Control", ; - COLUMN1.Header1.Comment = "", ; - COLUMN1.Header1.FontBold = .F., ; - COLUMN1.Header1.FontCharSet = 0, ; - COLUMN1.Header1.FontCondense = .F., ; - COLUMN1.Header1.FontExtend = .F., ; - COLUMN1.Header1.FontItalic = .F., ; - COLUMN1.Header1.FontName = "Arial", ; - COLUMN1.Header1.FontOutline = .F., ; - COLUMN1.Header1.FontShadow = .F., ; - COLUMN1.Header1.FontSize = 9, ; - COLUMN1.Header1.FontStrikethru = .F., ; - COLUMN1.Header1.FontUnderline = .F., ; - COLUMN1.Header1.ForeColor = 0,0,0, ; - COLUMN1.Header1.MouseIcon = ..\..\, ; - COLUMN1.Header1.MousePointer = 0, ; - COLUMN1.Header1.Name = "Header1", ; - COLUMN1.Header1.Picture = ..\..\, ; - COLUMN1.Header1.StatusBarText = "", ; - COLUMN1.Header1.Tag = "", ; - COLUMN1.Header1.ToolTipText = "", ; - COLUMN1.Header1.WordWrap = .F., ; - COLUMN1.InputMask = "", ; - COLUMN1.MouseIcon = ..\..\, ; - COLUMN1.MousePointer = 0, ; - COLUMN1.Movable = .T., ; - COLUMN1.Name = "COLUMN1", ; - COLUMN1.ReadOnly = .F., ; - COLUMN1.Resizable = .T., ; - COLUMN1.SelectOnEntry = .T., ; - COLUMN1.Sparse = .T., ; - COLUMN1.StatusBarText = "", ; - COLUMN1.Tag = "", ; - COLUMN1.Text1.Alignment = 3, ; - COLUMN1.Text1.Anchor = 0, ; - COLUMN1.Text1.AutoComplete = 0, ; - COLUMN1.Text1.AutoCompSource = "", ; - COLUMN1.Text1.AutoCompTable = "", ; - COLUMN1.Text1.BackColor = 255,255,217, ; - COLUMN1.Text1.BackStyle = 1, ; - COLUMN1.Text1.BorderColor = 100,100,100, ; - COLUMN1.Text1.BorderStyle = 0, ; - COLUMN1.Text1.Century = 1, ; - COLUMN1.Text1.ColorScheme = 1, ; - COLUMN1.Text1.ColorSource = 4, ; - COLUMN1.Text1.Comment = "", ; - COLUMN1.Text1.DateFormat = 0, ; - COLUMN1.Text1.DateMark = "", ; - COLUMN1.Text1.DisabledBackColor = 255,255,255, ; - COLUMN1.Text1.DisabledForeColor = 109,109,109, ; - COLUMN1.Text1.DragIcon = ..\..\, ; - COLUMN1.Text1.DragMode = 0, ; - COLUMN1.Text1.Enabled = .T., ; - COLUMN1.Text1.EnableHyperlinks = .F., ; - COLUMN1.Text1.FontBold = .F., ; - COLUMN1.Text1.FontCharSet = 0, ; - COLUMN1.Text1.FontCondense = .F., ; - COLUMN1.Text1.FontExtend = .F., ; - COLUMN1.Text1.FontItalic = .F., ; - COLUMN1.Text1.FontName = "Arial", ; - COLUMN1.Text1.FontOutline = .F., ; - COLUMN1.Text1.FontShadow = .F., ; - COLUMN1.Text1.FontSize = 9, ; - COLUMN1.Text1.FontStrikethru = .F., ; - COLUMN1.Text1.FontUnderline = .F., ; - COLUMN1.Text1.ForeColor = 0,0,0, ; - COLUMN1.Text1.Format = "", ; - COLUMN1.Text1.HelpContextID = 0, ; - COLUMN1.Text1.HideSelection = .T., ; - COLUMN1.Text1.Hours = 0, ; - COLUMN1.Text1.IMEMode = 0, ; - COLUMN1.Text1.InputMask = "", ; - COLUMN1.Text1.IntegralHeight = .F., ; - COLUMN1.Text1.MemoWindow = "", ; - COLUMN1.Text1.MouseIcon = ..\..\, ; - COLUMN1.Text1.MousePointer = 0, ; - COLUMN1.Text1.Name = "Text1", ; - COLUMN1.Text1.NullDisplay = "", ; - COLUMN1.Text1.OLEDragMode = 0, ; - COLUMN1.Text1.OLEDragPicture = ..\..\, ; - COLUMN1.Text1.OLEDropEffects = 3, ; - COLUMN1.Text1.OLEDropMode = 0, ; - COLUMN1.Text1.OLEDropTextInsertion = 0, ; - COLUMN1.Text1.OpenWindow = .F., ; - COLUMN1.Text1.PasswordChar = "", ; - COLUMN1.Text1.ReadOnly = .F., ; - COLUMN1.Text1.RightToLeft = .F., ; - COLUMN1.Text1.Seconds = 2, ; - COLUMN1.Text1.SelectedBackColor = 51,153,255, ; - COLUMN1.Text1.SelectedForeColor = 255,255,255, ; - COLUMN1.Text1.SelectOnEntry = .F., ; - COLUMN1.Text1.SpecialEffect = 0, ; - COLUMN1.Text1.StatusBarText = "", ; - COLUMN1.Text1.StrictDateEntry = 1, ; - COLUMN1.Text1.Style = 0, ; - COLUMN1.Text1.TabIndex = 1, ; - COLUMN1.Text1.TabStop = .T., ; - COLUMN1.Text1.Tag = "", ; - COLUMN1.Text1.TerminateRead = .F., ; - COLUMN1.Text1.Themes = .T., ; - COLUMN1.Text1.ToolTipText = "", ; - COLUMN1.Text1.Value = , ; - COLUMN1.Text1.Visible = .T., ; - COLUMN1.ToolTipText = "", ; - COLUMN1.Visible = .T., ; - COLUMN1.Width = 170, ; - COLUMN2.Alignment = 2, ; - COLUMN2.BackColor = 255,255,217, ; - COLUMN2.ControlSource = "c_Access", ; - COLUMN2.DynamicBackColor = 'ICASE( c_access="S", RGB(0,255,0), c_access="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN2.DynamicForeColor = 'ICASE( c_access="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN2.Enabled = .T., ; - COLUMN2.FontBold = .F., ; - COLUMN2.FontCharSet = 0, ; - COLUMN2.FontCondense = .F., ; - COLUMN2.FontExtend = .F., ; - COLUMN2.FontItalic = .F., ; - COLUMN2.FontName = "Arial", ; - COLUMN2.FontOutline = .F., ; - COLUMN2.FontShadow = .F., ; - COLUMN2.FontSize = 9, ; - COLUMN2.FontStrikethru = .F., ; - COLUMN2.FontUnderline = .F., ; - COLUMN2.ForeColor = 0,0,0, ; - COLUMN2.Header1.Alignment = 2, ; - COLUMN2.Header1.BackColor = 240,240,240, ; - COLUMN2.Header1.Caption = "Access", ; - COLUMN2.Header1.FontBold = .F., ; - COLUMN2.Header1.FontCharSet = 0, ; - COLUMN2.Header1.FontCondense = .F., ; - COLUMN2.Header1.FontExtend = .F., ; - COLUMN2.Header1.FontItalic = .F., ; - COLUMN2.Header1.FontName = "Arial", ; - COLUMN2.Header1.FontOutline = .F., ; - COLUMN2.Header1.FontShadow = .F., ; - COLUMN2.Header1.FontSize = 9, ; - COLUMN2.Header1.FontStrikethru = .F., ; - COLUMN2.Header1.FontUnderline = .F., ; - COLUMN2.Header1.Name = "Header1", ; - COLUMN2.Name = "COLUMN2", ; - COLUMN2.ReadOnly = .F., ; - COLUMN2.Text1.Alignment = 2, ; - COLUMN2.Text1.BackColor = 255,255,217, ; - COLUMN2.Text1.Enabled = .T., ; - COLUMN2.Text1.FontBold = .F., ; - COLUMN2.Text1.FontCharSet = 0, ; - COLUMN2.Text1.FontCondense = .F., ; - COLUMN2.Text1.FontExtend = .F., ; - COLUMN2.Text1.FontItalic = .F., ; - COLUMN2.Text1.FontName = "Arial", ; - COLUMN2.Text1.FontOutline = .F., ; - COLUMN2.Text1.FontShadow = .F., ; - COLUMN2.Text1.FontSize = 9, ; - COLUMN2.Text1.FontStrikethru = .F., ; - COLUMN2.Text1.FontUnderline = .F., ; - COLUMN2.Text1.ForeColor = 0,0,0, ; - COLUMN2.Text1.Name = "Text1", ; - COLUMN2.Text1.ReadOnly = .F., ; - COLUMN2.Text1.RightToLeft = .F., ; - COLUMN2.Text1.Visible = .T., ; - COLUMN2.Visible = .T., ; - COLUMN2.Width = 50, ; - COLUMN3.Alignment = 2, ; - COLUMN3.BackColor = 255,255,217, ; - COLUMN3.ControlSource = "c_Assign", ; - COLUMN3.DynamicBackColor = 'ICASE( c_assign="S", RGB(0,255,0), c_assign="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN3.DynamicForeColor = 'ICASE( c_assign="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN3.Enabled = .T., ; - COLUMN3.FontBold = .F., ; - COLUMN3.FontCharSet = 0, ; - COLUMN3.FontCondense = .F., ; - COLUMN3.FontExtend = .F., ; - COLUMN3.FontItalic = .F., ; - COLUMN3.FontName = "Arial", ; - COLUMN3.FontOutline = .F., ; - COLUMN3.FontShadow = .F., ; - COLUMN3.FontSize = 9, ; - COLUMN3.FontStrikethru = .F., ; - COLUMN3.FontUnderline = .F., ; - COLUMN3.ForeColor = 0,0,0, ; - COLUMN3.Header1.Alignment = 2, ; - COLUMN3.Header1.Caption = "Assign", ; - COLUMN3.Header1.FontBold = .F., ; - COLUMN3.Header1.FontCharSet = 0, ; - COLUMN3.Header1.FontCondense = .F., ; - COLUMN3.Header1.FontExtend = .F., ; - COLUMN3.Header1.FontItalic = .F., ; - COLUMN3.Header1.FontName = "Arial", ; - COLUMN3.Header1.FontOutline = .F., ; - COLUMN3.Header1.FontShadow = .F., ; - COLUMN3.Header1.FontSize = 9, ; - COLUMN3.Header1.FontStrikethru = .F., ; - COLUMN3.Header1.FontUnderline = .F., ; - COLUMN3.Header1.Name = "Header1", ; - COLUMN3.Name = "COLUMN3", ; - COLUMN3.ReadOnly = .F., ; - COLUMN3.Text1.Alignment = 2, ; - COLUMN3.Text1.BackColor = 255,255,217, ; - COLUMN3.Text1.Enabled = .T., ; - COLUMN3.Text1.FontBold = .F., ; - COLUMN3.Text1.FontCharSet = 0, ; - COLUMN3.Text1.FontCondense = .F., ; - COLUMN3.Text1.FontExtend = .F., ; - COLUMN3.Text1.FontItalic = .F., ; - COLUMN3.Text1.FontName = "Arial", ; - COLUMN3.Text1.FontOutline = .F., ; - COLUMN3.Text1.FontShadow = .F., ; - COLUMN3.Text1.FontSize = 9, ; - COLUMN3.Text1.FontStrikethru = .F., ; - COLUMN3.Text1.FontUnderline = .F., ; - COLUMN3.Text1.ForeColor = 0,0,0, ; - COLUMN3.Text1.Name = "Text1", ; - COLUMN3.Text1.ReadOnly = .F., ; - COLUMN3.Text1.RightToLeft = .F., ; - COLUMN3.Text1.Visible = .T., ; - COLUMN3.Visible = .T., ; - COLUMN3.Width = 50, ; - COLUMN4.Alignment = 2, ; - COLUMN4.BackColor = 255,255,217, ; - COLUMN4.ControlSource = "c_Value", ; - COLUMN4.DynamicBackColor = 'ICASE( c_value="S", RGB(0,255,0), c_value="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN4.DynamicForeColor = 'ICASE( c_value="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN4.Enabled = .T., ; - COLUMN4.FontBold = .F., ; - COLUMN4.FontCharSet = 0, ; - COLUMN4.FontCondense = .F., ; - COLUMN4.FontExtend = .F., ; - COLUMN4.FontItalic = .F., ; - COLUMN4.FontName = "Arial", ; - COLUMN4.FontOutline = .F., ; - COLUMN4.FontShadow = .F., ; - COLUMN4.FontSize = 9, ; - COLUMN4.FontStrikethru = .F., ; - COLUMN4.FontUnderline = .F., ; - COLUMN4.ForeColor = 0,0,0, ; - COLUMN4.Header1.Alignment = 2, ; - COLUMN4.Header1.Caption = "Value/Act", ; - COLUMN4.Header1.FontBold = .F., ; - COLUMN4.Header1.FontCharSet = 0, ; - COLUMN4.Header1.FontCondense = .F., ; - COLUMN4.Header1.FontExtend = .F., ; - COLUMN4.Header1.FontItalic = .F., ; - COLUMN4.Header1.FontName = "Arial", ; - COLUMN4.Header1.FontOutline = .F., ; - COLUMN4.Header1.FontShadow = .F., ; - COLUMN4.Header1.FontSize = 9, ; - COLUMN4.Header1.FontStrikethru = .F., ; - COLUMN4.Header1.FontUnderline = .F., ; - COLUMN4.Header1.Name = "Header1", ; - COLUMN4.Name = "COLUMN4", ; - COLUMN4.ReadOnly = .F., ; - COLUMN4.Text1.Alignment = 2, ; - COLUMN4.Text1.BackColor = 255,255,217, ; - COLUMN4.Text1.Enabled = .T., ; - COLUMN4.Text1.FontBold = .F., ; - COLUMN4.Text1.FontCharSet = 0, ; - COLUMN4.Text1.FontCondense = .F., ; - COLUMN4.Text1.FontExtend = .F., ; - COLUMN4.Text1.FontItalic = .F., ; - COLUMN4.Text1.FontName = "Arial", ; - COLUMN4.Text1.FontOutline = .F., ; - COLUMN4.Text1.FontShadow = .F., ; - COLUMN4.Text1.FontSize = 9, ; - COLUMN4.Text1.FontStrikethru = .F., ; - COLUMN4.Text1.FontUnderline = .F., ; - COLUMN4.Text1.ForeColor = 0,0,0, ; - COLUMN4.Text1.Name = "Text1", ; - COLUMN4.Text1.ReadOnly = .F., ; - COLUMN4.Text1.RightToLeft = .F., ; - COLUMN4.Text1.Visible = .T., ; - COLUMN4.Visible = .T., ; - COLUMN4.Width = 50, ; - COLUMN5.Alignment = 2, ; - COLUMN5.BackColor = 255,255,217, ; - COLUMN5.ControlSource = "c_ProgrChg", ; - COLUMN5.DynamicBackColor = 'ICASE( c_ProgrChg="S", RGB(0,255,0), c_ProgrChg="N", RGB(255,0,0), RGB(255,255,255) )', ; - COLUMN5.DynamicForeColor = 'ICASE( c_ProgrChg="N", RGB(255,255,255), RGB(0,0,0) )', ; - COLUMN5.Enabled = .T., ; - COLUMN5.FontBold = .F., ; - COLUMN5.FontCharSet = 0, ; - COLUMN5.FontCondense = .F., ; - COLUMN5.FontExtend = .F., ; - COLUMN5.FontItalic = .F., ; - COLUMN5.FontName = "Arial", ; - COLUMN5.FontOutline = .F., ; - COLUMN5.FontShadow = .F., ; - COLUMN5.FontSize = 9, ; - COLUMN5.FontStrikethru = .F., ; - COLUMN5.FontUnderline = .F., ; - COLUMN5.ForeColor = 0,0,0, ; - COLUMN5.Header1.Alignment = 2, ; - COLUMN5.Header1.Caption = "Prg.Chg", ; - COLUMN5.Header1.FontBold = .F., ; - COLUMN5.Header1.FontCharSet = 0, ; - COLUMN5.Header1.FontCondense = .F., ; - COLUMN5.Header1.FontExtend = .F., ; - COLUMN5.Header1.FontItalic = .F., ; - COLUMN5.Header1.FontName = "Arial", ; - COLUMN5.Header1.FontOutline = .F., ; - COLUMN5.Header1.FontShadow = .F., ; - COLUMN5.Header1.FontSize = 9, ; - COLUMN5.Header1.FontStrikethru = .F., ; - COLUMN5.Header1.FontUnderline = .F., ; - COLUMN5.Header1.Name = "Header1", ; - COLUMN5.Name = "COLUMN5", ; - COLUMN5.ReadOnly = .F., ; - COLUMN5.Text1.Alignment = 2, ; - COLUMN5.Text1.BackColor = 255,255,217, ; - COLUMN5.Text1.Enabled = .T., ; - COLUMN5.Text1.FontBold = .F., ; - COLUMN5.Text1.FontCharSet = 0, ; - COLUMN5.Text1.FontCondense = .F., ; - COLUMN5.Text1.FontExtend = .F., ; - COLUMN5.Text1.FontItalic = .F., ; - COLUMN5.Text1.FontName = "Arial", ; - COLUMN5.Text1.FontOutline = .F., ; - COLUMN5.Text1.FontShadow = .F., ; - COLUMN5.Text1.FontSize = 9, ; - COLUMN5.Text1.FontStrikethru = .F., ; - COLUMN5.Text1.FontUnderline = .F., ; - COLUMN5.Text1.ForeColor = 0,0,0, ; - COLUMN5.Text1.Name = "Text1", ; - COLUMN5.Text1.ReadOnly = .F., ; - COLUMN5.Text1.RightToLeft = .F., ; - COLUMN5.Text1.Visible = .T., ; - COLUMN5.Visible = .T., ; - COLUMN5.Width = 50, ; - Column6.Alignment = 2, ; - Column6.BackColor = 255,255,217, ; - Column6.ControlSource = "c_UI", ; - Column6.DynamicBackColor = 'ICASE( c_UI="S", RGB(0,255,0), c_UI="N", RGB(255,0,0), RGB(255,255,255) )', ; - Column6.DynamicForeColor = 'ICASE( c_UI="N", RGB(255,255,255), RGB(0,0,0) )', ; - Column6.Enabled = .T., ; - Column6.FontBold = .F., ; - Column6.FontCharSet = 0, ; - Column6.FontCondense = .F., ; - Column6.FontExtend = .F., ; - Column6.FontItalic = .F., ; - Column6.FontName = "Arial", ; - Column6.FontOutline = .F., ; - Column6.FontShadow = .F., ; - Column6.FontSize = 9, ; - Column6.FontStrikethru = .F., ; - Column6.FontUnderline = .F., ; - Column6.ForeColor = 0,0,0, ; - Column6.Name = "Column6", ; - Column6.ReadOnly = .F., ; - Column6.Visible = .T., ; - Column6.Width = 50 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="grid" /> - - ADD OBJECT 'Cl_grid1.Column6.Header1' AS header WITH ; - Alignment = 2, ; - Caption = "UI", ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Name = "Header1" - *< END OBJECT: BaseClass="header" /> - - ADD OBJECT 'Cl_grid1.Column6.Text1' AS textbox WITH ; - Alignment = 2, ; - BackColor = 255,255,217, ; - BorderStyle = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Margin = 0, ; - Name = "Text1", ; - RightToLeft = .F., ; - Visible = .T. - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'pgf' AS cl_pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = 384, ; - HelpContextID = 0, ; - Left = 12, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "pgf", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 2, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabIndex = 7, ; - TabOrientation = 1, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 0, ; - Tag = "", ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 268, ; - Page1.BackColor = 240,240,240, ; - Page1.Caption = "Page1", ; - Page1.ColorSource = 4, ; - Page1.Comment = "Sin comentarios", ; - Page1.DragIcon = ..\..\, ; - Page1.DragMode = 0, ; - Page1.Enabled = .T., ; - Page1.FontBold = .F., ; - Page1.FontCharSet = 0, ; - Page1.FontCondense = .F., ; - Page1.FontExtend = .F., ; - Page1.FontItalic = .F., ; - Page1.FontName = "Arial", ; - Page1.FontOutline = .F., ; - Page1.FontShadow = .F., ; - Page1.FontSize = 9, ; - Page1.FontStrikethru = .F., ; - Page1.FontUnderline = .F., ; - Page1.ForeColor = 0,0,0, ; - Page1.HelpContextID = 0, ; - Page1.MouseIcon = ..\..\, ; - Page1.MousePointer = 0, ; - Page1.Name = "Page1", ; - Page1.OLEDragMode = 0, ; - Page1.OLEDragPicture = ..\..\, ; - Page1.OLEDropEffects = 3, ; - Page1.OLEDropMode = 0, ; - Page1.PageOrder = 1, ; - Page1.Picture = ..\..\, ; - Page1.StatusBarText = "", ; - Page1.Tag = "", ; - Page1.ToolTipText = "", ; - Page1.WhatsThisHelpID = -1, ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2", ; - Page2.PageOrder = 2 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> - - ADD OBJECT 'pgf.Page1.checkbox' AS cl_checkbox WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - Caption = "Chk1", ; - Centered = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledPicture = ..\..\, ; - DownPicture = ..\..\, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (21), ; - HelpContextID = 0, ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "checkbox", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\treeview.bmp, ; - PictureMargin = 0, ; - PicturePosition = 4, ; - PictureSpacing = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 1, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (8), ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (199), ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="checkbox" /> - - ADD OBJECT 'pgf.Page1.collection' AS cl_collection WITH ; - Left = 218, ; - Name = "collection", ; - Top = 8 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="collection" /> - - ADD OBJECT 'pgf.Page1.combobox' AS cl_combobox WITH ; - Alignment = 0, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - BoundColumn = 1, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 0, ; - ColumnLines = .T., ; - ColumnWidths = "", ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayCount = 0, ; - DisplayValue = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (20), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IncrementalSearch = .T., ; - InputMask = "", ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = (7), ; - Margin = 0, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "combobox", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - Picture = bmps\treeview.bmp, ; - PictureSelectionDisplay = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (35), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (196) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="combobox" /> - - ADD OBJECT 'pgf.Page1.commandbutton' AS cl_commandbutton WITH ; - AutoSize = .F., ; - Caption = "Comando", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - FontSize = 8, ; - Height = (25), ; - Left = (99), ; - Name = "commandbutton", ; - Picture = bmps\treeview.bmp, ; - PicturePosition = 4, ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (63), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (80), ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandbutton" /> - - ADD OBJECT 'pgf.Page1.commandgroup' AS cl_commandgroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (64), ; - HelpContextID = 0, ; - Left = (6), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "commandgroup", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 2, ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (60), ; - Value = 1, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (93), ; - Command1.Alignment = 2, ; - Command1.Anchor = 0, ; - Command1.AutoSize = .F., ; - Command1.BackColor = 192,192,192, ; - Command1.Cancel = .F., ; - Command1.Caption = "Comando1", ; - Command1.ColorScheme = 1, ; - Command1.ColorSource = 4, ; - Command1.Comment = "", ; - Command1.Default = .F., ; - Command1.DisabledBackColor = 240,240,240, ; - Command1.DisabledForeColor = 109,109,109, ; - Command1.DisabledPicture = ..\..\, ; - Command1.DownPicture = ..\..\, ; - Command1.DragIcon = ..\..\, ; - Command1.DragMode = 0, ; - Command1.Enabled = .T., ; - Command1.FontBold = .F., ; - Command1.FontCharSet = 0, ; - Command1.FontCondense = .F., ; - Command1.FontExtend = .F., ; - Command1.FontItalic = .F., ; - Command1.FontName = "Arial", ; - Command1.FontOutline = .F., ; - Command1.FontShadow = .F., ; - Command1.FontSize = 8, ; - Command1.FontStrikethru = .F., ; - Command1.FontUnderline = .F., ; - Command1.ForeColor = 0,0,0, ; - Command1.Height = 25, ; - Command1.HelpContextID = 0, ; - Command1.Left = 1, ; - Command1.MouseIcon = ..\..\, ; - Command1.MousePointer = 0, ; - Command1.Name = "Command1", ; - Command1.OLEDragMode = 0, ; - Command1.OLEDragPicture = ..\..\, ; - Command1.OLEDropEffects = 3, ; - Command1.OLEDropMode = 0, ; - Command1.Picture = bmps\sobrepostal.bmp, ; - Command1.PictureMargin = 0, ; - Command1.PicturePosition = 4, ; - Command1.PictureSpacing = 0, ; - Command1.RightToLeft = .F., ; - Command1.SpecialEffect = 0, ; - Command1.StatusBarText = "", ; - Command1.Style = 0, ; - Command1.TabIndex = 1, ; - Command1.TabStop = .T., ; - Command1.Tag = "", ; - Command1.TerminateRead = .F., ; - Command1.Themes = .T., ; - Command1.ToolTipText = "", ; - Command1.Top = 4, ; - Command1.Visible = .T., ; - Command1.WhatsThisHelpID = -1, ; - Command1.Width = 90, ; - Command1.WordWrap = .F., ; - Command2.AutoSize = .F., ; - Command2.BackColor = 192,192,192, ; - Command2.Caption = "Comando2", ; - Command2.FontSize = 8, ; - Command2.Height = 25, ; - Command2.Left = 1, ; - Command2.Name = "Command2", ; - Command2.Picture = bmps\sobrepostal.bmp, ; - Command2.PicturePosition = 4, ; - Command2.Top = 32, ; - Command2.Width = 90 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="commandgroup" /> - - ADD OBJECT 'pgf.Page1.container' AS cl_container WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = (24), ; - HelpContextID = 0, ; - Left = (227), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "container", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - SpecialEffect = 2, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 4, ; - TabStop = .T., ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (127), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (20) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="container" /> - - ADD OBJECT 'pgf.Page1.control' AS cl_control WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ForeColor = 0,0,0, ; - Height = (24), ; - HelpContextID = 0, ; - Left = (199), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "control", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - SpecialEffect = 2, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 5, ; - TabStop = .T., ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (127), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (20) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="control" /> - - ADD OBJECT 'pgf.Page1.editbox' AS cl_editbox WITH ; - AddLineFeeds = .F., ; - Alignment = 0, ; - AllowTabs = .F., ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - ColorScheme = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (41), ; - HelpContextID = 0, ; - HideSelection = .T., ; - IMEMode = 0, ; - IntegralHeight = .F., ; - Left = (183), ; - Margin = 2, ; - MaxLength = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "editbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - ScrollBars = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (60), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (68) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="editbox" /> - - ADD OBJECT 'pgf.Page1.hyperlink' AS cl_hyperlink WITH ; - Comment = "", ; - Left = 199, ; - Name = "hyperlink", ; - Tag = "", ; - test_aa = .F., ; - Top = 103 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="hyperlink" /> - - ADD OBJECT 'pgf.Page1.image' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (16), ; - HelpContextID = 0, ; - Left = (231), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "image", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\scccheckout.bmp, ; - RotateFlip = 0, ; - StatusBarText = "", ; - Stretch = 0, ; - Tag = "", ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (107), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (16) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'pgf.Page1.label' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = (17), ; - HelpContextID = 0, ; - Left = (6), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "label", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - TabIndex = 7, ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (136), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (104), ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'pgf.Page1.line' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 255,0,0, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .T., ; - Height = (8), ; - HelpContextID = 0, ; - Left = (121), ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "line", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - test_aa = .F., ; - ToolTipText = "", ; - Top = (136), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (50) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'pgf.Page1.listbox' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 128,255,128, ; - BoundColumn = 1, ; - BoundTo = .F., ; - ColorScheme = 1, ; - ColorSource = 4, ; - ColumnCount = 0, ; - ColumnLines = .T., ; - ColumnWidths = "", ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 255,255,255, ; - DisabledForeColor = 109,109,109, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DisplayValue = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = (60), ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "listbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = ..\..\, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 8, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (164), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (224) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'pgf.Page1.option' AS cl_option WITH ; - AutoSize = .F., ; - Caption = "Esta es la opción B", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - FontSize = 8, ; - Height = (16), ; - Left = (123), ; - Name = "option", ; - Top = (232), ; - Width = (110) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optionbutton" /> - - ADD OBJECT 'pgf.Page1.optiongroup' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 2, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - Height = (46), ; - HelpContextID = 0, ; - Left = (7), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "optiongroup", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (232), ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (112), ; - Option1.Alignment = 0, ; - Option1.Anchor = 0, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 192,192,192, ; - Option1.BackStyle = 1, ; - Option1.Caption = "Esta es la opc. 1", ; - Option1.ColorScheme = 1, ; - Option1.ColorSource = 4, ; - Option1.Comment = "", ; - Option1.ControlSource = "", ; - Option1.DisabledBackColor = 240,240,240, ; - Option1.DisabledForeColor = 109,109,109, ; - Option1.DisabledPicture = ..\..\, ; - Option1.DownPicture = ..\..\, ; - Option1.DragIcon = ..\..\, ; - Option1.DragMode = 0, ; - Option1.Enabled = .T., ; - Option1.FontBold = .F., ; - Option1.FontCondense = .F., ; - Option1.FontExtend = .F., ; - Option1.FontItalic = .F., ; - Option1.FontName = "Arial", ; - Option1.FontOutline = .F., ; - Option1.FontShadow = .F., ; - Option1.FontSize = 8, ; - Option1.FontStrikethru = .F., ; - Option1.FontUnderline = .F., ; - Option1.ForeColor = 0,0,0, ; - Option1.Height = 41, ; - Option1.HelpContextID = 0, ; - Option1.Left = 5, ; - Option1.MouseIcon = ..\..\, ; - Option1.MousePointer = 0, ; - Option1.Name = "Option1", ; - Option1.OLEDragMode = 0, ; - Option1.OLEDragPicture = ..\..\, ; - Option1.OLEDropEffects = 3, ; - Option1.OLEDropMode = 0, ; - Option1.Picture = bmps\scccheckout.bmp, ; - Option1.PictureMargin = 0, ; - Option1.PicturePosition = 4, ; - Option1.PictureSpacing = 0, ; - Option1.RightToLeft = .F., ; - Option1.SpecialEffect = 0, ; - Option1.StatusBarText = "", ; - Option1.Style = 1, ; - Option1.TabIndex = 1, ; - Option1.TabStop = .T., ; - Option1.Tag = "", ; - Option1.TerminateRead = .F., ; - Option1.Themes = .T., ; - Option1.ToolTipText = "", ; - Option1.Top = 5, ; - Option1.Value = 0, ; - Option1.Visible = .T., ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 112, ; - Option1.WordWrap = .F., ; - Option2.AutoSize = .F., ; - Option2.BackColor = 192,192,192, ; - Option2.Caption = "Esta es la opc. 2", ; - Option2.FontSize = 8, ; - Option2.Height = 16, ; - Option2.Left = 5, ; - Option2.Name = "Option2", ; - Option2.Picture = bmps\scccheckout.bmp, ; - Option2.PicturePosition = 4, ; - Option2.Style = 1, ; - Option2.Top = 24, ; - Option2.Width = 103 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'pgf.Page1.Pageframe1' AS pageframe WITH ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - ErasePage = .T., ; - Height = (61), ; - Left = (135), ; - MemberClass = "cl_page", ; - MemberClassLibrary = lib_controles.vcx, ; - Name = "Pageframe1", ; - PageCount = 2, ; - TabOrientation = 2, ; - Themes = .F., ; - Top = (284), ; - Width = (117), ; - Cl_page1.Caption = "Pg1", ; - Cl_page1.Name = "Cl_page1", ; - Cl_page2.BackColor = 255,193,132, ; - Cl_page2.Caption = "Pg2", ; - Cl_page2.Name = "Cl_page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'pgf.Page1.Shape1' AS shape WITH ; - Anchor = 0, ; - BackColor = 255,255,196, ; - BackStyle = 1, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 16, ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .T., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = (21), ; - HelpContextID = 0, ; - Left = (115), ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = (99), ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (57) - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'pgf.Page1.spinner' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (19), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = (11), ; - Margin = 0, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "spinner", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabIndex = 9, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (292), ; - Value = 0, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (108) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'pgf.Page1.textbox' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 128,255,128, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = (19), ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = (11), ; - Margin = 0, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "textbox", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabIndex = 1, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - test_aa = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = (320), ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = (108) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'pgf.Page1.timer' AS cl_timer WITH ; - Comment = "", ; - DefHeight = , ; - DefLeft = , ; - DefTop = , ; - DefWidth = , ; - Enabled = .T., ; - Height = (23), ; - Interval = 0, ; - Left = (207), ; - Name = "timer", ; - Tag = "", ; - test_aa = .F., ; - Top = (252), ; - Width = (23) - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="timer" /> - - PROCEDURE Activate - IF NOT THISFORM.l_activated - THISFORM.run_tests() - THISFORM.l_activated = .T. - ENDIF - - ENDPROC - - PROCEDURE add_control - LPARAMETERS toControl - - LOCAL lcCtlPath - - WITH THISFORM - lcCtlPath = SYS(1272, toControl) - - INSERT INTO C_TESTS ; - ( c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg, c_UI ) ; - VALUES ; - ( SUBSTR( lcCtlPath, LEN(.NAME) + 2), 'N', 'N', 'N', 'N', 'N' ) - ENDWITH - - ENDPROC - - PROCEDURE Load - CREATE CURSOR C_TESTS ( c_CtlName C(30), c_Access C(1), c_Assign C(1), c_Value C(1), c_ProgrChg C(1), c_UI C(1) ) - INDEX ON c_CtlName TAG c_CtlName - - ENDPROC - - PROCEDURE run_tests - TRY - LOCAL loEx AS Exception, loCtl - - WITH THISFORM AS Form - *-- c_CtlName, c_Access, c_Assign, c_Value, c_ProgrChg - THISFORM.pgf.page1.SETALL( "Tag", "" ) - THISFORM.pgf.ActivePage = 1 - - SCAN - *-- Test UI Enable - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - DO CASE - CASE NOT PEMSTATUS(loCtl, 'UIEnable',5) - REPLACE c_UI WITH "-" - CASE loCtl.Tag = "UI" - REPLACE c_UI WITH "S" - ENDCASE - ENDSCAN - - SCAN - *-- Test Access - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - loCtl.Tag = '' - IF loCtl.test_aa = "ACCESS_OK" - REPLACE c_Access WITH "S" - ENDIF - ENDSCAN - - SCAN - *-- Test Assign - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - loCtl.Tag = '' - loCtl.test_aa = "ASSIGN_OK" - IF loCtl.Tag = "ASSIGN_OK" - REPLACE c_Assign WITH "S" - ENDIF - ENDSCAN - - SCAN - *-- Test Valor/Activate - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - - DO CASE - CASE loCtl.Baseclass == 'Checkbox' - .valor = 1 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Combobox' - .valor = 3 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Commandgroup' - .valor = 2 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Editbox' - .valor = 'Texto editable' - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Listbox' - .valor = 3 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Optiongroup' - .valor = 2 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Spinner' - .valor = 123 - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Textbox' - .valor = "Mi texto" - loCtl.ControlSource = 'THISFORM.valor' - IF loCtl.Value = .valor - REPLACE c_Value WITH "S" - ENDIF - loCtl.ControlSource = '' - - CASE loCtl.Baseclass == 'Page' - loCtl.Parent.ActivePage = 2 - IF loCtl.Tag = 'AC' - REPLACE c_Value WITH "S" - ENDIF - - OTHERWISE - REPLACE c_Value WITH "-" - - ENDCASE - ENDSCAN - - SCAN - *-- Test ProgrammaticChange - loCtl = EVALUATE( "." + ALLTRIM(c_CtlName) ) - .Tag = '' - DO CASE - CASE loCtl.Baseclass == 'Checkbox' - loCtl.Value = 0 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Combobox' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Commandgroup' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Editbox' - loCtl.Value = 'Editado!' - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Listbox' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Optiongroup' - loCtl.Value = 1 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Spinner' - loCtl.Value = 321 - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - CASE loCtl.Baseclass == 'Textbox' - loCtl.Value = 'Editado!' - IF NOT EMPTY(.tag) - REPLACE c_ProgrChg WITH "S" - ENDIF - - OTHERWISE - REPLACE c_ProgrChg WITH "-" - - ENDCASE - - ENDSCAN - ENDWITH - - - CATCH TO loEx - THISFORM.edit1.Value = 'Error ' + TRANSFORM(loEx.ErrorNo) + CHR(13) ; - + loEx.Message + CHR(13) ; - + loEx.Procedure + ', Line ' + TRANSFORM(loEx.LineNo) + CHR(13) ; - + loEx.Details - - FINALLY - IF USED("C_TESTS") - SELECT C_TESTS - GO TOP - ENDIF - - ENDTRY - - ENDPROC - - PROCEDURE pgf.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.checkbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.collection.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.collection.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.collection.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.combobox.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.combobox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.combobox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.combobox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.combobox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.commandbutton.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.commandgroup.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.container.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.container.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.container.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.container.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.control.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.control.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.control.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.control.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.editbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.editbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.editbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.editbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.editbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.hyperlink.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.image.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.image.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.image.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.image.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.label.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.label.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.label.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.label.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.line.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.line.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.line.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.line.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.listbox.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.listbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.listbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.listbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.listbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.option.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.option.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.option.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.option.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.optiongroup.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Activate - THIS.Tag = 'AC' - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Cl_page2.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.Init - this.Cl_page2.Init() - - ENDPROC - - PROCEDURE pgf.Page1.Pageframe1.UIEnable - LPARAMETERS lEnable - - IF lEnable - THISFORM.pgf.Tag = 'UI' - ENDIF - - - ENDPROC - - PROCEDURE pgf.Page1.spinner.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.spinner.ProgrammaticChange - THISFORM.Tag = 'PC' - - - ENDPROC - - PROCEDURE pgf.Page1.spinner.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.spinner.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.spinner.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.textbox.Init - THISFORM.add_control( THIS ) - - ENDPROC - - PROCEDURE pgf.Page1.textbox.ProgrammaticChange - THISFORM.Tag = 'PC' - - ENDPROC - - PROCEDURE pgf.Page1.textbox.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.textbox.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.Page1.textbox.UIEnable - LPARAMETERS lEnable - - IF lEnable - THIS.Tag = 'UI' - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.timer.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.Page1.timer.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - - PROCEDURE pgf.test_aa_access - IF EMPTY(THIS.Tag) - RETURN "ACCESS_OK" - ELSE - RETURN THIS.Tag - ENDIF - - ENDPROC - - PROCEDURE pgf.test_aa_assign - LPARAMETERS vNewVal - - THIS.test_aa = m.vNewVal - THIS.Tag = EVL(m.vNewVal,'') - - ENDPROC - -ENDDEFINE - -DEFINE CLASS f_form_controles AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Label4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Line1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Label4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Line1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Spinner1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Label5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Shape2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Line2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image7" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image8" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image9" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Image10" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Cl_page2.Spinner2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Spinner1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Label5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Shape2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Line2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image7" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image8" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image9" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Image10" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Spinner2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Label4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Line1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Spinner1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Label5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Shape2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Line2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image7" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image8" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image9" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Image10" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_pageframe1.Page2.Spinner2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_label1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_shape1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_line1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_spinner1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_label2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_shape2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_line2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image7" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image8" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image9" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_image10" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_spinner2" UniqueID="" Timestamp="" /> - - AllowOutput = .T. - AlwaysOnBottom = .F. - AlwaysOnTop = .F. - AutoCenter = .F. - BackColor = 192,192,192 - BindControls = .T. - BorderStyle = 3 - BufferMode = 0 - Caption = "Form_y_Controles_Varios_Test" - ClipControls = .T. - Closable = .T. - ColorSource = 4 - Comment = "" - ContinuousScroll = .T. - ControlBox = .T. - DataSession = 1 - DEClass = "cl_dataenvironment" - DEClassLibrary = lib_controles.vcx - DefOleLCID = 0 - Desktop = .F. - Dockable = 0 - DoCreate = .T. - DrawMode = 13 - DrawStyle = 0 - DrawWidth = 1 - Enabled = .T. - FillColor = 0,0,0 - FillStyle = 1 - FontBold = .F. - FontCharSet = 0 - FontCondense = .F. - FontExtend = .F. - FontItalic = .F. - FontName = "Arial" - FontOutline = .F. - FontShadow = .F. - FontSize = 8 - FontStrikethru = .F. - FontUnderline = .F. - ForeColor = 0,0,0 - HalfHeightCaption = .F. - Height = 424 - HelpContextID = 0 - HScrollSmallChange = 10 - Icon = bmps\container.ico - KeyPreview = .F. - Left = 0 - LockScreen = .F. - MacDesktop = 0 - MaxButton = .T. - MaxHeight = -1 - MaxLeft = -1 - MaxTop = -1 - MaxWidth = -1 - MDIForm = .F. - MinButton = .T. - MinHeight = -1 - MinWidth = -1 - MouseIcon = ..\..\ - MousePointer = 0 - Movable = .T. - Name = "F_base1" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - Picture = bmps\fondogris.bmp - RightToLeft = .F. - ScaleMode = 3 - ScrollBars = 0 - ShowInTaskBar = .T. - ShowTips = .F. - ShowWindow = 0 - SizeBox = .F. - TabIndex = 1 - TabStop = .T. - Tag = "" - Themes = .T. - TitleBar = 1 - Top = 0 - Visible = .T. - VScrollSmallChange = 10 - WhatsThisButton = .F. - WhatsThisHelp = .F. - WhatsThisHelpID = -1 - Width = 819 - WindowState = 0 - WindowType = 0 - ZoomBox = .F. - Edit1.Name = "Edit1" - Edit1.RightToLeft = .F. - Label3.Name = "Label3" - Label3.RightToLeft = .F. - Command2.Name = "Command2" - Command2.RightToLeft = .F. - Label1.Caption = "CONTROL NORMAL" - Label1.Name = "Label1" - Label1.RightToLeft = .F. - Label2.Caption = "CONTROL SUBCLASADOS" - Label2.Name = "Label2" - Label2.RightToLeft = .F. - - ADD OBJECT 'Cl_image1' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 16, ; - HelpContextID = 0, ; - Left = 312, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image10' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 496, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image10", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 132, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image2' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 32, ; - HelpContextID = 0, ; - Left = 312, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image3' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 388, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image4' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 52, ; - HelpContextID = 0, ; - Left = 348, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image5' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 388, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 132, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image6' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 420, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image7' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 32, ; - HelpContextID = 0, ; - Left = 420, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image7", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image8' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 496, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image8", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_image9' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 52, ; - HelpContextID = 0, ; - Left = 456, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_image9", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_label1' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 312, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_label1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 40, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'Cl_label2' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 420, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_label2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 40, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'Cl_line1' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Height = 8, ; - HelpContextID = 0, ; - Left = 312, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_line1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 80, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'Cl_line2' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - Height = 8, ; - HelpContextID = 0, ; - Left = 420, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_line2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 80, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'Cl_pageframe1' AS cl_pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = 188, ; - HelpContextID = 0, ; - Left = 292, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_pageframe1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 3, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabOrientation = 0, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 200, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 256, ; - Page1.Name = "Page1", ; - Page2.Name = "Page2", ; - Page3.Caption = "Page3", ; - Page3.Name = "Page3" - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="pageframe" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image1' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 16, ; - HelpContextID = 0, ; - Left = 19, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image10' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 203, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image10", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image2' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 32, ; - HelpContextID = 0, ; - Left = 19, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 88, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image3' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 95, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image4' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 52, ; - HelpContextID = 0, ; - Left = 55, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image5' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 95, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image6' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 127, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image7' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 32, ; - HelpContextID = 0, ; - Left = 127, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image7", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 88, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image8' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 203, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image8", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Image9' AS cl_image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 52, ; - HelpContextID = 0, ; - Left = 163, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image9", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="image" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Label4' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 19, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 8, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Label5' AS cl_label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 127, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 8, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="label" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Line1' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Height = 8, ; - HelpContextID = 0, ; - Left = 19, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 48, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Line2' AS cl_line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - Height = 8, ; - HelpContextID = 0, ; - Left = 127, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 48, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="line" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Shape1' AS cl_shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 19, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Shape2' AS cl_shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 127, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Spinner1' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 19, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 128, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'Cl_pageframe1.Page2.Spinner2' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 127, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 128, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'Cl_shape1' AS cl_shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 312, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 60, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> - - ADD OBJECT 'Cl_shape2' AS cl_shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 420, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_shape2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 60, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="shape" /> - - ADD OBJECT 'Cl_spinner1' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 312, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_spinner1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 160, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'Cl_spinner2' AS cl_spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 420, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_spinner2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 160, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="spinner" /> - - ADD OBJECT 'Image1' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 16, ; - HelpContextID = 0, ; - Left = 44, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image10' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 228, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image10", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 132, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image2' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 32, ; - HelpContextID = 0, ; - Left = 44, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image3' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 120, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image4' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 52, ; - HelpContextID = 0, ; - Left = 80, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image5' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 120, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 132, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image6' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 152, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image7' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 32, ; - HelpContextID = 0, ; - Left = 152, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image7", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 120, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image8' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 228, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image8", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Image9' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 52, ; - HelpContextID = 0, ; - Left = 188, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image9", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Label4' AS label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 44, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 40, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Label5' AS label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 152, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 40, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Line1' AS line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Height = 8, ; - HelpContextID = 0, ; - Left = 44, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 80, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="line" /> - - ADD OBJECT 'Line2' AS line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - Height = 8, ; - HelpContextID = 0, ; - Left = 152, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 80, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="line" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ActivePage = 2, ; - Anchor = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - ErasePage = .T., ; - Height = 189, ; - HelpContextID = 0, ; - Left = 20, ; - MemberClass = "cl_page", ; - MemberClassLibrary = lib_controles.vcx, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Pageframe1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PageCount = 3, ; - RightToLeft = .F., ; - StatusBarText = "", ; - TabOrientation = 0, ; - Tabs = .T., ; - TabStop = .T., ; - TabStretch = 1, ; - TabStyle = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 200, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 256, ; - Cl_page1.Name = "Cl_page1", ; - Cl_page2.Name = "Cl_page2", ; - Cl_page3.Name = "Cl_page3" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image1' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 16, ; - HelpContextID = 0, ; - Left = 23, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image10' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 207, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image10", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image2' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 32, ; - HelpContextID = 0, ; - Left = 23, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 88, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image3' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 99, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image3", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image4' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 52, ; - HelpContextID = 0, ; - Left = 59, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image5' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Height = 20, ; - HelpContextID = 0, ; - Left = 99, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 5, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 100, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image6' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 16, ; - HelpContextID = 0, ; - Left = 131, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image6", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 17 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image7' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 32, ; - HelpContextID = 0, ; - Left = 131, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image7", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - StatusBarText = "", ; - Stretch = 1, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 88, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 32 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image8' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 20, ; - HelpContextID = 0, ; - Left = 207, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image8", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 16 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Image9' AS image WITH ; - Anchor = 0, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 0, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - Height = 52, ; - HelpContextID = 0, ; - Left = 167, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Image9", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RotateFlip = 1, ; - StatusBarText = "", ; - Stretch = 2, ; - Tag = "", ; - Themes = .T., ; - ToolTipText = "", ; - Top = 68, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 36 - *< END OBJECT: BaseClass="image" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Label4' AS label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 23, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label4", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 8, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Label5' AS label WITH ; - Alignment = 0, ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderStyle = 0, ; - Caption = "Label4", ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 131, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Label5", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - RightToLeft = .F., ; - Rotation = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 8, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104, ; - WordWrap = .F. - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Line1' AS line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Height = 8, ; - HelpContextID = 0, ; - Left = 23, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 48, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="line" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Line2' AS line WITH ; - Anchor = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorSource = 4, ; - Comment = "", ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - Height = 8, ; - HelpContextID = 0, ; - Left = 131, ; - LineSlant = "\", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Line2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - StatusBarText = "", ; - Tag = "", ; - ToolTipText = "", ; - Top = 48, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="line" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Shape1' AS shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 23, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Shape2' AS shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 131, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 28, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Spinner1' AS spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 23, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 128, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="spinner" /> - - ADD OBJECT 'Pageframe1.Cl_page2.Spinner2' AS spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 131, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 128, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="spinner" /> - - ADD OBJECT 'Shape1' AS shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 44, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 60, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'Shape2' AS shape WITH ; - Anchor = 0, ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - BorderWidth = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - Curvature = 0, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - DrawMode = 13, ; - Enabled = .F., ; - FillColor = 0,0,0, ; - FillStyle = 1, ; - Height = 17, ; - HelpContextID = 0, ; - Left = 152, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Shape2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - PolyPoints = "", ; - Rotation = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - Style = 0, ; - Tag = "", ; - ToolTipText = "", ; - Top = 60, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 105 - *< END OBJECT: BaseClass="shape" /> - - ADD OBJECT 'Spinner1' AS spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 44, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 160, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="spinner" /> - - ADD OBJECT 'Spinner2' AS spinner WITH ; - Alignment = 1, ; - Anchor = 0, ; - BackColor = 255,255,255, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 24, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Increment = 1.00, ; - InputMask = "", ; - KeyboardHighValue = 2147483647, ; - KeyboardLowValue = -2147483647, ; - Left = 152, ; - Margin = 2, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Spinner2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - ReadOnly = .F., ; - RightToLeft = .F., ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 0, ; - SpinnerHighValue = 2147483647.00, ; - SpinnerLowValue = -2147483647.00, ; - StatusBarText = "", ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 160, ; - Value = 123, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 104 - *< END OBJECT: BaseClass="spinner" /> - -ENDDEFINE - -DEFINE CLASS f_listbox AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.Cl_ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Container1.ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.ListBox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="ListBox1" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Name = "f_listbox" - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "LISTBOX NORMAL" - Label1.Name = "Label1" - Label2.Caption = "LISTBOX SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_ListBox1' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 308, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "Cl_ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'Container1' AS container WITH ; - Height = 97, ; - Left = 28, ; - Name = "Container1", ; - TabIndex = 9, ; - Top = 128, ; - Width = 512 - *< END OBJECT: BaseClass="container" /> - - ADD OBJECT 'Container1.Cl_ListBox1' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 280, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "Cl_ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'Container1.ListBox1' AS listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 8, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 12, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: BaseClass="listbox" /> - - ADD OBJECT 'ListBox1' AS listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 36, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 44, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: BaseClass="listbox" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 137, ; - Left = 28, ; - Name = "Pageframe1", ; - PageCount = 2, ; - TabIndex = 10, ; - Top = 252, ; - Width = 513, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_ListBox1' AS cl_listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 279, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "Cl_ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 6, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="listbox" /> - - ADD OBJECT 'Pageframe1.Page1.ListBox1' AS listbox WITH ; - Anchor = 0, ; - AutoHideScrollbar = 0, ; - BorderColor = 255,255,0, ; - BoundColumn = 2, ; - BoundTo = .F., ; - ColorScheme = 2, ; - ColorSource = 4, ; - ColumnCount = 2, ; - ColumnLines = .T., ; - ColumnWidths = "150,150", ; - Comment = "", ; - ControlSource = "", ; - DisabledBackColor = 0,128,192, ; - DisabledForeColor = 128,0,255, ; - DisabledItemBackColor = 255,255,255, ; - DisabledItemForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - FirstElement = 1, ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 8, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - Height = 60, ; - HelpContextID = 0, ; - IncrementalSearch = .T., ; - IntegralHeight = .F., ; - ItemBackColor = 255,255,255, ; - ItemForeColor = 0,0,0, ; - ItemTips = .F., ; - Left = 7, ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - MoverBars = .F., ; - MultiSelect = .F., ; - Name = "ListBox1", ; - NullDisplay = "", ; - NumberOfElements = 0, ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - Picture = bmps\sobrepostal.bmp, ; - RightToLeft = .F., ; - RowSource = "", ; - RowSourceType = 0, ; - SelectedItemBackColor = 51,153,255, ; - SelectedItemForeColor = 255,255,255, ; - Sorted = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - TabIndex = 11, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 8, ; - Value = , ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 224 - *< END OBJECT: BaseClass="listbox" /> - - PROCEDURE Cl_ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.Cl_ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Container1.ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.Cl_ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - - PROCEDURE Pageframe1.Page1.ListBox1.Init - this.AddListItem('Este es el valor.A1') - this.AddListItem('Este es el valor.A2', this.NewItemId, 2) - this.AddListItem('Este es el valor.B1') - this.AddListItem('Este es el valor.B2', this.NewItemId, 2) - this.AddListItem('Este es el valor.C1') - this.AddListItem('Este es el valor.C2', this.NewItemId, 2) - this.ListIndex = 2 - - ENDPROC - -ENDDEFINE - -DEFINE CLASS f_optiongroup AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_optiongroup2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Cl_optiongroup2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Label2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Optiongroup1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Pageframe1.Page1.Optiongroup2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Optiongroup2" UniqueID="" Timestamp="" /> - - Caption = "OptionGroup_Test" - DoCreate = .T. - Height = 424 - Left = 0 - Name = "f_optiongroup" - Top = 0 - Width = 819 - Edit1.Name = "Edit1" - Edit1.Value = * En los OptionGroup subclasados, cuando el Option de la clase de base tiene Autosize=.T. y la instancia tiene Autosize=.F., ocurre esto: - Los option normales deben mantener su longitud y apariencia nuevos - Los option graficos deben mantener su longitud y apariencia, pero pierden en height (bug de VFP) * En los OptionGroup normales, no hay problemas y se deben mantener igual siempre * RECOMENDACIÓN: No usar Autosize=.T. en una clase de base - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "OPTIONGROUP NORMAL" - Label1.Name = "Label1" - Label2.Caption = "OPTIONGROUP SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_optiongroup1' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackStyle = 0, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ControlSource = "", ; - Height = 76, ; - Left = 296, ; - Name = "Cl_optiongroup1", ; - Top = 24, ; - Value = 2, ; - Width = 248, ; - Option1.Alignment = 0, ; - Option1.Anchor = 0, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 240,240,240, ; - Option1.Caption = "La Opción 1", ; - Option1.ColorScheme = 1, ; - Option1.ColorSource = 4, ; - Option1.Comment = "", ; - Option1.ControlSource = "", ; - Option1.DisabledBackColor = 240,240,240, ; - Option1.DisabledForeColor = 109,109,109, ; - Option1.DisabledPicture = ..\..\, ; - Option1.DownPicture = ..\..\, ; - Option1.DragIcon = ..\..\, ; - Option1.DragMode = 0, ; - Option1.Enabled = .T., ; - Option1.FontBold = .F., ; - Option1.FontCharSet = 0, ; - Option1.FontCondense = .F., ; - Option1.FontExtend = .F., ; - Option1.FontItalic = .F., ; - Option1.FontName = "Arial", ; - Option1.FontOutline = .F., ; - Option1.FontShadow = .F., ; - Option1.FontStrikethru = .F., ; - Option1.FontUnderline = .F., ; - Option1.ForeColor = 0,0,0, ; - Option1.Height = 17, ; - Option1.HelpContextID = 0, ; - Option1.Left = 8, ; - Option1.MouseIcon = ..\..\, ; - Option1.MousePointer = 0, ; - Option1.Name = "Option1", ; - Option1.OLEDragMode = 0, ; - Option1.OLEDragPicture = ..\..\, ; - Option1.OLEDropEffects = 3, ; - Option1.OLEDropMode = 0, ; - Option1.Picture = ..\..\, ; - Option1.PictureMargin = 0, ; - Option1.PicturePosition = 13, ; - Option1.PictureSpacing = 0, ; - Option1.RightToLeft = .F., ; - Option1.SpecialEffect = 0, ; - Option1.StatusBarText = "", ; - Option1.Style = 0, ; - Option1.TabStop = .T., ; - Option1.Tag = "", ; - Option1.TerminateRead = .F., ; - Option1.Themes = .T., ; - Option1.ToolTipText = "", ; - Option1.Top = 4, ; - Option1.Value = 0, ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 84, ; - Option1.WordWrap = .F., ; - Option2.Alignment = 0, ; - Option2.Anchor = 0, ; - Option2.AutoSize = .F., ; - Option2.BackColor = 240,240,240, ; - Option2.Caption = "La opción 2 es más larga", ; - Option2.ColorScheme = 1, ; - Option2.ColorSource = 4, ; - Option2.Comment = "", ; - Option2.ControlSource = "", ; - Option2.DisabledBackColor = 240,240,240, ; - Option2.DisabledForeColor = 109,109,109, ; - Option2.DisabledPicture = ..\..\, ; - Option2.DownPicture = ..\..\, ; - Option2.DragIcon = ..\..\, ; - Option2.DragMode = 0, ; - Option2.Enabled = .T., ; - Option2.FontBold = .F., ; - Option2.FontCharSet = 0, ; - Option2.FontCondense = .F., ; - Option2.FontExtend = .F., ; - Option2.FontItalic = .F., ; - Option2.FontName = "Arial", ; - Option2.FontOutline = .F., ; - Option2.FontShadow = .F., ; - Option2.FontStrikethru = .F., ; - Option2.FontUnderline = .F., ; - Option2.ForeColor = 0,0,0, ; - Option2.Height = 17, ; - Option2.HelpContextID = 0, ; - Option2.Left = 8, ; - Option2.MouseIcon = ..\..\, ; - Option2.MousePointer = 0, ; - Option2.Name = "Option2", ; - Option2.OLEDragMode = 0, ; - Option2.OLEDragPicture = ..\..\, ; - Option2.OLEDropEffects = 3, ; - Option2.OLEDropMode = 0, ; - Option2.Picture = ..\..\, ; - Option2.PictureMargin = 0, ; - Option2.PicturePosition = 13, ; - Option2.PictureSpacing = 0, ; - Option2.RightToLeft = .F., ; - Option2.SpecialEffect = 0, ; - Option2.StatusBarText = "", ; - Option2.Style = 0, ; - Option2.TabStop = .T., ; - Option2.Tag = "", ; - Option2.TerminateRead = .F., ; - Option2.Themes = .T., ; - Option2.ToolTipText = "", ; - Option2.Top = 28, ; - Option2.Value = 1, ; - Option2.WhatsThisHelpID = -1, ; - Option2.Width = 158, ; - Option2.WordWrap = .F., ; - Option3.Alignment = 0, ; - Option3.Anchor = 0, ; - Option3.BackColor = 128,255,128, ; - Option3.Caption = "La opción 3 es la más larga de todas", ; - Option3.ColorScheme = 1, ; - Option3.ColorSource = 4, ; - Option3.Comment = "", ; - Option3.ControlSource = "", ; - Option3.DisabledBackColor = 240,240,240, ; - Option3.DisabledForeColor = 109,109,109, ; - Option3.DisabledPicture = ..\..\, ; - Option3.DownPicture = ..\..\, ; - Option3.DragIcon = ..\..\, ; - Option3.DragMode = 0, ; - Option3.Enabled = .T., ; - Option3.FontBold = .F., ; - Option3.FontCharSet = 0, ; - Option3.FontCondense = .F., ; - Option3.FontExtend = .F., ; - Option3.FontItalic = .F., ; - Option3.FontName = "Arial", ; - Option3.FontOutline = .F., ; - Option3.FontShadow = .F., ; - Option3.FontStrikethru = .F., ; - Option3.FontUnderline = .F., ; - Option3.ForeColor = 0,0,0, ; - Option3.Height = 17, ; - Option3.HelpContextID = 0, ; - Option3.Left = 8, ; - Option3.MouseIcon = ..\..\, ; - Option3.MousePointer = 0, ; - Option3.Name = "Option3", ; - Option3.OLEDragMode = 0, ; - Option3.OLEDragPicture = ..\..\, ; - Option3.OLEDropEffects = 3, ; - Option3.OLEDropMode = 0, ; - Option3.Picture = ..\..\, ; - Option3.PictureMargin = 0, ; - Option3.PicturePosition = 13, ; - Option3.PictureSpacing = 0, ; - Option3.RightToLeft = .F., ; - Option3.SpecialEffect = 0, ; - Option3.StatusBarText = "", ; - Option3.Style = 0, ; - Option3.TabStop = .T., ; - Option3.Tag = "", ; - Option3.TerminateRead = .F., ; - Option3.Themes = .T., ; - Option3.ToolTipText = "", ; - Option3.Top = 52, ; - Option3.Value = 0, ; - Option3.WhatsThisHelpID = -1, ; - Option3.Width = 222, ; - Option3.WordWrap = .F. - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'Cl_optiongroup2' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackStyle = 1, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ControlSource = "", ; - Height = 76, ; - Left = 296, ; - Name = "Cl_optiongroup2", ; - Top = 112, ; - Value = 2, ; - Width = 248, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 240,240,240, ; - Option1.Caption = "La Opción 1", ; - Option1.FontBold = .F., ; - Option1.Height = 27, ; - Option1.Left = 8, ; - Option1.Name = "Option1", ; - Option1.SpecialEffect = 0, ; - Option1.Style = 1, ; - Option1.Top = 4, ; - Option1.Value = 0, ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 84, ; - Option2.AutoSize = .F., ; - Option2.BackColor = 240,240,240, ; - Option2.Caption = "La opción 2 es más larga", ; - Option2.FontBold = .F., ; - Option2.Height = 27, ; - Option2.Left = 8, ; - Option2.Name = "Option2", ; - Option2.SpecialEffect = 0, ; - Option2.Style = 1, ; - Option2.Top = 28, ; - Option2.Value = 1, ; - Option2.WhatsThisHelpID = -1, ; - Option2.Width = 158, ; - Option3.AutoSize = .F., ; - Option3.BackColor = 128,255,128, ; - Option3.Caption = "La opción 3 es la más larga de todas", ; - Option3.FontBold = .F., ; - Option3.Height = 21, ; - Option3.Left = 8, ; - Option3.Name = "Option3", ; - Option3.SpecialEffect = 0, ; - Option3.Style = 1, ; - Option3.Top = 52, ; - Option3.WhatsThisHelpID = -1, ; - Option3.Width = 222 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'Optiongroup1' AS optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 24, ; - MemberClass = "cl_option", ; - MemberClassLibrary = lib_controles.vcx, ; - MousePointer = 0, ; - Name = "Optiongroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 24, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 248, ; - Cl_option1.Alignment = 0, ; - Cl_option1.Anchor = 0, ; - Cl_option1.AutoSize = .F., ; - Cl_option1.BackColor = 240,240,240, ; - Cl_option1.BackStyle = 1, ; - Cl_option1.Caption = "La opción 1", ; - Cl_option1.ColorScheme = 1, ; - Cl_option1.ColorSource = 4, ; - Cl_option1.Comment = "", ; - Cl_option1.ControlSource = "", ; - Cl_option1.DisabledBackColor = 0,128,192, ; - Cl_option1.DisabledForeColor = 128,0,255, ; - Cl_option1.DisabledPicture = bmps\treeview.bmp, ; - Cl_option1.DownPicture = ..\..\, ; - Cl_option1.DragIcon = ..\..\, ; - Cl_option1.DragMode = 0, ; - Cl_option1.Enabled = .T., ; - Cl_option1.FontBold = .F., ; - Cl_option1.FontCharSet = 0, ; - Cl_option1.FontCondense = .F., ; - Cl_option1.FontExtend = .F., ; - Cl_option1.FontItalic = .F., ; - Cl_option1.FontName = "Arial", ; - Cl_option1.FontOutline = .F., ; - Cl_option1.FontShadow = .F., ; - Cl_option1.FontSize = 8, ; - Cl_option1.FontStrikethru = .F., ; - Cl_option1.FontUnderline = .F., ; - Cl_option1.ForeColor = 0,0,0, ; - Cl_option1.Height = 16, ; - Cl_option1.HelpContextID = 0, ; - Cl_option1.Left = 16, ; - Cl_option1.MouseIcon = ..\..\, ; - Cl_option1.MousePointer = 0, ; - Cl_option1.Name = "Cl_option1", ; - Cl_option1.OLEDragMode = 0, ; - Cl_option1.OLEDragPicture = ..\..\, ; - Cl_option1.OLEDropEffects = 3, ; - Cl_option1.OLEDropMode = 0, ; - Cl_option1.Picture = bmps\sobrepostal.bmp, ; - Cl_option1.PictureMargin = 0, ; - Cl_option1.PicturePosition = 4, ; - Cl_option1.PictureSpacing = 0, ; - Cl_option1.RightToLeft = .F., ; - Cl_option1.SpecialEffect = 0, ; - Cl_option1.StatusBarText = "", ; - Cl_option1.Style = 0, ; - Cl_option1.TabStop = .T., ; - Cl_option1.Tag = "", ; - Cl_option1.TerminateRead = .F., ; - Cl_option1.Themes = .T., ; - Cl_option1.ToolTipText = "", ; - Cl_option1.Top = 4, ; - Cl_option1.Visible = .T., ; - Cl_option1.WhatsThisHelpID = -1, ; - Cl_option1.Width = 74, ; - Cl_option1.WordWrap = .F., ; - Cl_option2.Alignment = 0, ; - Cl_option2.Anchor = 0, ; - Cl_option2.BackColor = 240,240,240, ; - Cl_option2.BackStyle = 1, ; - Cl_option2.Caption = "La opción 2 es más larga", ; - Cl_option2.ColorScheme = 1, ; - Cl_option2.ColorSource = 4, ; - Cl_option2.Comment = "", ; - Cl_option2.ControlSource = "", ; - Cl_option2.DisabledBackColor = 0,128,192, ; - Cl_option2.DisabledForeColor = 128,0,255, ; - Cl_option2.DisabledPicture = bmps\treeview.bmp, ; - Cl_option2.DownPicture = ..\..\, ; - Cl_option2.DragIcon = ..\..\, ; - Cl_option2.DragMode = 0, ; - Cl_option2.Enabled = .T., ; - Cl_option2.FontBold = .F., ; - Cl_option2.FontCharSet = 0, ; - Cl_option2.FontCondense = .F., ; - Cl_option2.FontExtend = .F., ; - Cl_option2.FontItalic = .F., ; - Cl_option2.FontName = "Arial", ; - Cl_option2.FontOutline = .F., ; - Cl_option2.FontShadow = .F., ; - Cl_option2.FontSize = 8, ; - Cl_option2.FontStrikethru = .F., ; - Cl_option2.FontUnderline = .F., ; - Cl_option2.ForeColor = 0,0,0, ; - Cl_option2.HelpContextID = 0, ; - Cl_option2.Left = 16, ; - Cl_option2.MouseIcon = ..\..\, ; - Cl_option2.MousePointer = 0, ; - Cl_option2.Name = "Cl_option2", ; - Cl_option2.OLEDragMode = 0, ; - Cl_option2.OLEDragPicture = ..\..\, ; - Cl_option2.OLEDropEffects = 3, ; - Cl_option2.OLEDropMode = 0, ; - Cl_option2.Picture = bmps\sobrepostal.bmp, ; - Cl_option2.PictureMargin = 0, ; - Cl_option2.PicturePosition = 4, ; - Cl_option2.PictureSpacing = 0, ; - Cl_option2.RightToLeft = .F., ; - Cl_option2.SpecialEffect = 0, ; - Cl_option2.StatusBarText = "", ; - Cl_option2.Style = 0, ; - Cl_option2.TabStop = .T., ; - Cl_option2.Tag = "", ; - Cl_option2.TerminateRead = .F., ; - Cl_option2.Themes = .T., ; - Cl_option2.ToolTipText = "", ; - Cl_option2.Top = 28, ; - Cl_option2.Value = 1, ; - Cl_option2.Visible = .T., ; - Cl_option2.WhatsThisHelpID = -1, ; - Cl_option2.WordWrap = .F., ; - Cl_option3.Alignment = 0, ; - Cl_option3.Anchor = 0, ; - Cl_option3.AutoSize = .F., ; - Cl_option3.BackColor = 240,240,240, ; - Cl_option3.BackStyle = 1, ; - Cl_option3.Caption = "La opción 3 es la más larga de todas", ; - Cl_option3.ColorScheme = 1, ; - Cl_option3.ColorSource = 4, ; - Cl_option3.Comment = "", ; - Cl_option3.ControlSource = "", ; - Cl_option3.DisabledBackColor = 0,128,192, ; - Cl_option3.DisabledForeColor = 128,0,255, ; - Cl_option3.DisabledPicture = bmps\treeview.bmp, ; - Cl_option3.DownPicture = ..\..\, ; - Cl_option3.DragIcon = ..\..\, ; - Cl_option3.DragMode = 0, ; - Cl_option3.Enabled = .F., ; - Cl_option3.FontBold = .F., ; - Cl_option3.FontCharSet = 0, ; - Cl_option3.FontCondense = .F., ; - Cl_option3.FontExtend = .F., ; - Cl_option3.FontItalic = .F., ; - Cl_option3.FontName = "Arial", ; - Cl_option3.FontOutline = .F., ; - Cl_option3.FontShadow = .F., ; - Cl_option3.FontSize = 8, ; - Cl_option3.FontStrikethru = .F., ; - Cl_option3.FontUnderline = .F., ; - Cl_option3.ForeColor = 0,0,0, ; - Cl_option3.HelpContextID = 0, ; - Cl_option3.Left = 16, ; - Cl_option3.MouseIcon = ..\..\, ; - Cl_option3.MousePointer = 0, ; - Cl_option3.Name = "Cl_option3", ; - Cl_option3.OLEDragMode = 0, ; - Cl_option3.OLEDragPicture = ..\..\, ; - Cl_option3.OLEDropEffects = 3, ; - Cl_option3.OLEDropMode = 0, ; - Cl_option3.Picture = bmps\sobrepostal.bmp, ; - Cl_option3.PictureMargin = 0, ; - Cl_option3.PicturePosition = 4, ; - Cl_option3.PictureSpacing = 0, ; - Cl_option3.RightToLeft = .F., ; - Cl_option3.SpecialEffect = 0, ; - Cl_option3.StatusBarText = "", ; - Cl_option3.Style = 0, ; - Cl_option3.TabStop = .T., ; - Cl_option3.Tag = "", ; - Cl_option3.TerminateRead = .F., ; - Cl_option3.Themes = .T., ; - Cl_option3.ToolTipText = "", ; - Cl_option3.Top = 52, ; - Cl_option3.Visible = .T., ; - Cl_option3.WhatsThisHelpID = -1, ; - Cl_option3.WordWrap = .F. - *< END OBJECT: BaseClass="optiongroup" /> - - ADD OBJECT 'Optiongroup2' AS optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 24, ; - MemberClass = "cl_option", ; - MemberClassLibrary = lib_controles.vcx, ; - MousePointer = 0, ; - Name = "Optiongroup2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 112, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 248, ; - Cl_option1.Alignment = 0, ; - Cl_option1.Anchor = 0, ; - Cl_option1.AutoSize = .F., ; - Cl_option1.BackColor = 240,240,240, ; - Cl_option1.BackStyle = 1, ; - Cl_option1.Caption = "La opción 1", ; - Cl_option1.ColorScheme = 1, ; - Cl_option1.ColorSource = 4, ; - Cl_option1.Comment = "", ; - Cl_option1.ControlSource = "", ; - Cl_option1.DisabledBackColor = 0,128,192, ; - Cl_option1.DisabledForeColor = 128,0,255, ; - Cl_option1.DisabledPicture = bmps\treeview.bmp, ; - Cl_option1.DownPicture = ..\..\, ; - Cl_option1.DragIcon = ..\..\, ; - Cl_option1.DragMode = 0, ; - Cl_option1.Enabled = .T., ; - Cl_option1.FontBold = .F., ; - Cl_option1.FontCharSet = 0, ; - Cl_option1.FontCondense = .F., ; - Cl_option1.FontExtend = .F., ; - Cl_option1.FontItalic = .F., ; - Cl_option1.FontName = "Arial", ; - Cl_option1.FontOutline = .F., ; - Cl_option1.FontShadow = .F., ; - Cl_option1.FontSize = 8, ; - Cl_option1.FontStrikethru = .F., ; - Cl_option1.FontUnderline = .F., ; - Cl_option1.ForeColor = 0,0,0, ; - Cl_option1.Height = 41, ; - Cl_option1.HelpContextID = 0, ; - Cl_option1.Left = 16, ; - Cl_option1.MouseIcon = ..\..\, ; - Cl_option1.MousePointer = 0, ; - Cl_option1.Name = "Cl_option1", ; - Cl_option1.OLEDragMode = 0, ; - Cl_option1.OLEDragPicture = ..\..\, ; - Cl_option1.OLEDropEffects = 3, ; - Cl_option1.OLEDropMode = 0, ; - Cl_option1.Picture = bmps\sobrepostal.bmp, ; - Cl_option1.PictureMargin = 0, ; - Cl_option1.PicturePosition = 4, ; - Cl_option1.PictureSpacing = 0, ; - Cl_option1.RightToLeft = .F., ; - Cl_option1.SpecialEffect = 0, ; - Cl_option1.StatusBarText = "", ; - Cl_option1.Style = 1, ; - Cl_option1.TabStop = .T., ; - Cl_option1.Tag = "", ; - Cl_option1.TerminateRead = .F., ; - Cl_option1.Themes = .T., ; - Cl_option1.ToolTipText = "", ; - Cl_option1.Top = 4, ; - Cl_option1.Visible = .T., ; - Cl_option1.WhatsThisHelpID = -1, ; - Cl_option1.Width = 89, ; - Cl_option1.WordWrap = .F., ; - Cl_option2.Alignment = 0, ; - Cl_option2.Anchor = 0, ; - Cl_option2.BackColor = 240,240,240, ; - Cl_option2.BackStyle = 1, ; - Cl_option2.Caption = "La opción 2 es más larga", ; - Cl_option2.ColorScheme = 1, ; - Cl_option2.ColorSource = 4, ; - Cl_option2.Comment = "", ; - Cl_option2.ControlSource = "", ; - Cl_option2.DisabledBackColor = 0,128,192, ; - Cl_option2.DisabledForeColor = 128,0,255, ; - Cl_option2.DisabledPicture = bmps\treeview.bmp, ; - Cl_option2.DownPicture = ..\..\, ; - Cl_option2.DragIcon = ..\..\, ; - Cl_option2.DragMode = 0, ; - Cl_option2.Enabled = .T., ; - Cl_option2.FontBold = .F., ; - Cl_option2.FontCharSet = 0, ; - Cl_option2.FontCondense = .F., ; - Cl_option2.FontExtend = .F., ; - Cl_option2.FontItalic = .F., ; - Cl_option2.FontName = "Arial", ; - Cl_option2.FontOutline = .F., ; - Cl_option2.FontShadow = .F., ; - Cl_option2.FontSize = 8, ; - Cl_option2.FontStrikethru = .F., ; - Cl_option2.FontUnderline = .F., ; - Cl_option2.ForeColor = 0,0,0, ; - Cl_option2.Height = 41, ; - Cl_option2.HelpContextID = 0, ; - Cl_option2.Left = 16, ; - Cl_option2.MouseIcon = ..\..\, ; - Cl_option2.MousePointer = 0, ; - Cl_option2.Name = "Cl_option2", ; - Cl_option2.OLEDragMode = 0, ; - Cl_option2.OLEDragPicture = ..\..\, ; - Cl_option2.OLEDropEffects = 3, ; - Cl_option2.OLEDropMode = 0, ; - Cl_option2.Picture = bmps\sobrepostal.bmp, ; - Cl_option2.PictureMargin = 0, ; - Cl_option2.PicturePosition = 4, ; - Cl_option2.PictureSpacing = 0, ; - Cl_option2.RightToLeft = .F., ; - Cl_option2.SpecialEffect = 0, ; - Cl_option2.StatusBarText = "", ; - Cl_option2.Style = 1, ; - Cl_option2.TabStop = .T., ; - Cl_option2.Tag = "", ; - Cl_option2.TerminateRead = .F., ; - Cl_option2.Themes = .T., ; - Cl_option2.ToolTipText = "", ; - Cl_option2.Top = 28, ; - Cl_option2.Value = 1, ; - Cl_option2.Visible = .T., ; - Cl_option2.WhatsThisHelpID = -1, ; - Cl_option2.WordWrap = .F., ; - Cl_option3.Alignment = 0, ; - Cl_option3.Anchor = 0, ; - Cl_option3.AutoSize = .F., ; - Cl_option3.BackColor = 240,240,240, ; - Cl_option3.BackStyle = 1, ; - Cl_option3.Caption = "La opción 3 es la más larga de todas", ; - Cl_option3.ColorScheme = 1, ; - Cl_option3.ColorSource = 4, ; - Cl_option3.Comment = "", ; - Cl_option3.ControlSource = "", ; - Cl_option3.DisabledBackColor = 0,128,192, ; - Cl_option3.DisabledForeColor = 128,0,255, ; - Cl_option3.DisabledPicture = bmps\treeview.bmp, ; - Cl_option3.DownPicture = ..\..\, ; - Cl_option3.DragIcon = ..\..\, ; - Cl_option3.DragMode = 0, ; - Cl_option3.Enabled = .F., ; - Cl_option3.FontBold = .F., ; - Cl_option3.FontCharSet = 0, ; - Cl_option3.FontCondense = .F., ; - Cl_option3.FontExtend = .F., ; - Cl_option3.FontItalic = .F., ; - Cl_option3.FontName = "Arial", ; - Cl_option3.FontOutline = .F., ; - Cl_option3.FontShadow = .F., ; - Cl_option3.FontSize = 8, ; - Cl_option3.FontStrikethru = .F., ; - Cl_option3.FontUnderline = .F., ; - Cl_option3.ForeColor = 0,0,0, ; - Cl_option3.Height = 41, ; - Cl_option3.HelpContextID = 0, ; - Cl_option3.Left = 16, ; - Cl_option3.MouseIcon = ..\..\, ; - Cl_option3.MousePointer = 0, ; - Cl_option3.Name = "Cl_option3", ; - Cl_option3.OLEDragMode = 0, ; - Cl_option3.OLEDragPicture = ..\..\, ; - Cl_option3.OLEDropEffects = 3, ; - Cl_option3.OLEDropMode = 0, ; - Cl_option3.Picture = bmps\sobrepostal.bmp, ; - Cl_option3.PictureMargin = 0, ; - Cl_option3.PicturePosition = 4, ; - Cl_option3.PictureSpacing = 0, ; - Cl_option3.RightToLeft = .F., ; - Cl_option3.SpecialEffect = 0, ; - Cl_option3.StatusBarText = "", ; - Cl_option3.Style = 1, ; - Cl_option3.TabStop = .T., ; - Cl_option3.Tag = "", ; - Cl_option3.TerminateRead = .F., ; - Cl_option3.Themes = .T., ; - Cl_option3.ToolTipText = "", ; - Cl_option3.Top = 52, ; - Cl_option3.Visible = .T., ; - Cl_option3.WhatsThisHelpID = -1, ; - Cl_option3.WordWrap = .F. - *< END OBJECT: BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1' AS pageframe WITH ; - ErasePage = .T., ; - Height = 245, ; - Left = 8, ; - Name = "Pageframe1", ; - PageCount = 2, ; - Top = 200, ; - Width = 553, ; - Page1.Caption = "Page1", ; - Page1.Name = "Page1", ; - Page2.Caption = "Page2", ; - Page2.Name = "Page2" - *< END OBJECT: BaseClass="pageframe" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_optiongroup1' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackStyle = 0, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ControlSource = "", ; - Height = 76, ; - Left = 287, ; - Name = "Cl_optiongroup1", ; - Top = 24, ; - Value = 2, ; - Width = 248, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 240,240,240, ; - Option1.Caption = "La Opción 1", ; - Option1.FontBold = .F., ; - Option1.Height = 17, ; - Option1.Left = 8, ; - Option1.Name = "Option1", ; - Option1.SpecialEffect = 0, ; - Option1.Style = 0, ; - Option1.Top = 8, ; - Option1.Value = 0, ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 84, ; - Option2.AutoSize = .F., ; - Option2.BackColor = 240,240,240, ; - Option2.Caption = "La opción 2 es más larga", ; - Option2.FontBold = .F., ; - Option2.Height = 17, ; - Option2.Left = 8, ; - Option2.Name = "Option2", ; - Option2.SpecialEffect = 0, ; - Option2.Style = 0, ; - Option2.Top = 32, ; - Option2.Value = 1, ; - Option2.WhatsThisHelpID = -1, ; - Option2.Width = 158, ; - Option3.BackColor = 128,255,128, ; - Option3.Caption = "La opción 3 es la más larga de todas", ; - Option3.FontBold = .F., ; - Option3.Height = 17, ; - Option3.Left = 8, ; - Option3.Name = "Option3", ; - Option3.SpecialEffect = 0, ; - Option3.Style = 0, ; - Option3.Top = 56, ; - Option3.Value = 0, ; - Option3.WhatsThisHelpID = -1, ; - Option3.Width = 222 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1.Page1.Cl_optiongroup2' AS cl_optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackStyle = 1, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ControlSource = "", ; - Height = 76, ; - Left = 287, ; - Name = "Cl_optiongroup2", ; - Top = 112, ; - Value = 2, ; - Width = 248, ; - Option1.AutoSize = .F., ; - Option1.BackColor = 240,240,240, ; - Option1.Caption = "La Opción 1", ; - Option1.FontBold = .F., ; - Option1.Height = 27, ; - Option1.Left = 8, ; - Option1.Name = "Option1", ; - Option1.SpecialEffect = 0, ; - Option1.Style = 1, ; - Option1.Top = 4, ; - Option1.Value = 0, ; - Option1.WhatsThisHelpID = -1, ; - Option1.Width = 84, ; - Option2.AutoSize = .F., ; - Option2.BackColor = 240,240,240, ; - Option2.Caption = "La opción 2 es más larga", ; - Option2.FontBold = .F., ; - Option2.Height = 27, ; - Option2.Left = 8, ; - Option2.Name = "Option2", ; - Option2.SpecialEffect = 0, ; - Option2.Style = 1, ; - Option2.Top = 28, ; - Option2.Value = 1, ; - Option2.WhatsThisHelpID = -1, ; - Option2.Width = 158, ; - Option3.AutoSize = .F., ; - Option3.BackColor = 128,255,128, ; - Option3.Caption = "La opción 3 es la más larga de todas", ; - Option3.FontBold = .F., ; - Option3.Height = 21, ; - Option3.Left = 8, ; - Option3.Name = "Option3", ; - Option3.SpecialEffect = 0, ; - Option3.Style = 1, ; - Option3.Top = 52, ; - Option3.WhatsThisHelpID = -1, ; - Option3.Width = 222 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1.Page1.Label2' AS label WITH ; - Caption = "OPTIONGROUP SUBCLASADOS", ; - FontBold = .T., ; - Height = 17, ; - Left = 287, ; - Name = "Label2", ; - Top = 8, ; - Width = 248 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'Pageframe1.Page1.Optiongroup1' AS optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 0, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 24, ; - MemberClass = "cl_option", ; - MemberClassLibrary = lib_controles.vcx, ; - MousePointer = 0, ; - Name = "Optiongroup1", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 24, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 248, ; - Cl_option1.Alignment = 0, ; - Cl_option1.Anchor = 0, ; - Cl_option1.AutoSize = .F., ; - Cl_option1.BackColor = 240,240,240, ; - Cl_option1.BackStyle = 1, ; - Cl_option1.Caption = "La opción 1", ; - Cl_option1.ColorScheme = 1, ; - Cl_option1.ColorSource = 4, ; - Cl_option1.Comment = "", ; - Cl_option1.ControlSource = "", ; - Cl_option1.DisabledBackColor = 0,128,192, ; - Cl_option1.DisabledForeColor = 128,0,255, ; - Cl_option1.DisabledPicture = bmps\treeview.bmp, ; - Cl_option1.DownPicture = ..\..\, ; - Cl_option1.DragIcon = ..\..\, ; - Cl_option1.DragMode = 0, ; - Cl_option1.Enabled = .T., ; - Cl_option1.FontBold = .F., ; - Cl_option1.FontCharSet = 0, ; - Cl_option1.FontCondense = .F., ; - Cl_option1.FontExtend = .F., ; - Cl_option1.FontItalic = .F., ; - Cl_option1.FontName = "Arial", ; - Cl_option1.FontOutline = .F., ; - Cl_option1.FontShadow = .F., ; - Cl_option1.FontSize = 8, ; - Cl_option1.FontStrikethru = .F., ; - Cl_option1.FontUnderline = .F., ; - Cl_option1.ForeColor = 0,0,0, ; - Cl_option1.Height = 16, ; - Cl_option1.HelpContextID = 0, ; - Cl_option1.Left = 16, ; - Cl_option1.MouseIcon = ..\..\, ; - Cl_option1.MousePointer = 0, ; - Cl_option1.Name = "Cl_option1", ; - Cl_option1.OLEDragMode = 0, ; - Cl_option1.OLEDragPicture = ..\..\, ; - Cl_option1.OLEDropEffects = 3, ; - Cl_option1.OLEDropMode = 0, ; - Cl_option1.Picture = bmps\sobrepostal.bmp, ; - Cl_option1.PictureMargin = 0, ; - Cl_option1.PicturePosition = 4, ; - Cl_option1.PictureSpacing = 0, ; - Cl_option1.RightToLeft = .F., ; - Cl_option1.SpecialEffect = 0, ; - Cl_option1.StatusBarText = "", ; - Cl_option1.Style = 0, ; - Cl_option1.TabStop = .T., ; - Cl_option1.Tag = "", ; - Cl_option1.TerminateRead = .F., ; - Cl_option1.Themes = .T., ; - Cl_option1.ToolTipText = "", ; - Cl_option1.Top = 4, ; - Cl_option1.Visible = .T., ; - Cl_option1.WhatsThisHelpID = -1, ; - Cl_option1.Width = 74, ; - Cl_option1.WordWrap = .F., ; - Cl_option2.Alignment = 0, ; - Cl_option2.Anchor = 0, ; - Cl_option2.BackColor = 240,240,240, ; - Cl_option2.BackStyle = 1, ; - Cl_option2.Caption = "La opción 2 es más larga", ; - Cl_option2.ColorScheme = 1, ; - Cl_option2.ColorSource = 4, ; - Cl_option2.Comment = "", ; - Cl_option2.ControlSource = "", ; - Cl_option2.DisabledBackColor = 0,128,192, ; - Cl_option2.DisabledForeColor = 128,0,255, ; - Cl_option2.DisabledPicture = bmps\treeview.bmp, ; - Cl_option2.DownPicture = ..\..\, ; - Cl_option2.DragIcon = ..\..\, ; - Cl_option2.DragMode = 0, ; - Cl_option2.Enabled = .T., ; - Cl_option2.FontBold = .F., ; - Cl_option2.FontCharSet = 0, ; - Cl_option2.FontCondense = .F., ; - Cl_option2.FontExtend = .F., ; - Cl_option2.FontItalic = .F., ; - Cl_option2.FontName = "Arial", ; - Cl_option2.FontOutline = .F., ; - Cl_option2.FontShadow = .F., ; - Cl_option2.FontSize = 8, ; - Cl_option2.FontStrikethru = .F., ; - Cl_option2.FontUnderline = .F., ; - Cl_option2.ForeColor = 0,0,0, ; - Cl_option2.HelpContextID = 0, ; - Cl_option2.Left = 16, ; - Cl_option2.MouseIcon = ..\..\, ; - Cl_option2.MousePointer = 0, ; - Cl_option2.Name = "Cl_option2", ; - Cl_option2.OLEDragMode = 0, ; - Cl_option2.OLEDragPicture = ..\..\, ; - Cl_option2.OLEDropEffects = 3, ; - Cl_option2.OLEDropMode = 0, ; - Cl_option2.Picture = bmps\sobrepostal.bmp, ; - Cl_option2.PictureMargin = 0, ; - Cl_option2.PicturePosition = 4, ; - Cl_option2.PictureSpacing = 0, ; - Cl_option2.RightToLeft = .F., ; - Cl_option2.SpecialEffect = 0, ; - Cl_option2.StatusBarText = "", ; - Cl_option2.Style = 0, ; - Cl_option2.TabStop = .T., ; - Cl_option2.Tag = "", ; - Cl_option2.TerminateRead = .F., ; - Cl_option2.Themes = .T., ; - Cl_option2.ToolTipText = "", ; - Cl_option2.Top = 28, ; - Cl_option2.Value = 1, ; - Cl_option2.Visible = .T., ; - Cl_option2.WhatsThisHelpID = -1, ; - Cl_option2.WordWrap = .F., ; - Cl_option3.Alignment = 0, ; - Cl_option3.Anchor = 0, ; - Cl_option3.AutoSize = .F., ; - Cl_option3.BackColor = 240,240,240, ; - Cl_option3.BackStyle = 1, ; - Cl_option3.Caption = "La opción 3 es la más larga de todas", ; - Cl_option3.ColorScheme = 1, ; - Cl_option3.ColorSource = 4, ; - Cl_option3.Comment = "", ; - Cl_option3.ControlSource = "", ; - Cl_option3.DisabledBackColor = 0,128,192, ; - Cl_option3.DisabledForeColor = 128,0,255, ; - Cl_option3.DisabledPicture = bmps\treeview.bmp, ; - Cl_option3.DownPicture = ..\..\, ; - Cl_option3.DragIcon = ..\..\, ; - Cl_option3.DragMode = 0, ; - Cl_option3.Enabled = .F., ; - Cl_option3.FontBold = .F., ; - Cl_option3.FontCharSet = 0, ; - Cl_option3.FontCondense = .F., ; - Cl_option3.FontExtend = .F., ; - Cl_option3.FontItalic = .F., ; - Cl_option3.FontName = "Arial", ; - Cl_option3.FontOutline = .F., ; - Cl_option3.FontShadow = .F., ; - Cl_option3.FontSize = 8, ; - Cl_option3.FontStrikethru = .F., ; - Cl_option3.FontUnderline = .F., ; - Cl_option3.ForeColor = 0,0,0, ; - Cl_option3.HelpContextID = 0, ; - Cl_option3.Left = 16, ; - Cl_option3.MouseIcon = ..\..\, ; - Cl_option3.MousePointer = 0, ; - Cl_option3.Name = "Cl_option3", ; - Cl_option3.OLEDragMode = 0, ; - Cl_option3.OLEDragPicture = ..\..\, ; - Cl_option3.OLEDropEffects = 3, ; - Cl_option3.OLEDropMode = 0, ; - Cl_option3.Picture = bmps\sobrepostal.bmp, ; - Cl_option3.PictureMargin = 0, ; - Cl_option3.PicturePosition = 4, ; - Cl_option3.PictureSpacing = 0, ; - Cl_option3.RightToLeft = .F., ; - Cl_option3.SpecialEffect = 0, ; - Cl_option3.StatusBarText = "", ; - Cl_option3.Style = 0, ; - Cl_option3.TabStop = .T., ; - Cl_option3.Tag = "", ; - Cl_option3.TerminateRead = .F., ; - Cl_option3.Themes = .T., ; - Cl_option3.ToolTipText = "", ; - Cl_option3.Top = 52, ; - Cl_option3.Visible = .T., ; - Cl_option3.WhatsThisHelpID = -1, ; - Cl_option3.WordWrap = .F. - *< END OBJECT: BaseClass="optiongroup" /> - - ADD OBJECT 'Pageframe1.Page1.Optiongroup2' AS optiongroup WITH ; - Anchor = 0, ; - AutoSize = .F., ; - BackColor = 240,240,240, ; - BackStyle = 1, ; - BorderColor = 100,100,100, ; - BorderStyle = 1, ; - ButtonCount = 3, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DragMode = 0, ; - Enabled = .T., ; - Height = 76, ; - HelpContextID = 0, ; - Left = 24, ; - MemberClass = "cl_option", ; - MemberClassLibrary = lib_controles.vcx, ; - MousePointer = 0, ; - Name = "Optiongroup2", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - SpecialEffect = 0, ; - StatusBarText = "", ; - TabIndex = 1, ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .T., ; - ToolTipText = "", ; - Top = 112, ; - Value = 2, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 248, ; - Cl_option1.Alignment = 0, ; - Cl_option1.Anchor = 0, ; - Cl_option1.AutoSize = .F., ; - Cl_option1.BackColor = 240,240,240, ; - Cl_option1.BackStyle = 1, ; - Cl_option1.Caption = "La opción 1", ; - Cl_option1.ColorScheme = 1, ; - Cl_option1.ColorSource = 4, ; - Cl_option1.Comment = "", ; - Cl_option1.ControlSource = "", ; - Cl_option1.DisabledBackColor = 0,128,192, ; - Cl_option1.DisabledForeColor = 128,0,255, ; - Cl_option1.DisabledPicture = bmps\treeview.bmp, ; - Cl_option1.DownPicture = ..\..\, ; - Cl_option1.DragIcon = ..\..\, ; - Cl_option1.DragMode = 0, ; - Cl_option1.Enabled = .T., ; - Cl_option1.FontBold = .F., ; - Cl_option1.FontCharSet = 0, ; - Cl_option1.FontCondense = .F., ; - Cl_option1.FontExtend = .F., ; - Cl_option1.FontItalic = .F., ; - Cl_option1.FontName = "Arial", ; - Cl_option1.FontOutline = .F., ; - Cl_option1.FontShadow = .F., ; - Cl_option1.FontSize = 8, ; - Cl_option1.FontStrikethru = .F., ; - Cl_option1.FontUnderline = .F., ; - Cl_option1.ForeColor = 0,0,0, ; - Cl_option1.Height = 41, ; - Cl_option1.HelpContextID = 0, ; - Cl_option1.Left = 16, ; - Cl_option1.MouseIcon = ..\..\, ; - Cl_option1.MousePointer = 0, ; - Cl_option1.Name = "Cl_option1", ; - Cl_option1.OLEDragMode = 0, ; - Cl_option1.OLEDragPicture = ..\..\, ; - Cl_option1.OLEDropEffects = 3, ; - Cl_option1.OLEDropMode = 0, ; - Cl_option1.Picture = bmps\sobrepostal.bmp, ; - Cl_option1.PictureMargin = 0, ; - Cl_option1.PicturePosition = 4, ; - Cl_option1.PictureSpacing = 0, ; - Cl_option1.RightToLeft = .F., ; - Cl_option1.SpecialEffect = 0, ; - Cl_option1.StatusBarText = "", ; - Cl_option1.Style = 1, ; - Cl_option1.TabStop = .T., ; - Cl_option1.Tag = "", ; - Cl_option1.TerminateRead = .F., ; - Cl_option1.Themes = .T., ; - Cl_option1.ToolTipText = "", ; - Cl_option1.Top = 4, ; - Cl_option1.Visible = .T., ; - Cl_option1.WhatsThisHelpID = -1, ; - Cl_option1.Width = 89, ; - Cl_option1.WordWrap = .F., ; - Cl_option2.Alignment = 0, ; - Cl_option2.Anchor = 0, ; - Cl_option2.BackColor = 240,240,240, ; - Cl_option2.BackStyle = 1, ; - Cl_option2.Caption = "La opción 2 es más larga", ; - Cl_option2.ColorScheme = 1, ; - Cl_option2.ColorSource = 4, ; - Cl_option2.Comment = "", ; - Cl_option2.ControlSource = "", ; - Cl_option2.DisabledBackColor = 0,128,192, ; - Cl_option2.DisabledForeColor = 128,0,255, ; - Cl_option2.DisabledPicture = bmps\treeview.bmp, ; - Cl_option2.DownPicture = ..\..\, ; - Cl_option2.DragIcon = ..\..\, ; - Cl_option2.DragMode = 0, ; - Cl_option2.Enabled = .T., ; - Cl_option2.FontBold = .F., ; - Cl_option2.FontCharSet = 0, ; - Cl_option2.FontCondense = .F., ; - Cl_option2.FontExtend = .F., ; - Cl_option2.FontItalic = .F., ; - Cl_option2.FontName = "Arial", ; - Cl_option2.FontOutline = .F., ; - Cl_option2.FontShadow = .F., ; - Cl_option2.FontSize = 8, ; - Cl_option2.FontStrikethru = .F., ; - Cl_option2.FontUnderline = .F., ; - Cl_option2.ForeColor = 0,0,0, ; - Cl_option2.Height = 41, ; - Cl_option2.HelpContextID = 0, ; - Cl_option2.Left = 16, ; - Cl_option2.MouseIcon = ..\..\, ; - Cl_option2.MousePointer = 0, ; - Cl_option2.Name = "Cl_option2", ; - Cl_option2.OLEDragMode = 0, ; - Cl_option2.OLEDragPicture = ..\..\, ; - Cl_option2.OLEDropEffects = 3, ; - Cl_option2.OLEDropMode = 0, ; - Cl_option2.Picture = bmps\sobrepostal.bmp, ; - Cl_option2.PictureMargin = 0, ; - Cl_option2.PicturePosition = 4, ; - Cl_option2.PictureSpacing = 0, ; - Cl_option2.RightToLeft = .F., ; - Cl_option2.SpecialEffect = 0, ; - Cl_option2.StatusBarText = "", ; - Cl_option2.Style = 1, ; - Cl_option2.TabStop = .T., ; - Cl_option2.Tag = "", ; - Cl_option2.TerminateRead = .F., ; - Cl_option2.Themes = .T., ; - Cl_option2.ToolTipText = "", ; - Cl_option2.Top = 28, ; - Cl_option2.Value = 1, ; - Cl_option2.Visible = .T., ; - Cl_option2.WhatsThisHelpID = -1, ; - Cl_option2.WordWrap = .F., ; - Cl_option3.Alignment = 0, ; - Cl_option3.Anchor = 0, ; - Cl_option3.AutoSize = .F., ; - Cl_option3.BackColor = 240,240,240, ; - Cl_option3.BackStyle = 1, ; - Cl_option3.Caption = "La opción 3 es la más larga de todas", ; - Cl_option3.ColorScheme = 1, ; - Cl_option3.ColorSource = 4, ; - Cl_option3.Comment = "", ; - Cl_option3.ControlSource = "", ; - Cl_option3.DisabledBackColor = 0,128,192, ; - Cl_option3.DisabledForeColor = 128,0,255, ; - Cl_option3.DisabledPicture = bmps\treeview.bmp, ; - Cl_option3.DownPicture = ..\..\, ; - Cl_option3.DragIcon = ..\..\, ; - Cl_option3.DragMode = 0, ; - Cl_option3.Enabled = .F., ; - Cl_option3.FontBold = .F., ; - Cl_option3.FontCharSet = 0, ; - Cl_option3.FontCondense = .F., ; - Cl_option3.FontExtend = .F., ; - Cl_option3.FontItalic = .F., ; - Cl_option3.FontName = "Arial", ; - Cl_option3.FontOutline = .F., ; - Cl_option3.FontShadow = .F., ; - Cl_option3.FontSize = 8, ; - Cl_option3.FontStrikethru = .F., ; - Cl_option3.FontUnderline = .F., ; - Cl_option3.ForeColor = 0,0,0, ; - Cl_option3.Height = 41, ; - Cl_option3.HelpContextID = 0, ; - Cl_option3.Left = 16, ; - Cl_option3.MouseIcon = ..\..\, ; - Cl_option3.MousePointer = 0, ; - Cl_option3.Name = "Cl_option3", ; - Cl_option3.OLEDragMode = 0, ; - Cl_option3.OLEDragPicture = ..\..\, ; - Cl_option3.OLEDropEffects = 3, ; - Cl_option3.OLEDropMode = 0, ; - Cl_option3.Picture = bmps\sobrepostal.bmp, ; - Cl_option3.PictureMargin = 0, ; - Cl_option3.PicturePosition = 4, ; - Cl_option3.PictureSpacing = 0, ; - Cl_option3.RightToLeft = .F., ; - Cl_option3.SpecialEffect = 0, ; - Cl_option3.StatusBarText = "", ; - Cl_option3.Style = 1, ; - Cl_option3.TabStop = .T., ; - Cl_option3.Tag = "", ; - Cl_option3.TerminateRead = .F., ; - Cl_option3.Themes = .T., ; - Cl_option3.ToolTipText = "", ; - Cl_option3.Top = 52, ; - Cl_option3.Visible = .T., ; - Cl_option3.WhatsThisHelpID = -1, ; - Cl_option3.WordWrap = .F. - *< END OBJECT: BaseClass="optiongroup" /> - - PROCEDURE Refresh - DOEVENTS FORCE - this.capturarpantallaabitmap( THISFORM.c_testname ) - - ENDPROC - -ENDDEFINE - -DEFINE CLASS f_textbox AS f_base OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Cl_textbox1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Text1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_textbox2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Text2" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_textbox3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Text3" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_textbox4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Text4" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_textbox5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Text5" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cl_textbox6" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Text6" UniqueID="" Timestamp="" /> - - DoCreate = .T. - Left = 0 - Name = "f_textbox" - Top = 0 - Edit1.Name = "Edit1" - Label3.Name = "Label3" - Command2.Name = "Command2" - Label1.Caption = "TEXTBOX NORMAL" - Label1.Name = "Label1" - Label2.Caption = "TEXTBOX SUBCLASADOS" - Label2.Name = "Label2" - - ADD OBJECT 'Cl_textbox1' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 348, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 64, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Cl_textbox2' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 348, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 96, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Cl_textbox3' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 348, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox3", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 156, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Cl_textbox4' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 348, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox4", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 188, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Cl_textbox5' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 348, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox5", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 252, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Cl_textbox6' AS cl_textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 348, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Cl_textbox6", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 284, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: ClassLib="lib_controles.vcx" BaseClass="textbox" /> - - ADD OBJECT 'Text1' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 84, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text1", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 64, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Text2' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 84, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text2", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 96, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Text3' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 84, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text3", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 156, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Text4' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .F., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 84, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text4", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .F., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 188, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Text5' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 84, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text5", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - ToolTipText = "", ; - Top = 252, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: BaseClass="textbox" /> - - ADD OBJECT 'Text6' AS textbox WITH ; - Alignment = 3, ; - Anchor = 0, ; - AutoComplete = 0, ; - AutoCompSource = "", ; - AutoCompTable = "", ; - BackColor = 255,255,255, ; - BackStyle = 1, ; - BorderColor = 0,128,255, ; - BorderStyle = 1, ; - Century = 1, ; - ColorScheme = 1, ; - ColorSource = 4, ; - Comment = "", ; - ControlSource = "", ; - DateFormat = 0, ; - DateMark = "", ; - DisabledBackColor = 240,240,240, ; - DisabledForeColor = 109,109,109, ; - DragIcon = ..\..\, ; - DragMode = 0, ; - Enabled = .T., ; - EnableHyperlinks = .F., ; - FontBold = .F., ; - FontCharSet = 0, ; - FontCondense = .F., ; - FontExtend = .F., ; - FontItalic = .F., ; - FontName = "Arial", ; - FontOutline = .F., ; - FontShadow = .F., ; - FontSize = 9, ; - FontStrikethru = .F., ; - FontUnderline = .F., ; - ForeColor = 0,0,0, ; - Format = "", ; - Height = 23, ; - HelpContextID = 0, ; - HideSelection = .T., ; - Hours = 0, ; - IMEMode = 0, ; - InputMask = "", ; - IntegralHeight = .F., ; - Left = 84, ; - Margin = 2, ; - MaxLength = 0, ; - MemoWindow = "", ; - MouseIcon = ..\..\, ; - MousePointer = 0, ; - Name = "Text6", ; - NullDisplay = "", ; - OLEDragMode = 0, ; - OLEDragPicture = ..\..\, ; - OLEDropEffects = 3, ; - OLEDropMode = 0, ; - OLEDropTextInsertion = 0, ; - OpenWindow = .F., ; - PasswordChar = "", ; - ReadOnly = .T., ; - RightToLeft = .F., ; - Seconds = 2, ; - SelectedBackColor = 51,153,255, ; - SelectedForeColor = 255,255,255, ; - SelectOnEntry = .F., ; - SpecialEffect = 1, ; - StatusBarText = "", ; - StrictDateEntry = 1, ; - Style = 0, ; - TabStop = .T., ; - Tag = "", ; - TerminateRead = .F., ; - Themes = .F., ; - ToolTipText = "", ; - Top = 284, ; - Value = Un valor cualquiera, ; - Visible = .T., ; - WhatsThisHelpID = -1, ; - Width = 132 - *< END OBJECT: BaseClass="textbox" /> - -ENDDEFINE +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="cl_checkbox" Baseclass="checkbox" /> +*< EXTERNAL_CLASS: Name="cl_collection" Baseclass="collection" /> +*< EXTERNAL_CLASS: Name="cl_combobox" Baseclass="combobox" /> +*< EXTERNAL_CLASS: Name="cl_commandbutton" Baseclass="commandbutton" /> +*< EXTERNAL_CLASS: Name="cl_commandgroup" Baseclass="commandgroup" /> +*< EXTERNAL_CLASS: Name="cl_container" Baseclass="container" /> +*< EXTERNAL_CLASS: Name="cl_control" Baseclass="control" /> +*< EXTERNAL_CLASS: Name="cl_cursor" Baseclass="cursor" /> +*< EXTERNAL_CLASS: Name="cl_cursoradapter" Baseclass="cursoradapter" /> +*< EXTERNAL_CLASS: Name="cl_dataenvironment" Baseclass="dataenvironment" /> +*< EXTERNAL_CLASS: Name="cl_editbox" Baseclass="editbox" /> +*< EXTERNAL_CLASS: Name="cl_grid" Baseclass="grid" /> +*< EXTERNAL_CLASS: Name="cl_hyperlink" Baseclass="hyperlink" /> +*< EXTERNAL_CLASS: Name="cl_image" Baseclass="image" /> +*< EXTERNAL_CLASS: Name="cl_label" Baseclass="label" /> +*< EXTERNAL_CLASS: Name="cl_line" Baseclass="line" /> +*< EXTERNAL_CLASS: Name="cl_listbox" Baseclass="listbox" /> +*< EXTERNAL_CLASS: Name="cl_olebound" Baseclass="oleboundcontrol" /> +*< EXTERNAL_CLASS: Name="cl_option" Baseclass="optionbutton" /> +*< EXTERNAL_CLASS: Name="cl_optiongroup" Baseclass="optiongroup" /> +*< EXTERNAL_CLASS: Name="cl_page" Baseclass="page" /> +*< EXTERNAL_CLASS: Name="cl_pageframe" Baseclass="pageframe" /> +*< EXTERNAL_CLASS: Name="cl_projecthook" Baseclass="projecthook" /> +*< EXTERNAL_CLASS: Name="cl_relation" Baseclass="relation" /> +*< EXTERNAL_CLASS: Name="cl_reportlistener" Baseclass="reportlistener" /> +*< EXTERNAL_CLASS: Name="cl_separator" Baseclass="separator" /> +*< EXTERNAL_CLASS: Name="cl_shape" Baseclass="shape" /> +*< EXTERNAL_CLASS: Name="cl_spinner" Baseclass="spinner" /> +*< EXTERNAL_CLASS: Name="cl_textbox" Baseclass="textbox" /> +*< EXTERNAL_CLASS: Name="cl_timer" Baseclass="timer" /> +*< EXTERNAL_CLASS: Name="cl_toolbar" Baseclass="toolbar" /> +*< EXTERNAL_CLASS: Name="cl_xmladapter" Baseclass="xmladapter" /> +*< EXTERNAL_CLASS: Name="cl_xmlfield" Baseclass="xmlfield" /> +*< EXTERNAL_CLASS: Name="cl_xmltable" Baseclass="xmltable" /> +*< EXTERNAL_CLASS: Name="f_base" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_checkbox" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_combobox" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_commandgroup" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_form_aa" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_form_aa_" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_form_controles" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_listbox" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_optiongroup" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="f_textbox" Baseclass="form" /> + +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/lib_controles2.f_optiongroup2.vc2 b/TESTS/DATOS_READONLY/lib_controles2.f_optiongroup2.vc2 new file mode 100644 index 0000000..590d48a --- /dev/null +++ b/TESTS/DATOS_READONLY/lib_controles2.f_optiongroup2.vc2 @@ -0,0 +1,113 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles2.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS f_optiongroup2 AS cl_optiongroup OF "lib_controles.vcx" + *< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + Anchor = 0 + AutoSize = .F. + BackColor = 240,240,240 + BackStyle = 1 + BorderColor = 100,100,100 + BorderStyle = 1 + ButtonCount = 2 + ColorSource = 4 + Comment = "" + ControlSource = "" + DragIcon = ..\..\ + DragMode = 0 + Enabled = .T. + Height = 46 + HelpContextID = 0 + MemberClassLibrary = ..\..\ + MouseIcon = ..\..\ + MousePointer = 0 + Name = "f_optiongroup2" + OLEDragMode = 0 + OLEDragPicture = ..\..\ + OLEDropEffects = 3 + OLEDropMode = 0 + SpecialEffect = 0 + StatusBarText = "" + TabIndex = 1 + Tag = "" + TerminateRead = .F. + test_aa = .F. + Themes = .T. + ToolTipText = "" + Value = 0 + Visible = .T. + WhatsThisHelpID = -1 + Width = 71 + Option1.Alignment = 0 + Option1.Anchor = 0 + Option1.AutoSize = .T. + Option1.BackColor = 240,240,240 + Option1.BackStyle = 1 + Option1.Caption = "Opt1" + Option1.ColorScheme = 1 + Option1.ColorSource = 4 + Option1.Comment = "" + Option1.ControlSource = "" + Option1.DefHeight = + Option1.DefLeft = + Option1.DefTop = + Option1.DefWidth = + Option1.DisabledBackColor = 240,240,240 + Option1.DisabledForeColor = 109,109,109 + Option1.DisabledPicture = ..\..\ + Option1.DownPicture = ..\..\ + Option1.DragIcon = ..\..\ + Option1.DragMode = 0 + Option1.Enabled = .T. + Option1.FontBold = .F. + Option1.FontCondense = .F. + Option1.FontExtend = .F. + Option1.FontItalic = .F. + Option1.FontName = "Arial" + Option1.FontOutline = .F. + Option1.FontShadow = .F. + Option1.FontSize = 9 + Option1.FontStrikethru = .F. + Option1.FontUnderline = .F. + Option1.ForeColor = 0,0,0 + Option1.Height = (16) + Option1.HelpContextID = 0 + Option1.Left = (5) + Option1.MouseIcon = ..\..\ + Option1.MousePointer = 0 + Option1.Name = "Option1" + Option1.OLEDragMode = 0 + Option1.OLEDragPicture = ..\..\ + Option1.OLEDropEffects = 3 + Option1.OLEDropMode = 0 + Option1.Picture = ..\..\ + Option1.PictureMargin = 0 + Option1.PicturePosition = 13 + Option1.PictureSpacing = 0 + Option1.RightToLeft = .F. + Option1.SpecialEffect = 0 + Option1.StatusBarText = "" + Option1.Style = 0 + Option1.TabIndex = 1 + Option1.TabStop = .T. + Option1.Tag = "" + Option1.TerminateRead = .F. + Option1.Themes = .T. + Option1.ToolTipText = "" + Option1.Top = (5) + Option1.Value = 0 + Option1.Visible = .T. + Option1.WhatsThisHelpID = -1 + Option1.Width = (47) + Option1.WordWrap = .F. + Option2.Left = 5 + Option2.Name = "Option2" + Option2.Top = 24 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/lib_controles2.vc2 b/TESTS/DATOS_READONLY/lib_controles2.vc2 index 499814a..471f875 100644 --- a/TESTS/DATOS_READONLY/lib_controles2.vc2 +++ b/TESTS/DATOS_READONLY/lib_controles2.vc2 @@ -4,109 +4,7 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="lib_controles2.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS f_optiongroup2 AS cl_optiongroup OF "lib_controles.vcx" - *< CLASSDATA: Baseclass="optiongroup" Timestamp="" Scale="Pixels" Uniqueid="" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="f_optiongroup2" Baseclass="optiongroup" /> - Anchor = 0 - AutoSize = .F. - BackColor = 240,240,240 - BackStyle = 1 - BorderColor = 100,100,100 - BorderStyle = 1 - ButtonCount = 2 - ColorSource = 4 - Comment = "" - ControlSource = "" - DragIcon = ..\..\ - DragMode = 0 - Enabled = .T. - Height = 46 - HelpContextID = 0 - MemberClassLibrary = ..\..\ - MouseIcon = ..\..\ - MousePointer = 0 - Name = "f_optiongroup2" - OLEDragMode = 0 - OLEDragPicture = ..\..\ - OLEDropEffects = 3 - OLEDropMode = 0 - SpecialEffect = 0 - StatusBarText = "" - TabIndex = 1 - Tag = "" - TerminateRead = .F. - test_aa = .F. - Themes = .T. - ToolTipText = "" - Value = 0 - Visible = .T. - WhatsThisHelpID = -1 - Width = 71 - Option1.Alignment = 0 - Option1.Anchor = 0 - Option1.AutoSize = .T. - Option1.BackColor = 240,240,240 - Option1.BackStyle = 1 - Option1.Caption = "Opt1" - Option1.ColorScheme = 1 - Option1.ColorSource = 4 - Option1.Comment = "" - Option1.ControlSource = "" - Option1.DefHeight = - Option1.DefLeft = - Option1.DefTop = - Option1.DefWidth = - Option1.DisabledBackColor = 240,240,240 - Option1.DisabledForeColor = 109,109,109 - Option1.DisabledPicture = ..\..\ - Option1.DownPicture = ..\..\ - Option1.DragIcon = ..\..\ - Option1.DragMode = 0 - Option1.Enabled = .T. - Option1.FontBold = .F. - Option1.FontCondense = .F. - Option1.FontExtend = .F. - Option1.FontItalic = .F. - Option1.FontName = "Arial" - Option1.FontOutline = .F. - Option1.FontShadow = .F. - Option1.FontSize = 9 - Option1.FontStrikethru = .F. - Option1.FontUnderline = .F. - Option1.ForeColor = 0,0,0 - Option1.Height = (16) - Option1.HelpContextID = 0 - Option1.Left = (5) - Option1.MouseIcon = ..\..\ - Option1.MousePointer = 0 - Option1.Name = "Option1" - Option1.OLEDragMode = 0 - Option1.OLEDragPicture = ..\..\ - Option1.OLEDropEffects = 3 - Option1.OLEDropMode = 0 - Option1.Picture = ..\..\ - Option1.PictureMargin = 0 - Option1.PicturePosition = 13 - Option1.PictureSpacing = 0 - Option1.RightToLeft = .F. - Option1.SpecialEffect = 0 - Option1.StatusBarText = "" - Option1.Style = 0 - Option1.TabIndex = 1 - Option1.TabStop = .T. - Option1.Tag = "" - Option1.TerminateRead = .F. - Option1.Themes = .T. - Option1.ToolTipText = "" - Option1.Top = (5) - Option1.Value = 0 - Option1.Visible = .T. - Option1.WhatsThisHelpID = -1 - Option1.Width = (47) - Option1.WordWrap = .F. - Option2.Left = 5 - Option2.Name = "Option2" - Option2.Top = 24 - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/menu2.mn2 b/TESTS/DATOS_READONLY/menu2.mn2 index 566c4db..e15189b 100644 --- a/TESTS/DATOS_READONLY/menu2.mn2 +++ b/TESTS/DATOS_READONLY/menu2.mn2 @@ -14,7 +14,7 @@ * DEFINE MENU _MSYSMENU BAR -DEFINE PAD _40Q0H1MMN OF _MSYSMENU PROMPT "Opción A con submenú" COLOR SCHEME 3 ; +DEFINE PAD "_40Q0H1MMN" OF _MSYSMENU PROMPT "Opción A con submenú" COLOR SCHEME 3 ; NEGOTIATE NONE, LEFT ; KEY DEL, "Pulsar " ; SKIP FOR SKIP_FOR() ; @@ -84,9 +84,9 @@ DEFINE PAD opc_b OF _MSYSMENU PROMPT "Opci ON SELECTION PAD opc_b OF _MSYSMENU WAIT WINDOW "Opción B" -DEFINE PAD _43302YWHK OF _MSYSMENU PROMPT "\ DEFINE MENU _MSYSMENU BAR -DEFINE PAD _43302YWIM OF _MSYSMENU PROMPT "ejemplo" COLOR SCHEME 3 +DEFINE PAD _000000001 OF _MSYSMENU PROMPT "ejemplo" COLOR SCHEME 3 -ON SELECTION PAD _43302YWIM OF _MSYSMENU do test +ON SELECTION PAD _000000001 OF _MSYSMENU do test -DEFINE PAD _43302YWIN OF _MSYSMENU PROMPT "ejemplo2" COLOR SCHEME 3 +DEFINE PAD _000000002 OF _MSYSMENU PROMPT "ejemplo2" COLOR SCHEME 3 -ON SELECTION PAD _43302YWIN OF _MSYSMENU DO TEST +ON SELECTION PAD _000000002 OF _MSYSMENU DO TEST * diff --git a/TESTS/DATOS_READONLY/procedure_in_lparameters.custest.vc2 b/TESTS/DATOS_READONLY/procedure_in_lparameters.custest.vc2 new file mode 100644 index 0000000..38e6a04 --- /dev/null +++ b/TESTS/DATOS_READONLY/procedure_in_lparameters.custest.vc2 @@ -0,0 +1,40 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="procedure_in_lparameters.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS custest AS custom + *< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *m: createcsrhealthcodes + * + + * + Name = "custest" + * + + PROCEDURE createcsrhealthcodes + + + * + * Add values to cursor, row by row. + * + FOR lnIndex = 1 TO lnCount + + * + * Write values to csr + * + REPLACE CBO_Id WITH lnCBO_ID, Diagnosis WITH lcDiagnosis, AdmitDiagnosis WITH lcAdmitDiagnosis, ; && Try to Break FB2P + Procedure WITH lcProcedure IN csrHealthCareCodes + + ENDFOR + + * + * Return success flag. + * + RETURN llSuccess + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/procedure_in_lparameters.vc2 b/TESTS/DATOS_READONLY/procedure_in_lparameters.vc2 index f250471..1085d20 100644 --- a/TESTS/DATOS_READONLY/procedure_in_lparameters.vc2 +++ b/TESTS/DATOS_READONLY/procedure_in_lparameters.vc2 @@ -4,36 +4,7 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="procedure_in_lparameters.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS custest AS custom - *< CLASSDATA: Baseclass="custom" Timestamp="" Scale="Pixels" Uniqueid="" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="custest" Baseclass="custom" /> - * - *m: createcsrhealthcodes - * - - Name = "custest" - - PROCEDURE createcsrhealthcodes - - - * - * Add values to cursor, row by row. - * - FOR lnIndex = 1 TO lnCount - - * - * Write values to csr - * - REPLACE CBO_Id WITH lnCBO_ID, Diagnosis WITH lcDiagnosis, AdmitDiagnosis WITH lcAdmitDiagnosis, ; && Try to Break FB2P - Procedure WITH lcProcedure IN csrHealthCareCodes - - ENDFOR - - * - * Return success flag. - * - RETURN llSuccess - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/test_public_protected.cmdbutton1.vc2 b/TESTS/DATOS_READONLY/test_public_protected.cmdbutton1.vc2 new file mode 100644 index 0000000..609e19c --- /dev/null +++ b/TESTS/DATOS_READONLY/test_public_protected.cmdbutton1.vc2 @@ -0,0 +1,22 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="test_public_protected.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cmdbutton1 AS commandbutton + *< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" /> + + * + *p: invalue + * + + * + Caption = "Command1" + Height = 27 + invalue = Default Value + Name = "cmdbutton1" + Width = 84 + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/test_public_protected.cmdsubbutton.vc2 b/TESTS/DATOS_READONLY/test_public_protected.cmdsubbutton.vc2 new file mode 100644 index 0000000..271e58c --- /dev/null +++ b/TESTS/DATOS_READONLY/test_public_protected.cmdsubbutton.vc2 @@ -0,0 +1,16 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="test_public_protected.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS cmdsubbutton AS cmdbutton1 OF "test_public_protected.vcx" + *< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" /> + + PROTECTED invalue + * + invalue = New Value + Name = "cmdsubbutton" + * + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/test_public_protected.frmform1.vc2 b/TESTS/DATOS_READONLY/test_public_protected.frmform1.vc2 new file mode 100644 index 0000000..1c06065 --- /dev/null +++ b/TESTS/DATOS_READONLY/test_public_protected.frmform1.vc2 @@ -0,0 +1,99 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="test_public_protected.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS frmform1 AS form + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="txtAddedThisThird" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" /> + *< OBJECTDATA: ObjPath="Cmdbutton11" UniqueID="" Timestamp="" /> + + * + *m: canprocess + *m: initobjects + *m: processaction + *m: processactionpart1 + *m: processactionpart2 + * + + * + Caption = "Form" + DoCreate = .T. + Name = "frmform1" + * + + ADD OBJECT 'Cmdbutton11' AS cmdsubbutton WITH ; + Height = 36, ; + Left = 60, ; + Name = "Cmdbutton11", ; + Top = 144, ; + Width = 120 + *< END OBJECT: ClassLib="test_public_protected.vcx" BaseClass="commandbutton" /> + + ADD OBJECT 'Command1' AS commandbutton WITH ; + Caption = "This button was added second", ; + DefHeight = , ; + DefLeft = , ; + Height = (25), ; + Left = (this.Height), ; + Name = "Command1", ; + Top = 48, ; + Width = 192 + *< END OBJECT: BaseClass="commandbutton" /> + + ADD OBJECT 'Label1' AS label WITH ; + Caption = "This label was added first", ; + Height = 18, ; + Left = 24, ; + Name = "Label1", ; + Top = 12, ; + Width = 144 + *< END OBJECT: BaseClass="label" /> + + ADD OBJECT 'txtAddedThisThird' AS textbox WITH ; + Height = 25, ; + Left = 24, ; + Name = "txtAddedThisThird", ; + Top = 96, ; + Width = 180 + *< END OBJECT: BaseClass="textbox" /> + + PROTECTED PROCEDURE canprocess + ENDPROC + + PROCEDURE Init + * + * Init the form! + * + thisform.Caption = "Hello world!" + ENDPROC + + PROTECTED PROCEDURE initobjects + * + * Initialize some objects here + * + ENDPROC + + PROCEDURE processaction + * + * ProcessActions again, all public + * + * TODO + ENDPROC + + PROTECTED PROCEDURE processactionpart1 + * + * Part 1, do some stuff + * + SELECT 0 + ENDPROC + + PROTECTED PROCEDURE processactionpart2 + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/test_public_protected.frmform2.vc2 b/TESTS/DATOS_READONLY/test_public_protected.frmform2.vc2 new file mode 100644 index 0000000..ab06ee3 --- /dev/null +++ b/TESTS/DATOS_READONLY/test_public_protected.frmform2.vc2 @@ -0,0 +1,46 @@ +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +* (ES) AUTOGENERADO - ¡¡ATENCIÓN!! - ¡¡NO PENSADO PARA EJECUTAR!! USAR SOLAMENTE PARA INTEGRAR CAMBIOS Y ALMACENAR CON HERRAMIENTAS SCM!! +* (EN) AUTOGENERATED - ATTENTION!! - NOT INTENDED FOR EXECUTION!! USE ONLY FOR MERGING CHANGES AND STORING WITH SCM TOOLS!! +*-------------------------------------------------------------------------------------------------------------------------------------------------------- +*< FOXBIN2PRG: Version="1.19" SourceFile="test_public_protected.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) +* +DEFINE CLASS frmform2 AS form + *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> + + *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder + *< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" /> + + * + *m: privatemethod && A private method + *m: protectedmethod && A protected method + *m: publicmethod && Regular public method + * + + * + Caption = "Form" + DoCreate = .T. + Name = "frmform2" + * + + ADD OBJECT 'Label1' AS label WITH ; + Caption = "Added this control first", ; + Height = 25, ; + Left = 36, ; + Name = "Label1", ; + Top = 24, ; + Width = 205 + *< END OBJECT: BaseClass="label" /> + + HIDDEN PROCEDURE privatemethod && A private method + * Private method + ENDPROC + + PROTECTED PROCEDURE protectedmethod && A protected method + * Protected method + ENDPROC + + PROCEDURE publicmethod && Regular public method + * Pub method + ENDPROC + +ENDDEFINE diff --git a/TESTS/DATOS_READONLY/test_public_protected.vc2 b/TESTS/DATOS_READONLY/test_public_protected.vc2 index 3d8cccc..5bbf621 100644 --- a/TESTS/DATOS_READONLY/test_public_protected.vc2 +++ b/TESTS/DATOS_READONLY/test_public_protected.vc2 @@ -4,158 +4,10 @@ *-------------------------------------------------------------------------------------------------------------------------------------------------------- *< FOXBIN2PRG: Version="1.19" SourceFile="test_public_protected.vcx" /> (Solo para binarios VFP 9 / Only for VFP 9 binaries) * -* -DEFINE CLASS cmdbutton1 AS commandbutton - *< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" /> +*-- EXTERNAL_CLASS identify external member Class names / EXTERNAL_CLASS identifica los nombres de las Clases externas +*< EXTERNAL_CLASS: Name="cmdbutton1" Baseclass="commandbutton" /> +*< EXTERNAL_CLASS: Name="cmdsubbutton" Baseclass="commandbutton" /> +*< EXTERNAL_CLASS: Name="frmform1" Baseclass="form" /> +*< EXTERNAL_CLASS: Name="frmform2" Baseclass="form" /> - * - *p: invalue - * - - Caption = "Command1" - Height = 27 - invalue = Default Value - Name = "cmdbutton1" - Width = 84 - -ENDDEFINE - -DEFINE CLASS cmdsubbutton AS cmdbutton1 OF "test_public_protected.vcx" - *< CLASSDATA: Baseclass="commandbutton" Timestamp="" Scale="Pixels" Uniqueid="" /> - - PROTECTED invalue - invalue = New Value - Name = "cmdsubbutton" - -ENDDEFINE - -DEFINE CLASS frmform1 AS form - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="txtAddedThisThird" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Command1" UniqueID="" Timestamp="" /> - *< OBJECTDATA: ObjPath="Cmdbutton11" UniqueID="" Timestamp="" /> - - * - *m: canprocess - *m: initobjects - *m: processaction - *m: processactionpart1 - *m: processactionpart2 - * - - Caption = "Form" - DoCreate = .T. - Name = "frmform1" - - ADD OBJECT 'Cmdbutton11' AS cmdsubbutton WITH ; - Height = 36, ; - Left = 60, ; - Name = "Cmdbutton11", ; - Top = 144, ; - Width = 120 - *< END OBJECT: ClassLib="test_public_protected.vcx" BaseClass="commandbutton" /> - - ADD OBJECT 'Command1' AS commandbutton WITH ; - Caption = "This button was added second", ; - DefHeight = , ; - DefLeft = , ; - Height = (25), ; - Left = (this.Height), ; - Name = "Command1", ; - Top = 48, ; - Width = 192 - *< END OBJECT: BaseClass="commandbutton" /> - - ADD OBJECT 'Label1' AS label WITH ; - Caption = "This label was added first", ; - Height = 18, ; - Left = 24, ; - Name = "Label1", ; - Top = 12, ; - Width = 144 - *< END OBJECT: BaseClass="label" /> - - ADD OBJECT 'txtAddedThisThird' AS textbox WITH ; - Height = 25, ; - Left = 24, ; - Name = "txtAddedThisThird", ; - Top = 96, ; - Width = 180 - *< END OBJECT: BaseClass="textbox" /> - - PROTECTED PROCEDURE canprocess - ENDPROC - - PROCEDURE Init - * - * Init the form! - * - thisform.Caption = "Hello world!" - ENDPROC - - PROTECTED PROCEDURE initobjects - * - * Initialize some objects here - * - ENDPROC - - PROCEDURE processaction - * - * ProcessActions again, all public - * - * TODO - ENDPROC - - PROTECTED PROCEDURE processactionpart1 - * - * Part 1, do some stuff - * - SELECT 0 - ENDPROC - - PROTECTED PROCEDURE processactionpart2 - ENDPROC - -ENDDEFINE - -DEFINE CLASS frmform2 AS form - *< CLASSDATA: Baseclass="form" Timestamp="" Scale="Pixels" Uniqueid="" /> - - *-- OBJECTDATA items order determines ZOrder / El orden de los items OBJECTDATA determina el ZOrder - *< OBJECTDATA: ObjPath="Label1" UniqueID="" Timestamp="" /> - - * - *m: privatemethod && A private method - *m: protectedmethod && A protected method - *m: publicmethod && Regular public method - * - - Caption = "Form" - DoCreate = .T. - Name = "frmform2" - - ADD OBJECT 'Label1' AS label WITH ; - Caption = "Added this control first", ; - Height = 25, ; - Left = 36, ; - Name = "Label1", ; - Top = 24, ; - Width = 205 - *< END OBJECT: BaseClass="label" /> - - HIDDEN PROCEDURE privatemethod && A private method - * Private method - ENDPROC - - PROTECTED PROCEDURE protectedmethod && A protected method - * Protected method - ENDPROC - - PROCEDURE publicmethod && Regular public method - * Pub method - ENDPROC - -ENDDEFINE +* \ No newline at end of file diff --git a/TESTS/DATOS_READONLY/test_report.fr2 b/TESTS/DATOS_READONLY/test_report.fr2 index 4ac63a7..4744c7c 100644 --- a/TESTS/DATOS_READONLY/test_report.fr2 +++ b/TESTS/DATOS_READONLY/test_report.fr2 @@ -76,7 +76,9 @@ COLOR=2