Folgendes:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TFFreggels.Zoomen(Teiler : Integer);
var
  [...]
begin
  [...]
  Showmessage(IntToStr(Round(32 / Teiler)));
  Showmessage(IntToStr(32 div Teiler));
  Showmessage(IntToStr(Teiler));
     Held10.Height := 32 div Teiler;
    Held10.Width := 32 div Teiler;


  //Objektkarte
  with Held10 do begin


    Showmessage(IntToStr(Held10.Height));
    Canvas.StretchDraw(Rechteck, HOben.Picture.Graphic);
  end;
end;

Sieht ein bisschen Chaotisch aus, ist es aber nicht

Folgendes: Teiler = 1
Nachrichten:

1. 32
2. 32
3. 1
4. 0

Also ich habe da keinen Fehler Entdeckt, aber dennoch ist Held10.Height = 0 !!

Div rundet auch

Zitat von idontwantaname:

Div rundet auch

Hai idontwantaname,

kannst Du mal beschreiben warum DIV "rundet"?

Dann rundet es aber gewaltig den 32/1 ist 32 und nicht 0!

richtig, div rundet nicht, sondern schneidet die Kommastellen ab
aber das is auch nicht wirklich das Problem, schließlich müsst bei 32 div 1 auch nichts gerundet werden

@Topic: Ich bezweifle, dass es am div liegt. Schließlich wird der Term 32 div 1 erst ausgerechnet, (also kommt 32 raus), und dann zugewiesen. Probier einfach mal, 32 direkt zuzuweisen (also Held10.Height := 32, dann dürfte das selbe Ergebnis reinkommen. Das Problem liegt also am Setter von Held10.Height. Von welchem Typ is Held10?

greetz
Mike

Vom TImage!

Und es ist an sich auch egal ob es rundet oder abschneidet... fakt ist nur das er aus 32 div 1 = 0 macht...

Und es ist auch bei anderen "Teilern"!

Und schonmal danke Ich habe mich auch gewundert ^^

[edit]Mit direkter Zuweisung (Held10.Height) ist es auch 32... [/edit]

[edit]Doch nicht Falscher Wert überprüft >>> Egal ob statischer oder variabler Wert! [/edit]

Zitat von xZise:

Und es ist an sich auch egal ob es rundet oder abschneidet... fakt ist nur das er aus 32 div 1 = 0 macht...

ShowMessage(IntToStr(32 div 1)); // Ergibt 32 [edit] Haste schonmal ShowMessage(IntToStr(Teiler)) gemacht? [/edit]

Witzbold (sry, konnte ich mir nicht verkneifen) 1. Post Delphicode Zeile 8!

Zitat von xZise:

Witzbold (sry, konnte ich mir nicht verkneifen) 1. Post Delphicode Zeile 8!

Übersehen sorry.

Wenn ich das nochmal zusammenfassen darf:

Bei jeder Zuweisung, egal welcher Art, ist der Wert (habe bisher nur "Height" überprüft) = 0!