۱۷-خرداد-۱۳۸۷, ۲۱:۱۹:۰۴
۱۷-خرداد-۱۳۸۷, ۲۱:۳۳:۲۶
دوست عزيز
لطفا واضح تر بيان كنيد برنامه اي كه مي خواهيد بايد چه امكاناتي داشته باشه؟ و در ضمن آيا به سورس چنين برنامه اي احتياج داريد يا فقط خود برنامه رو مي خواهيد؟
لطفا واضح تر بيان كنيد برنامه اي كه مي خواهيد بايد چه امكاناتي داشته باشه؟ و در ضمن آيا به سورس چنين برنامه اي احتياج داريد يا فقط خود برنامه رو مي خواهيد؟
۱۷-خرداد-۱۳۸۷, ۲۱:۴۲:۰۷
نیاز فوری : برنامه ای می خواهم که در ناحیه Taskbarدرکنار ساعت سیستم تمام ایتم هایی که وجود دارد نام وکپشنش واگر امکان دارد اکونش با زدن دکمه فرمان رادر vb6لیست شود ممنونم!.
۱۷-خرداد-۱۳۸۷, ۲۳:۴۷:۴۶
به این راحتی نیست ولی شاید بشه با WindowFromPoint بتونی هندلشو به دست بیاری و بقیه کارها رو انجام بدی
۱۹-خرداد-۱۳۸۷, ۱۶:۲۰:۳۶
lord_viper نوشته است:به این راحتی نیست ولی شاید بشه با WindowFromPoint بتونی هندلشو به دست بیاری و بقیه کارها رو انجام بدی
نه اینطوری نمی شه چون هندل کل اون قسمت آیکونها به غیر از ساعت
یک هندل یکسان دارند و آیکونها هندل جدا ندارند
۱۹-خرداد-۱۳۸۷, ۱۷:۱۵:۳۹
هندل اون قسمت یکیه(بین همه share میشه) ولی ایکنها مال برنامه های دیگست این کد رو پیدا کردم البته به دلفی شاید کمکت کنه
کد:
function GetTooltipHandle: HWND;
{ All tray icons (but not the clock) share the same tooltip.
Return the tooltip handle or 0 if error. }
var
wnd, lTaskBar: HWND;
pidTaskBar, pidWnd: DWORD;
begin
// Get the TaskBar handle
lTaskBar := FindWindowEx(0, 0, 'Shell_TrayWnd', nil);
// Get the TaskBar Process ID
GetWindowThreadProcessId(lTaskBar, @pidTaskBar);
// Enumerate all tooltip windows
wnd := FindWindowEx(0, 0, TOOLTIPS_CLASS, nil);
while wnd <> 0 do
begin
// Get the tooltip process ID
GetWindowThreadProcessId(wnd, @pidWnd);
{ Compare the process ID of the taskbar and the tooltip.
If they are the same we have one of the taskbar tooltips. }
if pidTaskBar = pidWnd then
{ Get the tooltip style. The tooltip for tray icons does not have the
TTS_NOPREFIX style. }
if (GetWindowLong(wnd, GWL_STYLE) and TTS_NOPREFIX) = 0 then
Break;
wnd := FindWindowEx(0, wnd, TOOLTIPS_CLASS, nil);
end;
Result := wnd;
end;۲۸-خرداد-۱۳۸۷, ۰۰:۳۴:۵۵
ممنونم اگر در VB6باشد خیلی بهتراست ! چون من فقط در VB6کارمی کنم