ListGeoSet zeigt wie mit Hilfe der Windows-Api die Einträge aus einer Catia-ListBox ausgelesen werden können,
dargestellt an einem geometrischen Set . Die .vba enthält Userform und Modul
ListGeoSet in Aktion:
Zum Ablauf:
- Vor dem Aufruf des Makros ein beliebiges geometrisches Set (eines Parts) auswählen (grüner Undo-Pfeil leuchtet auf)
- Makro starten
- auf 'Read List' klicken
- -> Liste wird ausgelesen
- 'Exit' klicken
Das Makro startet den 'Reorder children' - Dialog des Geosets.
Über die Api werden die Handle des Dialogs und der Kinder-Kontrollelemente bestimmt.
Über die Api werden danach die Listenelemente ausgelesen und in die VB-ListBox übertragen.
Zum Schluss wird per Api der Dialog wieder geschlossen.
Und hier noch der entsprechende Ausschnitt aus 'Spy++':