Wir schätzen Ihren Input! Bitte nehmen Sie an der Umfrage zu Archicad 28 Startbildschirm und Lerninhalte/Schnell-Tutorials teil
am 2015-10-15 03:41 PM
am 2015-10-15 09:40 PM
string = STR(Nr, 3, 0) !! Textübergabe für folgende Funktion
TX = STW (string) / 1000 * GLOB_SCALE !!X-Weite des Textes
n = REQUEST ("Height_of_style", "Nummernstyle", TY)
TY = TY / 1000 * GLOB_SCALE !!Y-Werte des Textes
TEXT2 0,0, Nr
if Umrandung = "Rechteck" then RECT2 0,0, TX , TY !! Anstatt Rect2 eben eine Schraffur..
am 2015-10-15 09:44 PM
am 2015-10-15 09:53 PM
if anmalen = 1 and Umrandung = "Rechteck" then
!!!Schraffur
pen PenFilR
fill filR
add2 tx/2, ty/2
poly2 5,3,
-tx/2, -ty/2,
tx/2, -ty/2,
tx/2, ty/2,
-tx/2, ty/2,
-tx/2, -ty/2
del 1
else
endif
am 2015-10-16 09:40 AM
am 2015-10-16 10:04 AM
am 2015-10-16 10:19 AM