Mensajes

¿Habria manera de que cambiando algunos parámetros de tu código pudiera hacer que la interface se posicionara donde quisiéramos. O sea que pudiera quedar en la parte derecha del tamaño que queramos? ¿Me explico?.

Lo ideal seria algo asi por ejemplo......

C:\SetWindowPos.exe "notepad.exe", 225,151,18,165

O sea que añadiendole unos números al comando, la pantalla de la interface se posicionara en un lugar o en otro de la pantalla.

Una cosa es pedir un favor y otra muy distinta es aprovecharse, si hubieras especificado al principio que además de mover la ventana también querías redimensionarla no me habría importado, pero si la gente pide ayuda y no comenta estos detalles solo consigue hacer perder el tiempo a los que pretenden ayudar.

Aquí tienes: https://www.mediafire.com/?cpb9pp90b6tuz2h

Sintaxis:

Código [Seleccionar] Expandir

SetWindow programa.exe x y width height

Ejemplo:

Código [Seleccionar] Expandir

SetWindow.exe "Notepad" 0 0 100 100

Comentaste que tienes conocimientos de programación de VB6, algo es algo, y te he enviado el source del programa que escribí para ti, así que si tienes cualquier otra duda o quieres implementar cualquier otro tipo de mejora o funcionalidad en el programa entonces puedes formular las preguntas en la sección de programación .NET donde gustosamente te indicaré los pasos a realizar y te ayudaré, pero lo harás tu, no yo.

Saludos!

[Microsoft UI Automation]

No se que entenderás por "ventana de texto", pero realizar lo que propones, a parte de ser algo muy laborioso, elaborarlo de forma genérica parece una tarea imposible, ya que hay que conocer previamente o hallar el nombre de la Class de la ventana de edición y el HWND de dicha ventana (sin eso no haces nada), además, hay que tener en cuenta que muchos controles de edición (textboxes, richtextboxes, etc) pueden tener ventanas hijas donde se encuentra la capa del control editable.


En resumen:

Desarrollar una aplicación en la que simplemente escribiendo el nombre de un proceso o el título de una ventana de un proceso para pasarlo como parámetro no conseguirias nada, ya que faltarían datos (que ya he mencionado),
de todas formas con el nombre del proceso o el título de la ventana puedes hallar la ventana principal y enumerar sus ventanas hijas y el nombre de sus classes para hallar las ventanas de los controles editables, ¿el problema?, que obviamente pueden haber varios controles editables en una sola aplicación así que es practicamente imposible determinar en que ventana quieres pegar el texto a menos que supieras el índice al que corresponderia la ventana a la que quieres pegar el texto.

Poder puedes hacer algo medianamiente decente (de uso genérico hablando), pero por supuesto NO en Batch, NO en VBS, mi sugerencia: C++ o C#/VB.NET.

Aparte, para casos específicos siempre puedes recurrir a Microsoft UI Automation, hay muchas herramientas de este estilo:

Microsoft Inspect
Microsoft UI Accessibility Checker
WinSpy++

Con cualquiera de ellas puedes averiguar el handle, classname, y otra información adicional de cualquier ventana de un programa.





Respecto a lo de copiar en el portapapeles:

ClipCopy.bat

Código (dos) [Seleccionar] Expandir

@Echo OFF & Title Clipboard Copy

If "%~1" EQU "" (Exit /B 1)

Echo %~1| Clip.exe
Exit /B 0

Uso:

Código (dos) [Seleccionar] Expandir

ClipCopy.bat "Frase a copiar"

Saludos.

[imposible]

Para copiar texto debes redireccionar la salida de cualquier comando al comando Clip, ejemplo:

Código (dos) [Seleccionar] Expandir

Echo Hola Mundo! | Clip.exe

...a lo que se le añade una linea vacia al final.

Para pegar el contenido del portapapeles, tarea que debería ser muy sencilla, pero de hecho es imposible en algo tan simple como Batch, tampoco puedes recurrir a un lenguaje simple como VisualBasicscript ya que tampoco soporta operaciones con el portapapeles (como explican en este post ).

Puedes crear una pequeña utilidad en cualquier lenguaje que soporte el portapapeles, en VB.NET (y en C#) sería tan sencillo como esto:

Código (vbnet) [Seleccionar] Expandir

Dim Text As String = Clipboard.GetText()
Console.WriteLine(Text)
...sin el código intermediaro para realizar llamadas a la API de Windows para localizar la ventana a la que le quieres enviar el texto, eso ya sería mucho trabajo en cualquier lenguaje.

También puedes utilizar aplicaciones de terceros como complementos (comandos externos adicionales) de Batch, como Paste.exe: http://www.c3scripts.com/tutorials/msdos/paste.html
(no lo he testeado ni lo he descargado)

Saludos.

quiero saber si al pasarme a windows 8 ¿me podría valer?

Claro Senior++, no te preocupes por eso, VisualStudio 2013 es compatible con Windows 8/8.1, yo lo uso en dicho SO.


Saludos

[NO]

No puedes bypassear un límite que está impuesto en sl SO, un límite en la máquina, ciertas cosas se pueden llevar a cabo, pero otras simplemente NO, tienes que adaptarte a dichas limitaciones.

Una posible alternativa para solucionar el problema podría ser modificando el nombre de usuario de tu perfil en caso de ser un nombre bastante largo, esto NO se hace de manera manual renombrando la carpeta... no vayas a intentarlo, y en fín, como resultado se modificaría el nombre de la carpeta C:\Users\TuNombre\ la cual es necesaría para acceder a 'AppData', pero antes de modificar el nombre mide la longitud de caracteres de la ruta completa, no vaya a servir para nada xD.

También podrías crear un nuevo usuario con un nombre muy corto, instalar el software en esa sesión, y luego acceder al software desde tu otra sesión de usuario.

De todas formas el error 1603 no tiene pinta de referirse a un error por nombre demasiado largo y aquí puedes encontrar posibles soluciones, síguelas al pie de la letra:

⇲
.NET 4 installation fails with error code 1603

⇲
Error on AutoCAD 2014 1603 .NET Framework Runtime 4.0

Suerte!

[EDITO:]

No entendiste bien el funcionamiento @FCOSTA, te explico:

1) No es una aplicación gráfica, es una aplicación commandline, es decir, se ejecuta desde la consola con los parámetros que ya indiqué más arriba:

Método de empleo:

Código [Seleccionar] Expandir

SetWindowPos.exe "Nombre del proceso.exe"

2) La aplicación busca el programa entre los procesos activos, no es necesario mover el archivo a la misma carpeta, simplemente asegúrate que el proceso esté en ejecución, como ya indiqué: Primero ejecutas el "notepad" (notepad, por decir algo) y luego la aplicación que te envié.

3) No le añadí al código ningúna verificación de errores que te pueda indicar si hubo algún error (como por ejemplo si el proceso no se encontró), esto es porque no lo he desarrollado de forma profesional debido a que no lo vi necesario, solo le añadí un par de instruccines básicas para que tomase el argumento que le debes enviar por consola para que te funcionase, nada más.
Asegúrate de utilizarla como es debido y todo debería ir bien



EDITO:
Un ejemplo Visual:

[youtube=960,540]https://www.youtube.com/watch?v=8yryxRA6IJ4[/youtube]


¿Lo entendiste ahora?, en pocas palabras, úsalo como si se tratase de un comando de Batch al que le pasas un parámetro, del mismo modo,
La idea es que ejecutes esa aplicación al mismo tiempo que ejecutas la aplicación que quieres mover, supongo que lo haces al inicio de Windows, pues eso, solo tienes que añadir una entrada más a la sección 'RUN' donde se define la ejecución de esos programas.

Ejemplo:

Código (ini) [Seleccionar] Expandir

Windows Registry Editor Version 5.00

[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run]
"SetWindowPos"="\"C:\\SetWindowPos.exe\" \"Nombre del Programa.exe\""

PD: Si sigues teniendo dificultades enviame el exe del programa que se pone en medio de la pantalla (y sus dependencias si tiene alguna para poder ejecutarlo) y te hago un apaño.

Saludos!

[NO]

1. Tengo actualmente el sistema operativo Windows 7 ¿Merece la pena quitarme de windows 7 para probar windows 8?

Soy un amante de Windows 7, desde que lo instalé por primera vez lo empecé a considerar el mejor SO de Windows, pero eso cambió cuando me actualicé a Windows 8/8.1, ¿eso te da una idea?, pero de todas formas, y para que mi opinión no se base solo en gustos personales, es sabido que las diferencias técnicas de Windows 7 a Windows 8 son abismales. empezando por un mayor rendimiento y estabilidad, y una mayor seguridad, tienes mucha información en internet, análisis comparativos, tablas de diferencias, no veo suficiente motivo para formular esa pregunta ya que en Google puedes encontrar la respuesta, y siempre será la misma .

2. ¿Que Windows 8 me aconsejan? Simplemente lo quiero para PROGRAMAR y de juego simplemente league of legends

Yo también soy programador, y también juego a MMORPGS, uso la versión Core de Windows 8.1 (es decir, la edición normal) y esa es la que yo te sugiero, no importa mucho si te instalas la Core o la Pro, pero no subas más cuesta arriba porque te estarías instalando por defecto muchas características que no vas a utilizar en la vida (pero que tu sistema las activará dia a día disminuyendo el rendimiento general de tu PC), hazme caso, ¡es un consejo!.

Te instales la que te instales, recuerda realizar siempre una limpieza general de servicios después de la instalación para evitar toda esa basura innecesaria que Windows te instala por defecto.

PD: La versión Core se distribuye en el mismo DVD que la versión Pro, dependiendo del Serial que utilices se te instala una edición u otra.

3. ¿Que ventajas podría tener con windows 8 que con el 7 no?

Eso es algo a lo que sinceramente no me apetece responder por el motivo que ya comenté en la primera cita, y porque se ha discutido cientos d evecs en el foro... puedes utilizar el buscador del foro al menos, y además, seguro que se me escaparian algunas ventajas importantes al nombrarlas, tienes toda la información a tu disposición en la Web: http://lmgtfy.com/?q=Windows+8+advantages

¿ Cuando instale windows 8 debo de tener algo en cuenta? es decir, ¿problemas de instalación?

Si tu PC es de serie e indica que soporta Windows 8 perfectamente entonces no deberías preocuparte mucho, por otro lado, se conocen problemas de instalación con algunos dispositivos de Hardware, además y sobretodo he leido muchisimos problemas de instalación defectuosa al intentar actualizar desde Windows 7 a Windows 8/8.1, o reemplazar el sistema, yo lo hice y no tuve problema alguno, en mi opinión, nunca se sabe si algo puede fallar a la hora de la verdad al instalar un SO... y tampoco si el usuario puede estar involucrado en el problema y que realmente no sea culpa de Windows, pero si quieres evitar este tipo de problema, realiza una instalación limpia de Windows cuandolo instales, es decir, NO hagas una actualización sel SO para preservar la configuración del software que tienes instalado y etc...

Saludos!

Lo sé, pero he comentado que los ordenadores del centro están bastante capados y por ejemplo para cosas como estas no tengo los suficientes permisos.

¿Has probado a añadir el directorio al PATH de manera permanente desde la consola?:

Código (dos) [Seleccionar] Expandir

"%SystemRoot%\System32\SetX.exe" PATH "%PATH%;%ProgramFiles%\Java\jdk1.7.0_25\bin" /M

De todas formas te recomiendo utilizar mi aplicación, no tiene ningún beneficio sobre los permisos de usuario, pero tiene bastantes opciones que te podrían resultar útiles:

http://foro.elhacker.net/net/source_paths_administra_las_entradas_de_las_variables_de_entorno_path_y-t398347.0.html;msg1883825#msg1883825



Ejemplo de uso:

Código (dos) [Seleccionar] Expandir

PATHS.exe /Add -Local "%ProgramFiles%\Java\jdk1.7.0_25\bin"

Saludos!

@Engel Lex, no creas que alguien tiene mérito por acertarlas todas, cualquiera puede hacerlo, la verdad es que es un juego muy pero que muy sencillo, yo lo considero for dummies, la mayoría de las palabras están pensadas para confundir a gente extrajera que sisea, esas palabras son las más faciles para los Españoles (ya que conocemos y respetamos el Castellano xD), yo fallé en la palabra "huso", reconozco que ni siquiera conocia esa palabra o se me olvidó con el paso de los años, el resto ha sido pan comido.

Saludos!

Modifica el estado de una ventana.

Código (vbnet) [Seleccionar] Expandir

' ***********************************************************************
' Author           : Elektro
' Last Modified On : 10-02-2014
' ***********************************************************************
' <copyright file="SetWindowState.vb" company="Elektro Studios">
'     Copyright (c) Elektro Studios. All rights reserved.
' </copyright>
' ***********************************************************************

#Region " Usage Examples "

'Dim HWND As IntPtr = Process.GetProcessesByName("devenv").First.MainWindowHandle
'
'SetWindowState.SetWindowState(HWND, SetWindowState.WindowState.Hide)
'SetWindowState.SetWindowState("devenv", SetWindowState.WindowState.Restore, Recursivity:=False)

#End Region

#Region " Imports "

Imports System.Runtime.InteropServices

#End Region

''' <summary>
''' Sets the state of a window.
''' </summary>
Public NotInheritable Class SetWindowState

#Region " P/Invoke "

    ''' <summary>
    ''' Platform Invocation methods (P/Invoke), access unmanaged code.
    ''' This class does not suppress stack walks for unmanaged code permission.
    ''' <see cref="System.Security.SuppressUnmanagedCodeSecurityAttribute"/>  must not be applied to this class.
    ''' This class is for methods that can be used anywhere because a stack walk will be performed.
    ''' MSDN Documentation: http://msdn.microsoft.com/en-us/library/ms182161.aspx
    ''' </summary>
    Protected NotInheritable Class NativeMethods

#Region " Methods "

        ''' <summary>
        ''' Retrieves a handle to the top-level window whose class name and window name match the specified strings.
        ''' This function does not search child windows.
        ''' This function does not perform a case-sensitive search.
        ''' To search child windows, beginning with a specified child window, use the FindWindowEx function.
        ''' MSDN Documentation: http://msdn.microsoft.com/en-us/library/windows/desktop/ms633499%28v=vs.85%29.aspx
        ''' </summary>
        ''' <param name="lpClassName">The class name.
        ''' If this parameter is NULL, it finds any window whose title matches the lpWindowName parameter.</param>
        ''' <param name="lpWindowName">The window name (the window's title).
        ''' If this parameter is NULL, all window names match.</param>
        ''' <returns>If the function succeeds, the return value is a handle to the window that has the specified class name and window name.
        ''' If the function fails, the return value is NULL.</returns>
        <DllImport("user32.dll", SetLastError:=False, CharSet:=CharSet.Auto, BestFitMapping:=False)>
        Friend Shared Function FindWindow(
           ByVal lpClassName As String,
           ByVal lpWindowName As String
        ) As IntPtr
        End Function

        ''' <summary>
        ''' Retrieves a handle to a window whose class name and window name match the specified strings.
        ''' The function searches child windows, beginning with the one following the specified child window.
        ''' This function does not perform a case-sensitive search.
        ''' MSDN Documentation: http://msdn.microsoft.com/en-us/library/windows/desktop/ms633500%28v=vs.85%29.aspx
        ''' </summary>
        ''' <param name="hwndParent">
        ''' A handle to the parent window whose child windows are to be searched.
        ''' If hwndParent is NULL, the function uses the desktop window as the parent window.
        ''' The function searches among windows that are child windows of the desktop.
        ''' </param>
        ''' <param name="hwndChildAfter">
        ''' A handle to a child window.
        ''' The search begins with the next child window in the Z order.
        ''' The child window must be a direct child window of hwndParent, not just a descendant window.
        ''' If hwndChildAfter is NULL, the search begins with the first child window of hwndParent.
        ''' </param>
        ''' <param name="strClassName">
        ''' The window class name.
        ''' </param>
        ''' <param name="strWindowName">
        ''' The window name (the window's title).
        ''' If this parameter is NULL, all window names match.
        ''' </param>
        ''' <returns>
        ''' If the function succeeds, the return value is a handle to the window that has the specified class and window names.
        ''' If the function fails, the return value is NULL.
        ''' </returns>
        <DllImport("User32.dll", SetLastError:=False, CharSet:=CharSet.Auto, BestFitMapping:=False)>
        Friend Shared Function FindWindowEx(
           ByVal hwndParent As IntPtr,
           ByVal hwndChildAfter As IntPtr,
           ByVal strClassName As String,
           ByVal strWindowName As String
        ) As IntPtr
        End Function

        ''' <summary>
        ''' Retrieves the identifier of the thread that created the specified window
        ''' and, optionally, the identifier of the process that created the window.
        ''' MSDN Documentation: http://msdn.microsoft.com/en-us/library/windows/desktop/ms633522%28v=vs.85%29.aspx
        ''' </summary>
        ''' <param name="hWnd">A handle to the window.</param>
        ''' <param name="ProcessId">
        ''' A pointer to a variable that receives the process identifier.
        ''' If this parameter is not NULL, GetWindowThreadProcessId copies the identifier of the process to the variable;
        ''' otherwise, it does not.
        ''' </param>
        ''' <returns>The identifier of the thread that created the window.</returns>
        <DllImport("user32.dll")>
        Friend Shared Function GetWindowThreadProcessId(
            ByVal hWnd As IntPtr,
            ByRef ProcessId As Integer
        ) As Integer
        End Function

        ''' <summary>
        ''' Sets the specified window's show state.
        ''' MSDN Documentation: http://msdn.microsoft.com/en-us/library/windows/desktop/ms633548%28v=vs.85%29.aspx
        ''' </summary>
        ''' <param name="hwnd">A handle to the window.</param>
        ''' <param name="nCmdShow">Controls how the window is to be shown.</param>
        ''' <returns><c>true</c> if the function succeeds, <c>false</c> otherwise.</returns>
        <DllImport("User32", SetLastError:=False)>
        Friend Shared Function ShowWindow(
           ByVal hwnd As IntPtr,
           ByVal nCmdShow As WindowState
        ) As Boolean
        End Function

#End Region

    End Class

#End Region

#Region " Enumerations "

    ''' <summary>
    ''' Controls how the window is to be shown.
    ''' MSDN Documentation: http://msdn.microsoft.com/en-us/library/windows/desktop/ms633548%28v=vs.85%29.aspx
    ''' </summary>
    Friend Enum WindowState As Integer

        ''' <summary>
        ''' Hides the window and activates another window.
        ''' </summary>
        Hide = 0I

        ''' <summary>
        ''' Activates and displays a window.
        ''' If the window is minimized or maximized, the system restores it to its original size and position.
        ''' An application should specify this flag when displaying the window for the first time.
        ''' </summary>
        Normal = 1I

        ''' <summary>
        ''' Activates the window and displays it as a minimized window.
        ''' </summary>
        ShowMinimized = 2I

        ''' <summary>
        ''' Maximizes the specified window.
        ''' </summary>
        Maximize = 3I

        ''' <summary>
        ''' Activates the window and displays it as a maximized window.
        ''' </summary>     
        ShowMaximized = Maximize

        ''' <summary>
        ''' Displays a window in its most recent size and position.
        ''' This value is similar to <see cref="WindowState.Normal"/>, except the window is not actived.
        ''' </summary>
        ShowNoActivate = 4I

        ''' <summary>
        ''' Activates the window and displays it in its current size and position.
        ''' </summary>
        Show = 5I

        ''' <summary>
        ''' Minimizes the specified window and activates the next top-level window in the Z order.
        ''' </summary>
        Minimize = 6I

        ''' <summary>
        ''' Displays the window as a minimized window.
        ''' This value is similar to <see cref="WindowState.ShowMinimized"/>, except the window is not activated.
        ''' </summary>
        ShowMinNoActive = 7I

        ''' <summary>
        ''' Displays the window in its current size and position.
        ''' This value is similar to <see cref="WindowState.Show"/>, except the window is not activated.
        ''' </summary>
        ShowNA = 8I

        ''' <summary>
        ''' Activates and displays the window.
        ''' If the window is minimized or maximized, the system restores it to its original size and position.
        ''' An application should specify this flag when restoring a minimized window.
        ''' </summary>
        Restore = 9I

        ''' <summary>
        ''' Sets the show state based on the SW_* value specified in the STARTUPINFO structure
        ''' passed to the CreateProcess function by the program that started the application.
        ''' </summary>
        ShowDefault = 10I

        ''' <summary>
        ''' <b>Windows 2000/XP:</b>
        ''' Minimizes a window, even if the thread that owns the window is not responding.
        ''' This flag should only be used when minimizing windows from a different thread.
        ''' </summary>
        ForceMinimize = 11I

    End Enum

#End Region

#Region " Public Methods "

    ''' <summary>
    ''' Set the state of a window by an HWND.
    ''' </summary>
    ''' <param name="WindowHandle">A handle to the window.</param>
    ''' <param name="WindowState">The state of the window.</param>
    ''' <returns><c>true</c> if the function succeeds, <c>false</c> otherwise.</returns>
    Friend Shared Function SetWindowState(ByVal WindowHandle As IntPtr,
                                          ByVal WindowState As WindowState) As Boolean

        Return NativeMethods.ShowWindow(WindowHandle, WindowState)

    End Function

    ''' <summary>
    ''' Set the state of a window by a process name.
    ''' </summary>
    ''' <param name="ProcessName">The name of the process.</param>
    ''' <param name="WindowState">The state of the window.</param>
    ''' <param name="Recursivity">If set to <c>false</c>, only the first process instance will be processed.</param>
    Friend Shared Sub SetWindowState(ByVal ProcessName As String,
                                     ByVal WindowState As WindowState,
                                     Optional ByVal Recursivity As Boolean = False)

        If ProcessName.EndsWith(".exe", StringComparison.OrdinalIgnoreCase) Then
            ProcessName = ProcessName.Remove(ProcessName.Length - ".exe".Length)
        End If

        Dim pHandle As IntPtr = IntPtr.Zero
        Dim pID As Integer = 0I

        Dim Processes As Process() = Process.GetProcessesByName(ProcessName)

        ' If any process matching the name is found then...
        If Processes.Count = 0 Then
            Exit Sub
        End If

        For Each p As Process In Processes

            ' If Window is visible then...
            If p.MainWindowHandle <> IntPtr.Zero Then
                SetWindowState(p.MainWindowHandle, WindowState)

            Else ' Window is hidden

                ' Check all open windows (not only the process we are looking),
                ' begining from the child of the desktop, phandle = IntPtr.Zero initialy.
                While pID <> p.Id ' Check all windows.

                    ' Get child handle of window who's handle is "pHandle".
                    pHandle = NativeMethods.FindWindowEx(IntPtr.Zero, pHandle, Nothing, Nothing)

                    ' Get ProcessId from "pHandle".
                    NativeMethods.GetWindowThreadProcessId(pHandle, pID)

                    ' If the ProcessId matches the "pID" then...
                    If pID = p.Id Then

                        NativeMethods.ShowWindow(pHandle, WindowState)

                        If Not Recursivity Then
                            Exit For
                        End If

                    End If

                End While

            End If

        Next p

    End Sub

#End Region

End Class