用timer做在視窗中自動隱藏面板

2021-04-09 00:25:09 字數 783 閱讀 2364

在form左邊dock乙個panel  當滑鼠移到form左邊時,panel自動從左邊出來,離開後自動隱藏

private

sub timer1_tick()

subtimer1_tick(

byval

sender 

assystem.object, 

byval

e as

system.eventargs) 

handles

timer1.tick

dimcurrpos 

assystem.drawing.point

currpos =me

.cursor.position

dimx 

asinteger

'x = currpos.x - me.panel1.leftx =

currpos.x -me

.left

ifmath.abs(x) 

<

me.panel1.left +20

then

ifme

.panel1.width 

<

220then

me.panel1.width 

+=20

endif

else

ifme

.panel1.width 

>

15then

me.panel1.width 

-=20

endif

endif

end sub

站在視窗的時候

站在視窗已經很多次了。但是每次的想法都差不多是一樣的。看著馬路上的車來回的行駛,有時卻也是疾馳。此刻我的心情是激動的,在大學已經三年了,馬上就要 被大四 了,其實都已經被了。總覺得,在學校是在溫室裡面,每天呼吸的空氣都是清新的,不是心理感覺事實卻也是這樣的。偶爾走出校門的時候,得以呼吸社會的空氣,那...

MessageBox顯示在視窗的後面

分類 mfc 2014 04 30 11 43 77人閱讀收藏 編輯 刪除mfc messagebox onpaint 如下。主要功能是,建立了乙個視窗,然後單擊滑鼠左鍵時彈出乙個messagebox include class cmywnd public cframewnd include cre...

opengl 教程 2 在視窗畫點

通常寫opengl程式時候,我們都需要glew庫,該庫包裝了opengl的各種擴充套件,便於我們使用。我們可以在main函式中呼叫glew初始化函式,之後就可以查詢opengl各種擴充套件能否使用了,對於能夠使用的函式,可以動態的載入。在這篇教程中,我們首先了解一下頂點緩衝物件 vbo,vertex...