FiveTech Software tech support forums

... cGrad := PadR( GradStr( BrwGrad( oBrw ) ), 128 ) ACTIVATE DIALOG oDlg on INIT (BtnBarNew( oBrw, @oDlg, aBotones),oDlg:Move( oDlg:nTop, ( WndWidth( GetDesktopWindow() ) / 2 ) - ( oDlg:nWidth / 2 ), oDlg:nWidth, oDlg:nHeight, .T. )) // ACTIVATE DIALOG oDlg on INIT (BtnBarNew( oBrw, @oDlg, ...

Prueba asi:

oDlg:Move( 50, ( WndWidth( GetDesktopWindow() ) / 2 ) - ( oDlg:nWidth / 2 ), oDlg:nWidth, oDlg:nHeight, .T. )

y dime si el diálogo se posiciona hacia lo alto de la pantalla, gracias

Estimado José,

Prueba así:

oDlg:Move( oDlg:nTop, ( WndWidth( GetDesktopWindow() ) / 2 ) - ( oDlg:nWidth / 2 ), oDlg:nWidth, oDlg:nHeight, .T. )

... .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 14651 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 3337 ) Called from: => WNDWIDTH( 0 ) Called from: .\source\classes\CONTROL.PRG => (b)TCONTROL:TCONTROL( 179 ) Called from: => TXBROWSE:_NWIDTH( 0 ) Called from: .\source\classes\XBROWSE.PRG ...

Antonio buenos dias, gracias por la ayuda Agrego la VM.LIB (xharbour), y me manda estos errorres :( :( Proyecto: Kept5, Entorno: BorlandDLL: [1]:Harbour.Exe Source\Tseguro.prg /m /n /es2 /ki /iP:\32bits\xharbour\include;P:\32bits\FWH\INCLUDE /i /oObj\Tseguro.c xHarbour Compiler build 1.2.1 (SimpLex)...

... .\source\classes\XBROWSE.PRG => TXBROWSE:HANDLEEVENT( 12667 ) Called from: .\source\classes\WINDOW.PRG => _FWH( 3355 ) Called from: => WNDWIDTH( 0 ) Called from: .\source\classes\CONTROL.PRG => (b)TCONTROL( 181 ) Called from: .\source\classes\CONTROL.PRG => TXBROWSE:_NWIDTH( 0 ...

Implementa esta funcion:

function GetCoors( hWnd )

return { WndTop( hWnd ), WndLeft( hWnd ), WndBottom( hWnd ), WndWidth( hWnd ) - WndLeft( hWnd ) }

Pienso que la solucion sería que guardaras en lugar de pixeles, porcentajes de la resolucion, usando la regla de 3, p.e. resolucion := WndWidth(  GetDesktopWindow()  )AnchoColumna1 := ( AnchoPixeles * 100 ) / resolucion  Luego al crear el Browse haces ...

... and Dialog Coordinates???? I built a separate .prg file using a window, I obtained the size of it by using WndHeight( GetDesktopWindow() ), WndWidth( GetDesktopWindow() ) I calculated the coordinates using oWnd:nHeight and oWnd:nWidth, all the controls were placed and sized logically using ...

... hDC, aRect[ 1 ] - 2, aRect[ 2 ] - 3, aRect[ 3 ] + 1, aRect[ 4 ] + 5, aGrad, .T. ) SetBkMode( hDC, 1 ) RoundBox( hDC, 2, aRect[ 1 ] - 1, WndWidth( oCol:oBrw:hWnd ) - 22, aRect[ 3 ] + 1, 2, 2,; RGB( 235, 244, 253 ), 1 ) RoundBox( hDC, 1, aRect[ 1 ] - 2, WndWidth( oCol:oBrw:hWnd ) - 21, ...

... 3 ] + 1, aRect[ 4 ] + 5,; { { 1, RGB( 220, 235, 252 ), RGB( 193, 219, 252 ) } }, .T. ) SetBkMode( hDC, 1 ) RoundBox( hDC, 2, aRect[ 1 ] - 1, WndWidth( oCol:oBrw:hWnd ) - 22, aRect[ 3 ] + 1, 2, 2,; RGB( 235, 244, 253 ), 1 ) RoundBox( hDC, 1, aRect[ 1 ] - 2, WndWidth( oCol:oBrw:hWnd ) - 21, ...

... 2, aRect[ 2 ] - 3, aRect[ 3 ] + 1, aRect[ 4 ] + 5,; { { 1, RGB( 220, 235, 252 ), RGB( 193, 219, 252 ) } }, .T. ) RoundBox( hDC, 2, aRect[ 1 ] - 1, WndWidth( oCol:oBrw:hWnd ) - 22, aRect[ 3 ] + 1, 2, 2,; RGB( 235, 244, 253 ), 1 ) RoundBox( hDC, 1, aRect[ 1 ] - 2, WndWidth( oCol:oBrw:hWnd ) - 21, ...

... 2, aRect[ 2 ] - 3, aRect[ 3 ] + 1, aRect[ 4 ] + 5,; { { 1, RGB( 220, 235, 252 ), RGB( 193, 219, 252 ) } }, .T. ) RoundBox( hDC, 2, aRect[ 1 ] - 1, WndWidth( oCol:oBrw:hWnd ) - 22, aRect[ 3 ] + 1, 2, 2,; RGB( 235, 244, 253 ), 1 ) RoundBox( hDC, 1, aRect[ 1 ] - 2, WndWidth( oCol:oBrw:hWnd ) - 21, ...

... 2, aRect[ 2 ] - 3, aRect[ 3 ] + 1, aRect[ 4 ] + 5,; { { 1, RGB( 220, 235, 252 ), RGB( 193, 219, 252 ) } }, .T. ) RoundBox( hDC, 2, aRect[ 1 ] - 1, WndWidth( oCol:oBrw:hWnd ) - 22, aRect[ 3 ] + 1, 2, 2,; RGB( 235, 244, 253 ), 1 ) RoundBox( hDC, 1, aRect[ 1 ] - 2, WndWidth( oCol:oBrw:hWnd ) - 21, ...

... 2, aRect[ 2 ] - 3, aRect[ 3 ] + 1, aRect[ 4 ] + 5,; { { 1, RGB( 220, 235, 252 ), RGB( 193, 219, 252 ) } }, .T. ) RoundBox( hDC, 2, aRect[ 1 ] - 1, WndWidth( oCol:oBrw:hWnd ) - 22, aRect[ 3 ] + 1, 2, 2,; RGB( 235, 244, 253 ), 1 ) RoundBox( hDC, 1, aRect[ 1 ] - 2, WndWidth( oCol:oBrw:hWnd ) - 21, ...