PDA

View Full Version : چگونگی برنامه هایی که در برنامه مقیم می شوند



davood110
دوشنبه 22 اسفند 1384, 07:22 صبح
سلام به همه دوستان

من یه مشکلی دارم و اینه که چطور می شه یه برنامه را در حافظه اصلی برنامه مقیم کرد و هم اینکه در ابتدای راه اندازی سیستم برنامه نیز اجرا بشه(یعنی همون startup سیستم) برنامه هایی مثل لغت نامه ها و همینکه بتونیم ایکون برنامه رزیدنت شده را در taskbar سمت راست صفحه کنار ساعن و دیگران بیاره اگه کسی می دونه و می تونه کمکی بکنه مظلبتون را حتما بزارید.

ممنون

Payman62
دوشنبه 22 اسفند 1384, 12:02 عصر
سرچ کنی 100 دفعه در مورد استارت آپ بحث شده.
اگه میخوای برنامه خودت بیاد کنار ساعت ocx داره. اگه میخوای بگو برات بذارم. ولی برنامه های دیگه باید خودشون چنین امکانی داشته باشن.

thief_cns
دوشنبه 22 اسفند 1384, 23:39 عصر
برای قرار دادن آیکون نرم افزار در کنار ساعت . و پاک کردن آن در هنگام بستن نرم افزار


ماژول 1


Public gPort As Integer
Public gIPAddress As String
Public gTotalincoming As String
Public gServerLog As String
Public gNumConnections As Long

Public gPort1 As Integer
Public gIPAddress1 As String
Public gTotalincoming1 As String
Public gServerLog1 As String
Public gNumConnections1 As Long


Public Sub AddToTotalIncoming(additional_text As String)

gTotalincoming = additional_text & vbNewLine & gTotalincoming

End Sub
Public Sub AddToServerLog(additional_text As String)

gServerLog = additional_text & vbNewLine & gServerLog

End Sub

---------------- ماژول 2



Public nahveyevorod As String
'user defined type required by Shell_NotifyIcon API call
Public Type NOTIFYICONDATA
cbSize As Long
hWnd As Long
uId As Long
uFlags As Long
uCallBackMessage As Long
hIcon As Long
szTip As String * 64
End Type

'constants required by Shell_NotifyIcon API call:
Public Const NIM_ADD = &H0
Public Const NIM_MODIFY = &H1
Public Const NIM_DELETE = &H2
Public Const NIF_MESSAGE = &H1
Public Const NIF_ICON = &H2
Public Const NIF_TIP = &H4
Public Const WM_MOUSEMOVE = &H200
Public Const WM_LBUTTONDOWN = &H201 'Button down
Public Const WM_LBUTTONUP = &H202 'Button up
Public Const WM_LBUTTONDBLCLK = &H203 'Double-click
Public Const WM_RBUTTONDOWN = &H204 'Button down
Public Const WM_RBUTTONUP = &H205 'Button up
Public Const WM_RBUTTONDBLCLK = &H206 'Double-click

Public Declare Function SetForegroundWindow Lib "user32" _
(ByVal hWnd As Long) As Long
Public Declare Function Shell_NotifyIcon Lib "SHELL32" _
Alias "Shell_NotifyIconA" _
(ByVal dwMessage As Long, pnid As NOTIFYICONDATA) As Boolean

Public nid As NOTIFYICONDATA

---------------------------


form load اولین فرم




''''''''''''''''''''''''''''''''''''''''برای ایجاد ایکون پایین
With nid
.cbSize = Len(nid)
.hWnd = Me.hWnd
.uId = vbvbNull
.uFlags = NIF_ICON Or NIF_TIP Or NIF_MESSAGE
.uCallBackMessage = WM_MOUSEMOVE
.hIcon = Me.Icon
.szTip = "TD Massenger" & vbNullChar
End With
Shell_NotifyIcon NIM_ADD, nid



'''''''''''''''''''''''''برای پاک کردن آیکون



Shell_NotifyIcon NIM_DELETE, nid



خدا نگهدار:چشمک:

meh_secure
سه شنبه 23 اسفند 1384, 01:38 صبح
توی تاپیک sys tray کلی دربارش صحبت شد. جون هر کی که دوست داری سرچ کن. آقای thief هم از تگ code استفاده کنید.