Wenn alle Frames von TFrame abgeleitet sind und Du nur Attribute benutzt, die auch bei TFrame vorhanden sind, dann könnte das funktionieren:
procedure CNCCommandBox (H:String; myFrame:TFrame);
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;