32 div Teiler = 0 ?

[xZise]

Folgendes:

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 !!

[idontwantaname]

Div rundet auch :wink:

[Sharky]

Zitat:

Zitat von idontwantaname

Div rundet auch

Hai idontwantaname,

kannst Du mal beschreiben warum DIV "rundet"?

[mkinzler]

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

[JasonDX]

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 :gruebel:

@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

[xZise]

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]

[Die Muhkuh]

Zitat:

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...

Delphi-Quellcode:

ShowMessage(IntToStr(32 div 1)); // Ergibt 32

[edit] Haste schonmal ShowMessage(IntToStr(Teiler)) gemacht? [/edit]

[xZise]

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

[Die Muhkuh]

Zitat:

Zitat von xZise

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

:oops: Übersehen sorry.

[xZise]

Wenn ich das nochmal zusammenfassen darf:

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

[alzaimar]

Zitat:

Zitat von JasonDX

@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.

Daran liegt es. Wozu diskutieren, wo die Lösung doch so nah?

Zitat:

Zitat von xZise

fakt ist nur das er aus 32 div 1 = 0 macht...

Fakt ist (so ein idiotisches Kopieren von Werbesprüchen, brr..), das der Setter einfaches setzen der Größe so nicht hinnimmt. Wenn z.B. die Eigenschaft AutoSize von TImage den Wert 'True' hat, und Du z.B. ein leeres Bitmap zugewiesen hast, dann hat TImage dieses Verhalten.

Du kannst aber beruhigt sein, 'DIV' arbeitet korrekt, die Zuweisung auch, und bis auf wenige exotische Ausnahmen dürfte jede Kombination von Assemblerbefehlen auch korrekt abgearbeitet weren. Es liegt hier also ein einfaches Logikproblem vor.

[xZise]

Zitat:

Zitat von alzaimar

Zitat:

Zitat von JasonDX

@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.

Daran liegt es. Wozu diskutieren, wo die Lösung doch so nah?

Weil ich das ansonsten schon im Desginmodus einstellen könnte!

Zitat:

Zitat von alzaimar

Zitat:

Zitat von xZise

fakt ist nur das er aus 32 div 1 = 0 macht...

Fakt ist (so ein idiotisches Kopieren von Werbesprüchen, brr..), das der Setter einfaches setzen der Größe so nicht hinnimmt. Wenn z.B. die Eigenschaft AutoSize von TImage den Wert 'True' hat, und Du z.B. ein leeres Bitmap zugewiesen hast, dann hat TImage dieses Verhalten.

Sorry, aber das war keine Absicht!


So... Und nun wie es schon alzaimar gesagt hatte, lag es daran, dass die Images Autosize = true waren...

[alzaimar]

Zitat:

Zitat von xZise

Zitat:

Zitat von alzaimar

Zitat:

Zitat von xZise

fakt ist nur das er aus 32 div 1 = 0 macht...

Fakt ist (so ein idiotisches Kopieren von Werbesprüchen, brr..), ...

Sorry, aber das war keine Absicht!

Das ist ja grad das Perfide an Werbesprüchen :zwinker:
Schön, das das Problem gelöst ist.