//**************************************************************************** // $Module type: CLASS // $Module name: cFileDSNButton.pkg // $Author : Nils G. Svedmyr // Created : 2002-10-28 @ 10:44 // // Description : // // $Rev History // 2002-10-28 Module header created //**************************************************************************** Use cBitmapButton.pkg Use SyncFuncs.pkg Class cODBCAdminButton is a cBitmapButton Procedure Construct_Object Forward Send Construct_Object Set Entry_msg To DoCheckEntering End_Procedure // Construct_Object Procedure End_Construct_Object Forward Send End_Construct_Object Set Status_Help To "Start Windows 'ODBC Data Source Administrator'." End_Procedure // End_Construct_Object Procedure DoCheckEntering // If Not (Visible_State(Self)) Send Next // Else If Not (Enabled_State(Self)) Send Next End_Procedure // DoCheckEntering Procedure OnClick Handle hWnd Integer iRadio // Get Window_Handle Of (RdsMain_Panel_Id(Self)) To hWnd Get Window_Handle To hWnd ODBCManager hWnd End_Procedure // OnClick End_Class // cODBCAdminButton