---

Servus,

ein Kunde wünscht unbedingt mit einem Maustastendruck die letzten Dokumente zu öffnen. Auf die Taste "R" konnte ich ihn nicht einstimmen. Es muss ein Mausbutton sein.

Ich habe mit SendKeys die Taste gesenedet. Es funktioniert. Aber die Nummlock schaltet sich um. (Könnte man zurückschalten) Aber auf dem Bildschirm erscheint eine Meldung, dass die Nummlock Taste betätigt wird. (stört natürlich)

Ich habe früher mit C++ programmiert. So kenne ich auch die Nachrichten mit der Windows arbeitet. Ich habe mir das Handle des vordersten Fenster geholt und wollte per SendMessage den Tastendruck simulieren, Nachrichten WM_KexDown und WM_KeyUp ans Fenster senden. Aber es geht nicht. Das Makro arbeitet, aber nichts passiert.

Was könnte man noch tun, um das blöde Fenster zu öffnen? In der API-Hilfe ist nichts drin.

Vielleicht denke ich auch zu kompliziert.
Hat jemand eine Idee?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

Mausgeste ist keine Option?

Warum sich der Numblock meldet wenn du als Key "R" sendest hab ich noch nicht so ganz verstanden.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

swApp.runcommand 3229, ""

------------------
Grüße, RBE
----------

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

swApp.runcommand 3229, ""

---

Das ist der Startdialog. Aber wenigstens etwas.

Aber warum geht nichts mit den Windowsfunktionen?

Zitat:

---

Mausgeste ist keine Option?

Warum sich der Numblock meldet wenn du als Key "R" sendest hab ich noch nicht so ganz verstanden.

---

Ich weiß nicht mal ob Mausgesten benutzt werden.
Die VBA Foren für Excel sind über das Thema voll. SendKeys schaltet den Num Lock um. Egal was man drücken will. Und das Schlimme, bei mehren Befehlen SendKeys im Makro schaltet der Num Lock manchmal nicht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

...
Vielleicht denke ich auch zu kompliziert.
Hat jemand eine Idee?

---

apropos kompliziert:
in HKCU\SOFTWARE\SolidWorks\SOLIDWORKS 20xx\Recent File List\
sind die Schlüssel
File1, File2, File3, ... File10
Möglicherweise aber aus der letzten Session, das hab ich nicht probiert ...

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

swApp.RunCommand swCommands_Start_Screen, "" ist der Home Button, wie man mir mitteilte. (Das Haus ganz oben) Nicht aufgefallen, nie benutzt.

swCommands_Start_Screen = 3229

Es ist leider nicht was ich suche. Man wünscht nur einen Button, und keine Gesten. Es ist schon zum Verzweifeln.

Nachtrag:
Das Handle zu SW habe ich das passt. Ich habe gerade versuchsweise mit SetWindowPos die Position des Fensters verändert.
Also liegt es am SendMessage

[Diese Nachricht wurde von KSAH am 06. Feb. 2024 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Hallo,

mit der GetRecentFiles-Methode bekommst du schon mal die Liste der letzten Files:

https://help.solidworks.com/2023/english/api/sldworksapi/SolidWorks.Interop.sldworks~SolidWorks.Interop.sldworks.ISldWorks~GetRecentFiles.html

Ist vielleicht schon mal ein Anfang 

------------------
==========
Gruß
Andreas
==========

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Angelehnt an meinen älteren Beitrag -> API: Kommentar-Indikator einblenden

Code:

---

#If VBA7 Then
     Private Declare PtrSafe Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
#Else
     Private Declare Function SendMessage Lib "User32" Alias "SendMessageA" (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) As Long
#End If

Dim swApp As SldWorks.SldWorks

Sub main()

    Const WM_COMMAND As Long = &H111
    Const SHOW_RECENTDOCS As Long = 51573
   
    Set swApp = Application.SldWorks
    Dim swFrame As SldWorks.Frame
    Set swFrame = swApp.Frame
    SendMessage swFrame.GetHWnd(), WM_COMMAND, SHOW_RECENTDOCS, 0
   
End Sub

---

------------------
21 ist nur die halbe Antwort.

[Diese Nachricht wurde von HenryV am 06. Feb. 2024 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Danke der Code funktioniert.

Meine Definition von SendMessage war falsch. Dann weiter experimentiert. Meine Lösung fürs Handle funktioniert. Aber mit den Systemnachrichten WM_KEYDOWN usw. funktioniert nicht.

WM_COMMAND muss eine Anwendungsspezifische Nachricht sein. Und die wParam Information ist auch nicht in der API von SW drin. Woher kommen die Infos? Würde ich gerne als Hintergrundwissen finden.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Die WM_COMMAND-Nachricht ist eine Windows-Nachricht.

Das SHOW_RECENTDOCS hab ich mit dem Tool Microsoft Spy++ ermittelt.

------------------
21 ist nur die halbe Antwort.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

---

Zitat:

---

Die WM_COMMAND-Nachricht ist eine Windows-Nachricht.

---

Stimmt, in meinen Büchern ist die auch drin. Bin damals nicht so tief ins Windows gedrungen. Spy++ kannte ich auch nicht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP