[FengziSoft]庆祝论坛重开, 开源一套人事管理软件

wangmeng3488700 · 发表于 2013-1-27 10:57:16

好东西学习中，谢谢楼主

gniw · 发表于 2013-2-21 00:35:28

我#NoTrayIcon

Local $Gif = @ScriptDir & '\MMqq.gif'

;MM图片文件过大，不上传了，下面这行可直接下载，不保证链接一直有效。下载完可删除下载这段。
If Not FileExists($Gif) Then
      Tooltip('正在网上拉MM，请稍候…')
      Local $Size = InetGet('http://m3.img.libdd.com/farm4/97/1E1EC4CD274C2ABFCF23D65E8397F161_275_450.GIF', $Gif, 1)
      Tooltip('')
      If $Size <> 2095058 Then Exit MsgBox(48, $Size & ':(', 'MM跟丢了…')
EndIf

HotKeySet('{esc}', '_Exit')

Local $Gui = GUICreate('无边框Gif动画界面，可拖动及右键菜单例子 By afan', 265, 430, -1, -1, 0x80000000, 0x00000008)
      ;$WS_POPUP = 0x80000000 $WS_EX_TOPMOST = 0x00000008
Local $iLb = GUICtrlCreateLabel('', 0, 0, 265, 430, -1, 0x00100000)             ;$GUI_WS_EX_PARENTDRAG = 0x00100000
Local $oIE = ObjCreate('Shell.Explorer.2')
GUICtrlCreateObj($oIE, -15, -20, 300, 490)
$oIE.navigate($Gif)
GUISetState()

Local $DummyMenu, $ContextMenu, $hMenu, $ExitMenuItem, $CurInfo
$DummyMenu = GUICtrlCreateDummy()
$ContextMenu = GUICtrlCreateContextMenu($DummyMenu)
$hMenu = GUICtrlGetHandle(-1)
$ExitMenuItem = GUICtrlCreateMenuItem('退出', $ContextMenu)

While 1
      $CurInfo = GUIGetCursorInfo($Gui)
      If Not @Error And ($CurInfo[3] = 1 And $CurInfo[4] = $iLb) Then _ShowMenu($Gui, $hMenu)
      Switch GUIGetMsg()
            Case -3, $ExitMenuItem
                     _Exit()
      EndSwitch
WEnd

Func _ShowMenu($hWnd, $hMenu)
      Local $arPos = MouseGetPos()
      Local $x = $arPos[0]
      Local $y = $arPos[1]
      DllCall('user32.dll', 'int', 'TrackPopupMenuEx', 'hwnd', $hMenu, 'int', 0, 'int', $x, 'int', $y, 'hwnd', $hWnd, 'ptr', 0)
EndFunc ;==>_ShowMenu

Func _Exit()
      Exit
EndFunc ;==>_Exit

nangua111111 · 发表于 2013-2-22 11:54:45

看看
学习

liupeng1990607 · 发表于 2013-3-5 13:52:17

求源码！！！！！！！！！！！！！！！！

PPTBS · 发表于 2013-3-5 21:27:03

这个要支持了

chen5306514 · 发表于 2013-3-15 09:06:15

看看啊啊啊啊

fjf123 · 发表于 2013-3-15 21:53:56

感觉还行，学习学习。

mbdnmt · 发表于 2013-3-16 02:26:27

MDB数据库？我觉得就这点信息Excel表格记录就足够用呀。。。

xeszero · 发表于 2013-3-20 11:53:44

看起来非常不错啊

xujinrongko · 发表于 2013-3-21 10:10:13

好东西啊，，，，，，，，

fangming202 · 发表于 2013-3-25 17:29:54

高手不得不让人佩服啊。

silvay22 · 发表于 2013-4-9 11:25:32

很好，很强大的说。

xyzc1989 · 发表于 2013-4-14 02:47:23

jirunyang · 发表于 2013-5-6 23:03:31

学习学习！！！！！！

rhci · 发表于 2013-5-7 21:20:37

...我就先看看说不定需要人做东西了

		自动登录	找回密码
密码			加入

[原创] [FengziSoft]庆祝论坛重开, 开源一套人事管理软件