请教高手，菜鸟在线等待。。。。。。 成功马上拿份

Question

在写对于驱动器方面的时候遇到问题
1）将popupmenu的菜单格改变颜色？？？
2）怎样将窗体缩小成WINDOWS任务栏图标？？？

Answer 1

第二个问题，你搜索一下看：
http://www.csdn.net/Expert/forum.asp?typenum=8&searchKeys=托盘&roomid=3&author=&tabletype=now

Answer 2

TO Drate(鸟窝里的虫)
上次的那件事，实在对不起；
就是
  控件数组给值的问题，希望你别介意；可以吗？

Answer 3

首先将菜单的ownerdraw属性设置为true;然后在菜单项的drawitem中写入代码即可。
procedure TForm1.New1DrawItem(Sender: TObject; ACanvas: TCanvas;
  ARect: TRect; Selected: Boolean);
begin
  acanvas.Font.Color:=clred;
  if selected then
    SetBkColor(acanvas.handle,clgreen)
  else
    setBkcolor(acanvas.handle,clblue);
  acanvas.TextRect(arect,0,0,new1.caption);
end;

Answer 4

问题以解决了，谢谢大家，在下用了第三方控件
Form，sysmenu,等等。。ok!!!!!!!!!!