OpenOffice.info

Verfasst: **Fr, 30.09.2005 12:45**

Hallo zusammen.

Ich versuch gerade ein Makro zu schreiben wie es normal als "speichern unter..." bekannt ist. Dabei öffne ich den Dialog mit "FILESAVE_AUTOEXTENSION"
Leider ist blos die Checkbox für die automatische Dateinamenserweiterung nicht aktiviert. Jetzt hab ich noch herausgefunden das die über FilePickerControlAccess, und enableControl eingeschaltet werden könnte. Die Checkbox hat wohl die konstante 100.

Tcha, soweit so gut. Aber bei der Umsetzung..... hängt´s noch.

Wer kann helfen?

Gruß
Arne

Verfasst: **Sa, 01.10.2005 14:44**

Hi,

wenn ich Dich richtige verstehe willst Du das die Checkbox angekreuzt ist. Dann ist enableControl verkehrt. Damit wird die Checkbox auf aktiv oder inaktiv gesetzt. Das heißt dann ob sie verwendet werden kann oder nicht. Um die Checkbox zu markieren, muß man setvalue verwenden. Falls ich falsch liege ist in dem Beispiel auch der Code für enableControl:

Code: Alles auswählen

Dim Dialogtyp(0)
DialogTyp(0) = com.sun.star.ui.dialogs.TemplateDescription.FILESAVE_AUTOEXTENSION

MyDialog=createunoservice("com.sun.star.ui.dialogs.FilePicker")
myDialog.initialize( DialogTyp())
myDialog.enableControl(100,true)
myDialog.setvalue(100,0,true)
MyDialog.execute

mfg
Michael

Verfasst: **Di, 04.10.2005 09:24**

Perfekt, das "setvalue" war´s wirklich. Jetzt funktioniert´s.

Vielen Dank und Gruß
Arne

OpenOffice.info

checkbox "autoextenstion" im filepicker

checkbox "autoextenstion" im filepicker