FiveTech Software tech support forums

Prueba asi:

MsgInfo( lAnd( GetWindowLong( hWnd, GWL_STYLE ), WS_BORDER ) )

Dutch,

Once you create your MDICHILD window, do this:

#define GWL_STYLE -16

SetWindowLong( oWndChild:hWnd, GWL_STYLE, nXor( GetWindowLong( oWndChild:hWnd, GWL_STYLE ), WS_SYSMENU ) )

Buenas noches

He puesto:

#define GWL_STYLE -16

Es correcto?
Efectivamente, me quita el Borde, pero tambien me borra los botones

Se me olvida alguna cosa?
Gracias por tu interés y tiempo
Saludos

April 2013 ========== * Enhancement: Enhanced vmh.prg on C Compiler path settings, and support for debug mode. * New: functions FW_GREATEST(...) and FW_LEAST(...). Similar to well known SQL functions GREATEST and LEAST, these functions return greatest or lowest non-nil value in a list of values. The...

From what moment on i can use GetWindowLong( ::hWnd, GWL_STYLE )->(::hWnd is existent)? Can we transfer the definition from the ::oGet in method init()?

Günther, See these defines: #define CBS_DROPDOWN 0x0002 #define CBS_DROPDOWNLIST 0x0003 So you could use: nAnd( GetWindowLong( ::hWnd, GWL_STYLE ), CBS_DROPDOWNLIST ) == CBS_DROPDOWNLIST Don't use CBS_DROPDOWN in the above line, because CBS_DROPDOWN is contained in CBS_DROPDOWNLIST: CBS_DROPDOWN ==&...

con el permiso del maestro mercado * ============================================================================ * CLASS TSLines Version 6.0 Mar/1/2008 * Author: Manuel Mercado * Freeware, you can freely use this class just by respecting the authorïs name. * ========================================...

Listo... Para separar las líneas usar chr(10) en vez de CRLF (el cual es chr(13)+chr(10)) Si no usas rc: include "Fivewin.ch" #define BS_MULTILINE 0x2000 #define GWL_STYLE -16 Function Test() Local oDlg, oBtn DEFINE DIALOG oDlg RESNAME "DIALOG_1" REDEFINE BUTTON oBtn ID 10 OF oDl...

saludos hernan:: algun ejemplo simple de como aplicar la funcion.. GRACIAS Hola gracias a todos, pues es demasiado simple: Supongamos que tenemos un control que tenemos que QUITAR o AGREGAR EL TAB_STOP en tiempo de ejecucion, en funcion de una variable del aplicativo en cuestion. ChangeStyleWindow(...

Marcello, if you try to insert an control it is not transparent , it not run ok why ? sample @ 2,1 say osay Prompt "test" of oWnd size 40,100 DESIGN TRANSPARENT or @ 2,1 say osay Prompt "test" of oWnd size 40,100 DESIGN oSay:ltransparent:=.t. I try to insert : if ::lTransparent S...

Hola ICO coloca estos define, seguro los necesitaras #define GW_HWNDNEXT 2 #define GW_CHILD 5 #define GWL_ID (-12) GW_CHILD es un "flag" que usa la funcion GetWindow, por eso el prefijo (GW) http://msdn.microsoft.com/en-us/library/ms633515(VS.85).aspx ...

#define GWL_STYLE -16 Aca les mando esta funcion, espero les sirva :) :D Es MUY util ehh :) //--------------------------------------------------------------------------------------------------//FUNCTION ChangeStyleWindow( hoWnd, naStyle, nStyleType, lAdd )   local aStyles:= {}, n, ...

Manuel, Como te indica Marcelo, prueba con: SetWindowLong( oComboBox:oGet:hWnd, GWL_STYLE, nOr( GetWindowLong( oComboBox:oGet:hWnd, GWL_STYLE ), ES_RIGHT ) ) Debes hacerlo una vez el combobox tenga un hWnd válido (en caso de usar un diálogo, desde la claúsula ON INIT): ACTIVATE DIALOG oDlg ON INIT ...

Hello Antonio, I changed the method in TRibbonBar and added a class TXPanel. But I must do something wrong. If I press the ALT key I don’t see the panel. Would you be so kind to post a working sample. Thanks in advance Otto Otto, We are working on a Method KeybMode() that first of all may show those...

Hola Fernando: A través de recursos es fácil porque lo defino con el Pelles C; pero mediante codigo no logro hacerlo. Si es en DIALOG, después de definir el control say: oSay:nStyle := nAnd( oSay:nStyle, nNot( WS_TABSTOP ) ) Si es en WINDOW: #define GWL_STYLE -16 SetWindowLong( oSay:hWnd, GWL_STYLE,...