konhon

          忘掉過去,展望未來。找回自我,超越自我。
          逃避不一定躲的過, 面對不一定最難過, 孤單不一定不快樂, 得到不一定能長久, 失去不一定不再擁有, 可能因?yàn)槟硞€理由而傷心難過, 但我卻能找個理由讓自己快樂.

          Google

          BlogJava 首頁 新隨筆 聯(lián)系 聚合 管理
            203 Posts :: 0 Stories :: 61 Comments :: 0 Trackbacks

          procedure TForm1.Button1Click(Sender: TObject);
          var
             h,m,s,s1:hwnd;
          begin
            h:=FindWindow('notepad',nil);
             if h<>0 then
             begin
               m:=GetMenu(h);
               s:=GetSubMenu(m,1);
               s1:=GetSubMenu(s,7);
               SendMessage(h,WM_COMMAND,MakeLong(GetMenuItemId(s,7),0),s1);
            end;
          end;
          posted on 2005-08-25 21:05 konhon 優(yōu)華 閱讀(2703) 評論(0)  編輯  收藏 所屬分類: Delphi
          主站蜘蛛池模板: 永安市| 灵武市| 松阳县| 红安县| 合阳县| 汨罗市| 体育| 乐东| 仁怀市| 商丘市| 拉萨市| 恩施市| 商都县| 开远市| 惠州市| 启东市| 壶关县| 浦北县| 乌拉特后旗| 淅川县| 柳河县| 邵东县| 阳泉市| 南通市| 革吉县| 冀州市| 垦利县| 九龙坡区| 宜川县| 东辽县| 天门市| 那坡县| 宁南县| 大足县| 天峨县| 江安县| 桃源县| 金门县| 邹城市| 舟山市| 晋州市|