Bildschirm-Groesse in mm auslesen

[Satty67]

Ich glaube nicht mehr an Bequemlichkeit und Copy&Paste Kultur, ich hoffe es ist nichts ansteckendes (und das Internet als Isolations-Schicht ausreichend ist) ;)

Delphi-Quellcode:

function ScreenSizeMM: TSize;
begin
  Result.cx := Round((Screen.Width / Screen.PixelsPerInch) * 25.4);
  Result.cy := Round((Screen.Height / Screen.PixelsPerInch) * 25.4);
end;

Ein Bier drauf, dass der Ergebnistyp weitere Schwierigkeiten macht und der Thread noch nicht zuende ist.

[Aphton]

Zitat:

Zitat von thomas2009 (Beitrag 1095182)

Wie rufe ich die Funktion auf ?

Delphi-Quellcode:

var
Form1: TForm;
x,y : Integer;

procedure TForm1.Button1Click(Sender: TObject);
begin
x:=Screen.width;
y:=Screen.Height;

GetDisplaySize(x,y);
caption:=IntToStr(x);
end;

Ich erhalte -1 :-D

Sry, habs ausgebessert... :stupid:
"Kopiers" noch einmal

[markus5766h]

Hallo,

ich werf' dann mal das in's Rennen :

Code:

type
  fScreenMM = array[0..1] of Real;

.
.
.

function ScreenMM : fScreenMM;
begin
  Result[0] := Screen.Width / Screen.PixelsPerInch * 25.4;
  Result[1] := Screen.Height / Screen.PixelsPerInch * 25.4;
end;

[Luckie]

Zitat:

Zitat von Aphton (Beitrag 1095205)

Sry, habs ausgebessert... :stupid:

Was kommt jetzt raus? Pi? :mrgreen:

[Aphton]

Ohh.. hmm
Evt xD

Edit: So, tut mir echt leid! Nun sollte es funzen. Habs zuerst so programmiert, dass es mit einer TPoint Variable funktioniert und die Anpassung bei der Umstellung auf zwei Integer Variablen nicht durchgeführt.

Sollte aber nun klappen! xD

[thomas2009]

hallo @Satty67
das ist genau was @jfheins geschrieben hat
#6

Zitat:

Zitat von Aphton (Beitrag 1095205)

Sry, habs ausgebessert... :stupid:
"Kopiers" noch einmal

Nun funktioniert's, ich erhalte für die Breite 270

[himitsu]

Auch wenn ich nicht verstehe, warum man sowas in Assembler verschlüsseln muß. :gruebel:

Kann mir nicht vorstellen, daß eine Pascalvariante viel langsamer ist (außer daß diese dadurch kürzer und übersichtlicher würde) und so oft sollte sich die Bildschirmgröße nicht verändern, als das man dieses zumillionen Mal die Sekunde ausrechnen müßte.

[Aphton]

Eh nicht, aber da er es nicht entschlüsseln kann wird er nicht behaupten können, er habe es selbst geschrieben.
Im Falle einer Hausübung dürfte sich das für mich positiv auswirken :)
Ansonsten - da er durchs Kopieren sowieso nichts lernt, macht es keinen großen Unterschied

[Satty67]

Zitat:

Zitat von thomas2009 (Beitrag 1095219)

das ist genau was @jfheins geschrieben hat

Ja irgendwie haben wir alle es geschrieben, abgesehen von der Umsetzung ist das Prinzip immer das gleiche.

[Daniel]

Und da ich nicht erkennen kann, dass Thomas seit Tagen auch nur ansatzweise einen der angebotenen Links gelesen hat und damit in der Lage wäre, die Begriffe / Maßeinheiten "Zoll", "Inch", "Pixel" und "mm" in einen logischen Zusammenhang zu bringen, mache ich hier zu.

Solange Du nicht in der Lage bist, die Ergebnisse Deiner Funktionen wenigstens über den Daumen auf ihre Qualität hin zu prüfen, könntest Du auch einen Zufallszahlengenerator einbauen. Und solange Du Dich weigerst, Dir ein Mindestmaß an Hintergrundwissen (für Deine eigenen Problemstellungen) anzueignen, weigere ich mich, dieses und andere Themen offen zu lassen.