CAD Fórum : V�b�r v�ce soubor�

V�b�r v�ce soubor� : Tenhle objekt v novějších Windows...

Thu, 26 Jan 2012 13:16:19 +0000

Autor: Vladim�r Michl
P�edm�t: 14381
Zasl�no: 26.led.2012 v 13:16

Tenhle objekt v nov�j��ch Windows neexistuje. Ale jak p�esn� vypad� ta struktura? Jen dlouh� string s NULL znaky mezi jednotliv�mi soubory?

V�b�r v�ce soubor� : Možná by to za to stálo. Mimochodem: ...

Thu, 26 Jan 2012 13:02:34 +0000

Autor: alfred
P�edm�t: 14381
Zasl�no: 26.led.2012 v 13:02

Mo�n� by to za to st�lo.

Mimochodem:

pavelstyl napsal(a):

Je�t� mi to nedalo

(setq dlg (vlax-get-or-create-object "UserAccounts.CommonDialog"))
(vlax-put-property dlg 'flags (+ 524288 512)) ; Explorer + multiselect 524288
(vlax-put-property dlg 'filter "AutoCAD drawing (*.dwg)|*.dwg|All files (*.*)|*.*")
(vlax-invoke dlg 'showopen)
(print (vlax-get-property dlg 'filename))
(if dlg (vlax-release-object dlg))
(princ)

(vlax-get-or-create-object "UserAccounts.CommonDialog")
mi vrac� NIL

V�b�r v�ce soubor� : Ještě mi to nedalo (setq dlg...

Thu, 26 Jan 2012 11:37:06 +0000

Autor: pavelstyl
P�edm�t: 14381
Zasl�no: 26.led.2012 v 11:37

Je�t� mi to nedalo

(setq dlg (vlax-get-or-create-object "UserAccounts.CommonDialog"))
(vlax-put-property dlg 'flags (+ 524288 512)) ; Explorer + multiselect 524288
(vlax-put-property dlg 'filter "AutoCAD drawing (*.dwg)|*.dwg|All files (*.*)|*.*")
(vlax-invoke dlg 'showopen)
(print (vlax-get-property dlg 'filename))
(if dlg (vlax-release-object dlg))
(princ)

Pokud to zavol�m takto a vyberu v�ce soubor�, tak (vlax-get-property dlg 'filename) vrac� soubory odd�len� null znakem. A to lisp domn�v�m se neum� p�e��st. Nebo ano?

Pokud nech�m flags pouze na 512, tak to zavol� star� dialog a odd�l� n�zvy soubor� mezerami, ale jsou to short names.

Jak z toho ven?

Pavel �tyl