aeff tiene razón, ese ha de ser tu problema.
y la solución:
Código:
// 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;