Zobrazit plnou verzi příspěvku: Velikost listu idw

Otasek
16.12.2004, 18:07
Poradil by mě někdo zdroják, jak zjistím velikost listu idw. V helpu jsem sice něco našel, ale v angličtině dost plavu, a když jsem to opsal hodilo to chybu definice objektu nebo tak nějak a s tím jsem si už neporadil,tak jsem to smazal a beru formát natvrdo z názvu souboru

Vladimír Michl
16.12.2004, 21:49
Mělo by fungovat něco jako:
    Dim oDoc As DrawingDocument    Set oDoc = ThisApplication.ActiveDocument    Dim oSheet As Sheet    Set oSheet = oDoc.ActiveSheet    velikost = oSheet.Size    

Otasek
16.12.2004, 23:17
OKi, hned jak se zase dostanu od kreslení k programování to vyzkouším a zdělím výsledky svého úsilí a snad se dokopu zveřejnit obrázek konkrétní podoby svého výtvoru

Otasek
16.12.2004, 23:39
Jsem nějak neodolal,tak nevyzkoušet... vyjazuje mě to čísla v rozsahu 9994-9997 (A1-A4) to ja tak správně?

Otasek
17.12.2004, 00:27
Přináším další postřehy z mého pozorování, třeba to někomu pomůže
size - 9993-9997 = A0 - A4
orientation - 10242 - 10243 = ležatý - stojatý
height, width - rozměr v cm
doufám ,že jsem se moc nespletl... + oSheet má ještě hodně dalších parametrů
Takhle to celé vipadá v mém podání zrealizované - tisknu na kopírce (= sama si bere papír dle formátu) pouze do A3 - proto to zjednodušení

Základní info jsem čerpal z http://www.cadforum.cz/cadforum/tema.asp (6.dávkový převod souborů) + další úpravu pro tisk dle helpu ADMAPI pod hesly DrawingPrintManager a SubmitPrint()
Test a save je jen pro kontrolu úplnosti všech souborů - nepoužívám svarky ale dvě varianty dílů (před a po).. ale to je na delsí povídání a semto nepatří - ze sestavy je odkazován jen jeden, z výkresu pak oba, ale to pack&go nezvládá....veme jen ten sestavový(na polotovar zapomene)
Prosím neptejte se mě na nějaké vychytávku do VB skoro vůbec nevidím a nebýt občasného programování v php, tak bych se nechytal ani trošku. Myslím že p.Michl poradí určitě lépe a zasvěceněji
Přeju všem hodně štěstí a úspěchůOtasek38423.5991435185

Otasek
20.12.2004, 23:30
Jsem pokračoval v pokusování a narazil na zvláštní efekt. Při převodu idw->dwf(save as) se mi vytvořený soubor nezobrazuje ve voloview3, v DWF viewreru/composeru ano. Pokud tento převod realizuji přes tiskárnu Autodesk DWFWriter, tak je vše OK. Je to problém VV nebo se s tím ještě nikdo nesetkal?Otasek38341.9801388889

Otasek
28.12.2004, 12:52
Přes vánoce mi to nedalo a ještě jsem si pohrál (doufám, že naposledy) a přidal výběr formátů, které se budou tisknout - vhodné hlavně pro ty (= můj kolega), kteří mají jednu tiskárnu na A4 a jinou na A3/A2 a musí ručně přepínat LPT přepínač. Škoda jen, že nejde (možná, že jde, ale prozatím nevím jak) zjistit velikost listu bez toho žebyse otevřel výkres

Zároveň jsem podlehl formátu dwf, hlavně pokud v něm publikujete celou sestavu - zákazníci budou u vytrženíOtasek38423.5995601852