请问怎样写这样的过程?(菜鸟问题)
procedure TFMainForm.SpeedButton2Click(Sender: TObject);
begin
if activemdichild=FCarData then
FCarData.append; //FCarData为子窗口名,
append为定义在子窗口上的函数
if activemdichild=FSendCar then
FSendCar.append;
end;
我想把上边的写成一个过程
procedure TFMainForm.SpeedButton2Click(Sender: TObject);
begin
app(FCarData);
app(FSendCar);
end;
请问这个 app的过程应该怎样写,谢谢