Como obtener el ancho del borde de las ventanas de Windows

[rgstuamigo]

Empezado por gluglu

Después de mucho tiempo vuelvo a saludaros a tod@s !

Y tengo una preguntita : Como puedo obtener en mi programa Delphi el valor del ancho del borde de las ventanas en Windows ?

Resulta que entre Windows XP y Windows 7 (p.ej.), el ancho del borde de las ventanas cambia, y en algunas ocasiones me fastidia en cierta manera ese cambio, por lo que necesitaria saber qué varible de Windows guarda dicho valor, y como obtenerlo desde Delphi.

Gracias como siempre por vuestra ayuda.

No se si sera lo que estas necesitando , pero puedes mirar las propiedades BorderWidth y BorderStyle del formulario ,en especial la segunda ya que te permite cambiar el estilo del borde..
Saludos...

[[escafandra]]

API GetWindowRect

Ejemplo Fácil en un formulario simple con un botón: Encontrar el Alto y el Ancho de nuestro formulario:

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
  WR: TRect;
  Ancho: integer;
  Alto: integer;
begin
  Windows.GetWindowRect(Handle, WR);
  Ancho:= WR.Right - WR.Left;
  Alto:= WR.Bottom - WR.Top;
end;

Saludos.

[[coso]]

Hola,
yo uso Height - ClientHeight, Width-ClientWidth. Saludos.

[delphi.com.ar]

Te recomiendo investigar la WinApi: GetSystemMetrics, creo que es exactamente lo que buscas.

Saludos!

[Neftali [Germán.Estévez]]

Yo utilizo también el método de coso. Usar el Height/Width y las respectivas ClientHeight/ClientWidth.

[[gluglu]]

Muchísimas gracias a todos por vuestra ayuda. Me ha servido mucho.

El problema viene principalmente por el hecho de que mis forms con un borde de ventana tienen un tamaño predefinido por diseño, y utilizo además los 'Constraints' precisos para delimitar el tamaño máximo.

Este hecho, me define como muy bien habeis indicado, el tamaño del 'Client' y con las propiedades que indicais puedo hallar el tamaño del borde de la ventana.

El problema viene, tal y como indiqué, cuando porto la aplicación de Windows Xp a Windows 7.

Resulta entonces que mi tamaño máximo de Form, definido en mis Constraints, es fijo, y dado que Windows 7 me modifica el tamaño del borde de la ventana respecto de Windows XP, entonces el resultado es que el 'Client' se reduce en algunos píxeles, y este es precisamente el hecho que quiero evitar.

No es tanto por el tamaño del 'Client' que se vé reducido, sino este cambio se aprecia sobre todo y considerablemente cuando en determinadas partes del programa tengo que superponer ventanas a un form, tomando como referencia el borde izquierdo del 'Client'. Al ser dos forms diferentes, la referencia que tomaba es la que me daba Windows XP, sin saber que Windows 7 me cambiaría ese ancho de borde. Al cambiarlo, el left del nuevo form con respecto al form inferior, que ahora tiene un borde más ancho, es diferente.

Por eso, y concluyendo, entiendo que aunque con las propiedades Width y ClientWidth puede conocer el ancho del borde, en mi caso, y por las particularidades que indico, debo de uitlizar la función GetSystemMetrics del Api de Windows.

Gracias de nuevo a todos por vuestra ayuda.

[[mlara]]

Empezado por gluglu

Por eso, y concluyendo, entiendo que aunque con las propiedades Width y ClientWidth puede conocer el ancho del borde, en mi caso, y por las particularidades que indico, debo de uitlizar la función GetSystemMetrics del Api de Windows.

Puedo preguntar qué parámetros pasas a GetSystemMetrics para lograr tu objetivo, y cuál sería la diferencia entre, por ejemplo, Width - ClientWidth y GetSystemMetrics(SM_CXBORDER)?