[VB.NET] Need a little help

[Murgen]

I created a windows tool to minimize, maximize, hide, and show sro_client in vb.net. It works great, but how is a way to make it list the clients, and make it possible to rename them and chose them to hide, because mine only supports one client ^^

Imports System.Runtime.InteropServices 'Import #1
Imports System.Diagnostics 'Import #2
Public Class Form1
    Const SW_HIDE As Integer = 0 'Hide Widnow
    Const SW_RESTORE As Integer = 9 'Show Window
    Const SW_MINIMIZE As Integer = 6 'Minimize Window
    Const SW_MAXIMIZE As Integer = 3 'Maximize Window
    Dim hWnd As Integer 'Special command
    Dim p As Process() = Process.GetProcessesByName("sro_client") 'Process Name
    <DllImport("User32")> Private Shared Function ShowWindow(ByVal hwnd As Integer, ByVal nCmdShow As Integer) As Integer 'dll Imports
    End Function

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        hWnd = p(0).MainWindowHandle.ToInt32 'Handle Window
    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
         ShowWindow(hWnd, SW_HIDE) 'Hide Window Button
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        ShowWindow(hWnd, SW_RESTORE) 'Show Window Button
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        ShowWindow(hWnd, SW_MINIMIZE) 'Minimize Window Button
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        ShowWindow(hWnd, SW_MAXIMIZE) 'Maximize Window Button
    End Sub
End Class

[Kraizy​]

Loop all processes and ask if ProcessName = "SRO_Client" and save MainWindowHandle.

[xXTraXx]

BTW if you are using .NET (and not vb6) the handle is an IntPtr, not a integer . (I know if you use integer it will work too, but IntPtr is better )

[vorosmihaly]

in c# I'd do this like this:

Process[] AllProcesses = Process.GetProcesses();
List<Process> Sro_clients = new List<Process>();
foreach(Process process in AllProcesses)
{
if(process.Name == "SRO_Client")
{
Sro_clients.Add(process);
}
}

then you can work with that list..^^
good luck with your project!

[Murgen]

Originally Posted by vorosmihaly

in c# I'd do this like this:


then you can work with that list..^^
good luck with your project!

I will convert that and see what I get.

Btw, your domain is suspended.

[chea77er]

BTW: You can use

List<Process> sro_clients = new List<Process>();
sro_clients.AddRange(Process.getprocessesbyname("sro_client");

[ÑõÑ_Ŝŧóp]

here you can do it with autoshit aka autoit !

#include <GuiListBox.au3>

$win = WinList("[CLASS:CLIENT]")
For $i = 1 To $win[0][0]
_AddToList($win[$i][0])
Next

Func _AddToList($string)
_GUICtrlListBox_AddString($list,$string)
EndFunc

i hope i helped