Auf Inhalt zur Laufzeit erzeugter Komponenten zugreifen

[WM_CLOSE]

stimmt nicht! es ist laut Delphi Hilfe effizienter. Aber dann sparsam und nur in performancekritischen Schleifen einsetzen. Der Debugger mag das nicht D2009). Außerdem wird es mit zunehmender Länge der Blöcke schwer verständlich.

[DeddyH]

Zitat von WM_CLOSE:

stimmt nicht! es ist laut Delphi Hilfe effizienter.

Wo hast Du das gelesen? Abgesehen davon überwiegen die Nachteile derart, dass man wirklich nur von with abraten kann, Beispiele dafür gibt es haufenweise hier im Forum.

[WM_CLOSE]

Aus der Delphi 2009 Hilfe: Deklarationen und Anweisungen

Zitat:

with-Anweisungen
Eine with-Anweisung stellt eine einfache und bequeme Möglichkeit dar, die Felder eines Records oder die Felder, Eigenschaften und Methoden eines Objekts zu referenzieren. Die Syntax für eine with-Anweisung lautet

Delphi-Quellcode:

with Objekt do Anweisung, oder 
with Objekt1, ..., Objektn do Anweisung

Hierbei ist Objekt ein Ausdruck mit einer Referenz auf einen Record, eine Objektinstanz, eine Klasseninstanz, eine Interface- oder Klassentyp (Metaklassen)-Instanz. Anweisung ist eine einfache oder eine strukturierte Anweisung. Innerhalb von Anweisung brauchen Felder, Eigenschaften und Methoden von Objekt nur über ihren Bezeichner referenziert zu werden. Die Angabe von Qualifizierern ist nicht erforderlich.

Ausgehend von den Deklarationen

Delphi-Quellcode:

type 
  TDate = record
    Day: Integer;
    Month: Integer;
    Year: Integer;
  end;

var
  OrderDate: TDate;

with OrderDate do
 if Month = 12 then
   begin
     Month := 1;
     Year := Year + 1;
   end
 else
   Month := Month + 1;
if OrderDate.Month = 12 then
  begin
   OrderDate.Month := 1;
   OrderDate.Year := OrderDate.Year + 1;
  end
else
  OrderDate.Month := OrderDate.Month + 1;

Wenn die Interpretation von Objekt die Indizierung von Arrays oder die Dereferenzierung von Zeigern verlangt, werden diese Aktionen einmal durchgeführt, bevor die Anweisung ausgeführt wird. Dies macht with-Anweisungen sowohl effizient als auch kurz. Außerdem können sich während der aktuellen Ausführung der with-Anweisung Zuweisungen an eine Variable innerhalb von Anweisung nicht auf die Interpretation von Objekt auswirken.

Jede Variablenreferenz und jeder Methodenname in einer with-Anweisung wird, wenn möglich, als Element des angegebenen Objekts bzw. Records interpretiert. Wenn in der with-Anweisung auf eine andere Variable oder Methode mit demselben Namen zugegriffen werden soll, ist ein Qualifizierer erforderlich:

Delphi-Quellcode:

with OrderDate do 
  begin
    Year := Unit1.Year;
       ...
  end;

Wenn auf with mehrere Objekte oder Records folgen, wird die gesamte Anweisung als Folge von verschachtelten with-Anweisungen behandelt. Die Anweisung:

with Objekt1, Objekt2, ..., Objektn do Anweisung ist gleichbeudeutend mit

Delphi-Quellcode:

with obj1 do
  with obj2 do
    ...
    with objn do
      // Anweisung

In diesem Fall wird jede Variablenreferenz und jeder Methodenname in Anweisung als Element von Objektn behandelt, wenn dies möglich ist. Andernfalls wird die Referenz bzw. der Name als Element von Objektn1 interpretiert usw. Dieselbe Regel gilt für die Interpretation der Objekte selbst. Ist beispielsweise Objektn sowohl ein Element von Objekt1 als auch von Objekt2, wird es als Objekt2.Objektn interpretiert

[DeddyH]

Ich lese daraus nicht, dass with effizienter sein soll als der Verzicht darauf.

[shmia]

Nun, wir haben es hier mit einer Kollison des Scope zu tun.
Sowohl das dynamisch angelegte TEdit als auch das übergeordnete TForm besitzen teilweise die gleichen Properties (Name, Parent, Autosize, SetBounds).
Durch die Verwendung von With kann der Programmierer nicht mehr zuverlässig unterscheiden, welches Objekt konkret angesprochen wird.

Sobald aber nur die geringste Unsicherheit besteht, sollte man von With die Finger lassen.
Der Gewinn von Zeit im Mikrosekundenbereich ist es einfach nicht wert.

[Patito]

Von With-statements sollte man bekanntlich grundsätzlich die Finger lassen.
Von dem Beispiel aus der Delphi 2009 Hilfe kriegt man ja ganz blutige Augen... Aua!

Ausserdem sieht oben im Code die Verwendung von FindComponent() noch ein wenig nach
einer zweiten Sollbruchstelle aus. Normalerweise sollte man Objekte über vernünftige Objekt-Referenzen
verwalten. Zur Laufzeit mit Objekt-Namen herumzuhantieren sieht immer etwas amateurhaft aus.

[himitsu]

Zitat von DeddyH:

Zitat von WM_CLOSE:

es ist laut Delphi Hilfe effizienter.

Wo hast Du das gelesen?

WITH legt eine lokale Variable an, welche als eine Art SELF und somit als aktueller Namespace fungiert.

Wenn an WITH nur eine einfache, lokale Variable übergibt, dann wird wirklich da nichts optimiert.
Übergibt man an WITH aber ein Funktionsresult oder einige Property, dann wird da natürlich so Einiges optimiert, da das Konstruct innerhalb des WITH-DO nur einmal ausgewertet wird.

[Patito]

Zitat von himitsu:

Zitat von DeddyH:

Zitat von WM_CLOSE:

es ist laut Delphi Hilfe effizienter.

Wo hast Du das gelesen?

WITH legt eine lokale Variable an, welche als eine Art SELF und somit als aktueller Namespace fungiert.

Wenn an WITH nur eine einfache, lokale Variable übergibt, dann wird wirklich da nichts optimiert.
Übergibt man an WITH aber ein Funktionsresult oder einige Property, dann wird da natürlich so Einiges optimiert, da das Konstruct innerhalb des WITH-DO nur einmal ausgewertet wird.

In solchen Fällen legt man Funktionsresult oder Property üblicherweise selbst in einer lokalen Variablen ab.
Technisch gibt es eventuell einen theoretischen Vorteil für das With (Stack vs Register für die lokale Variable!?).

Sobald man aber mal die Ineffizienz berücksichtigt, die dadurch entsteht, dass der With-Code schwerer zu maintainen ist, gibt es praktisch keine Rechtfertigung mehr auch nur ein einziges With zu verwenden.