Danke Andreas für den Link
Also wenn ich genauso tue :
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
x: Double;
begin
x:= screen.Width/screen.Height * Screen.PixelsPerInch;
Caption:=FloatToStr(x);
end;
Ich erhalte :
128
Was bedeutet das dann ?