پیدا کردن وضعیت یک کلید در فرم دیگر

[Payman62]

سلام.
فرض من هندل یه کلید از یه پنجره دیگه رو گرفتم. میخوام بدونم این کلید ظاهر هست یا نه. Enable هست یا disable. چطور میتونم بفهمم.
با توابع GetWindowPlacement و GetWindowLong ور رفتم. چیزی دستگیرم نشد. کسی میدونه مشکل با چه تابعی حل میشه؟

[lord_viper]

The IsWindowEnabled function determines whether the specified window is enabled for mouse and keyboard input.

کد:

BOOL IsWindowEnabled(

    HWND hWnd     // handle of window to test
   );    


Parameters

hWnd

Identifies the window to test.

Return Values

If the window is enabled, the return value is nonzero.
If the window is not enabled, the return value is zero.

Remarks

A child window receives input only if it is both enabled and visible.

[mohsen0025]

سلام
اگه منظورت تو خود پروژته که بتونی از دیگر فرم ها باخبر بشه که بدونی enabled هستن یا نه باید این کار رو بکنی
یه تکس باکس به برنامه اضافه کن و خاصیت مالتیلاین اونو true کن و کد زیر رو تو قسمت load فرم بنویس:
private sub form_load()
if form2.command1.enabled =false then
text1.text = text1.text & "Command1 hast enabled" & vbcrlf
elseif form2.label1.visible = false then
text1.text = text1.text & "label1 hast visible" & vbcrlf
end if
end sub

---

سلام
اگه منظورت تو خود پروژته که بتونی از دیگر فرم ها باخبر بشه که بدونی enabled هستن یا نه باید این کار رو بکنی
یه تکس باکس به برنامه اضافه کن و خاصیت مالتیلاین اونو true کن و کد زیر رو تو قسمت load فرم بنویس:

کد:

private sub form_load()
if form2.command1.enabled =false then
text1.text = text1.text & "Command1 hast enabled" & vbcrlf
elseif form2.label1.visible = false then
text1.text = text1.text & "label1 hast visible" & vbcrlf
end if
end sub

[CRazYFULL]

سؤال ايشون کاملاً واضح بود
لرد هم يک تابع API برای تشخيص دادن enable يا disable بودن فرم يا اشياء داخل اون به وسيله هندل معرفی کردند

کد:

Private Declare Function IsWindowEnabled Lib "user32" (ByVal hwnd As Long) As Long

جواب شما خيلی مبتديانه هست به نظر شما کسی که مدت زيادی هست vb کار ميکنه نميتونه از حالات پروژه خودش با خبر بشه؟

[Payman62]

سلام
اگه منظورت تو خود پروژته که بتونی از دیگر فرم ها باخبر بشه که بدونی enabled هستن یا نه باید این کار رو بکنی
یه تکس باکس به برنامه اضافه کن و خاصیت مالتیلاین اونو true کن و کد زیر رو تو قسمت load فرم بنویس:
private sub form_load()
if form2.command1.enabled =false then
text1.text = text1.text & "Command1 hast enabled" & vbcrlf
elseif form2.label1.visible = false then
text1.text = text1.text & "label1 hast visible" & vbcrlf
end if
end sub

---

سلام
اگه منظورت تو خود پروژته که بتونی از دیگر فرم ها باخبر بشه که بدونی enabled هستن یا نه باید این کار رو بکنی
یه تکس باکس به برنامه اضافه کن و خاصیت مالتیلاین اونو true کن و کد زیر رو تو قسمت load فرم بنویس:

کد:

private sub form_load()
if form2.command1.enabled =false then
text1.text = text1.text & "Command1 hast enabled" & vbcrlf
elseif form2.label1.visible = false then
text1.text = text1.text & "label1 hast visible" & vbcrlf
end if
end sub

سلام.
2 بار به شما تذکر دادم جواب های بی ربط ارسال نکنید.
چه اصراریه به همه سوال ها پاسخ بدی. شما سعی کن تو فروم بیشتر یاد بگیری تا یاد بدی.
تکرار میکنم. به سوالاتی پاسخ بده که 100% مطمنی جوابی که میدی صحیح هست.