Frame aus eigener Prozedur aufrufen

[pmros]

Danke für deine Antwort, aber

Delphi-Quellcode:

procedure CNCCommandBox (H:String;myFrame:TFrame);
begin
  if (H ='H') then begin
    myFrame.visible:=true;
    myFrame.Left:=192;
    myFrame.Top:=232;
  end;
end;

ist doch das gleich wie

Delphi-Quellcode:

procedure CNCCommandBox (H:String;FrameH:TFrame);
begin
  if (H ='H') then begin
    FrameH.visible:=true;
    FrameH.Left:=192;
    FrameH.Top:=232;
  end;
end;

Nur, dass TFrameH mit myFrame ausgetauscht wurde.

Das funktioniert ja auch, allerdings muss ich jetzt meine Prozedur eben mitCNCCommandBox(Variabel,FrameH) oder eben CNCCommandBox(Variabel,myFrame) aufrufen. Das möchte ich ja nicht. Ich will verhindern, dass ich erst zig IF Abfragen haben, wo bei jeder Möglichkeit ein anderer Frame an die Prozedur übergeben wird. Der jeweilige Frame soll über die übermittelte Variabel erst in der Prozedur ermittelt werden.