[MAXIUM]

aeff tiene razón, ese ha de ser tu problema.

y la solución:

// Ancho Y alto corresponden a las dimensiones de tu Form en tiempo de diseño.
Const
        Ancho   = 800;
        Alto      = 600;

procedure TForm1.FormCreate(Sender: TObject);
begin
// Redimensiona la aplicación en base a la resolución.
     Height:= Height * Screen.Height div Alto;
     Width:= Width * Screen.Width div Ancho;
  // ScaleBy(Screen.Width, Ancho); //en base al ancho
     ScaleBy(Screen.Height, Alto); // en base al alto.
end;