konhon
          
				
          忘掉過去，展望未來。找回自我，超越自我。

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




          

          

Google









          

          


          
			          		
		
          
	
          

          

          
	
          
		
          
		    
		        
		        BlogJava
首頁
新隨筆
聯系
聚合

管理

			
			
				

          
	
          
		
          
			
			
			
				 
				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 優華 閱讀(2709) 評論(0)  編輯  收藏  所屬分類: Delphi 
	
          

          







          
	    
    




          








          

				

          



    







          
        
	




主站蜘蛛池模板：
资溪县|
宣汉县|
蒙自县|
遵义市|
丽江市|
菏泽市|
边坝县|
襄垣县|
连江县|
霍城县|
循化|
旺苍县|
原阳县|
兴安县|
饶平县|
崇阳县|
芜湖市|
镇宁|
万州区|
漳州市|
东乌|
靖西县|
江都市|
富蕴县|
新余市|
洛浦县|
宜兴市|
宁城县|
宣化县|
吉首市|
绿春县|
广丰县|
郴州市|
神木县|
本溪|
手游|
化隆|
道真|
城固县|
府谷县|
梁平县|