FiveTech Software tech support forums

... valores sobre la regilla. Debe ser algun problema de la ubicacion del grafico en la ventana, por que no puebas de colocar en 0,0 y luego llamar a SetControl(oGraph) Atentamente, Rolando Salazar Ureña http://www.sauro-sys.com email: SauroSrl@entelnet.bo Cochabamba-Bolivia FWH 9.07, xharbor 1.2.1

FranciscoA wrote:Hola, aquí te dejo un ejemplo de como puedes hacerlo. Espero te sea útil.
Saludos

Gracias por el código, lo revisaré para adaptarlo a mi necesidad.

Un saludo
Carlos G.

Hola, aquí te dejo un ejemplo de como puedes hacerlo. Espero te sea útil. Saludos //00000000000000000000000000000000000000000000000000 //----------------------------- FUNCTION MISBROWSES() local oBrw,oBrw2,oCol,oCol2,n,oDlg,oBt2 local aObjetos,nAltoIniDlg,nAnchoIniDlg,aLinColCtrls, aLinCtrls, aColCt...

FiveWidi:
Creo que tendrías que usar los SPLITTERS. Busca en el foro por la palabra splitter.
Saludos.

... un control se redimensione automáticamente (usando toda la ventana) cuando se cambia el tamaño de su ventana contenedora MDICHILD, debo usar oWnd:Setcontrol( omiCtrl ). Esto es lo normal. Ahora bien, si tengo 2 controles RICHEDIT que quiero que ocupen la mitad horizontal de la ventana cada uno ...

... USE customer SHARED SET INDEX TO customer DEFINE DIALOG oDlg @ 0 , 0 LISTBOX oBrw FIELDS ACTIVATE DIALOG oDlg; ON INIT ( oDlg:Maximize(),; oDlg:SetControl( oBrw ) ); CENTER RETURN NIL INIT PROCEDURE RddInit REQUEST DBFFPT REQUEST DBFCDX rddSetDefault( "DBFCDX" )

... oLbx:aHeaders := aHdgs oLbx:bLine := &("{|| {"+ cLine + "} }") ACTIVATE DIALOG oDlg CENTERED ; ON INIT(oDlg:SetControl(oLbx)); VALID(lExit) return(xRetVal) I was previously using another database server but now I have converted to the fivewin database class ...

... " + LTrim( Str( oRTF:GetRow() ) ) ), ; oCol:SetText( "Col: " + LTrim( Str( oRTF:GetCol() ) ) ), ; RefreshChildBar( oWnd ) } oWnd:SetControl( oRTF ) oWnd:bInit := { || RefreshBar() } oWnd:bValid := { || If( Close(), RefreshBar(), .f. ) } Eval( oRTF:bChange ) ACTIVATE WINDOW oWnd ...

... No me gusta quitar ICONIZED ya que si lo hago se muestra una ventana gris sin contenido al momento de abrir el programa. Me hara falta algun setcontrol, o algo ? //ACTIVATE WINDOW oWnd ICONIZED ON INIT START() <- ACTIVATE WINDOW oWnd ON INIT START()

... } oCol:cHeader := " Dirección del Inmueble " oCol:nHeadStrAlign := AL_LEFT oCol:nDataStrAlign := AL_LEFT *-- oFolder:aDialogs[1]:SetControl( oBrow ) oWndConj:bGotFocus = { || oBrow:SetFocus() } ACTIVATE WINDOW oWndConj ; ON INIT( oBrow:Refresh(), oBrow:SetFocus() ) ; VALID( Cierra() ...

... nil ) METHOD MouseMove( nRow, nCol, nKeyFlags ) METHOD Paint() METHOD PrintClient( hDC ) INLINE 1 METHOD QueryEndSession() INLINE ! ::End() METHOD SetControl( oCtrl ) INLINE ; ::oClient := oCtrl, ::ReSize() METHOD SetFont( oFont ) METHOD SysCommand( nWParam, nLParam ) METHOD VbxFireEvent( pEventInfo ...

Otto,

did you try oChildWnd:SetControl(oBrw) for MDI or oWnd:oClient := oBrw for normal windows ?

... 0, 0 LISTBOX oLbx FIELDS OF oWndCh ; FONT oWnd:oFont DEFINE BUTTON OF oBar RESOURCE "EXIT" NOBORDER TOOLTIP "Salir" ACTION ( oWndCh:End()) oWndCh:SetControl(oLbx) ACTIVATE WINDOW oWndCh ; //MAXIMIZED VALID ( oItem1:Enable(),oItem2:Enable(),oMenu:Refresh(), .T.) dbSelectArea(cOldSele) RETURN NIL ...

>try without ON INIT oDlg:SetControl( oBrw )

It works.

Thanks

Hello accwo,
try without ON INIT oDlg:SetControl( oBrw )

Regards,
Otto