| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
Autor
|
Thema: CreateFileDialog ShowSave InitialDirectory (970 / mal gelesen)
|
OibelTroibel Mitglied Konstrukteur
Beiträge: 536 Registriert: 18.04.2014 ACAD/Inventor 2018-21
|
erstellt am: 07. Dez. 2020 10:17 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen Ich versuche gerade mit dem FileDialog-Objekt ein Speicherdialog zu erstellen und habe mir dazu das Sample File von Autodesk angeschaut:
Code: Public Sub TestFileDialog() ' Create a new FileDialog object. Dim oFileDlg As FileDialog Call ThisApplication.CreateFileDialog(oFileDlg) ' Define the filter to select part and assembly files or any file. oFileDlg.Filter = "Inventor Files (*.iam;*.ipt)|*.iam;*.ipt|All Files (*.*)|*.*" ' Define the part and assembly files filter to be the default filter. oFileDlg.FilterIndex = 1 ' Set the title for the dialog. oFileDlg.DialogTitle = "Open File Test" ' Set the initial directory that will be displayed in the dialog. oFileDlg.InitialDirectory = "C:\Temp" ' Set the flag so an error will be raised if the user clicks the Cancel button. oFileDlg.CancelError = True ' Show the open dialog. The same procedure is also used for the Save dialog. ' The commented code can be used for the Save dialog. On Error Resume Next oFileDlg.ShowOpen ' oFileDlg.ShowSave ' If an error was raised, the user clicked cancel, otherwise display the filename. If Err Then MsgBox "User cancelled out of dialog" ElseIf oFileDlg.FileName <> "" Then MsgBox "File " & oFileDlg.FileName & " was selected." End If End Sub
Bei diesem Sample wird im Öffnen-Dialog das InitialDirectory berücksichtigt, wähle ich aber den Speichern-Dialog, wird das InitialDirectory nicht berücksichtigt und es wird ein anderes Verzeichnis gezeigt. Wird das InitialDirectory im Speichern-Dialog nicht unterstützt oder habe ich bei mir was zerschossen? Beste Grüsse Raphael Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
EIBe 3D Mitglied Dipl. - Ing. (FH)
Beiträge: 267 Registriert: 24.01.2020 HP Z4 G4 Workstation Xeon 3,6 32GB Nvidia P2000 WIN10 SW2015 SP5.0 SW2017 ************* Inv2018 akt.SP
|
erstellt am: 07. Dez. 2020 10:59 <-- editieren / zitieren --> Unities abgeben: Nur für OibelTroibel
|
OibelTroibel Mitglied Konstrukteur
Beiträge: 536 Registriert: 18.04.2014 ACAD/Inventor 2018-21
|
erstellt am: 07. Dez. 2020 11:43 <-- editieren / zitieren --> Unities abgeben:
|
EIBe 3D Mitglied Dipl. - Ing. (FH)
Beiträge: 267 Registriert: 24.01.2020 HP Z4 G4 Workstation Xeon 3,6 32GB Nvidia P2000 WIN10 SW2015 SP5.0 SW2017 ************* Inv2018 akt.SP
|
erstellt am: 07. Dez. 2020 12:18 <-- editieren / zitieren --> Unities abgeben: Nur für OibelTroibel
|
| Technischer Produktdesigner / Technischer Zeichner (m/w/d) | Digitale Transformation. Nachhaltigkeit. Friedenssicherung. Spannende Aufgaben, an denen auch wir bei Diehl in unseren fünf Teilkonzernen Metall, Controls, Defence, Aviation und Metering und unsere über 16.000 Mitarbeiterinnen und Mitarbeiter mit Hochdruck arbeiten. Entdecken Sie faszinierende Technologien und bewerben Sie sich. In einem von Vertrauen und Mut geprägten Familienunternehmen, das beständig und stabil ist ? aus Tradition.... | Anzeige ansehen | Technischer Zeichner, Bauzeichner |
|
OibelTroibel Mitglied Konstrukteur
Beiträge: 536 Registriert: 18.04.2014 ACAD/Inventor 2018-21
|
erstellt am: 07. Dez. 2020 14:25 <-- editieren / zitieren --> Unities abgeben:
|