Prozedur deaktivieren/reaktivieren

[Antonov]

Guten Abend alle zusammen,

ich steh vor einem Bequemlichkeitsproblem, wo ich nicht weiterkomme:
Neulich habe ich mir ein Berechnungstool erstellt, mit vielen Edits, die alle mit .OnChange auf eine einzige Prozedur ansprechen, die mir ein Endergebnis berechnet.
Jetzt habe ich vor, durch einen andere Prozedur (eine Art Kalibrierung) in die ganzen Edits etwas per Code hineinzuschreiben. Leider wird hierbei die Prozedur für .OnChange angesprochen, und das Programm wird dadurch ein wenig langsam.
Jetzt könnte ich in der Kalibrierungsprozedur die Eventhandler für alle Edits entfernen und nachher hinzufügen, aber ich frage mich (und mittlerweile das halbe Internet), ob es nicht einen Befehl gibt, eine Prozedur temporär "abzuschalten".
Habt ihr eine Idee?

p.s. Ich nutze FreePascal, aber ich hoffe, dass ich über Delphi erstens mehr Leute anspreche, zweitens das Wissen 1:1 in FreePascal übertragen kann.

[stahli]

Also Du möchtest programmgesteuert Edit1.Text und Edit2.Text ändern und Deine Berechnungsfunktion soll darauf nicht anspringen?
Ist das so richtig verstanden?

Dann kannst Du z.B. ein Flag

Delphi-Quellcode:

NotCalc: Boolean;

auf True setzen und Deine Berechnungsfunktion mit

Delphi-Quellcode:

if (NotCalc) then Exit;

sofort wieder verlassen.

[Antonov]

Verdammt ... so einfach lässt sich das lösen.
Ok, Danke! xD

... hm, ist das jetzt peinlich oder nicht?

[stahli]

nee :-)

[Perlsau]

Zitat:

Zitat von stahli (Beitrag 1324435)

Delphi-Quellcode:

if (NotCalc) then Exit;

Die Klammer wird nicht benötigt, wenn es sich um einen einfachen Ausdruck handelt. Mit einfach meine ich nur eine Bedingung, also daß entweder eine Boolean-Variable wie in deinem Fall eingesetzt wird, oder ein anderer Ausdruck wie z.B.

Delphi-Quellcode:

If S = '' then ...

(S='' stellt einen Booleanwert dar, denn die Aussage kann nur wahr oder falsch sein). Erst wenn mehrere Ausdrücke – mehrere Bedingungen – den resultierenden Boolean-Wert bilden sollen, benötigst du die Klammer, z.B.

Delphi-Quellcode:

If (S = '') and (c = 5) then ...

, um die Ausdrücke sauber voneinander zu trennen.