Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.184 Beiträge
 
Delphi 12 Athens
 
#1

DelphiFormEditor von Bildschirmanpassung ausschließen

  Alt 11. Okt 2012, 21:56
Man kann doch im Windows die "Auflösung" anpassen
Systemsteuerung\Darstellung und Anpassung\Anzeige

Bei meinem kleinen FullHD-Schlepptop steht das auf 125% und ist eigentlich OK so.
Aber leider hat das einen Einfluß auf den Formeditor, welches dort die Größen und Positionen der Schrift und Komponenten verändert.

Das ist aber voll blöd, wenn man Computerübergreifend arbeitet, vorallem was das SVN angeht, da sich dann ja ständig die Dateien ändern.
Und ob das ständige hoch- und runtergezoome sich pixelgenau auswirkt, weiß auch keiner (aber da nur in ganzen Pixel gerechnet wird, muß sich am Ende wohl alles auf 4er-Schritte runden )
+25% ... -20% ... +25% ... -20% ... +25% ... -20% ... +25% ... -20% ... +25% ... -20% ...


[add]
Zur Laufzeit isses ja OK, aber im Designer sollte es doch bitte unverändert sein.

Und jupp, sind 4er-Schritte: (die 20% aka 1/5-tel hatten mich etwas verwirrt)
Delphi-Quellcode:
const
  Percent = 125;
var
  i, i2: Integer;
  a: array of array[-1..1] of Integer;
begin
  SetLength(a, 100);
  for i := 0 to High(a) do
    for i2 := -1 to 1 do
      a[i][i2] := i;

  for i2 := 0 to 100 do
    for i := 0 to High(a) do begin
      a[i][-1] := a[i][-1] * 100 div Percent;
      a[i][ 1] := a[i][ 1] * Percent div 100;

      a[i][-1] := a[i][-1] * Percent div 100;
      a[i][ 1] := a[i][ 1] * 100 div Percent;
    end;

  Memo1.Lines.Clear;
  for i := 0 to High(a) do
    Memo1.Lines.Add(Format(' %3d %3d %3d', [a[i][-1], a[i][0], a[i][1]]));
end;
$2B or not $2B

Geändert von himitsu (11. Okt 2012 um 21:59 Uhr)
  Mit Zitat antworten Zitat