BeginUpdate / EndUpdate "schachteln"?

[sko1]

Hallo,

da mir F1 zu BeginUpdate keine Treffer liefert frage ich einfach mal:

Ich habe mehrere Aktualisierungsproceduren

Delphi-Quellcode:

procedure Aktualisierung1;
begin
  try
   BeginUpdate;
   ..
  finally
   EndUpdate;
  end;
end;
procedure Aktualisierung2;
begin
  try
   BeginUpdate;
   ..
  finally
   EndUpdate;
  end;
end;

und eine welche alle Aktualisierungen zusammenfasst

Delphi-Quellcode:

procedure AktualisierungAlles;
begin
  try
   BeginUpdate;
   Aktualisierung1;
   Aktualisierung2;
   Aktualisierung3;
   ..
  finally
   EndUpdate;
  end;
end;

Wird im Fall von AktualisierungAlles das Control erst aktualisiert wenn das letzte EndUpdate erreicht wird oder wird in jeder einzelnen Aktualisierung neu gezeichnet?
Also wird BeginUpdate intern "gezählt" und erst beim letzten zugehörigen EndUpdate zurückgesetzt?

Ciao
Stefan

[Neutral General]

Es wird intern gezählt.

[sko1]

Danke, prima, dann passt das ja!

Ciao
Stefan

[Neutral General]

Du kannst dir übrigens den VCL-Code angucken ;) (Strg + Linksklick auf BeginUpdate oder EndUpdate)

Delphi-Quellcode:

procedure TStrings.BeginUpdate;
begin
  if FUpdateCount = 0 then SetUpdateState(True);
  Inc(FUpdateCount);
end;

[himitsu]

Zitat:

Delphi-Quellcode:

  try
   BeginUpdate;
   ..
  finally
   EndUpdate;
  end;

Delphi-Quellcode:

  BeginUpdate;
  try
   ..
  finally
    EndUpdate;
  end;

Denn wenn es im BEGIN knallt, dann darf/sollte END nicht aufgerufen werden.
> entweder nur falsch zählen oder, wie bei auch bei Create+Free, gibt es da nichts zum Runterzählen/Freigeben und es knallt womöglich gleich nochmal, was dann die ursprüngliche Fehlermeldung und Fehlerposition zerstört.

[sko1]

Ich sehe bei Deinem Code keinen Unterschied!

BeginUpdate ist die erste Zeile des try-Blocks, zwischen begin der Procedure und dem try ist nichts.

Also wird als allererster Befehl das BeginUpdate im try-Block aufgerufen, was soll da knallen?

Ciao
Stefan

[Sherlock]

Zitat:

Zitat von sko1 (Beitrag 1397091)

Also wird als allererster Befehl das BeginUpdate im try-Block aufgerufen, was soll da knallen?

Das BeginUpdate kann knallen.

Sherlock

[Amateurprofi]

Zitat:

Zitat von sko1 (Beitrag 1397091)

Ich sehe bei Deinem Code keinen Unterschied!

BeginUpdate ist die erste Zeile des try-Blocks, zwischen begin der Procedure und dem try ist nichts.

Also wird als allererster Befehl das BeginUpdate im try-Block aufgerufen, was soll da knallen?

Ciao
Stefan

Zum Beispiel in so einem Fall:

Delphi-Quellcode:

PROCEDURE TMain.Test;
var List:TStrings;
begin
   List.BeginUpdate;
end;

[sko1]

OK, Ihr habt mich überzeugt, das BeginUpdate kommt vor den try-Block!

Ciao
Stefan

[Neutral General]

Zitat:

Zitat von sko1 (Beitrag 1397098)

OK, Ihr habt mich überzeugt, das BeginUpdate kommt vor den try-Block!

Nur um sicher zu gehen: Das gilt auch für alles andere was man mit einem try-finally-Block absichern will.
D.h. auch das Erstellen eines Objekts etc. kommt VOR das try und nicht in das try rein.