konhon

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

          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)華 閱讀(2704) 評論(0)  編輯  收藏 所屬分類: Delphi
          主站蜘蛛池模板: 潜山县| 巧家县| 广饶县| 金坛市| 岳阳县| 贞丰县| 伊金霍洛旗| 叙永县| 洪湖市| 本溪市| 广平县| 鹿邑县| 宜春市| 乌恰县| 陆川县| 逊克县| 合水县| 平昌县| 东城区| 广水市| 陵川县| 犍为县| 吴堡县| 奉贤区| 夏津县| 锡林郭勒盟| 微博| 兰坪| 酉阳| 宁晋县| 西贡区| 丰镇市| 长治县| 新民市| 深泽县| 道真| 桐梓县| 上饶市| 读书| 安顺市| 常山县|