4. mod Berechnung

mod Berechnung

  • E

    Bisher habe ich in Delphi programmiert und versuche mich seit einigen Tagen mit BCB. Stelle eine Procedure zum zeichnen eines Lineals gerade um. Habe folgendes Problem bei der Umstellung.
    Delphi:
    if (abs(i+rd-4)) mod mm = 0 then ... 5 mm Striche zeichnen
    else if i mod 10 = 0 then ... 10 mm Strich und Zahl zeichnen

    mein BCB-Code: < haut einfach nicht hin >

    if (abs(i+rd-4) mod mm == 0) ... IPCanvas->LineTo(StrPos,Strich5mm);
    else
    if (i mod% 10 == 0) ...

    Wer sagt mir, wie diese if-Abfragen mit <abs und mod> richtig geschrieben werden, so daß der Ablauf wie bei Delphi funktioniert.
    Danke euch schon jetzt...
    Gruß Egbert

    0
  • L

    versuch mal:

    if (abs(i+rd-4))%mm == 0) IPCanvas->LineTo(StrPos,Strich5mm); 
else if (i%10 == 0) IPCanvas->LineTo(StrPos,Strich10mm);
    0
  • E

    Danke für die Antwort. Geht leider auch nicht. Folgende Fehlermeldung wird ausgegeben: E2188 Ausdruckssyntax
    Gruß Egbert...

    0
  • K
    Mod

    Hallo

    if (abs(i+rd-4))%mm == 0)

    besser ist

    if (abs(i+rd-4)%mm == 0)

    Eine Klammer zuviel bringt nichts wie Aerger 😃

    MfG
    Klaus

    0
  • E

    Hallo Klaus,
    jetzt klappt es. Vielen Dank!!!
    Gruß Egbert

    0
Anmelden zum Antworten