عاوز اول لما ادوس على أيقونة البرنامج بتاعي اللي جنب الساعة البرنامج يفتح

ياجدعان ردوا عليا لو سمحتوا

أخي العزيز ممكن تكنب الكود اللي وضع الأيقونة حد الساعة من اجل الفائدة العامة :lol:

هذا الموضوع موجود في المنتدى إذا قمت بالبحث عن كلمة الساعة ستجد هذا الموضوع بالكود

وعلشان اخفف عليك ضع هذا الكود في الفورمة اللي عاوز الأيقونة بتاعتها تنزل بجانب الساعة

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

''SHELL_NOTIFYICON API CALL

Private Declare Function Shell_NotifyIcon Lib "Shell32" Alias "Shell_NotifyIconA" (ByVal dwMessage As Long, pnid As NOTIFYICONDATA) As Boolean

Private nid As NOTIFYICONDATA

''SYSTEM TRAY ICON

Private Type NOTIFYICONDATA

'User defined type required by Shell_NotifyIcon API call

cbSize As Long

hWnd As Long

uId As Long

uFlags As Long

ucallbackMessage As Long

hIcon As Long

szTip As String * 64

End Type

Private Const NIF_ICON = &H2

Private Sub Form_Load()

On Error Resume Next

With nid

.cbSize = Len(nid)

.hWnd = Me.hWnd

.uId = vbNull

.uFlags = NIF_ICON Or NIF_TIP Or NIF_MESSAGE

.ucallbackMessage = WM_MOUSEMOVE

.hIcon = Form1.Icon 'Put your form's name here

.szTip = "Emberson Fx Napster Buddy" & vbNullChar

End With

Shell_NotifyIcon NIM_ADD, nid 'Add icon to system tray

End Sub

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

السلام عليكم ..

ارفقت اداه بيسطه مع المثال و ارجوا ان تفيدك ...

TrayIcon2.zip

اخى اطع عى هذا الموضوع

ما تريدة

تفضل يا اخي اداه كامله بعدما اضفت بعض التعديلات عليها

الاداه مع مثال كامل لكيفيه استغلالها مثل اي برنامج بالاضافه لعرض بالونه بتعليمات اذا اردت كما يمكن استخدام كلك شمال اويمين لعمل بعض الاوامر

ولا تنسوني من خالص الدعاء

New_Folder__5_.rar

شكرا لكم جميعا