<rt id="bn8ez"></rt>
<label id="bn8ez"></label>
  • 

    • <span id="bn8ez"></span>
    

    <label id="bn8ez"><meter id="bn8ez"></meter></label>
    

    
    

    




    







												


        


    
	
    
		
			


    

    posts - 33, comments - 46, trackbacks - 0, articles - 2
    


    		
	
    
	
    
		
			
		
		
			
    
				
					
	
    
		
		
    PowerBuilder在顯示圖片方面的確是一個弱項，以前一直沒有找到好的方法，如果自己用delphi寫個ActiveX控件，在關閉的時候總會出現錯誤，實在是很郁悶，后來發現Kodak Image Edit Control就沒有這個問題，而且可以支持BMP,DCX,GIF,JPG-JFIF,PCX,TIFF,WIFF,XIF等常見的圖片格式，該控件在win98,win2000等環境中都已經安裝好了，對于XP環境也可以簡單的從Win2000移植過來。
    1、鼠標放大、縮小效果
    在OLE控件的other事件中加入下面的代碼
    

     1Choose   Case   Message.Number   
     2  Case   522      
     3      if   IntHigh(message.wordparm)   =   120   then   //    鼠標滾輪向上 
     4        if int(ole_1.object.zoom)<=20 then     return
     5          ole_1.object.zoom= ole_1.object.zoom -10
     6      else   
     7          ole_1.object.zoom= ole_1.object.zoom+10
     8      end   if   
     9          ole_1.object.display()
    10End   Choose
    
    2、鼠標拖動效果
    如果不想選擇框老是出現的話，需要加入
    ole_1.object.SelectionRectangle = False
    

    1//1.定義Instance變量
    2int     mousex,mousey
    3int moveon
    
    以下代碼屬于OLE控件的事件
    

    1//Event MouseDown事件
    2moveon=1
    3mousex=ocx_x
    4mousey=ocx_y
    

    

    1//MouseMove事件
    2if moveon=0 then return
    3ole_1.object.ScrollPositionX =ole_1.object.ScrollPositionX+(MouseX -ocx_x)
    4ole_1.object.ScrollPositionY =ole_1.object.ScrollPositionY+(MouseY -ocx_y)
    5ole_1.object.refresh()
    6mousex=ocx_x
    7mousey=ocx_y
    

    

    1//mouseUp事件
    2moveon=0
    

    
	
    


    
	    
    




    





    


    

	
    
		
    
				
		
	
		
    
		
		
    只有注冊用戶登錄后才能發表評論。
    
		
    
			
		
    
			
		
    
		
		
    
		


    

		    		
		
    
		
    			
		
		
		
		
    
		
    
		
		
    
		
    
			網站導航:
		
		
    
		
    
			
		
    	
		
    
			 
		
    
		
    
			
		
    
		
    
			
				
		
    		
	
    	

    



    

				
			
    
		    		
	
    
	
    
		
			

		
	
    

    


    







    
        
	



主站蜘蛛池模板：
亚洲精品无码精品mV在线观看|
国产18禁黄网站免费观看|
亚洲色精品vr一区二区三区|
色费女人18女人毛片免费视频|
免费看少妇作爱视频|
91免费福利视频|
91麻豆精品国产自产在线观看亚洲|
无套内射无矿码免费看黄|
四虎永久成人免费|
免费手机在线看片|
久久久久亚洲精品无码网址|
亚洲精品黄色视频在线观看免费资源|
国产四虎免费精品视频|
亚洲AV成人噜噜无码网站|
久久这里只有精品国产免费10|
亚洲精华国产精华精华液|
日本免费人成黄页网观看视频|
亚洲精品高清久久|
4399影视免费观看高清直播|
亚洲一级大黄大色毛片|
国产免费人成在线视频|
一个人看的www免费在线视频|
全免费a级毛片免费看无码|
处破女第一次亚洲18分钟|
亚洲精品成人久久久|
免费无码又爽又刺激高潮软件|
亚洲资源在线视频|
成年美女黄网站18禁免费|
男性gay黄免费网站|
亚洲成a人片在线观看无码专区|
最近免费视频中文字幕大全|
亚洲中文字幕乱码熟女在线|
亚洲国产成人爱av在线播放|
无码日韩精品一区二区免费暖暖
|
亚洲狠狠婷婷综合久久久久
|
成年性午夜免费视频网站不卡|
羞羞视频免费网站入口|
久久精品国产亚洲|
一级毛片高清免费播放|
中文字幕在线观看亚洲|
国产免费看插插插视频|