Zajímalo by mě, jak pracovat s rastry ve VBA. Nový rastr načtu takto:
set rastr=ThisDrawing.ModelSpace.AddRaster(jmeno, bod, 1, 1)
rastr.name="rastr"
 
když mu ale změním jméno (kvůli přehlednosti chci nastavit jméno jako je název souboru), toto jméno se nezmění ve správci referencí souborů a při různých jménech rastrového obrázku a jménu ve správcích referencí souborů nejde rastr uvolňovat a načítat. dále pak nevím, jak k tomuto rastru přistupovat a uvolňovat ho a načítat pomocí příkazů.
při vložení výkresu xrefu je přitom tato práce snadná:
 
 Set insertedBlock = ThisDrawing.ModelSpace.AttachExternalReference(jmeno, "XREF", bod, 1, 1, 1, 0, False) ThisDrawing.Blocks.Item("XREF").Unload ThisDrawing.Blocks.Item("XREF").Reload
ve správci referencí je název, který vložím při načítání reference ("XREF").
 
K rastru mohu přistoupit pomocí:
ThisDrawing.ModelSpace.Item(cislo)
číslo si i zjistím (název v tomto případu pro výběr nemohu použít, nevím proč), ale tímto způsobem nemohu použít Unload nebo Reload.

ThisDrawing.ModelSpace.Item(0).Unload - nefunguje, není definováno
 
Zajímalo by mě tedy, jak nastavit název ve správci referencí souborů a jak pak jednotlivé rastry mohu načítat a uvolňovat.chose2007-07-27 13:11:53

Nikdo neví? V podstatě mě zajímá, jak ve VBA naprogramovat:
- příkaz xref, vyberu si nějáký obrázek a změním název reference
- příkaz xref, vyberu si nějáký obrázek a dám značíst nebo uvolnit