FiveTech Software tech support forums

hi,

from TWindows() i can get a Childlist of all Controls

Code: Select all  Expand view

  oWnd:aControls

but how to get Childlist of a single Control when have Child

... ( COLOR / FONT ) and all Child will use "these" as default while Controntr are based on TControl() which are FROM TWindows() i wonder why Child does not have COLOR / FONT of Parent :?:

hi, i want to ZIP / UNZIP Files using Fivewin in TWindows i found Codeblock Slot bZip and bUnZip   METHOD Zip( nZipInfo ) INLINE ;                      If( ::bZip != nil, Eval( ::bZip, nZipInfo ),)   METHOD UnZip( nPercent ...

... eso el MDI tiene que estar abierto y necesito saber las dimensiones antes de que se abra... El valor lo trae el LParam del método HandleEvent() de TWindows. Lo suyo sería simular una maximización de pantalla para captar el LParam de HandleEvent() antes de definir mi primer Windows, pero no sé cómo ...

... is just INKEY() and with HMG i can use GUI too e.g. Button. this is what i don't know with FiveWin while GUI Parts seems all Inherit from TWindows. HMG use Procedure and Function with #xCommand Syntax so i had to "go back" to Cl*pper Style using Macro. FiveWin use OOP which make ...

Angel, gracias. Este código funcion para una twindows, pero NO para Dialogs

Antonio, mil gracias.... funcionó perfect y me ahorré tiempo y mucho código fuente!!.

... Parece como si bNcLost hiciera lo mismo que bLostFocus, sin embargo he de decir, en honor a la verdad, que yo no he modificado el METHDO de TWINDOWS, pues tengo un TDIALOG modificado y en esa clase he añadido el METHOD NcActivate (sin la parte de bLostFocus). En teoría es lo mismo puesto ...

... pulse fuera del dialogo. Yo lo he llamado ‘bNcLost’, pero podeis darle el nombre que más os guste - Hay que modificar el METHOD NcActivate() de TWINDOWS de la siguiente manera (o podeis crearlo en TDIALOG): METHOD NcActivate( lOnOff )     CLASS TDIalog   LOCAL hFWnd := GetFocus()  ...

... defined b) For every control, what behavoir is desired, and then activate our new resizing strategy on windows/dlg resize, usually using bResize Twindows's DATA Let's the code speak by itself. #define GW_CHILD      5#define GW_HWNDNEXT   2FUNCTION PreResize( oDlg )   LOCAL hWnd:= oDlg:hWnd  ...

... does). One of the blessings of using FW is that you have 99% of the source code, so we have the very basic resource for research. Take a look into TWindows source and find out by yourself, i'm pretty sure you can! Show me that i'm not wrong :) Best regards

Puedes probar esto ?

oWnd:GetWidth( cText, oFont ) -> Devuelve el ancho

Teniendo en cuenta que oWnd es el padre del TSAY, normalmente un objeto TDialog, TWindows o TPanel por ejemplo.

Gracias Daniel.

muito obrigado Sr. Daniel.

Posible solucion en el archivo msgbar.prg cambiar METHOD LDblClick( nRow, nCol, nKeyFlags ) CLASS TMsgBar   if ::lInfoRes .or. ( ! ::lInfoRes .and. ::lCheckRes )      if ! ::lCheckRes         ::Cargo := ::oWnd:cCaption //este es el ca...

SGS wrote:Acabei de testar o seu EXEMPLO KARINHA. E o problema aparece claramente na versão 13.08.

Si aparece el error, Karinha, para reproducir usa MAXIMIZED en el activate del MDICHILD

Code: Select all  Expand view

ACTIVATE WINDOW oWndChild MAXIMIZED

ahora haz doble click en los item del msgbar, varias veces