Autor Beitrag
Tow
Hält's aus hier
Beiträge: 6



BeitragVerfasst: Di 12.06.12 15:01 
Ich habe folgendes Problem:

Ich will zum Beispiel prüfen ob eine gewisse Anzahl (wird in Schleife erhöht) an Icons durch eine bestimmte Zahl (nehmen wir hier 8) dividierbar ist.
Wie mache ich das in Delphi so variabel wie möglich?

Moderiert von user profile iconNarses: Titel geändert, war: "Prüfen, ob Division durchführbar ist? - Bitte schnell!".
bummi
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 1248
Erhaltene Danke: 187

XP - Server 2008R2
D2 - Delphi XE
BeitragVerfasst: Di 12.06.12 15:04 
ausblenden Delphi-Quelltext
1:
2:
3:
4:
Function TeilBar(Zahl,Divisor:Integer):Boolean;
begin
  Result := (Divisor <> 0and ( Zahl mod Divisor = 0);
end;

_________________
Das Problem liegt üblicherweise zwischen den Ohren H₂♂
DRY DRY KISS
Tow Threadstarter
Hält's aus hier
Beiträge: 6



BeitragVerfasst: Di 12.06.12 15:51 
Danke. Was macht das Zahl mod Divisor?
Gausi
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 8548
Erhaltene Danke: 477

Windows 7, Windows 10
D7 PE, Delphi XE3 Prof, Delphi 10.3 CE
BeitragVerfasst: Di 12.06.12 15:55 
Mod ist der Rest der ganzzahligen Division. So wie früher in der Grundschule, wenn man schriftlich dividieren musste. Z.B. 26 / 7 = 3 Rest 5. Die 5 ist das Ergebnis von 26 mod 7.

_________________
We are, we were and will not be.

Für diesen Beitrag haben gedankt: Tow
Nersgatt
ontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic starofftopic star
Beiträge: 1581
Erhaltene Danke: 279


Delphi 10 Seattle Prof.
BeitragVerfasst: Di 12.06.12 16:04 
Und der Bruder von mod ist div. Der dividiert und schmeißt den Rest weg. Um bei Gausis Beispiel zu bleiben: 26 div 7 = 3.

_________________
Gruß, Jens
Zuerst ignorieren sie dich, dann lachen sie über dich, dann bekämpfen sie dich und dann gewinnst du. (Mahatma Gandhi)

Für diesen Beitrag haben gedankt: Tow
Tow Threadstarter
Hält's aus hier
Beiträge: 6



BeitragVerfasst: Di 12.06.12 16:19 
Danke, ihr seid echt spitze!
Immer gleich kompetente Antworten.