Api Para Enviar Strings

[Unnamed]

alguém saberia dizer se tem alguma função na API do Windows que envia uma string pra outro programa. Mais ou menos isso: escrever oi num outro programa que esteja rodando, a partir do primeiro

[Graymalkin]

Sim, você pode usar a API SendMessage para isso, ou tem a alternativa através do uso de uma DLL para isso, disponível em http://www.graymalkinsoftware.net/gspaginas.php?page=XComm

Abraços,

Graymalkin

[Unnamed]

A SendMessage usa em conjunto com alguma outra?

Qual seria a declaração?

Tem alguma constante importante ou algum enum (nem sei como é o nome disso :P)?

Valeu! :blink:

[Graymalkin]

Sim, você tem usar junto com a FindWindow (para achar uma janela) e a FindWindowEx (para achar uma textbox, por exemplo). E tem uma constante sim, a WM_SETTEXT para o caso da textbox. Segue a declaração das três:

Public Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Public Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Public Declare Function SendMessage Lib "user32" Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Integer, ByVal lParam As Any) As Long
Public Const WM_SETTEXT = &HC

Você pode criar um form só com uma textbox e usar o exemplo abaixo em outro programa para se comunicar com o primeiro (que só tem a textbox):

hWindow = FindWindow(vbNullString, "TÍTULODOPROGRAMA")
hTextBox = FindWindowEx(hWindow, ByVal 0&, vbNullString, vbNullString)
SendMessage hTextBox, WM_SETTEXT, ByVal 0&, vbNullString
SendMessage hTextBox, WM_SETTEXT, ByVal 0&, msg

Ok?

PS: Na DLL que eu falei, isso está implementado exatamente desse jeito.

Abraços,

Graymalkin