FiveTech Software tech support forums

... button as : DEFINE DIALOG SuboDlg OF oDlg TRANSPARENT SuboDlg:nStyle -= WS_CAPTION //nOR(WS_CAPTION , 4 ) SuboDlg:nStyle += WS_CHILD @ 5,8 BUTTON obtnok PROMPT "&Ritorna" OF SuboDlg ; FONT oFont SIZE 40, 10 ACTION ( SuboDlg:end( IDOK ) ) ACTIVATE DIALOG SuboDlg NOMODAL ON INIT (oGetNum:nHeight:=21.4, ...

... CLASS TDosPrn local oDlg, oRad, oChk, oSay := array(3) local nModo := 1 local nLinP := ::nLength, lPreview := .f. local nTipo, oP := self local oBtnOk, oBtnCn, oBtnSetup, oBtnAtrib, cModoImp ::lCancel := .t. // cerramos el puerto que se abrio al principio if (::hDC # -1) .and. ! fClose(::hDC) ...

Antonio,

I can align all the button in dialog box using ClassName()="TBUTTON". Can I select the my obtnOK and obtnCancel variables.

Regards,

Hi, I think I have partly solved the my second problem. I can align all the button in dialog box using ClassName()="TBUTTON". Can I select the my obtnOK and obtnCancel variables. Also I want to put a line above buttons. any suggestions. Thanks, #include "FiveWin.ch" #include "Splitter.ch" ...

... LOCAL mCODIGO,mNOMBRE,mTIPOAUX,mNATURAL,mEEFF,mVIACOMP,mDETALLE LOCAL oCODIGO,oNOMBRE,oTIPOAUX,oNATURAL,oEEFF,oVIACOMP,oDETALLE,oBitmap1,oBtnOk LOCAL Enllavar := .F. LOCAL mAceptar := .F. LOCAL nOldRec := RECNO() PUBLIC dNatural,dEeFf[1] LoadLibrary("BWCC32.DLL") DEFINE BRUSH oBrush FILENAME ...

... me ayuda (FW 1.95,Clp 5.2 y Blinker 3.0): local oDlg local oFld local hBorl:=LoadLibrary("MIBWCC.DLL") local oCodP1, oRazPro1, oBusP1 local oBtnOK, oBtnCancel local nCodP1:=0, nCodP2:=0, cRazPro1 DEFINE DIALOG oDlg RESOURCE "MARCO" REDEFINE FOLDER oFld ID 1499 OF oDlg; PROMPTS "Comprobantes","Valores","Comisión ...

... return .T. //---------------------------------------------------------------------------// static function indexa() local oAvance,oMeter,oMeter1,oBtnok local nPos,nActual local lEnd:=.f. DEFINE DIALOG oAvance RESOURCE "indices" REDEFINE SAY oSay ID 132 OF oAvance UPDATE REDEFINE SAY oSay1 ID ...

... oGet Var oDbf:CustAdd1 ID 160 OF oDlg ; When !Empty( oDbf:CustName ) ; Valid ReqData( oDbf:CustAdd1 ) ; Picture "@!" Color "N/W" REDEFINE BUTTON oBtnoK ID 170 OF oDlg ; ACTION SaveData() REDEFINE BUTTON oBtnCncl ID 180 OF oDlg ; ACTION oDLg:End() ACTIVATE DIALOG oDlg NOMODAL ; Valid CloseAdd( ...

... GET OFILE VAR DFILE ID 103 OF ODLG READONLY UPDATE COLOR CLR_BLUE REDEFINE METER oMEtEr VAR nPerc1 ID 150 OF oDlg TOTAL 100 REDEFINE BUTTON OBTNOK ID 01 OF oDlg ; ACTION (OBTNOK:DISABLE(),OBTNCAN:DISABLE(),ZIPME(OMETER,cPATH,CDEST,@LSAVE,SOUSREP,ODLG,@DFILE,OFILE)) REDEFINE BUTTON OBTNCAN ...