verschachtelte function?

[JasonDX]

Zitat von alienous:

hi, beim durchforsten der DP is mir mal aufgefallen, das eine function in einer procedure gab, so in der art:

Delphi-Quellcode:

procedure haupt;
  function verschachteln(...):String;
  var ...
  begin
    //inhalt der function
  end;
var ...
begin
  //inhalt der procedure
end;

kann mir jemand erklären wieso die function nich einfach über der procedure steht? wo liegt denn da der vorteil und was für unterschiede gibt es da?

Ums mal mit einem anderen Beispiel zu zeigen:

Delphi-Quellcode:

procedure Blubb(x, y: integer);
var
  a, b: integer;
  procedure Bla(f: string);
  begin
  end;
var
  s, t: integer;
begin
end;

Das hat folgenden Sinn: Die Prozedur Bla ist nur innerhalb der Prozedur Blubb aufrufbar. Zudem kann Bla auf die Parameter von Blubb, sowie auf die vor ihr deklarierten Variablen zugreifen.
Gebraucht werden kann es bspw., wenn man laengere Methoden hat, in denen bestimmte Codestuecke oefters vorkommen. Um dann nicht eigene private-Methoden dafuer in die Klasse zu schieben, die das redundante Codestueck implementiert, kann diese "Funktionsintern" deklariert werden.
Ob das allerdings zum schoenen Programmierstil gehoert, diese Entscheidung sei jedem selbst ueberlassen.

greetz
Mike