for i := 0 to Form_Name.ComponentCount - 1 do
if (Form_Name.Components[i] is TMenuItem) then
if uppercase(Copy(TMenuItem(Form_Name.Components[i]).name,1,3)) = 'MM_' then
TMenuItem(Form_Name.Components[i]).enabled := True
else
TMenuItem(Form_Name.Components[i]).enabled := False;
위의 문장에서 TMenuItem 의 사용법을 알고 싶읍니다.
변수라고 하는데.. ??? 뭐가뭔지..
하여간.. 도와주세요...제발..