Procedure in Procedure

[himitsu]

Bei kleines Funktionen/Proceduren nutze ich sowas manchmal, um "klarzustellen", daß diese eingebette Funktionen/Proceduren ausschließlich zur Übergeordneten Funktionen/Proceduren/Methode gehört.
[edit] Jupp, im Prinzip ist das so eine private Methode der übergeordneten Prozedur.

Und der einzige "Vorteil" ist, daß man direkten Zugriff auf lokale Variablen der übergeordneten Methode besitzt. (auf Die, welche davor deklariert sind)

[stahli]

Ich nutze so etwas auch öfter wegen der (für mich) besseren Übersichtlichkeit:

Delphi-Quellcode:

procedure DoSommething;
 procedure DoA;
 ...
 procedure DoB;
 ...
 procedure DoC;
 ...
begin
 DoA;
 DoB;
 DoC;
end;

Benötigte Parameter übergebe ich meist beim Prozedur-Aufruf (so dass ich die Unterprozeduren generell auch auslagern könnte).

Wie schon geschrieben, letztlich ist das Geschmackssache und ich entscheide das auch von Fall zu Fall unterschiedlich.

[himitsu]

Wobei inzwischen (seit über 5 Jahren) auch sowas ginge:

Delphi-Quellcode:

procedure DoSommething;
begin
  {$REGION 'DoA'}
  ...
  {$ENDREGION}
  {$REGION 'DoB'}
  ...
  {$ENDREGION}
  {$REGION 'DoC'}
  ...
  {$ENDREGION}
end;

Regionen lassen sich ja zusammenklappen.