Merhaba Ustalar,
İnternetten bazı kaynaklara baktım. Sadece Notepad ve Hesap Makinesi gibi şeylere start verirken Minimize yani küçültülmüş bir şekilde (alta alınmış) bir şekilde başlatıyor.
Ama ben istiyorum ki bütün programları yani neyi açarsa açsın minimize olarak küçültülmüş alta alınmış olarak Process.Start versin istiyorum. Yani diğer uygulamalarda minimize edilmiş şekilde başlatılabilsin. Birde button1'e bastığımdada açık olan programı küçültsün minimize etsin istiyorum.
Bu mümkünmüdür?
.....Belki yardım edersiniz :(
ontedi emreyvz Decimas BRAGA Simurg
VB.Net Ödevi - Programı Minimize Olarak Başlatma |
6 Mesajlar | 907 Okunma | ||
- Üyelik 30.10.2013
- Yaş/Cinsiyet 30 / E
- Meslek WebMaster
- Konum Rusya
- Ad Soyad Ö** Ç**
- Mesajlar 339
- Beğeniler 154 / 71
- Ticaret 3, (%100)
- Üyelik 02.01.2014
- Yaş/Cinsiyet 29 / E
- Meslek Öğrenci
- Konum Ankara
- Ad Soyad R** Ç**
- Mesajlar 248
- Beğeniler 49 / 60
- Ticaret 2, (%100)
Sanırım bot yapmaya çalışıyosun. Programlar senin uygulamanın içinde mi çalışacak yoksa normal Process.start verip minimize yapmak mı istiyorsun? Pek anlamam ama yardımcı olmak için biraz araştırma yaptım ve bunu buldum. Kendi formun içinden çalıştırıp minimize atabilirsin belki. Burada sadece harici uygulamalar form içinde nasıl çalıştırılır onu anlatmış. Form içinde çalıştırıp minimize atabilirsin belki.
Burayı da incele , bu senin isteğine daha yakın
Edit : Bir de kod buldum
Burayı da incele , bu senin isteğine daha yakın
Edit : Bir de kod buldum
Dim p As ProcessStartInfo = New ProcessStartInfo("Mugen.exe") With {.WindowStyle = ProcessWindowStyle.Minimized}
Process.Start(p)
www
- Üyelik 19.04.2016
- Yaş/Cinsiyet 27 / E
- Meslek Bilgisayar Mühendisi
- Konum İstanbul Anadolu
- Ad Soyad E** Y**
- Mesajlar 689
- Beğeniler 110 / 250
- Ticaret 24, (%100)
Minimize, Maximize, Gizleme ve Eski Haline Döndürmek İçin öncelikle belirtilenler Global olarak tanımlanmalı:
Minimize olarak Uygulama başlatma:
Eğer yukarıdaki kod alta alınmış olarak başlatmıyorsa alttaki kodlar ile işlemi takip edip açıldığında anında küçültebilir veya gizleyebilirsiniz.
Varolan Uygulamayı Process'e göre alta alma(Minimize):
Varolan Uygulamayı Process'e göre büyütme(Maximize):
Varolan Uygulamayı Process'e göre gizleme(Hide):
Kolay gelsin.
'Global Olarak Tanımlanmalı
Declare Function ShowWindow Lib "user32.dll" (ByVal hwnd As Integer, ByVal nCmdShow As Integer) As Integer
Const SW_HIDE As Integer = 0
Const SW_RESTORE As Integer = 1
Const SW_MINIMIZE As Integer = 2
Const SW_MAXIMIZE As Integer = 3
Minimize olarak Uygulama başlatma:
Dim prcs As New ProcessStartInfo("notepad.exe")
prcs.WindowStyle = ProcessWindowStyle.Minimized
Process.Start(prcs)
Eğer yukarıdaki kod alta alınmış olarak başlatmıyorsa alttaki kodlar ile işlemi takip edip açıldığında anında küçültebilir veya gizleyebilirsiniz.
Varolan Uygulamayı Process'e göre alta alma(Minimize):
'Button Click Eventi:
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
Varolan Uygulamayı Process'e göre büyütme(Maximize):
'Button Click Eventi:
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_MAXIMIZE)
End If
Next
Varolan Uygulamayı Process'e göre gizleme(Hide):
'Button Click Eventi:
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_HIDE)
End If
Next
Kolay gelsin.
- Üyelik 30.10.2013
- Yaş/Cinsiyet 30 / E
- Meslek WebMaster
- Konum Rusya
- Ad Soyad Ö** Ç**
- Mesajlar 339
- Beğeniler 154 / 71
- Ticaret 3, (%100)
Minimize, Maximize, Gizleme ve Eski Haline Döndürmek İçin öncelikle belirtilenler Global olarak tanımlan.....
Sanırım bot yapmaya çalışıyosun. Programlar senin uygulamanın içinde mi çalışacak yoksa normal Process.start verip minimize yapmak mı istiyorsun? Pek anlamam ama yardımcı olmak için biraz araştırma yaptım ve URL="https://www.......
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. :(
- Üyelik 19.04.2016
- Yaş/Cinsiyet 27 / E
- Meslek Bilgisayar Mühendisi
- Konum İstanbul Anadolu
- Ad Soyad E** Y**
- Mesajlar 689
- Beğeniler 110 / 250
- Ticaret 24, (%100)
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
- Üyelik 30.10.2013
- Yaş/Cinsiyet 30 / E
- Meslek WebMaster
- Konum Rusya
- Ad Soyad Ö** Ç**
- Mesajlar 339
- Beğeniler 154 / 71
- Ticaret 3, (%100)
Çok teşekkür ediyorum.
Konuyu toplam 2 kişi okuyor. (0 kullanıcı ve 2 misafir)