>>418　もう少し具体的に書いてくれた方がいいなあ

まず>>417　の TForm1.FormPaintを 例に　Form2から呼び出すには
　Form1.FormPaint(Form1);
　のように Form1を付ければ呼び出せる。
　ただし、当然描画されるのは Form1に描画される

　Form2に描画させたいなら、
procedure TForm1.FormPaint(Sender: TObject);
begin
　with Sender as TForm do begin
　　Canvas.Ellipse(1,25,80,50);
　　Canvas.TextOut(10,30,'こんにちは');
　end;
end;
　と、両方に描画出来るように作っておいて Form1.FormPaint(Self) と引数でどれに描画するか指定する


まとめて処理する方法は、　for i:=0 to ControlCount-1 do begin で　
if Controls[i] is TButton then with Controlst[i] as Tbutton do
　begin
　 Enable:=True;
　　・・・　他の処理
　end;
みたいな感じかな