Varias dudas de funciones
 

No se de que funcion del API de windows se sacan estas funciones, pero se que estan ahí por mi antigua experiencia con VB.

- Número de conexiones a red y propiedades(% usado, velocidad máxima, etc)

- tamaño y propiedades del escritorio (Tamaño de pantalla, tamaño de la barra de estado, etc).

Gracias por adelantado

Mirá la ayuda del objeto global Screen. Principalmente de sus propiedades width, height, DesktopWidtk y DesktopHeight.

Hasta luego.

;)

Tambien te da los datos del tamaño de la barra de inicio, etc?? entonces ya seria perfecto

Para saber el tamaño de la barra de inicio, tendrías que buscar la ventana y con la WinApi GetWindowRect podrías saber la posición y tamaño.

Saludos!

Muchas gracias, si ya sabeis lo de las conexiones sereis mis idolos

Otra forma de obtener el tamaño de la barra de tareas:

Código Delphi [-]
uses
  ShellApi;

function TaskBarRect: TRect;
var
  Data: TAppBarData;

begin
  Data.cbSize := SizeOf(Data);
  ShAppBarMessage(ABM_GETTASKBARPOS, Data);
  Result := Data.rc;
end;

Y quizá también te interese saber que Screen.WorkAreaRect es toda el área del escritorio no ocupada por la barra de tareas ni ninguna otra barra.

// Saludos

Me gustó mas la primer solución de román, es mucho mas específica que al mía.

Con respecto a esto, si la barra de tareas está configurada como "Ocultar Automáticamente", o no está puesta como "Siempre Visible", el WorkAreaRect será el total de la pantalla.

Saludos!

No exactamente.

Aun estando oculta la barra de tareas recordemos que puede haber otras barras de aplicación (Application Bar) como la infame barra de Office o las que agregamos desde la barra de tareas. Cualquier barra de este tipo quita espacio al área disponible del escritorio.

// Saludos

Ok.. pero no sirve para averiguar el tamaño del TaskBar... (Ademas no existe en la versión de Delphi en que trabajo :D)

Hombre, no creo que Borland se moleste con publicar este mínimo código

Código Delphi [-]
function TScreen.GetWorkAreaRect: TRect;
begin
  SystemParametersInfo(SPI_GETWORKAREA, 0, @Result, 0);
end;

:D

// Saludos