Hallo

gibt es eine Möglichkeit die originale Grösse der Form und aller anderen Controlls nach dem ScalBy() wieder zu bekommen ?

Z.B. : ScaleBy(133, 100); // d.h. 133% vergrössern
Wie kann ich nun die Form wieder verkleinen ?

Mathematik ist einfach : ScaleBy(100 / 133, 100);
Das Problem, es wird nur Integer akzeptiert !

Prozentrechnung

Das ist nicht das Problem, den wert zu berechnen
ich habe die Form komplett 164% skaliert so:
ScaleBy(164,100); danach wollte ich die Form wieder verkleinern so :

markieren

Delphi-Quellcode:

begin
ScaleBy(trunc(100/164),100);
end;

Es wird die Form zwar verkleinert aber deformiert !
Alles durcheinander !

waere es auch moeglich, nicht immer gleich nach dem zweiten fehlversuch ein thread aufzumachen?
ich beobachte schon laenger und muss sagen, das du recht schnell aufgibst. zumindest sieht es so aus.

wie waere es denn, wenn du ganz einfach den alten wert speicherst?

//edit

bzw. was gibt denn 100 / 164?
was gibt dann Trunc(100 / 164)?
schau dir mal an, was das fuer zahlen sind :o)

ScaleBy(133, 100), damit bekommst du 133% von den ursprünglichen 100. Was könnte man jetzt wohl machen, um wieder die alten 100 von den 133 zu bekommen?

Zitat von Fussball-Robby:

ScaleBy(133, 100), damit bekommst du 133% von den ursprünglichen 100. Was könnte man jetzt wohl machen, um wieder die alten 100 von den 133 zu bekommen?

100x100 / 133
Man bekommt nie genau die alte Größe

Wie wärs einfach mal mit Parameter umdrehen?

Zitat:

Mathematik ist einfach : ScaleBy(100 / 133, 100);

Vielleicht solltest du dann mal den Taschenrechner nehmen und anhand eines Beispiels prüfen ob DU die einfache Mathematik vielleicht doch nicht verstehst.

Zitat von Fussball-Robby:

Wie wärs einfach mal mit Parameter umdrehen?

die Parameter umtauschen, habe ich schon vorher getestet und habe ich gedacht
das es damit nicht geht, da die Form-Breite und die Form-Höhe bleiben groß unverändert.

Also mit Parameter umtauschen ScaleBy(100,133) geht schon. Ich muss nur in OnCreate
die originale Breite und Höhe der Form als Variable speichern, damit ich beim verkleinern diese wieder zuweisen kann

Zitat von SirThornberry:

Zitat:

Mathematik ist einfach : ScaleBy(100 / 133, 100);

Vielleicht solltest du dann mal den Taschenrechner nehmen und anhand eines Beispiels prüfen ob DU die einfache Mathematik vielleicht doch nicht verstehst.

Was ist dann falsch? ScaleBy(100*100 / 133, 100);
oder wenn man was vergesst, nehmst Du es ernst
Das Format habe ich getestet und funktioniert 99,9999999999 %
Aber mit Parameter umtauschen funktioniert 100.0000000000 %

warum so kompliziert ???

geht doch einfacher :

markieren

Code:

  ...
  scaleby( 75, 100 );
  scaleby( 100, 75 ); //---> Umkehr

tja, Mathe ist nicht leicht