Hallo Forum,
ich möchte eine GoTo-Anweisung schreiben, mit der der Anwender alle im Projekt enthaltenen Layouts auswählen kann mit Ausnahme vom "Layout_Kontrollkarte". Mein Script klappt nicht. Wer kann helfen ?
theDocs = av.GetProject.GetDocs
theLays = {}
For each aDoc in theDocs
If (aDoc.GetClass.IsSubClassOf (Layout) and (aDoc. Is(Layout.Name = "Dialog_Kontrollkarte").Not)) then
theLays.Add(aDoc)
end
end
NochnKlaus
ich möchte eine GoTo-Anweisung schreiben, mit der der Anwender alle im Projekt enthaltenen Layouts auswählen kann mit Ausnahme vom "Layout_Kontrollkarte". Mein Script klappt nicht. Wer kann helfen ?
theDocs = av.GetProject.GetDocs
theLays = {}
For each aDoc in theDocs
If (aDoc.GetClass.IsSubClassOf (Layout) and (aDoc. Is(Layout.Name = "Dialog_Kontrollkarte").Not)) then
theLays.Add(aDoc)
end
end
NochnKlaus
- Anmelden oder Registieren, um Kommentare verfassen zu können
Gespeichert von Maxilla am Fr., 15.04.2005 - 11:14
PermalinktheDocs = av.GetProject.GetDocs
theLays = {}
For each aDoc in theDocs
If ((aDoc.GetGUI = "Layout") and (aDoc.GetName = "Dialog_Kontrollkarte").Not) then
theLays.Add(aDoc)
end
end
Msgbox.MultiList(theLays,"","")
Gespeichert von Gast am Fr., 15.04.2005 - 11:41
PermalinkVielen Dank für die schnelle und (NATÜRLICH !) gute Antwort
NochnKlaus