Ich habe eine Lösung für das Problem gefunden:
Es besteht in einem Makro "Wandmarker", welches an den Raumverkettet ist, und ein Beschriftungsbild mit folgender
Formel trägt:
getFinish(MT_Wand(@209@);MT_Raum(MT_Seite(@180@;0;1;2;3;4;5;6;7;8;9));MT_Raum(MT_Seite(@508@;0;1;2;3;4;5;6;7;8;9));"W:")
Die Hauptarbeit übernimmt eine Funktion in der function.vbs, die aus den Bedingungsstring und den Materialien der Seitenflächen
das passende Material für das Gewerk der Wand raussucht:
Function getFinish(trade,conditions,materials,prefix)
Dim numTrade,arrCond,strCond,strTrade,arrMat,strFinMat,strMat
numTrade = ""
If trade = "Mauerarbeiten" Then numTrade = "12"
If trade = "Betonarbeiten" Then numTrade = "13"
If trade = "Trockenbauarbeiten" Then numTrade = "39"
arrCond=Split(conditions,"/")
strTrade=""
iCond=-1
i = 0
For Each strCond In arrCond
If (Len(strCond) >= 2) Then
strTrade=Right(strCond, 2)
End If
If numTrade = strTrade Then
iCond=i
End If
i = i + 1
Next
arrMat = Split(materials,"/")
j = 0
strFinMat=""
For Each strMat In arrMat
If j = iCond Then
strFinMat=strMat
End If
j = j + 1
Next
getFinish = strFinMat & " "
End Function
Beschriftungsbild und Makro zusammen in der Bibliothek mit Snoop-Funktion gespeichert, und fertig ist ein leicht
zu platzierender "Wandmarker", der die an dieser Stelle vorhandene Seitenfläche beschriftet.
Beschriftungsbild und vbs-Funktion lassen sich natürlich erweitern, so daß weitere Gewerke erkannt werden,
oder die Bedingung ein anderes Attribut enthält.
Die Funktionsweise ist dabei gleichermassen simple wie genial:
Das Makro fungiert als "Messpunkt", und kann durch seine Lage sowohl Attribute des Raumes lesen (MT_Raum(...))
als auch Attribute der Wand (MT_Wand(...)). Das Beschriftungsbild übergibt die Werte
- Gewerk der Wand
- Bedingungsstrings der Seitenflächen
- Materialien der Seitenflächen
der vbs-Funktion getFinish, welche aus diesen Werten das passende Material raussucht.
Viel Spass damit!
Anhänge (3)
Typ: image/png
252-mal heruntergeladen
Größe: 131,25 KiB
Das Bild konnte nicht geladen werden
Sie sind nicht angemeldet.
Typ: application/octet-stream
1080-mal heruntergeladen
Größe: 32,14 KiB
Das Bild konnte nicht geladen werden
Sie sind nicht angemeldet.
Typ: application/octet-stream
1118-mal heruntergeladen
Größe: 1,19 MiB
Das Bild konnte nicht geladen werden
Sie sind nicht angemeldet.
