Ereignisbehandlung "abschalten" während Grid.OnDrawCell

[messie]

Moin,

ich wollte eine Formatierungsprozedur für ein TntStringGrid auslagern, weil ich mehrere Grids mit denselben Daten füttere. Wenn ich im OnDrawCell eine externe Routine aufrufe die das übernimmt, wird auch jedesmal das OnDraw-Ereignis ausgelöst und damit eine Endlosschleife.

Wie kann ich während der Ausführung der ausgelagerten Routine die Ereignisbehandlung Neuzeichnen abschalten? Das Problem ist, daß es ja einmal funktionieren soll.

Grüße, Messie

[Bernhard Geyer]

Das liegt vermutlich daran das die externe Funktion per Application.ProcessMessages genau eine Messagebehandlung will.

[Dezipaitor]

entweder du verwendest CriticalSections
oder du verwendest eine klassenglobale boolean Variable, die angibt, ob der Abschnitt derzeit ausgeführt wird.

[kalmi01]

Moin moin,

ob's in OnDrawCell auch funktioniert, weiss ich nicht, aber an anderer Stelle mache ich Ähnliches so:

Delphi-Quellcode:

function machwas;
  begin
    OnEreignis := nil;
    meinKram;
    OnEreignis := machwas;
  end;

[messie]

Zitat von Bernhard Geyer:

Das liegt vermutlich daran das die externe Funktion per Application.ProcessMessages genau eine Messagebehandlung will.

Nein, aber ich habe die Routine einem anderen Object zugeordnet um den Sender übergeben zu können und das wird es wohl auslösen. Ich zeichne ja innerhalb des OnDraw das Grid auch neu.

Grüße, Messie