Workerklasse:
einfach eine Klasse, wo alle deine lokalen/verschachtelten Prozeduren drin sind.
KREUZweiser Zugriff ... z.B.:
Delphi-Quellcode:
Procedure AAAA;
Var x: Integer;
Procedure BBBB;
Begin
x := 2;
End;
Begin
x := 1;
BBBB;
If x = 2 Then ....;
End;
[edit]
zu langsam