Font := Form1.Font; if FontDialog1.Execute then for i := 0 to (Form1.ControlCount - 1) do if (Form1.Controls[i] is TButton) then (Form1.
確定! 回上一頁