FiveTech Software tech support forums

... 0.3, CLR_BLACK, CLR_BLACK }, .F. } ) @ 0, 0 BITMAP oImagem FILENAME cImagem ; SIZE 400, 600 OF ; oDlg PIXEL NO BORDER ADJUST ACTIVATE WINDOW oDlg CENTERED ; ON INIT SobreporImagem( oDlg ) Return NIL *------------------------------------------------------------------------------* Function SobreporImagem( ...

... on FWH classes. What all you want to do, I am sure we can do with FWH classes in a far simpler way. To print text vertically and horizontally centered on the page. No calculations required. The command is very simple: @ 0, 0 PRINT TO oPrn TEXT "Single/MultiLine Text" ALIGN "" ...

... oDlgMa FILENAME "CANCELA.BMP" CANCEL ACTION oDlgMa:End() oAceptar:lTransparent = .t. oCancelar:lTransparent = .t. ACTIVATE DIALOG oDlgMa CENTERED if lSave if agrega Materia->(DbAppend()) Materia->Codigo := nCodigo endif Materia->Detalle := cDetalle Materia->Abrevia := cAbrevia ...

... is often associated with the teachings of the Buddha, who is believed to have lived in India in the 6th century BCE. The Buddha's teachings are centered around the idea of finding inner peace and happiness through the practice of mindfulness and meditation. One of the key principles of zen is ...

... := .F. @ 30, 3 RICHEDIT5 oMemo VAR uTemp OF oDlg PIXEL SIZE 200, 200 oDlg:oClient = oMemo omemo:SetFont( oFont ) ACTIVATE DIALOG oDlg CENTERED ; ON INIT ( oMemo:LoadRtf( cText ), oMemo:PostMsg( WM_KEYDOWN, VK_HOME, 0 ) , BuildRichEditBar( oDlg, oMemo, { | c | cText := c } ), oDlg:ReSize(), ...

... OF oDlg SIZE 30, 12 ACTION Averba() @ 3, 16 BUTTON "&Cancel" SIZE 30, 12 OF oDlg ACTION oDlg:End() CANCEL ACTIVATE DIALOG oDlg CENTERED Return nil Static Function Averba() LOCAL oUrl, oCli LOCAL hQUery := Hash() TRY oUrl = TUrl():New( 'https://apis.averbeporto.com.br/php/conn.php' ...

... OF oDlg SIZE 30, 12 ACTION Averba() @ 3, 16 BUTTON "&Cancel" SIZE 30, 12 OF oDlg ACTION oDlg:End() CANCEL ACTIVATE DIALOG oDlg CENTERED Return nil Static Function Averba() LOCAL oUrl, oCli LOCAL hQUery := Hash() TRY oUrl = TUrl():New( 'https://apis.averbeporto.com.br/php/conn.php' ...

... oDlg SIZE 30, 12 ACTION WebPageSource() @ 3, 16 BUTTON "&Cancel" SIZE 30, 12 OF oDlg ACTION oDlg:End() CANCEL ACTIVATE DIALOG oDlg CENTERED Return nil FUNCTION WebPageSource(cUrl) local oIE,cTXT,cHTML,cMemo:="" local cString LOCAL cString1,cString2 LOCAL oUrl, oCli,lOk ...

... Say oBrw:oSeek Var oBrw:cSeek Id 1001 Of oDlg Picture "@!" Font oFont2 COLOR Rgb( 255, 0, 0 ), Rgb(185,220,255) ACTIVATE DIALOG oDlg CENTERED oFont2:End() cTab_Art:End() Return NIl

... Say oBrw:oSeek Var oBrw:cSeek Id 1001 Of oDlg Picture "@!" Font oFont2 COLOR Rgb( 255, 0, 0 ), Rgb(185,220,255) ACTIVATE DIALOG oDlg CENTERED oFont2:End() cTab_Art:End() Return NIl

... ( CierraAudit( xnaudit ), dbCloseall() , princfac:End(), oWndChild:End() ) // when xLiderAudit = xNUsuario // cancel ACTIVATE DIALOG princfac CENTERED nowait ON INIT ( princfac:Move( 0, 0 ) ) //, oRich:LoadRtf( xobserva ), oRich:PostMsg( WM_KEYDOWN, VK_HOME, 0 )) oWndChild:nWidth := princfac:nWidth ...

... REDEFINE BTNBMP oBtnCanc ID Med_Cancelar OF oDlgMed FILENAME "CANCELA.BMP" CANCEL ACTION oDlgMed:End() ACTIVATE DIALOG oDlgMed CENTERED endif dbcloseall() return NIL *-----------------------------------------------------------------------------------* *----------------------------------------------------------------------------------------------* ...

¿Usando RECURSOS? Elimine el "CENTERED": ACTIVAR DIALOG oDlg... y en el EDITOR DE RECURSOS, informar las coordenadas deseadas.

Si no entendí su pregunta, explíquelo mejor a través de un pequeño .PRG.

Regards, saludos.

Gracias Maestro por su tiempo.
Lo que me sugiere provoca el mismo efecto que el CENTERED del dialogo, o sea centra horizontal y verticalmente el dialogo.
yo busco centrar solo en forma Horizontal <--- ---->.

Gracias nuevamente por su tiempo.

José Camilo

... ) REDEFINE BUTTON ID 200 OF oDlg ACTION BuscaPaci( oLbx, oPaci ) REDEFINE BUTTON ID 240 OF oDlg CANCEL ACTION oDlg:End() ACTIVATE DIALOG oDlg CENTERED oPaci:End() return nil //----------------------------------------------------------------------------// //----------------------------------------------------------------------------// ...