In diesem Forum haben Sie die Möglichkeit Kommentare, Fragen und Verbesserungsvorschläge zu den im vb@rchiv gelisteten Tipps und Workshops zu posten. Hinweis: Ein neues Thema kann immer nur über die jeweilige Tipps & Tricks bzw. Workshop Seite eröffnet werden!

Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Tipp 1076: ListBox von Fremdanwendungen auslesen
Autor: elvisxx
Tipp anzeigenDatum: 24.02.13 22:49
Hallo, ich möchte in einer Listbox einer anderen Applikation die Selektion aus Zeile 3 in Zeile 4 ändern. anbei mein code, auf dem ich schon einige Zeit brüte. Private Const WM_KEYDOWN = &H100 Private Const WM_KEYUP As Integer = &H101 Private Const VK_UP As Integer = &H26 Private Const VK_DOWN As Integer = &H28 Private Sub Com_sel_down_Click() sendmessage hwndListBox, WM_KEYDOWN, VK_DOWN, 0 sendmessage hwndListBox, WM_KEYUP, VK_DOWN, 0 End Sub die anderen sendmessage funktionen mit buttons funktionieren, nur diese mit der Listbox nicht. Hat jemand den Funken? Danke und gruss. Beitrag wurde zuletzt am 24.02.13 um 22:52:19 editiert.

Re: ListBox von Fremdanwendungen auslesen
Autor: mst547
Datum: 25.02.13 18:49
Hallo! Was spricht dagegen, die Selektion auf diese Weise zu ändern: intIndex = SendMessage(hwndListBox, LB_GETCURSEL, 0, 0) SendMessage(hwndListBox, LB_SETCURSEL, intIndex + 1, 0) mfg mst574

Re: ListBox von Fremdanwendungen auslesen
Autor: elvisxx
Datum: 26.02.13 00:09
Dankie danke, hat mir sehr weiter geholfen. Bei LB_SETCURSEL kam jdoch keine Aktion. Mit "SendMessagelong" läuft es aber super. Wo bekomme ich denn eine umfassende übersicht über die Konstanten und Deklarationen? Lieben Gruss und danke. ### man muss halt alles optimistisch sehen !

Re: ListBox von Fremdanwendungen auslesen
Autor: elvisxx
Datum: 26.02.13 03:23
Hallo, jetzt ist folgendes: manchmal ist es so, das ich nachdem die Buttons gedrückt wurden, die untere sendmassage nicht ausgeführt wiurde. ich muss dann immer manuel einmal in die Liste klicken, damit diese wieder angesprochen werden kann. Kann es sein, das ich per sendmessage die listbox irgendwie ansprechen muss, um sie im Zugriff zu haben? Bitte hilfe. Private Sub Com_inverse_Click() '### applikation, die extern auf eine Liste zugreift und diese normalerweise inverse sortiert. Dim i As Integer Dim C As Long Dim intIndex For i = nCount - 1 To 1 Step -1 For C = 1 To i SendMessageLong btn_move_down, BM_CLICK, 0, 0 Wait (50) Next For C = 1 To i SendMessageLong hwndListBox, WM_KEYDOWN, VK_UP, 0 Wait (50) Next Next End Sub ### man muss halt alles optimistisch sehen !

Re: ListBox von Fremdanwendungen auslesen
Autor: mst547
Datum: 26.02.13 22:18
Hallo! Warum versuchst du hier wieder, die Selektion mittels Senden von Tastendrücken zu ändern, anstatt LB_SETCURSEL zu verwenden? Oder funktionierte das nicht? Selektion um (i) Positionen nach oben verschieben: intIndex = SendMessage(hwndListBox, LB_GETCURSEL, 0, 0) SendMessage(hwndListBox, LB_SETCURSEL, intIndex - i, 0) Eine vollständige Übersicht über die möglichen Listbox-Messages erhältst du in der MSDN mfg mst547

Re: ListBox von Fremdanwendungen auslesen
Autor: elvisxx
Datum: 26.02.13 22:25
Das funktioniert nicht. Nach der verwendung der Button werden die Positionen nicht richtig an die buttons weiter gegeben. Vieleicht greifen die immer noch auf ein internes array zu. Ausserdem funktioniert das auch nur mitt sendmessagelong (wer weiss warum). ### man muss halt alles optimistisch sehen ! Beitrag wurde zuletzt am 26.02.13 um 22:26:47 editiert.

Sie sind nicht angemeldet! Um einen neuen Beitrag schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen