Ich meine eine Prozedur, die keinen (Sender: TObject) braucht, sondern dessen Befehle ausgeführt werden, wenn man den Namen der Prozedur innerhalb einer anderen Prozedur aufruft:

Procedure ABC;
begin
...
...
...
end;

Prozedure XYZ(Sender: TObject);
begin
...
ABC;
...
end;