GDL Text für Übersichtskreise bei Türen
!2D Script im Türsymbol
! ==========================================================================
!Kreis für Grafische Überschreibungen
! ==========================================================================
success = LIBRARYGLOBAL ("Library_Globals_UE", "T_FILL_UE",T_FILL_UE)
IF T_FILL_UE =1 THEN
fill 64
pen 255
poly2_b{5} 5, 3, 1, 3, 255, -1,
0, 0, 1, 0, 0, 1, 0,
0.5, 0, 33,
0, WALL_THICKNESS/(-2), 900,
0, 180, 4033,
0, WALL_THICKNESS/(-2), 900,
0, 180, 4033
ENDIF
! ==========================================================================
!GDL in einem neuen GDL Objekt mit Subtype „Bibliothek Globale Einstellungen“
!Parameter T_FILL_UE als Bool anlegen
!Im UI Script
! =======Library_Globals_UE.gsm================================================
ui_dialog `Übersichtskreis Türen - Einstellung Global`, 600, 410
! ==========================================================================
y1=19 !Zeilenabstand
y0=0 ! Zeile; für eine weitere Zeile y0=y0+1 eingeben
UI_INFIELD "T_FILL_UE", 5, 5+y0*Y1, 10, 10
UI_OUTFIELD "Kreis für Übersichten", 20, 5+y0*Y1, 150, 15
y0=y0+1
! ==========================================================================
! ==========================================================================
! ==========================================================================
! ==========================================================================
! ==========================================================================
! ==========================================================================
!Unten Gleiche Funktion mit Zusatz Kreisgröße
! ==========================================================================
! ==========================================================================
! ==========================================================================
! ==========================================================================
! ==========================================================================
!2D Script im Türsymbol
! ==========================================================================
!Kreis für Grafische Überschreibungen
! ==========================================================================
success = LIBRARYGLOBAL ("Library_Globals_UE", "T_FILL_UE",T_FILL_UE)
IF T_FILL_UE =1 THEN
success = LIBRARYGLOBAL ("Library_Globals_UE", "T_FILL_MES",T_FILL_MES)
fill 64
pen 255
poly2_b{5} 5, 3, 1, 3, 255, -1,
0, 0, 1, 0, 0, 1, 0,
T_FILL_MES/2, 0, 33,
0, WALL_THICKNESS/(-2), 900,
0, 180, 4033,
0, WALL_THICKNESS/(-2), 900,
0, 180, 4033
ENDIF
!GDL in einem neuen GDL Objekt mit Subtype „Bibliothek Globale Einstellungen“
! =======Library_Globals_UE.gsm================================================
ui_dialog `Übersichtskreis Türen - Einstellung Global`, 600, 410
! ==========================================================================
y1=19 !Zeilenabstand
y0=0 ! Zeile; für eine weitere Zeile y0=y0+1 eingeben
UI_INFIELD "T_FILL_UE", 5, 5+y0*Y1, 10, 10
UI_OUTFIELD "Kreis für Übersichten", 50, 5+y0*Y1, 150, 15
y0=y0+1
UI_INFIELD "T_FILL_MES", 5, 5+y0*Y1, 40, 10
UI_OUTFIELD "Kreisgröße", 50, 5+y0*Y1, 150, 15
y0=y0+1
Информация по комментариям в разработке