Centrar ventanas margen superior
Publicado por gloria (61 intervenciones) el 17/09/2004 08:53:17
Hola, alguien puede pasarme algun ejemplo para centrar las ventanas de la aplicación bajo la barra de herramientas pero que no lo haga en forma cascada. Yo tengo una función creada que és esta:
Environment lenv_Env
GetEnvironment(lenv_Env)
if not isvalid(w_frame_base) then return
if not isvalid(finestra) then return
finestra.X=(PixelsToUnits(lenv_Env.ScreenWidth, XPixelsToUnits!) - finestra.Width) /2 - w_frame_base.workspaceX()
finestra.Y = 0
Me centra bien als ventanas pero cuando abro una sobre otra luego me hace el efecto Cascade que no deseo.
Gracias a cualquier ayuda/sugerencia.
Environment lenv_Env
GetEnvironment(lenv_Env)
if not isvalid(w_frame_base) then return
if not isvalid(finestra) then return
finestra.X=(PixelsToUnits(lenv_Env.ScreenWidth, XPixelsToUnits!) - finestra.Width) /2 - w_frame_base.workspaceX()
finestra.Y = 0
Me centra bien als ventanas pero cuando abro una sobre otra luego me hace el efecto Cascade que no deseo.
Gracias a cualquier ayuda/sugerencia.
Valora esta pregunta


0