Tags:
visual-basic
Hejsa
Er ved at lave et lille program i visual basic 6 hvor jeg kan trykke på en knap i mit program som skal kunne trykke på en play knap i et andet program som er lavet i delphi.
det program som vil aktiver play knappen i hedder "Fjernbetjeningen" og kan ses på www.adgangforalle.dk
og er lavet i delphi
har prøvet
Option Explicit
Private Declare Function SendMessage Lib "user32.dll" Alias "SendMessageA" (ByVal hwnd As Long, ByVal Msg As Long, wParam As Any, lParam As Any) As Long
Private Declare Function FindWindow Lib "user32.dll" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWndParent As Long, ByVal hWndChildAfter As Long, ByVal lpszClassName As String, ByVal lpszWindowText As String) As Long
Private Const WM_LBUTTONDOWN = &H201
Private Const WM_LBUTTONUP = &H202
Private Sub Command1_Click()
Dim h As Long
h = FindWindow(" TForm1", "Form1")
h = FindWindowEx(h, 1&, "TCoolButton", "playbt")
SendMessage h, 0&, WM_LBUTTONDOWN, 0&
SendMessage h, 0&, WM_LBUTTONUP, 0&
End Sub
men uden held
Er der nogen der kan hjælpe mig!!!
På forhånd tak
1 svar postet i denne tråd vises herunder
0 indlæg har modtaget i alt 0 karma
0
Jeg har ikke arbejdet med Basic siden starten af 80'erne, men
Du skal kikke på funktionen SendInput
Jeg ved hvordan man gør i C++, men ikke i diverse Basic udgaver, så du må nok prøve at søge på google.