Merhaba, öncelikle çok teşekkür ederim yardım için. Kod işe yarıyor ancak notepad dışında başka uygulamalara yapamıyorum bunu. Örneğin FileZilla.exe'yi küçültmeyi deneyin yada herhangi bir oyunu veya bir başka şeyi.
Yalnızca notepad, paint ve benzeri programlarda işe yarıyor kod diğer programlarda yaramıyor. :(
Yalnızca notepad, paint ve benzeri programlarda işe yarıyor kod diğer programlarda yaramıyor. :(
Şimdi test ettim Filezilla gibi uygulamalar direkt olarak minimize başlamıyor. Ancak belirttiğim gibi timer ile kontrol edip uygulama açılır açılmaz minimize ve hide state'ine getirebilirsiniz.
For Each p As Process In Process.GetProcesses
If String.Compare(p.ProcessName, "notepad", True) = 0 Then
Dim hWnd As Integer = CType(p.MainWindowHandle, Integer)
ShowWindow(hWnd, SW_MINIMIZE)
End If
Next