Diskuzní fórum a databáze tipů a utilit pro AutoCAD, Inventor, Revit a další produkty Autodesk - od firmy Arkance Systems [www.cadforum.cz]
CZ | SK | EN | DE
Přihlášení
či registrace
   právě nás čte: 7072 
RSS kanál - CAD tipy RSS tipy
RSS diskuze

Diskuze Diskuzní fórum, poradna

 

NápovědaCAD diskuze, rady, výměna zkušeností

 
CAD Fórum - Homepage Veřejné diskuzní fórum k CAD aplikacím - ptejte se na libovolné otázky týkající se oboru CAx, podělte se o vaše znalosti a zkušenosti s programy AutoCAD, Inventor, Revit, Fusion 360, 3ds Max a s dalšími CAD aplikacemi. Zaregistrujte se nebo se přihlašte a zašlete váš příspěvek do odpovídajícího fóra. Viz další informace o CAD Fóru. Nechcete se registrovat? Zeptejte se v naší Facebook poradně.
Fórum nenahrazuje technický support firmy Arkance Systems (CAD Studio) - přímá podpora pro zákazníky funguje na helpdesk.cadstudio.cz
  FAQ FAQ  Prohledat fórum   Události   Registrovat Registrovat  Přihlásit Přihlásit

Téma uzavřenodialog pro otevření více souborů najednou

 Odpovědět Odpovědět archiv
Autor
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1675
Přímý odkaz na tuto zprávu Téma: dialog pro otevření více souborů najednou
    Zasláno: 20.bře.2009 v 08:49
Dobrý den,
potřeboval bych otevřít v lispu více souborů najednou. Ze souborů něco čtu, nejedná se ale o DWG, jde o textové soubory.
Pokud chci otevřít pouze jeden soubor, použiji funkci

(getfiled)

v tomto dialogu jde vybrat pouze jeden soubor. Já bych ale potřeboval vybrat z jednoho adresáře více souborů. Něco jako je u funkce OTEVŘI (_OPEN) - zde lze vybrat více souborů najednou.

Procházím nápovědu, zkouším hledat na netu, ale marně...
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 09:34
IMHO v lispu je příkaz Open a můžete si otevřít, kolik souborů chcete
 
(setq i (open "soubor.txt" "r"))
 
(setq x (read-line i))
 
(close i)


Upravil Seiner - 20.bře.2009 v 09:34
Vítězslav Seiner

Chrudim
Zpět nahoru
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1675
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 09:47
Vidím, že jsem nezformuloval dotaz dobře. Nejde mi o funkci
(open)

Ale o otevírací dialog, kde je možné vybrat více souborů najednou. Něco jako je
(getfiled)
ale s možností výběru více souborů. Podobný dialog je v cadovské funkci na otevření souboru DWG (se SHIFTEM vyberu na otevření více souborů), ale mě nejde o DWG a potřebuji to v lispu...

getfield vrátí jeden string s plným jménem souboru (včetně cesty - např: "c:\adresář\soubor.txt").
U funkce kterou hledám bych si představoval, že vrátí list, který bude obsahovat stringy s názvy vybraných souborů.
Např.
("c:\adresář\soubor-1.txt" "c:\adresář\soubor-2.txt" ... "c:\adresář\soubor-XX.txt")
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 10:15
Aha - omlouvám se za nechápavost.
Pak se ale obávám, že GETFILED multiselect neumí (aspoň jsem nenašel) a budete to muset někudy obejít (VB + common dialog ?)
Vítězslav Seiner

Chrudim
Zpět nahoru
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1675
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 10:27
Bohužel VisualBasic vůbec, ale vůbec neovládám...

Nedá se nějak kousek kódu z VBA spustit z LISPu?
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 10:49
VBA v AutoCADu jsem nějak minul. Kvůli použitelnosti v LT spíš tvořím externí prográmky ve VB. Asi by nebyl problém napsat jednoduché exe, které by otevřelo pomocí API CommonDialog a do dočasného textového souboru zapsalo vybrané soubory. To by se spouštělo z lispu pomocí STARTAPP. Ale přijde mi to takové překombinované. Třeba někoho napadne něco jednoduššího...
Vítězslav Seiner

Chrudim
Zpět nahoru
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1675
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 11:14
V nejhorším to vyřeším na stejném principu, ale víc manuálně. Ručně si vytvořím seznam souborů - do textového souboru a v AutoCadu si ho pak snadno načtu.

Vypadá to, že skutečnost multivýběru v dialogu pro otevření souboru DWG mi dala marnou naději, že to bude umět i Visual Lisp... Cry
Zpět nahoru
pavelstyl Zobrazit panel
Zasloužilý člen
Zasloužilý člen

Přihlášen: 06.říj.2004
Lokalita: Czech Republic
Používám:
AutoCAD Mech 2023, SolidEdgeE 2023
Stav: Offline
Bodů: 223
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 12:08
Původně odeslal(a) alfred alfred napsal(a):


Nedá se nějak kousek kódu z VBA spustit z LISPu?
 
Toto spustí makro EditRaz z souboru D:\Attrib1.dvb
(command "_-vbarun" "D:\\Attrib1.dvb!Module1.EditRaz")
 
Pavel Štyl
Zpět nahoru
Seiner Zobrazit panel
CAD/BIM manager
CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 12:22

Zaslaný soubor jsem odebral - byl to nepodařený nedodělek a omlouvám se za něj.

VS


Upravil Seiner - 20.bře.2009 v 14:37
Vítězslav Seiner

Chrudim
Zpět nahoru
Vladimír Michl Zobrazit panel
Moderátor
Moderátor
Avatar
Arkance Systems

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Dodáváme produkty Autodesk
Stav: Offline
Bodů: 21486
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 13:14
Lepší bude myslím použít knihovnu DOSlib a funkci dos_getfilem.
Vladimír Michl (moderátor)
Arkance Systems s.r.o. - www.arkance-systems.cz
(podpora viz hd.cads.cz)
Zpět nahoru
alfred Zobrazit panel
TOP uživatel
TOP uživatel

Přihlášen: 14.říj.2004
Lokalita: ČR (JČ)
Používám:
AutoCad MAP 2011
Stav: Offline
Bodů: 1675
Přímý odkaz na tuto zprávu Zasláno: 20.bře.2009 v 14:05
Děkuji,
přesně to jsem hledal...

Clap    Clap
Clap
Zpět nahoru

Pro technickou podporu CAD
kontaktujte Helpdesk

Příbuzné CAD tipy:
Tip 401:Otevření více výkresů najednou
Tip 4250:Jak v Revitu vytisknout více listů/pohledů najednou?
Tip 6791:AutoCAD 2010: připojení více externích referencí najednou.
Tip 3712:VIPNastavení iVlastností pro více souborů Inventoru najednou.
Tip 317:VIPJak převést více DWG výkresů najednou do formátu DWF?
Tip 6408:Dávkový tisk více listů najednou v LT 2008.


 Odpovědět Odpovědět

Přejít na fórum Oprávnění fóra Zobrazit panel



Stránka byla vygenerována za 1,086 sekund.