به دست اوردن اسم پنجره های فعال!

[niksalehi]

سلام، چطوری میتونیم اسم پنجره هایی رو که باز است رو به دست بیاریم؟
یعنی هم اسم پنجره های باز، هم اسم پنجره ی جدیدی که باز میشه؟

[Veteran]

http://www.ex-designz.net/apidetail.asp?api_id=316

[niksalehi]

ممنون اما چیزی ازش سر در نیاوردم :افسرده:

[josh simpson]

سلام، چطوری میتونیم اسم پنجره هایی رو که باز است رو به دست بیاریم؟
یعنی هم اسم پنجره های باز، هم اسم پنجره ی جدیدی که باز میشه؟
اگر منظورتون پنجره های برنامه خودتونه:



foreach (Form item in Application.OpenForms)
{
MessageBox.Show(item.Name);
}



و اگر منظورتون پنجره های برنامه های دیگه است:



foreach (Process item in Process.GetProcesses())
{
MessageBox.Show(item.ProcessName);
MessageBox.Show(item.MainWindowTitle);
}

[niksalehi]

این کد واسه vb6 هست؟

[Hashemvp]

سلام
نه اون کدها ک دوست عزیزمون نوشتن مال VB.NET هستن

از این کد میتونی استفاده کنی ولی بر حسب نیاز خودت تغییرش بده
این کد Title یا کپشن پنچره ی فعال رو برمیگردونه

Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
Private Declare Function GetWindowTextLength Lib "user32" Alias "GetWindowTextLengthA" (ByVal hwnd As Long) As Long
Private Declare Function GetForegroundWindow Lib "user32" () As Long

Private Sub Timer1_Timer()
Dim hwnd As Long
Dim wndcaption As String * 256
Dim lenwnd As Long
hwnd = GetForegroundWindow()
lenwnd = GetWindowTextLength(hwnd)
GetWindowText hwnd, wndcaption, 256
wndcaption = Mid(wndcaption, 1, lenwnd)
Me.Caption = Trim(wndcaption)
End Sub

موفق باشی

[niksalehi]

همین کد رو میخواستم اما با یه تفاوت، اینکه خود به خود هر پنجره ای که فعال شد، فقط کپشن همون پنجره رو بده ( نیازی به تایمر نباشه)

[Hashemvp]

فکر نکنم همچنین کاری ب این رحتی ها باشه
اینطوری میشه ی نوع هک کردن فایل explorer.exe ک با هندل و اینا باید درستش کنی البته اینطوری ک ب ذهن من میرسه
شاید باقی بچه ها ی راه دیگه بلد باشن
موفق باشی