Prozeduren innerhalb einer Prozedur

[Ultimator]

Ich weiß nicht, ob das auch mit Prozeduren innerhalb von Prozeduren klappt, aber hast dus schonmal mit

Delphi-Quellcode:

 procedure Main;

procedure zwei; forward;

procedure eins;
begin
  zwei;
end;

procedure zwei;
begin
  ShowMessage('Hallo');
end;

//Main
begin 
  eins;
end;

versucht?

//edit: Hab das gerade bei ner Buttonclick-Methode statt der hier obligatorischen "Main"-Methode verwendet und es klappt