Code in andere Unit auslagern

[Jerry]

Hallo zusammen
Zuerst mal ein Dankeschön an alle die immer sofort helfen... macht wirklich Spass so...!

Folgendes Problem:

Ich habe folgenden Code in einer Unit:

Delphi-Quellcode:

var
  Compo: TComponent;
begin  
   Compo:= FindComponent('edit1');
   if compo<> nil
   then
   begin
    TWinControl(Compo).TabStop := False;
   end;
end;

Wie kann ich diesen Code in eine andere Unit auslagern, damit ich diesen Code nicht redundant anlegen muss?
Ich möchte immer das Form übergeben, mit dem bei gewissen Feldern der Tabstop auf False gesetzt wird.
Die Komponenten die auf Tabstop False müssen lade ich von der Datenbank.

Ich möchte dies eigentlich so aufrufen können:

LoadTabStop(frm_Unit1);

Unit1 ist vom Typ TForm.

Wie sieht jetzt syntax mässig die LoadTabStop aus....


Weiss da jemand Rat...? Ich denke es geht hier nur um den richtigen Syntax...

Danke!