changes for new framework

ksgScript/Editor/Editor.cpp

@@ -20,7 +20,7 @@ Editor::Editor()
     mausKlick( 0 )
 {
     ref = 1;
-    schrift = 0;
+    textRd = 0;
     script = 0;
     errorDetection = 1;
     warningDetection = 1;
@@ -39,8 +39,8 @@ Editor::Editor()
 // Destructor
 Editor::~Editor()
 {
-    if( schrift )
-        schrift->release();
+    if( textRd )
+        textRd->release();
     if( script )
         script->release();
     if( parser )
@@ -51,16 +51,15 @@ void Editor::updateHScroll( int pos )
 {
     if( pos == -1 )
         pos = cPos;
-    if( horizontalScrollBar && script && schrift )
+    if( horizontalScrollBar && script && textRd )
     {
-        schrift->lock();
-        schrift->setSchriftSize( 12 );
+        textRd->setSchriftSize( 12 );
         int br = gr.x;
         if( hatStyle( Style::Rahmen ) && rahmen )
             br -= rahmen->getRBreite() * 2;
         if( hatStyle( Style::VScroll ) && vertikalScrollBar )
             br -= 15;
-        int maxBr = schrift->getTextBreite( script ) + 12;
+        int maxBr = textRd->getTextBreite( script->getText() ) + 12;
         horizontalScrollBar->update( maxBr, br );
         if( hatStyle( Style::Erlaubt ) && maxBr > br && pos > 0 && pos < script->getLength() )
         {
@@ -72,14 +71,13 @@ void Editor::updateHScroll( int pos )
                     p1 = i + 1;
             }
             Text *t = script->getTeilText( p1, pos );
-            int cbr = schrift->getTextBreite( t );
+            int cbr = textRd->getTextBreite( t->getText() );
             t->release();
             if( cbr + 12 > horizontalScrollBar->getScroll() + horizontalScrollBar->getScrollData()->anzeige )
                 horizontalScrollBar->scroll( cbr + 12 - br );
             if( cbr - 12 < horizontalScrollBar->getScroll() )
                 horizontalScrollBar->scroll( cbr - 12 );
         }
-        schrift->unlock();
     }
 }
 
@@ -91,17 +89,17 @@ void Editor::updateVScroll( int pos )
     {
         int sPos = 0;
         int hi = 0;
-        if( script && schrift )
+        if( script && textRd )
         {
-            schrift->setSchriftSize( 12 );
+            textRd->setSchriftSize( 12 );
             hi = gr.y;
             if( hatStyle( Style::Rahmen ) && rahmen )
                 hi -= rahmen->getRBreite() * 2;
             if( hatStyle( Style::HScroll ) && horizontalScrollBar )
                 hi -= 15;
-            vertikalScrollBar->update( schrift->getTextHeight( script ) + 12 + schrift->getTextHeight( Text( "a" ).getThis() ), hi );
+            vertikalScrollBar->update( textRd->getTextHeight( script->getText() ) + 12 + textRd->getTextHeight( "a" ), hi );
             Text t;
-            int zh = schrift->getTextHeight( &t ) + schrift->getZeilenabstand();
+            int zh = textRd->getTextHeight( t ) + textRd->getZeilenabstand();
             int l = script->getLength();
             for( int i = 0; i < l && ( i < pos || hatStyleNicht( Style::Erlaubt ) ); ++i )
             {
@@ -109,12 +107,12 @@ void Editor::updateVScroll( int pos )
                     sPos += zh;
             }
         }
-        if( schrift )
+        if( textRd )
         {
-            if( sPos - schrift->getZeilenabstand() - schrift->getTextHeight( Text( "a" ).getThis() ) < vertikalScrollBar->getScroll() )
-                vertikalScrollBar->scroll( sPos - schrift->getZeilenabstand() - schrift->getTextHeight( Text( "a" ).getThis() ) );
-            if( sPos + schrift->getZeilenabstand() + schrift->getTextHeight( Text( "a" ).getThis() ) > vertikalScrollBar->getScroll() + vertikalScrollBar->getScrollData()->anzeige )
-                vertikalScrollBar->scroll( sPos + ( schrift->getZeilenabstand() + schrift->getTextHeight( Text( "a" ).getThis() ) ) * 2 - hi );
+            if( sPos - textRd->getZeilenabstand() - textRd->getTextHeight( Text( "a" ) ) < vertikalScrollBar->getScroll() )
+                vertikalScrollBar->scroll( sPos - textRd->getZeilenabstand() - textRd->getTextHeight( Text( "a" ) ) );
+            if( sPos + textRd->getZeilenabstand() + textRd->getTextHeight( Text( "a" ) ) > vertikalScrollBar->getScroll() + vertikalScrollBar->getScrollData()->anzeige )
+                vertikalScrollBar->scroll( sPos + ( textRd->getZeilenabstand() + textRd->getTextHeight( Text( "a" ) ) ) * 2 - hi );
         }
         rend = 1;
     }
@@ -124,9 +122,19 @@ void Editor::updateVScroll( int pos )
 //  s: Die Schrift
 void Editor::setSchriftZ( Schrift *s )
 {
-    if( schrift )
-        schrift->release();
-    schrift = s;
+    if( !textRd )
+        textRd = new TextRenderer( s );
+    else
+        textRd->setSchriftZ( s );
+}
+
+// Setzt den zu verwendenden Text Renderer
+//  t: Der Text Renderer
+void Editor::setTextRendererZ( TextRenderer *t )
+{
+    if( textRd )
+        textRd->release();
+    textRd = t;
 }
 
 // Setzt den Text (das Script was verändert werden soll)
@@ -287,20 +295,20 @@ void Editor::doMausEreignis( MausEreignis &me )
             }
             if( me.mx < gr.x - rbr - 15 )
             {
-                if( schrift )
+                if( textRd )
                 {
-                    schrift->setSchriftSize( 12 );
+                    textRd->setSchriftSize( 12 );
                     bool shift = getTastenStand( T_Shift  );
                     if( me.id == Framework::ME_PLinks )
                     {
-                        int tbr = schrift->getTextBreite( script );
-                        int thi = schrift->getTextHeight( script );
+                        int tbr = textRd->getTextBreite( script->getText() );
+                        int thi = textRd->getTextHeight( script->getText() );
                         int scrollHi = ( vertikalScrollBar && hatStyle( Style::VScroll ) ) ? vertikalScrollBar->getScroll() : 0;
                         int scrollBr = ( horizontalScrollBar && hatStyle( Style::HScroll ) ) ? horizontalScrollBar->getScroll() : 0;
                         int xxx = me.mx - rbr + scrollBr;
                         int yyy = me.my - rbr + scrollHi;
                         int scrollBreite = ( vertikalScrollBar && hatStyle( Style::VScroll ) ) * 15;
-                        int pos = schrift->textPos( script, xxx, yyy );
+                        int pos = textRd->textPos( script->getText(), xxx, yyy );
                         if( pos != -1 )
                         {
                             if( shift )
@@ -320,15 +328,15 @@ void Editor::doMausEreignis( MausEreignis &me )
                     }
                     if( me.id == ME_Bewegung && mausKlick )
                     {
-                        int tbr = schrift->getTextBreite( script );
-                        int thi = schrift->getTextHeight( script );
+                        int tbr = textRd->getTextBreite( script->getText() );
+                        int thi = textRd->getTextHeight( script->getText() );
                         int scrollHi = ( vertikalScrollBar && hatStyle( Style::VScroll ) ) ? vertikalScrollBar->getScroll() : 0;
                         int scrollBr = ( horizontalScrollBar && hatStyle( Style::HScroll ) ) ? horizontalScrollBar->getScroll() : 0;
                         int xxx = me.mx - rbr + scrollBr;
                         int yyy = me.my - rbr + scrollHi;
                         int scrollBreite = ( vertikalScrollBar && hatStyle( Style::VScroll ) ) * 15;
                         int scrollHeight = ( horizontalScrollBar && hatStyle( Style::HScroll ) ) * 15;
-                        int pos = schrift->textPos( script, xxx, yyy );
+                        int pos = textRd->textPos( script->getText(), xxx, yyy );
                         if( pos != -1 )
                         {
                             if( begF != pos )
@@ -344,15 +352,15 @@ void Editor::doMausEreignis( MausEreignis &me )
                     {
                         if( !shift )
                         {
-                            int tbr = schrift->getTextBreite( script );
-                            int thi = schrift->getTextHeight( script );
+                            int tbr = textRd->getTextBreite( script->getText() );
+                            int thi = textRd->getTextHeight( script->getText() );
                             int scrollHi = ( vertikalScrollBar && hatStyle( Style::VScroll ) ) ? vertikalScrollBar->getScroll() : 0;
                             int scrollBr = ( horizontalScrollBar && hatStyle( Style::HScroll ) ) ? horizontalScrollBar->getScroll() : 0;
                             int xxx = me.mx - rbr + scrollBr;
                             int yyy = me.my - rbr + scrollHi;
                             int scrollBreite = ( vertikalScrollBar && hatStyle( Style::VScroll ) ) * 15;
                             int scrollHeight = ( horizontalScrollBar && hatStyle( Style::HScroll ) ) * 15;
-                            int pos = schrift->textPos( script, xxx, yyy );
+                            int pos = textRd->textPos( script->getText(), xxx, yyy );
                             if( pos != -1 )
                             {
                                 begF = pos;
@@ -613,7 +621,7 @@ void Editor::render( Bild &rObj )
     if( hatStyleNicht( Style::Sichtbar ) )
         return;
     __super::render( rObj );
-    if( !script || !schrift )
+    if( !script || !textRd )
         return;
     lockZeichnung();
     if( !rObj.setDrawOptions( innenPosition, innenSize ) )
@@ -621,9 +629,9 @@ void Editor::render( Bild &rObj )
         unlockZeichnung();
         return;
     }
-    schrift->setSchriftSize( 12 );
-    int tbr = schrift->getTextBreite( script );
-    int thi = schrift->getTextHeight( script );
+    textRd->setSchriftSize( 12 );
+    int tbr = textRd->getTextBreite( script->getText() );
+    int thi = textRd->getTextHeight( script->getText() );
     int xxx = 0;
     int yyy = 0;
     int breite = innenSize.x;
@@ -634,7 +642,6 @@ void Editor::render( Bild &rObj )
         yyy -= vertikalScrollBar->getScroll();
     if( hs )
         xxx -= horizontalScrollBar->getScroll();
-    schrift->setDrawPosition( xxx, yyy );
     parser->reset();
     auto colorF = [ this, &rObj ]( int x, int y, int pos ) -> int
     {
@@ -649,13 +656,13 @@ void Editor::render( Bild &rObj )
     if( hatStyle( Style::Fokus ) && hatStyle( Style::Erlaubt ) )
     {
         if( tickVal <= 0.5 )
-            schrift->renderText( script, rObj, cPos, 0xFFFF5555, begF, 0xFF0000FF, colorF );
+            textRd->renderText( xxx, yyy, script->getText(), rObj, colorF, cPos, 0xFFFF5555, begF, 0xFF0000FF );
         else
-            schrift->renderText( script, rObj, cPos, 0x00000000, begF, 0xFF0000FF, colorF );
+            textRd->renderText( xxx, yyy, script->getText(), rObj, colorF, cPos, 0x00000000, begF, 0xFF0000FF );
     }
     else
     {
-        schrift->renderText( script, rObj, colorF );
+        textRd->renderText( xxx, yyy, script->getText(), rObj, colorF );
     }
     rObj.releaseDrawOptions();
     unlockZeichnung();

ksgScript/Editor/Editor.h

@@ -17,7 +17,7 @@ namespace KSGScript
     class Editor : public KSGScriptEditor
     {
     private:
-        Schrift *schrift;
+        TextRenderer *textRd;
         Text *script;
         ColorParser *parser;
         ZeitMesser zm;
@@ -42,6 +42,9 @@ namespace KSGScript
         // Setzt die zu verwendende Schrift
         //  s: Die Schrift
         void setSchriftZ( Schrift *s ) override;
+        // Setzt den zu verwendenden Text Renderer
+        //  t: Der Text Renderer
+        void setTextRendererZ( TextRenderer *t ) override;
         // Setzt den Text (das Script was verändert werden soll)
         //  txt: Der Text
         void setText( Framework::Text *txt ) override;

ksgScript/Include/KSGScript.h

@@ -4,6 +4,7 @@
 #include <Text.h>
 #include <Zeichnung.h>
 #include "../Klassen/KSGSTyp.h"
+#include <Schrift.h>
 
 namespace Framework
 {
@@ -17,6 +18,7 @@ namespace Framework
 	class Schrift;
 	class Text;
     class TextFeld;
+    class TextRenderer;
 }
 
 namespace KSGScript
@@ -132,6 +134,9 @@ namespace KSGScript
         // Setzt die zu verwendende Schrift
         //  s: Die Schrift
         virtual void setSchriftZ( Framework::Schrift *s ) = 0;
+        // Setzt den zu verwendenden Text Renderer
+        //  t: Der Text Renderer
+        virtual void setTextRendererZ( Framework::TextRenderer *t ) = 0;
         // Setzt den Text (das Script was verändert werden soll)
         //  txt: Der Text
         virtual void setText( Framework::Text *txt ) = 0;

ksgScript/Klassen/KSGSAnimation2D.cpp

@@ -14,190 +14,190 @@ using namespace KSGScript;
 // Inhalt der KSGSAnimation2DKlasse aus KSGSAnimaion2D
 // Konstruktor
 KSGSAnimation2DKlasse::KSGSAnimation2DKlasse( KSGScriptObj *zObj, Animation2D *std )
-	: KSGSKlasseInstanz( KSGS_ANIMATION2D, 0, 0, zObj )
+    : KSGSKlasseInstanz( KSGS_ANIMATION2D, 0, 0, zObj )
 {
-	val = std;
+    val = std;
 }
 
 // Destruktor
 KSGSAnimation2DKlasse::~KSGSAnimation2DKlasse()
 {
-	val->release();
+    val->release();
 }
 
 // nicht constant
 KSGSVariable *KSGSAnimation2DKlasse::startFunktion( int id, bool access, RCArray< KSGSVariable > *parameter )
 {
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case 0: // void setRahmen( bool )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setRahmen( parameter->z( 0 ) ? parameter->z( 0 )->getBool() : 0 );
-		break;
-	case 1: // void setRahmenBreite( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setRahmenBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 2: // void setRahmenFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setRahmenFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 3: // void setAnimationData( Animation2DData )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setAnimationDataZ( parameter->z( 0 ) ? parameter->z( 0 )->getAnimation2DData() : 0 );
-		break;
-	case 4: // void setAlphaMaske( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setAlphaMaske( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 5: // void setAPS( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setAPS( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 6: // void setSichtbar( bool )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSichtbar( parameter->z( 0 ) ? parameter->z( 0 )->getBool() : 0 );
-		break;
-	case 7: // bool tick( double )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getDouble() : 0 ) );
-		break;
-	case 8: // void render( int, int, Bild )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
-			if( b )
-			{
-				val->render( *b );
-				b->release();
-			}
-		}
-		break;
-	case 9: // Animation2DData getAnimationData()
-		if( val->zAnimationData() )
-		    ret = new KSGSAnimation2DDataKlasse( obj, val->getAnimationData() );
-		break;
-	case 10: // bool istSichtbar()
-		ret = new KSGSBoolKlasse( obj, val->istSichtbar() );
-		break;
-	case 11: // int getJetzt()
-		ret = new KSGSIntKlasse( obj, val->getJetzt() );
-		break;
-	case 12: // int getAlphaMaske()
-		ret = new KSGSIntKlasse( obj, val->getAlphaMaske() );
-		break;
-	case 13: // bool hatRahmen()
-		ret = new KSGSBoolKlasse( obj, val->hatRahmen() );
-		break;
-	case 14: // int getRahmenBreite()
-		ret = new KSGSIntKlasse( obj, val->getRahmenBreite() );
-		break;
-	case 15: // int getRahmenFarbe()
-		ret = new KSGSIntKlasse( obj, val->getRahmenFarbe() );
-		break;
-	case 16: // void setToolTipText( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
-			if( txt )
-				txt->release();
-		}
-		break;
-	case 17: // void setPosition( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-						  parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 18: // void setGröße( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					   parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 19: // int getBreite()
-		ret = new KSGSIntKlasse( obj, val->getBreite() );
-		break;
-	case 20: // int getHöhe()
-		ret = new KSGSIntKlasse( obj, val->getHeight() );
-		break;
-	case 21: // int getX()
-		ret = new KSGSIntKlasse( obj, val->getX() );
-		break;
-	case 22: // int getY()
-		ret = new KSGSIntKlasse( obj, val->getY() );
-		break;
-	case 23: // Text getToolTipText()
-		if( 1 )
-		{
-			Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
-			ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
-		}
-		break;
-	default: // unbekannt
-		error( 19, {}, obj );
-		break;
-	}
-	parameter->release();
-	return ret;
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case 0: // void setRahmen( bool )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmen( parameter->z( 0 ) ? parameter->z( 0 )->getBool() : 0 );
+        break;
+    case 1: // void setRahmenBreite( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmenBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 2: // void setRahmenFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmenFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 3: // void setAnimationData( Animation2DData )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setAnimationDataZ( parameter->z( 0 ) ? parameter->z( 0 )->getAnimation2DData() : 0 );
+        break;
+    case 4: // void setAlphaMaske( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setAlphaMaske( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 5: // void setAPS( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setAPS( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 6: // void setSichtbar( bool )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSichtbar( parameter->z( 0 ) ? parameter->z( 0 )->getBool() : 0 );
+        break;
+    case 7: // bool tick( double )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getDouble() : 0 ) );
+        break;
+    case 8: // void render( int, int, Bild )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
+            if( b )
+            {
+                val->render( *b );
+                b->release();
+            }
+        }
+        break;
+    case 9: // Animation2DData getAnimationData()
+        if( val->zAnimationData() )
+            ret = new KSGSAnimation2DDataKlasse( obj, val->getAnimationData() );
+        break;
+    case 10: // bool istSichtbar()
+        ret = new KSGSBoolKlasse( obj, val->istSichtbar() );
+        break;
+    case 11: // int getJetzt()
+        ret = new KSGSIntKlasse( obj, val->getJetzt() );
+        break;
+    case 12: // int getAlphaMaske()
+        ret = new KSGSIntKlasse( obj, val->getAlphaMaske() );
+        break;
+    case 13: // bool hatRahmen()
+        ret = new KSGSBoolKlasse( obj, val->hatRahmen() );
+        break;
+    case 14: // int getRahmenBreite()
+        ret = new KSGSIntKlasse( obj, val->getRahmenBreite() );
+        break;
+    case 15: // int getRahmenFarbe()
+        ret = new KSGSIntKlasse( obj, val->getRahmenFarbe() );
+        break;
+    case 16: // void setToolTipText( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
+            if( txt )
+                txt->release();
+        }
+        break;
+    case 17: // void setPosition( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                          parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 18: // void setGröße( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                      parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 19: // int getBreite()
+        ret = new KSGSIntKlasse( obj, val->getBreite() );
+        break;
+    case 20: // int getHöhe()
+        ret = new KSGSIntKlasse( obj, val->getHeight() );
+        break;
+    case 21: // int getX()
+        ret = new KSGSIntKlasse( obj, val->getX() );
+        break;
+    case 22: // int getY()
+        ret = new KSGSIntKlasse( obj, val->getY() );
+        break;
+    case 23: // Text getToolTipText()
+        if( 1 )
+        {
+            Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
+            ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
+        }
+        break;
+    default: // unbekannt
+        error( 19, {}, obj );
+        break;
+    }
+    parameter->release();
+    return ret;
 }
 
 KSGSVariable *KSGSAnimation2DKlasse::doOperator( int id, KSGSVariable *rechts )
 {
-	if( !rechts )
-	{
-		error( 3, {}, obj );
-		return 0;
-	}
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case KSGS_O_SET:
-		if( 1 )
-		{
-			val->release();
-			val = rechts->getAnimation2D();
-			ret = getThis();
-		}
-		break;
-	}
-	if( !ret )
-		error( 21, {}, obj );
-	if( rechts )
-		rechts->release();
-	return ret;
+    if( !rechts )
+    {
+        error( 3, {}, obj );
+        return 0;
+    }
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case KSGS_O_SET:
+        if( 1 )
+        {
+            val->release();
+            val = rechts->getAnimation2D();
+            ret = getThis();
+        }
+        break;
+    }
+    if( !ret )
+        error( 21, {}, obj );
+    if( rechts )
+        rechts->release();
+    return ret;
 }
 
 // constant
 Animation2D *KSGSAnimation2DKlasse::getVal() const
 {
-	return val->getThis();
+    return (Animation2D*)val->getThis();
 }
 
 Animation2D *KSGSAnimation2DKlasse::zVal() const
 {
-	return val;
+    return val;
 }
 
 // Reference Counting
 KSGSVariable *KSGSAnimation2DKlasse::release()
 {
-	ref--;
-	if( !ref )
-		delete this;
-	return 0;
+    ref--;
+    if( !ref )
+        delete this;
+    return 0;
 }

ksgScript/Klassen/KSGSBildZ.cpp

@@ -14,227 +14,227 @@ using namespace KSGScript;
 // Inhalt der KSGSBildZKlasse Klasse aus KSGSBildZ.h
 // Konstruktor
 KSGSBildZKlasse::KSGSBildZKlasse( KSGScriptObj *zObj, BildZ *std )
-	: KSGSKlasseInstanz( KSGS_BILDO, 0, 0, zObj )
+    : KSGSKlasseInstanz( KSGS_BILDO, 0, 0, zObj )
 {
-	val = std;
-	val->setMausEreignisParameter( this );
-	val->setMausEreignis( ksgsBildZME );
-	mausF = -1;
+    val = std;
+    val->setMausEreignisParameter( this );
+    val->setMausEreignis( ksgsBildZME );
+    mausF = -1;
 }
 
 // Destruktor
 KSGSBildZKlasse::~KSGSBildZKlasse()
 {
-	val->release();
+    val->release();
 }
 
 // nicht constant
 KSGSVariable *KSGSBildZKlasse::startFunktion( int id, bool access, RCArray< KSGSVariable > *parameter )
 {
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case 0: // void setBild( Bild )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setBild( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
-		break;
-	case 1: // void setRFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setLinienRahmenFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 2: // void setRBreite( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setLinienRahmenBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 3: // void setStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 4: // void addStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->addStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 5: // void löscheStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0, 0 );
-		break;
-	case 6: // bool tick( double )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 7: // void setMausEreignis( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			if( n )
-			{
-				mausF = obj->getFunktionId( *n );
-				n->release();
-			}
-			else
-				mausF = -1;
-		}
-		break;
-	case 8: // void doMausEreignis( MausEreignis )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			MausEreignis me = parameter->z( 0 ) ? parameter->z( 0 )->getMausEreignis() : MausEreignis{ 0, 0, 0, 0, 0, 0 };
-			val->doMausEreignis( me );
-		}
-		break;
-	case 9: // void render( int, int, Bild )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
-			if( b )
-			{
-				val->render( *b );
-				b->release();
-			}
-		}
-		break;
-	case 10: // Bild getBild()
-		ret = new KSGSBildKlasse( obj, val->getBild() );
-		break;
-	case 11: // bool hatStyle( int )
-		ret = new KSGSBoolKlasse( obj, val->hatStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 12: // bool hatStyleNicht( int )
-		ret = new KSGSBoolKlasse( obj, val->hatStyleNicht( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 13: // BildZ dublizieren()
-		ret = new KSGSBildZKlasse( obj, (BildZ*)val->dublizieren() );
-		break;
-	case 14: // void setToolTipText( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
-			if( txt )
-				txt->release();
-		}
-		break;
-	case 15: // void setPosition( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-						  parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 16: // void setGröße( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					   parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 17: // int getBreite()
-		ret = new KSGSIntKlasse( obj, val->getBreite() );
-		break;
-	case 18: // int getHöhe()
-		ret = new KSGSIntKlasse( obj, val->getHeight() );
-		break;
-	case 19: // int getX()
-		ret = new KSGSIntKlasse( obj, val->getX() );
-		break;
-	case 20: // int getY()
-		ret = new KSGSIntKlasse( obj, val->getY() );
-		break;
-	case 21: // Text getToolTipText()
-		if( 1 )
-		{
-			Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
-			ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
-		}
-		break;
-	default: // unbekannt
-		error( 19, {}, obj );
-		break;
-	}
-	parameter->release();
-	return ret;
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case 0: // void setBild( Bild )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setBild( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
+        break;
+    case 1: // void setRFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmenFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 2: // void setRBreite( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmenBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 3: // void setStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 4: // void addStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->addStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 5: // void löscheStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0, 0 );
+        break;
+    case 6: // bool tick( double )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 7: // void setMausEreignis( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            if( n )
+            {
+                mausF = obj->getFunktionId( *n );
+                n->release();
+            }
+            else
+                mausF = -1;
+        }
+        break;
+    case 8: // void doMausEreignis( MausEreignis )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            MausEreignis me = parameter->z( 0 ) ? parameter->z( 0 )->getMausEreignis() : MausEreignis{ 0, 0, 0, 0, 0, 0 };
+            val->doMausEreignis( me );
+        }
+        break;
+    case 9: // void render( int, int, Bild )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
+            if( b )
+            {
+                val->render( *b );
+                b->release();
+            }
+        }
+        break;
+    case 10: // Bild getBild()
+        ret = new KSGSBildKlasse( obj, val->getBild() );
+        break;
+    case 11: // bool hatStyle( int )
+        ret = new KSGSBoolKlasse( obj, val->hatStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 12: // bool hatStyleNicht( int )
+        ret = new KSGSBoolKlasse( obj, val->hatStyleNicht( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 13: // BildZ dublizieren()
+        ret = new KSGSBildZKlasse( obj, (BildZ*)val->dublizieren() );
+        break;
+    case 14: // void setToolTipText( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
+            if( txt )
+                txt->release();
+        }
+        break;
+    case 15: // void setPosition( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                          parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 16: // void setGröße( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                      parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 17: // int getBreite()
+        ret = new KSGSIntKlasse( obj, val->getBreite() );
+        break;
+    case 18: // int getHöhe()
+        ret = new KSGSIntKlasse( obj, val->getHeight() );
+        break;
+    case 19: // int getX()
+        ret = new KSGSIntKlasse( obj, val->getX() );
+        break;
+    case 20: // int getY()
+        ret = new KSGSIntKlasse( obj, val->getY() );
+        break;
+    case 21: // Text getToolTipText()
+        if( 1 )
+        {
+            Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
+            ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
+        }
+        break;
+    default: // unbekannt
+        error( 19, {}, obj );
+        break;
+    }
+    parameter->release();
+    return ret;
 }
 
 KSGSVariable *KSGSBildZKlasse::doOperator( int id, KSGSVariable *rechts )
 {
-	if( !rechts )
-	{
-		error( 3, {}, obj );
-		return 0;
-	}
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case KSGS_O_SET:
-		if( 1 )
-		{
-			val->release();
-			val = rechts->getBildZ();
-			ret = getThis();
-		}
-		break;
-	}
-	if( !ret )
-		error( 21, {}, obj );
-	if( rechts )
-		rechts->release();
-	return ret;
+    if( !rechts )
+    {
+        error( 3, {}, obj );
+        return 0;
+    }
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case KSGS_O_SET:
+        if( 1 )
+        {
+            val->release();
+            val = rechts->getBildZ();
+            ret = getThis();
+        }
+        break;
+    }
+    if( !ret )
+        error( 21, {}, obj );
+    if( rechts )
+        rechts->release();
+    return ret;
 }
 
 bool KSGSBildZKlasse::doMausEreignis( MausEreignis &me )
 {
-	if( mausF < 0 )
-		return 1;
-	RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
-	parameter->add( new KSGSMausEreignisKlasse( obj, me ) );
-	KSGSVariable *ret = obj->startFunktion( mausF, parameter );
-	if( ret )
-	{
-		bool r = ret->getBool();
-		ret->release();
-		return r;
-	}
-	return 1;
+    if( mausF < 0 )
+        return 1;
+    RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
+    parameter->add( new KSGSMausEreignisKlasse( obj, me ) );
+    KSGSVariable *ret = obj->startFunktion( mausF, parameter );
+    if( ret )
+    {
+        bool r = ret->getBool();
+        ret->release();
+        return r;
+    }
+    return 1;
 }
 
 // constant
 BildZ *KSGSBildZKlasse::getVal() const
 {
-	return val->getThis();
+    return (BildZ*)val->getThis();
 }
 
 BildZ *KSGSBildZKlasse::zVal() const
 {
-	return val;
+    return val;
 }
 
 // Reference Counting
 KSGSVariable *KSGSBildZKlasse::release()
 {
-	ref--;
-	if( !ref )
-		delete this;
-	return 0;
+    ref--;
+    if( !ref )
+        delete this;
+    return 0;
 }
 
 
 // Ereignisse
 bool KSGScript::ksgsBildZME( void *var, void *obj, MausEreignis me )
 {
-	if( !var )
-		return 1;
-	return ( (KSGSBildZKlasse*)var )->doMausEreignis( me );
+    if( !var )
+        return 1;
+    return ( (KSGSBildZKlasse*)var )->doMausEreignis( me );
 }

ksgScript/Klassen/KSGSFenster.cpp

@@ -16,521 +16,521 @@ using namespace KSGScript;
 // Inahlt der KSGSFensterKlasse Klasse aus KSGSFenster.h
 // Konstruktor
 KSGSFensterKlasse::KSGSFensterKlasse( KSGScriptObj *zObj, Fenster *std )
-	: KSGSKlasseInstanz( KSGS_FENSTER, 0, 0, zObj )
+    : KSGSKlasseInstanz( KSGS_FENSTER, 0, 0, zObj )
 {
-	val = std;
-	val->setMausEreignisParameter( this );
-	val->setMausEreignis( ksgsFensterME );
-	val->setTastaturEreignisParameter( this );
-	val->setTastaturEreignis( ksgsFensterTE );
-	if( zObj->zSchrift() )
-		val->setTSchriftZ( zObj->getSchrift() );
-	mausF = -1;
-	tastaturF = -1;
+    val = std;
+    val->setMausEreignisParameter( this );
+    val->setMausEreignis( ksgsFensterME );
+    val->setTastaturEreignisParameter( this );
+    val->setTastaturEreignis( ksgsFensterTE );
+    if( zObj->zSchrift() )
+        val->setTSchriftZ( zObj->getSchrift() );
+    mausF = -1;
+    tastaturF = -1;
 }
 
 // Destruktor
 KSGSFensterKlasse::~KSGSFensterKlasse()
 {
-	val->release();
+    val->release();
 }
 
 // nicht constant
 KSGSVariable *KSGSFensterKlasse::startFunktion( int id, bool access, RCArray< KSGSVariable > *parameter )
 {
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case 0: // void setRFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setRFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 1: // void setRBreite( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setRBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 2: // void setTitel( Text )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTitel( parameter->z( 0 ) ? parameter->z( 0 )->getText() : new Text() );
-		break;
-	case 3: // void setTSFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTSFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 4: // void setTSGröße( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTSSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 5: // void setTBgFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTBgFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 6: // void setTAfFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTAfFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 7: // void setTAfStärke( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTAfStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 8: // void setTBgBild( Bild )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTBgBild( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
-		break;
-	case 9: // void setTRFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTRFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 10: // void setTRBreite( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setTRBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 11: // void setKBgFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setKBgFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 12: // void setKBgBild( Bild )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setKBgBild( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
-		break;
-	case 13: // void setKAfFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setKAfFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 14: // void setKAfStärke( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setKAfStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 15: // void setSBgFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSBgFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 16: // void setSBgBild( Bild )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSBgBild( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
-		break;
-	case 17: // void setSAfFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSAfFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 18: // void setSAfStärke( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSAfStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 19: // void setSKAfFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSKAfFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 20: // void setSKAfStärke( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSKAfStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 21: // void setMin( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setMin( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					 parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 22: // void setMax( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setMax( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					 parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 23: // void setKMin( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setKMin( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					  parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 24: // void setKMax( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setKMax( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					  parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 25: // void setHSBMax( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setHSBMax( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 26: // void setVSBMax( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setVSBMax( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 27: // void setHSBScroll( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setHSBScroll( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 28: // void setVSBScroll( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setVSBScroll( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 29: // void setStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 30: // void addStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->addStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 31: // void removeStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->removeStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 32: // void addMember( Zeichnung )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case 0: // void setRFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 1: // void setRBreite( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 2: // void setTitel( Text )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTitel( parameter->z( 0 ) ? parameter->z( 0 )->getText() : new Text() );
+        break;
+    case 3: // void setTSFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTSFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 4: // void setTSGröße( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTSSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 5: // void setTBgFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTBgFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 6: // void setTAfFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTAfFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 7: // void setTAfStärke( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTAfStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 8: // void setTBgBild( Bild )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTBgBild( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
+        break;
+    case 9: // void setTRFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTRFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 10: // void setTRBreite( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setTRBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 11: // void setKBgFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setKBgFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 12: // void setKBgBild( Bild )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setKBgBild( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
+        break;
+    case 13: // void setKAfFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setKAfFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 14: // void setKAfStärke( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setKAfStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 15: // void setSBgFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSBgFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 16: // void setSBgBild( Bild )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSBgBild( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
+        break;
+    case 17: // void setSAfFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSAfFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 18: // void setSAfStärke( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSAfStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 19: // void setSKAfFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSKAfFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 20: // void setSKAfStärke( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSKAfStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 21: // void setMin( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setMin( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                     parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 22: // void setMax( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setMax( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                     parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 23: // void setKMin( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setKMin( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                      parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 24: // void setKMax( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setKMax( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                      parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 25: // void setHSBMax( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setHSBMax( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 26: // void setVSBMax( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setVSBMax( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 27: // void setHSBScroll( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setHSBScroll( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 28: // void setVSBScroll( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setVSBScroll( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 29: // void setStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 30: // void addStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->addStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 31: // void removeStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->removeStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 32: // void addMember( Zeichnung )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
             Zeichnung *obj = parameter->z( 0 ) ? parameter->z( 0 )->getZeichnung() : 0;
-			if( obj )
-				val->addMember( obj );
-		}
-		break;
-	case 33: // void removeMember( Zeichnung )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
+            if( obj )
+                val->addMember( obj );
+        }
+        break;
+    case 33: // void removeMember( Zeichnung )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
             Zeichnung *obj = parameter->z( 0 ) ? parameter->z( 0 )->getZeichnung() : 0;
-			if( obj )
-				val->removeMember( obj );
-		}
-		break;
-	case 34: // bool tick( double )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 35: // void setMausEreignis( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			if( n )
-			{
-				mausF = obj->getFunktionId( *n );
-				n->release();
-			}
-			else
-				mausF = -1;
-		}
-		break;
-	case 36: // void setTastaturEreignis( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			if( n )
-			{
-				tastaturF = obj->getFunktionId( *n );
-				n->release();
-			}
-			else
-				tastaturF = -1;
-		}
-		break;
-	case 37: // void doMausEreignis( MausEreignis )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			MausEreignis me = parameter->z( 0 ) ? parameter->z( 0 )->getMausEreignis() : MausEreignis{ 0, 0, 0, 0, 0, 0 };
-			val->doMausEreignis( me );
-		}
-		break;
-	case 38: // void doTastaturEreignis( TastaturEreignis )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			TastaturEreignis te = parameter->z( 0 ) ? parameter->z( 0 )->getTastaturEreignis() : TastaturEreignis{ 0, 0, 0 };
-			val->doTastaturEreignis( te );
-		}
-		break;
-	case 39: // void render( int, int, Bild )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
-			if( b )
-			{
-				val->render( *b );
-				b->release();
-			}
-		}
-		break;
-	case 40: // int getRFarbe()
-		ret = new KSGSIntKlasse( obj, val->getRFarbe() );
-		break;
-	case 41: // int getRBreite()
-		ret = new KSGSIntKlasse( obj, val->getRBreite() );
-		break;
-	case 42: // Tect getTitel()
-		ret = new KSGSTextKlasse( obj, val->zTitel() ? val->zTitel()->getText() : "" );
-		break;
-	case 43: // int getTSFarbe()
-		ret = new KSGSIntKlasse( obj, val->getTSFarbe() );
-		break;
-	case 44: // int getTSGröße()
-		ret = new KSGSIntKlasse( obj, val->getTSSize() );
-		break;
-	case 45: // int getTBgFarbe()
-		ret = new KSGSIntKlasse( obj, val->getTBgFarbe() );
-		break;
-	case 46: // int getTAfFarbe()
-		ret = new KSGSIntKlasse( obj, val->getTAfFarbe() );
-		break;
-	case 47: // int getTAfStärke()
-		ret = new KSGSIntKlasse( obj, val->getTAfStrength() );
-		break;
-	case 48: // Bild getTBgBild()
-		ret = new KSGSBildKlasse( obj, val->getTBgBild() );
-		break;
-	case 49: // int getTRFarbe()
-		ret = new KSGSIntKlasse( obj, val->getTRFarbe() );
-		break;
-	case 50: // int getTRBreite()
-		ret = new KSGSIntKlasse( obj, val->getTRBreite() );
-		break;
-	case 51: // int getKBgFarbe()
-		ret = new KSGSIntKlasse( obj, val->getKBgFarbe() );
-		break;
-	case 52: // Bild getKBgBild()
-		ret = new KSGSBildKlasse( obj, val->getKBgBild() );
-		break;
-	case 53: // int getKAfFarbe()
-		ret = new KSGSIntKlasse( obj, val->getKAfFarbe() );
-		break;
-	case 54: // int getKAfStärke()
-		ret = new KSGSIntKlasse( obj, val->getKAfStrength() );
-		break;
-	case 55: // int getSBgFarbe()
-		ret = new KSGSIntKlasse( obj, val->getSBgFarbe() );
-		break;
-	case 56: // Bild getSBgBild()
-		ret = new KSGSBildKlasse( obj, val->getSBgBild() );
-		break;
-	case 57: // int getSAfFarbe()
-		ret = new KSGSIntKlasse( obj, val->getSAfFarbe() );
-		break;
-	case 58: // int getSAfStärke()
-		ret = new KSGSIntKlasse( obj, val->getSAfStrength() );
-		break;
-	case 59: // int getSKAfFarbe()
-		ret = new KSGSIntKlasse( obj, val->getSKAfFarbe() );
-		break;
-	case 60: // int getSKAfStärke()
-		ret = new KSGSIntKlasse( obj, val->getSKAfStrength() );
-		break;
-	case 61: // int getMinBreite()
-		ret = new KSGSIntKlasse( obj, val->getMin().x );
-		break;
-	case 62: // int getMinHöhe()
-		ret = new KSGSIntKlasse( obj, val->getMin().y );
-		break;
-	case 63: // int getMaxBreite()
-		ret = new KSGSIntKlasse( obj, val->getMax().x );
-		break;
-	case 64: // int getMaxHöhe()
-		ret = new KSGSIntKlasse( obj, val->getMax().y );
-		break;
-	case 65: // int getKMinBreite()
-		ret = new KSGSIntKlasse( obj, val->getKMin().x );
-		break;
-	case 66: // int getKMinHöhe()
-		ret = new KSGSIntKlasse( obj, val->getKMin().y );
-		break;
-	case 67: // int getKMaxBreite()
-		ret = new KSGSIntKlasse( obj, val->getKMax().x );
-		break;
-	case 68: // int getKMaxHöhe()
-		ret = new KSGSIntKlasse( obj, val->getKMax().y );
-		break;
-	case 69: // bool hatStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->hatStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 70: // bool hatStyleNicht( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->hatStyleNicht( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 71: // Fenster dublizieren()
-		ret = new KSGSFensterKlasse( obj, (Fenster*)val->dublizieren() );
-		break;
-	case 72: // void setToolTipText( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
-			if( txt )
-				txt->release();
-		}
-		break;
-	case 73: // void setPosition( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-						  parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 74: // void setGröße( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					   parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 75: // int getBreite()
-		ret = new KSGSIntKlasse( obj, val->getBreite() );
-		break;
-	case 76: // int getHöhe()
-		ret = new KSGSIntKlasse( obj, val->getHeight() );
-		break;
-	case 77: // int getX()
-		ret = new KSGSIntKlasse( obj, val->getX() );
-		break;
-	case 78: // int getY()
-		ret = new KSGSIntKlasse( obj, val->getY() );
-		break;
-	case 79: // Text getToolTipText()
-		if( 1 )
-		{
-			Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
-			ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
-		}
-		break;
-	default: // unbekannt
-		error( 19, {}, obj );
-		break;
-	}
-	parameter->release();
-	return ret;
+            if( obj )
+                val->removeMember( obj );
+        }
+        break;
+    case 34: // bool tick( double )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 35: // void setMausEreignis( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            if( n )
+            {
+                mausF = obj->getFunktionId( *n );
+                n->release();
+            }
+            else
+                mausF = -1;
+        }
+        break;
+    case 36: // void setTastaturEreignis( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            if( n )
+            {
+                tastaturF = obj->getFunktionId( *n );
+                n->release();
+            }
+            else
+                tastaturF = -1;
+        }
+        break;
+    case 37: // void doMausEreignis( MausEreignis )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            MausEreignis me = parameter->z( 0 ) ? parameter->z( 0 )->getMausEreignis() : MausEreignis{ 0, 0, 0, 0, 0, 0 };
+            val->doMausEreignis( me );
+        }
+        break;
+    case 38: // void doTastaturEreignis( TastaturEreignis )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            TastaturEreignis te = parameter->z( 0 ) ? parameter->z( 0 )->getTastaturEreignis() : TastaturEreignis{ 0, 0, 0 };
+            val->doTastaturEreignis( te );
+        }
+        break;
+    case 39: // void render( int, int, Bild )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
+            if( b )
+            {
+                val->render( *b );
+                b->release();
+            }
+        }
+        break;
+    case 40: // int getRFarbe()
+        ret = new KSGSIntKlasse( obj, val->getRFarbe() );
+        break;
+    case 41: // int getRBreite()
+        ret = new KSGSIntKlasse( obj, val->getRBreite() );
+        break;
+    case 42: // Tect getTitel()
+        ret = new KSGSTextKlasse( obj, val->zTitel() ? val->zTitel()->getText() : "" );
+        break;
+    case 43: // int getTSFarbe()
+        ret = new KSGSIntKlasse( obj, val->getTSFarbe() );
+        break;
+    case 44: // int getTSGröße()
+        ret = new KSGSIntKlasse( obj, val->getTSSize() );
+        break;
+    case 45: // int getTBgFarbe()
+        ret = new KSGSIntKlasse( obj, val->getTBgFarbe() );
+        break;
+    case 46: // int getTAfFarbe()
+        ret = new KSGSIntKlasse( obj, val->getTAfFarbe() );
+        break;
+    case 47: // int getTAfStärke()
+        ret = new KSGSIntKlasse( obj, val->getTAfStrength() );
+        break;
+    case 48: // Bild getTBgBild()
+        ret = new KSGSBildKlasse( obj, val->getTBgBild() );
+        break;
+    case 49: // int getTRFarbe()
+        ret = new KSGSIntKlasse( obj, val->getTRFarbe() );
+        break;
+    case 50: // int getTRBreite()
+        ret = new KSGSIntKlasse( obj, val->getTRBreite() );
+        break;
+    case 51: // int getKBgFarbe()
+        ret = new KSGSIntKlasse( obj, val->getKBgFarbe() );
+        break;
+    case 52: // Bild getKBgBild()
+        ret = new KSGSBildKlasse( obj, val->getKBgBild() );
+        break;
+    case 53: // int getKAfFarbe()
+        ret = new KSGSIntKlasse( obj, val->getKAfFarbe() );
+        break;
+    case 54: // int getKAfStärke()
+        ret = new KSGSIntKlasse( obj, val->getKAfStrength() );
+        break;
+    case 55: // int getSBgFarbe()
+        ret = new KSGSIntKlasse( obj, val->getSBgFarbe() );
+        break;
+    case 56: // Bild getSBgBild()
+        ret = new KSGSBildKlasse( obj, val->getSBgBild() );
+        break;
+    case 57: // int getSAfFarbe()
+        ret = new KSGSIntKlasse( obj, val->getSAfFarbe() );
+        break;
+    case 58: // int getSAfStärke()
+        ret = new KSGSIntKlasse( obj, val->getSAfStrength() );
+        break;
+    case 59: // int getSKAfFarbe()
+        ret = new KSGSIntKlasse( obj, val->getSKAfFarbe() );
+        break;
+    case 60: // int getSKAfStärke()
+        ret = new KSGSIntKlasse( obj, val->getSKAfStrength() );
+        break;
+    case 61: // int getMinBreite()
+        ret = new KSGSIntKlasse( obj, val->getMin().x );
+        break;
+    case 62: // int getMinHöhe()
+        ret = new KSGSIntKlasse( obj, val->getMin().y );
+        break;
+    case 63: // int getMaxBreite()
+        ret = new KSGSIntKlasse( obj, val->getMax().x );
+        break;
+    case 64: // int getMaxHöhe()
+        ret = new KSGSIntKlasse( obj, val->getMax().y );
+        break;
+    case 65: // int getKMinBreite()
+        ret = new KSGSIntKlasse( obj, val->getKMin().x );
+        break;
+    case 66: // int getKMinHöhe()
+        ret = new KSGSIntKlasse( obj, val->getKMin().y );
+        break;
+    case 67: // int getKMaxBreite()
+        ret = new KSGSIntKlasse( obj, val->getKMax().x );
+        break;
+    case 68: // int getKMaxHöhe()
+        ret = new KSGSIntKlasse( obj, val->getKMax().y );
+        break;
+    case 69: // bool hatStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->hatStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 70: // bool hatStyleNicht( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->hatStyleNicht( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 71: // Fenster dublizieren()
+        ret = new KSGSFensterKlasse( obj, (Fenster*)val->dublizieren() );
+        break;
+    case 72: // void setToolTipText( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
+            if( txt )
+                txt->release();
+        }
+        break;
+    case 73: // void setPosition( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                          parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 74: // void setGröße( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                      parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 75: // int getBreite()
+        ret = new KSGSIntKlasse( obj, val->getBreite() );
+        break;
+    case 76: // int getHöhe()
+        ret = new KSGSIntKlasse( obj, val->getHeight() );
+        break;
+    case 77: // int getX()
+        ret = new KSGSIntKlasse( obj, val->getX() );
+        break;
+    case 78: // int getY()
+        ret = new KSGSIntKlasse( obj, val->getY() );
+        break;
+    case 79: // Text getToolTipText()
+        if( 1 )
+        {
+            Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
+            ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
+        }
+        break;
+    default: // unbekannt
+        error( 19, {}, obj );
+        break;
+    }
+    parameter->release();
+    return ret;
 }
 
 KSGSVariable *KSGSFensterKlasse::doOperator( int id, KSGSVariable *rechts )
 {
-	if( !rechts )
-	{
-		error( 3, {}, obj );
-		return 0;
-	}
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case KSGS_O_SET:
-		if( 1 )
-		{
-			val->release();
-			val = rechts->getFenster();
-			ret = getThis();
-		}
-		break;
-	}
-	if( !ret )
-		error( 21, {}, obj );
-	if( rechts )
-		rechts->release();
-	return ret;
+    if( !rechts )
+    {
+        error( 3, {}, obj );
+        return 0;
+    }
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case KSGS_O_SET:
+        if( 1 )
+        {
+            val->release();
+            val = rechts->getFenster();
+            ret = getThis();
+        }
+        break;
+    }
+    if( !ret )
+        error( 21, {}, obj );
+    if( rechts )
+        rechts->release();
+    return ret;
 }
 
 bool KSGSFensterKlasse::doMausEreignis( MausEreignis &me )
 {
-	if( mausF < 0 )
-		return 1;
-	RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
-	parameter->add( new KSGSMausEreignisKlasse( obj, me ) );
-	KSGSVariable *ret = obj->startFunktion( mausF, parameter );
-	if( ret )
-	{
-		bool r = ret->getBool();
-		ret->release();
-		return r;
-	}
-	return 1;
+    if( mausF < 0 )
+        return 1;
+    RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
+    parameter->add( new KSGSMausEreignisKlasse( obj, me ) );
+    KSGSVariable *ret = obj->startFunktion( mausF, parameter );
+    if( ret )
+    {
+        bool r = ret->getBool();
+        ret->release();
+        return r;
+    }
+    return 1;
 }
 
 bool KSGSFensterKlasse::doTastaturEreignis( TastaturEreignis &te )
 {
-	if( tastaturF < 0 )
-		return 1;
-	RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
-	parameter->add( new KSGSTastaturEreignisKlasse( obj, te ) );
-	KSGSVariable *ret = obj->startFunktion( tastaturF, parameter );
-	if( ret )
-	{
-		bool r = ret->getBool();
-		ret->release();
-		return r;
-	}
-	return 1;
+    if( tastaturF < 0 )
+        return 1;
+    RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
+    parameter->add( new KSGSTastaturEreignisKlasse( obj, te ) );
+    KSGSVariable *ret = obj->startFunktion( tastaturF, parameter );
+    if( ret )
+    {
+        bool r = ret->getBool();
+        ret->release();
+        return r;
+    }
+    return 1;
 }
 
 // constant
 Fenster *KSGSFensterKlasse::getVal() const
 {
-	return val->getThis();
+    return (Fenster*)val->getThis();
 }
 
 Fenster *KSGSFensterKlasse::zVal() const
 {
-	return val;
+    return val;
 }
 
 // Reference Counting
 KSGSVariable *KSGSFensterKlasse::release()
 {
-	ref--;
-	if( !ref )
-		delete this;
-	return 0;
+    ref--;
+    if( !ref )
+        delete this;
+    return 0;
 }
 
 
 // Ereignisse
 bool KSGScript::ksgsFensterME( void *var, void *obj, MausEreignis me )
 {
-	if( !var )
-		return 1;
-	return ( (KSGSFensterKlasse*)var )->doMausEreignis( me );
+    if( !var )
+        return 1;
+    return ( (KSGSFensterKlasse*)var )->doMausEreignis( me );
 }
 
 bool KSGScript::ksgsFensterTE( void *var, void *obj, TastaturEreignis te )
 {
-	if( !var )
-		return 1;
-	return ( (KSGSFensterKlasse*)var )->doTastaturEreignis( te );
+    if( !var )
+        return 1;
+    return ( (KSGSFensterKlasse*)var )->doTastaturEreignis( te );
 }

ksgScript/Klassen/KSGSKnopf.cpp

@@ -14,319 +14,319 @@ using namespace KSGScript;
 // Inhalt der KSGSKnopfKlasse Klasse aus KSGSKnopf.h
 // Konstruktor
 KSGSKnopfKlasse::KSGSKnopfKlasse( KSGScriptObj *zObj, Knopf *std )
-	: KSGSKlasseInstanz( KSGS_KNOPF, 0, 0, zObj )
+    : KSGSKlasseInstanz( KSGS_KNOPF, 0, 0, zObj )
 {
-	mausF = -1;
-	val = std;
-	val->setMausEreignisParameter( this );
-	val->setMausEreignis( ksgsKnopfME );
-	if( zObj->zSchrift() )
-		val->setSchriftZ( zObj->getSchrift() );
+    mausF = -1;
+    val = std;
+    val->setMausEreignisParameter( this );
+    val->setMausEreignis( ksgsKnopfME );
+    if( zObj->zSchrift() )
+        val->setSchriftZ( zObj->getSchrift() );
 }
 
 // Destruktor
 KSGSKnopfKlasse::~KSGSKnopfKlasse()
 {
-	val->release();
+    val->release();
 }
 
 // nicht constant
 KSGSVariable *KSGSKnopfKlasse::startFunktion( int id, bool access, RCArray< KSGSVariable > *parameter )
 {
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case 0: // void setText( Text )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setText( parameter->z( 0 ) ? parameter->z( 0 )->getText() : new Text() );
-		break;
-	case 1: // void setHintergrundBild( Bild )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setHintergrundBildZ( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
-		break;
-	case 2: // void setHintergrundFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setHintergrundFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 3: // void setSchriftGröße( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSchriftSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 4: // void setSchriftFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSchriftFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 5: // void setAFStärke( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setAlphaFeldStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 6: // void setAFFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setAlphaFeldFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 7: // void setLRBreite( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setLinienRahmenBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 8: // void setLRFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setLinienRahmenFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 9: // void setKlickFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setKlickFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 10: // void setKlickBild( Bild )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setKlickBildZ( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
-		break;
-	case 11: // void setKBStärke( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setKBStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 12: // void setKBFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setKBFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 13: // void setStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 14: // void addStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->addStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 15: // void löscheStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->removeStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 16: // bool tick( double )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getDouble() : 0 ) );
-		break;
-	case 17: // void setMausEreignis( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			if( n )
-			{
-				mausF = obj->getFunktionId( *n );
-				n->release();
-			}
-			else
-				mausF = -1;
-		}
-		break;
-	case 18: // void doMausEreignis( MausEreignis )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			MausEreignis me = parameter->z( 0 ) ? parameter->z( 0 )->getMausEreignis() : MausEreignis{ 0, 0, 0, 0, 0, 0 };
-			val->doMausEreignis( me );
-		}
-		break;
-	case 19: // void render( int, int, Bild )if( 1 )
-	{
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
-		if( b )
-		{
-			val->render( *b );
-			b->release();
-		}
-	}
-		break;
-	case 20: // Text getText()
-		if( 1 )
-		{
-			Text *txt = val->getText();
-			ret = new KSGSTextKlasse( obj, *txt );
-			txt->release();
-		}
-		break;
-	case 21: // Bild getHintergrundBild()
-		ret = new KSGSBildKlasse( obj, val->getHintergrundBild() );
-		break;
-	case 22: // int getHintergrundFarbe()
-		ret = new KSGSIntKlasse( obj, val->getHintergrundFarbe() );
-		break;
-	case 23: // int getSchriftGröße()
-		ret = new KSGSIntKlasse( obj, val->getSchriftSize() );
-		break;
-	case 24: // int getSchriftFarbe()
-		ret = new KSGSIntKlasse( obj, val->getSchriftFarbe() );
-		break;
-	case 25: // int getAFStärke()
-		ret = new KSGSIntKlasse( obj, val->getAlphaFeldStrength() );
-		break;
-	case 26: // int getAFFarbe()
-		ret = new KSGSIntKlasse( obj, val->getAlphaFeldFarbe() );
-		break;
-	case 27: // int getLRBreite()
-		ret = new KSGSIntKlasse( obj, val->getLinienRahmenBreite() );
-		break;
-	case 28: // int getLRFarbe()
-		ret = new KSGSIntKlasse( obj, val->getLinienRahmenFarbe() );
-		break;
-	case 29: // int getKlickFarbe()
-		ret = new KSGSIntKlasse( obj, val->getKlickFarbe() );
-		break;
-	case 30: // Bild getKlickBild()
-		ret = new KSGSBildKlasse( obj, val->getKlickBild() );
-		break;
-	case 31: // int getKBFarbe()
-		ret = new KSGSIntKlasse( obj, val->getKBFarbe() );
-		break;
-	case 32: // int getKBStärke()
-		ret = new KSGSIntKlasse( obj, val->getKBStrength() );
-		break;
-	case 33: // bool hatStyle( int )
-		ret = new KSGSBoolKlasse( obj, val->hatStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 34: // bool hatStyleNicht( int )
-		ret = new KSGSBoolKlasse( obj, val->hatStyleNicht( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 35: // Knopf dublizieren()
-		ret = new KSGSKnopfKlasse( obj, (Knopf*)val->dublizieren() );
-		break;
-	case 36: // void setToolTipText( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
-			if( txt )
-				txt->release();
-		}
-		break;
-	case 37: // void setPosition( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-						  parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 38: // void setGröße( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					   parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 39: // int getBreite()
-		ret = new KSGSIntKlasse( obj, val->getBreite() );
-		break;
-	case 40: // int getHöhe()
-		ret = new KSGSIntKlasse( obj, val->getHeight() );
-		break;
-	case 41: // int getX()
-		ret = new KSGSIntKlasse( obj, val->getX() );
-		break;
-	case 42: // int getY()
-		ret = new KSGSIntKlasse( obj, val->getY() );
-		break;
-	case 43: // Text getToolTipText()
-		if( 1 )
-		{
-			Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
-			ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
-		}
-		break;
-	default: // unbekannt
-		error( 19, {}, obj );
-		break;
-	}
-	parameter->release();
-	return ret;
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case 0: // void setText( Text )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setText( parameter->z( 0 ) ? parameter->z( 0 )->getText() : new Text() );
+        break;
+    case 1: // void setHintergrundBild( Bild )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setHintergrundBildZ( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
+        break;
+    case 2: // void setHintergrundFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setHintergrundFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 3: // void setSchriftGröße( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSchriftSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 4: // void setSchriftFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSchriftFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 5: // void setAFStärke( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setAlphaFeldStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 6: // void setAFFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setAlphaFeldFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 7: // void setLRBreite( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmenBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 8: // void setLRFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmenFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 9: // void setKlickFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setKlickFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 10: // void setKlickBild( Bild )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setKlickBildZ( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
+        break;
+    case 11: // void setKBStärke( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setKBStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 12: // void setKBFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setKBFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 13: // void setStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 14: // void addStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->addStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 15: // void löscheStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->removeStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 16: // bool tick( double )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getDouble() : 0 ) );
+        break;
+    case 17: // void setMausEreignis( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            if( n )
+            {
+                mausF = obj->getFunktionId( *n );
+                n->release();
+            }
+            else
+                mausF = -1;
+        }
+        break;
+    case 18: // void doMausEreignis( MausEreignis )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            MausEreignis me = parameter->z( 0 ) ? parameter->z( 0 )->getMausEreignis() : MausEreignis{ 0, 0, 0, 0, 0, 0 };
+            val->doMausEreignis( me );
+        }
+        break;
+    case 19: // void render( int, int, Bild )if( 1 )
+    {
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
+        if( b )
+        {
+            val->render( *b );
+            b->release();
+        }
+    }
+    break;
+    case 20: // Text getText()
+        if( 1 )
+        {
+            Text *txt = val->getText();
+            ret = new KSGSTextKlasse( obj, *txt );
+            txt->release();
+        }
+        break;
+    case 21: // Bild getHintergrundBild()
+        ret = new KSGSBildKlasse( obj, val->getHintergrundBild() );
+        break;
+    case 22: // int getHintergrundFarbe()
+        ret = new KSGSIntKlasse( obj, val->getHintergrundFarbe() );
+        break;
+    case 23: // int getSchriftGröße()
+        ret = new KSGSIntKlasse( obj, val->getSchriftSize() );
+        break;
+    case 24: // int getSchriftFarbe()
+        ret = new KSGSIntKlasse( obj, val->getSchriftFarbe() );
+        break;
+    case 25: // int getAFStärke()
+        ret = new KSGSIntKlasse( obj, val->getAlphaFeldStrength() );
+        break;
+    case 26: // int getAFFarbe()
+        ret = new KSGSIntKlasse( obj, val->getAlphaFeldFarbe() );
+        break;
+    case 27: // int getLRBreite()
+        ret = new KSGSIntKlasse( obj, val->getRahmenBreite() );
+        break;
+    case 28: // int getLRFarbe()
+        ret = new KSGSIntKlasse( obj, val->getRahmenFarbe() );
+        break;
+    case 29: // int getKlickFarbe()
+        ret = new KSGSIntKlasse( obj, val->getKlickFarbe() );
+        break;
+    case 30: // Bild getKlickBild()
+        ret = new KSGSBildKlasse( obj, val->getKlickBild() );
+        break;
+    case 31: // int getKBFarbe()
+        ret = new KSGSIntKlasse( obj, val->getKBFarbe() );
+        break;
+    case 32: // int getKBStärke()
+        ret = new KSGSIntKlasse( obj, val->getKBStrength() );
+        break;
+    case 33: // bool hatStyle( int )
+        ret = new KSGSBoolKlasse( obj, val->hatStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 34: // bool hatStyleNicht( int )
+        ret = new KSGSBoolKlasse( obj, val->hatStyleNicht( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 35: // Knopf dublizieren()
+        ret = new KSGSKnopfKlasse( obj, (Knopf*)val->dublizieren() );
+        break;
+    case 36: // void setToolTipText( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
+            if( txt )
+                txt->release();
+        }
+        break;
+    case 37: // void setPosition( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                          parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 38: // void setGröße( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                      parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 39: // int getBreite()
+        ret = new KSGSIntKlasse( obj, val->getBreite() );
+        break;
+    case 40: // int getHöhe()
+        ret = new KSGSIntKlasse( obj, val->getHeight() );
+        break;
+    case 41: // int getX()
+        ret = new KSGSIntKlasse( obj, val->getX() );
+        break;
+    case 42: // int getY()
+        ret = new KSGSIntKlasse( obj, val->getY() );
+        break;
+    case 43: // Text getToolTipText()
+        if( 1 )
+        {
+            Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
+            ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
+        }
+        break;
+    default: // unbekannt
+        error( 19, {}, obj );
+        break;
+    }
+    parameter->release();
+    return ret;
 }
 
 KSGSVariable *KSGSKnopfKlasse::doOperator( int id, KSGSVariable *rechts )
 {
-	if( !rechts )
-	{
-		error( 3, {}, obj );
-		return 0;
-	}
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case KSGS_O_SET:
-		if( 1 )
-		{
-			val->release();
-			val = rechts->getKnopf();
-			ret = getThis();
-		}
-		break;
-	}
-	if( !ret )
-		error( 21, {}, obj );
-	if( rechts )
-		rechts->release();
-	return ret;
+    if( !rechts )
+    {
+        error( 3, {}, obj );
+        return 0;
+    }
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case KSGS_O_SET:
+        if( 1 )
+        {
+            val->release();
+            val = rechts->getKnopf();
+            ret = getThis();
+        }
+        break;
+    }
+    if( !ret )
+        error( 21, {}, obj );
+    if( rechts )
+        rechts->release();
+    return ret;
 }
 
 bool KSGSKnopfKlasse::doMausEreignis( MausEreignis &me )
 {
-	if( mausF < 0 )
-		return 1;
-	RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
-	parameter->add( new KSGSMausEreignisKlasse( obj, me ) );
-	KSGSVariable *ret = obj->startFunktion( mausF, parameter );
-	if( ret )
-	{
-		bool r = ret->getBool();
-		ret->release();
-		return r;
-	}
-	return 1;
+    if( mausF < 0 )
+        return 1;
+    RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
+    parameter->add( new KSGSMausEreignisKlasse( obj, me ) );
+    KSGSVariable *ret = obj->startFunktion( mausF, parameter );
+    if( ret )
+    {
+        bool r = ret->getBool();
+        ret->release();
+        return r;
+    }
+    return 1;
 }
 
 // constant
 Knopf *KSGSKnopfKlasse::getVal() const
 {
-	return val->getThis();
+    return (Knopf*)val->getThis();
 }
 
 Knopf *KSGSKnopfKlasse::zVal() const
 {
-	return val;
+    return val;
 }
 
 // Reference Counting
 KSGSVariable *KSGSKnopfKlasse::release()
 {
-	ref--;
-	if( !ref )
-		delete this;
-	return 0;
+    ref--;
+    if( !ref )
+        delete this;
+    return 0;
 }
 
 
 // Ereignisse
 bool KSGScript::ksgsKnopfME( void *var, void *obj, MausEreignis me )
 {
-	if( !var )
-		return 1;
-	return ( (KSGSKnopfKlasse*)var )->doMausEreignis( me );
+    if( !var )
+        return 1;
+    return ( (KSGSKnopfKlasse*)var )->doMausEreignis( me );
 }

ksgScript/Klassen/KSGSTextFeld.cpp

@@ -16,410 +16,407 @@ using namespace KSGScript;
 // Inhalt der KSGSTextFeldKlasse Klasse aus KSGSTextFeld.h
 // Konstruktor
 KSGSTextFeldKlasse::KSGSTextFeldKlasse( KSGScriptObj *zObj, TextFeld *std )
-	: KSGSKlasseInstanz( KSGS_TEXTFELD, 0, 0, zObj )
+    : KSGSKlasseInstanz( KSGS_TEXTFELD, 0, 0, zObj )
 {
-	val = std;
-	mausF = -1;
-	tastaturF = -1;
-	val->setMausEreignisParameter( this );
-	val->setMausEreignis( ksgsTextFeldME );
-	val->setTastaturEreignisParameter( this );
-	val->setTastaturEreignis( ksgsTextFeldTE );
-	if( zObj->zSchrift() )
-	    val->setSchriftZ( zObj->getSchrift() );
+    val = std;
+    mausF = -1;
+    tastaturF = -1;
+    val->setMausEreignisParameter( this );
+    val->setMausEreignis( ksgsTextFeldME );
+    val->setTastaturEreignisParameter( this );
+    val->setTastaturEreignis( ksgsTextFeldTE );
+    if( zObj->zSchrift() )
+        val->setSchriftZ( zObj->getSchrift() );
 }
 
 // Destruktor
 KSGSTextFeldKlasse::~KSGSTextFeldKlasse()
 {
-	val->release();
+    val->release();
 }
 
 // nicht constant
 KSGSVariable *KSGSTextFeldKlasse::startFunktion( int id, bool access, RCArray< KSGSVariable > *parameter )
 {
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case 0: // void setText( Text )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setText( parameter->z( 0 ) ? parameter->z( 0 )->getText() : new Text() );
-		break;
-	case 1: // void addZeile( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : new Text();
-			val->addZeile( *txt );
-			txt->release();
-		}
-		break;
-	case 2: // void setAuswahl( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setAuswahl( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-						 parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 3: // void setHintergrundBild( Bild )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setHintergrundBildZ( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
-		break;
-	case 4: // void setHintergrundFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setHintergrundFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 5: // void setSchriftGröße( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSchriftSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 6: // void setSchriftFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSchriftFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 7: // void setAFStärke( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setAlphaFeldStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 8: // void setAFFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setAlphaFeldFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 9: // void setLRBreite( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setLinienRahmenBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 10: // void setLRFarbe( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setLinienRahmenFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 11: // void setShowChar( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setSchowChar( (char)( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 12: // void setVKlickScroll( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setVertikalKlickScroll( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 13: // void setVScrollPos( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setVertikalScrollPos( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 14: // void setVScrollZuZeile( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setVScrollZuZeile( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 15: // void updateVScroll()
-		val->updateVScroll();
-		break;
-	case 16: // void setStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 17: // void addStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->addStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 18: // void löscheStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		val->removeStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
-		break;
-	case 19: // bool tick( double )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getDouble() : 0 ) );
-		break;
-	case 20: // void setMausEreignis( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			if( n )
-			{
-				mausF = obj->getFunktionId( *n );
-				n->release();
-			}
-			else
-				mausF = -1;
-		}
-		break;
-	case 21: // void setTastaturEreignis( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			if( n )
-			{
-				tastaturF = obj->getFunktionId( *n );
-				n->release();
-			}
-			else
-				tastaturF = -1;
-		}
-		break;
-	case 22: // void doMausEreignis( MausEreignis )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			MausEreignis me = parameter->z( 0 ) ? parameter->z( 0 )->getMausEreignis() : MausEreignis{ 0, 0, 0, 0, 0, 0 };
-			val->doMausEreignis( me );
-		}
-		break;
-	case 23: // void doTastaturEreignis( TastaturEreignis )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			TastaturEreignis te = parameter->z( 0 ) ? parameter->z( 0 )->getTastaturEreignis() : TastaturEreignis{ 0, 0, 0 };
-			val->doTastaturEreignis( te );
-		}
-		break;
-	case 24: // void render( int, int, Bild )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
-			if( b )
-			{
-				val->render( *b );
-				b->release();
-			}
-		}
-		break;
-	case 25: // Text getText()
-		if( 1 )
-		{
-			Text *txt = val->getText();
-			ret = new KSGSTextKlasse( obj, *txt );
-			txt->release();
-		}
-		break;
-	case 26: // Bild getHintergrundBild()
-		if( val->zHintergrundBild() )
-			ret = new KSGSBildKlasse( obj, val->getHintergrundBild() );
-		break;
-	case 27: // int getHintergrundFarbe()
-		ret = new KSGSIntKlasse( obj, val->getHintergrundFarbe() );
-		break;
-	case 28: // int getSchriftGröße()
-		ret = new KSGSIntKlasse( obj, val->getSchriftSize() );
-		break;
-	case 29: // int getSchriftFarbe()
-		ret = new KSGSIntKlasse( obj, val->getSchriftFarbe() );
-		break;
-	case 30: // int getAFStärke()
-		ret = new KSGSIntKlasse( obj, val->getAlphaFeldStrength() );
-		break;
-	case 31: // int getAFFarbe()
-		ret = new KSGSIntKlasse( obj, val->getAlphaFeldFarbe() );
-		break;
-	case 32: // int getLRBreite()
-		ret = new KSGSIntKlasse( obj, val->getLinienRahmenBreite() );
-		break;
-	case 33: // int getLRFarbe()
-		ret = new KSGSIntKlasse( obj, val->getLinienRahmenFarbe() );
-		break;
-	case 34: // int getShowChar()
-		ret = new KSGSIntKlasse( obj, val->getShowChar() );
-		break;
-	case 35: // bool hatStyle( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->hatStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 36: // bool hatStyleNicht( int )
-		if( parameter->getEintragAnzahl() < 1 )
-			error( 20, {}, obj );
-		ret = new KSGSBoolKlasse( obj, val->hatStyleNicht( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
-		break;
-	case 37: // TextFeld dublizieren()
-		ret = new KSGSTextFeldKlasse( obj, (TextFeld*)val->dublizieren() );
-		break;
-	case 38: // void setToolTipText( Text )
-		if( 1 )
-		{
-			if( parameter->getEintragAnzahl() < 1 )
-				error( 20, {}, obj );
-			Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
-			val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
-			if( txt )
-				txt->release();
-		}
-		break;
-	case 39: // void setPosition( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-						  parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 40: // void setGröße( int, int )
-		if( parameter->getEintragAnzahl() < 2 )
-			error( 20, {}, obj );
-		val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
-					   parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
-		break;
-	case 41: // int getBreite()
-		ret = new KSGSIntKlasse( obj, val->getBreite() );
-		break;
-	case 42: // int getHöhe()
-		ret = new KSGSIntKlasse( obj, val->getHeight() );
-		break;
-	case 43: // int getX()
-		ret = new KSGSIntKlasse( obj, val->getX() );
-		break;
-	case 44: // int getY()
-		ret = new KSGSIntKlasse( obj, val->getY() );
-		break;
-	case 45: // Text getToolTipText()
-		if( 1 )
-		{
-			Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
-			ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
-		}
-		break;
-	case 46: // void setGrößeNachText()
-		if( 1 )
-		{
-			Schrift *s = val->zSchrift();
-			if( s )
-			{
-				s->lock();
-				s->setSchriftSize( val->getSchriftSize() );
-				val->setSize( s->getTextBreite( val->zText() ), s->getTextHeight( val->zText() ) );
-				s->unlock();
-			}
-		}
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case 0: // void setText( Text )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setText( parameter->z( 0 ) ? parameter->z( 0 )->getText() : new Text() );
+        break;
+    case 1: // void addZeile( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : new Text();
+            val->addZeile( *txt );
+            txt->release();
+        }
+        break;
+    case 2: // void setAuswahl( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setAuswahl( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                         parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 3: // void setHintergrundBild( Bild )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setHintergrundBildZ( parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0 );
+        break;
+    case 4: // void setHintergrundFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setHintergrundFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 5: // void setSchriftGröße( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSchriftSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 6: // void setSchriftFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSchriftFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 7: // void setAFStärke( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setAlphaFeldStrength( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 8: // void setAFFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setAlphaFeldFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 9: // void setLRBreite( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmenBreite( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 10: // void setLRFarbe( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setRahmenFarbe( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 11: // void setShowChar( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setSchowChar( (char)( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 12: // void setVKlickScroll( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setVertikalKlickScroll( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 13: // void setVScrollPos( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setVertikalScrollPos( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 14: // void setVScrollZuZeile( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setVScrollZuZeile( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 15: // void updateVScroll()
+        val->updateVScroll();
+        break;
+    case 16: // void setStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->setStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 17: // void addStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->addStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 18: // void löscheStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        val->removeStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 );
+        break;
+    case 19: // bool tick( double )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->tick( parameter->z( 0 ) ? parameter->z( 0 )->getDouble() : 0 ) );
+        break;
+    case 20: // void setMausEreignis( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            if( n )
+            {
+                mausF = obj->getFunktionId( *n );
+                n->release();
+            }
+            else
+                mausF = -1;
+        }
+        break;
+    case 21: // void setTastaturEreignis( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *n = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            if( n )
+            {
+                tastaturF = obj->getFunktionId( *n );
+                n->release();
+            }
+            else
+                tastaturF = -1;
+        }
+        break;
+    case 22: // void doMausEreignis( MausEreignis )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            MausEreignis me = parameter->z( 0 ) ? parameter->z( 0 )->getMausEreignis() : MausEreignis{ 0, 0, 0, 0, 0, 0 };
+            val->doMausEreignis( me );
+        }
+        break;
+    case 23: // void doTastaturEreignis( TastaturEreignis )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            TastaturEreignis te = parameter->z( 0 ) ? parameter->z( 0 )->getTastaturEreignis() : TastaturEreignis{ 0, 0, 0 };
+            val->doTastaturEreignis( te );
+        }
+        break;
+    case 24: // void render( int, int, Bild )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Bild *b = parameter->z( 0 ) ? parameter->z( 0 )->getBild() : 0;
+            if( b )
+            {
+                val->render( *b );
+                b->release();
+            }
+        }
+        break;
+    case 25: // Text getText()
+        if( 1 )
+        {
+            Text *txt = val->getText();
+            ret = new KSGSTextKlasse( obj, *txt );
+            txt->release();
+        }
+        break;
+    case 26: // Bild getHintergrundBild()
+        if( val->zHintergrundBild() )
+            ret = new KSGSBildKlasse( obj, val->getHintergrundBild() );
+        break;
+    case 27: // int getHintergrundFarbe()
+        ret = new KSGSIntKlasse( obj, val->getHintergrundFarbe() );
+        break;
+    case 28: // int getSchriftGröße()
+        ret = new KSGSIntKlasse( obj, val->getSchriftSize() );
+        break;
+    case 29: // int getSchriftFarbe()
+        ret = new KSGSIntKlasse( obj, val->getSchriftFarbe() );
+        break;
+    case 30: // int getAFStärke()
+        ret = new KSGSIntKlasse( obj, val->getAlphaFeldStrength() );
+        break;
+    case 31: // int getAFFarbe()
+        ret = new KSGSIntKlasse( obj, val->getAlphaFeldFarbe() );
+        break;
+    case 32: // int getLRBreite()
+        ret = new KSGSIntKlasse( obj, val->getRahmenBreite() );
+        break;
+    case 33: // int getLRFarbe()
+        ret = new KSGSIntKlasse( obj, val->getRahmenFarbe() );
+        break;
+    case 34: // int getShowChar()
+        ret = new KSGSIntKlasse( obj, val->getShowChar() );
+        break;
+    case 35: // bool hatStyle( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->hatStyle( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 36: // bool hatStyleNicht( int )
+        if( parameter->getEintragAnzahl() < 1 )
+            error( 20, {}, obj );
+        ret = new KSGSBoolKlasse( obj, val->hatStyleNicht( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0 ) );
+        break;
+    case 37: // TextFeld dublizieren()
+        ret = new KSGSTextFeldKlasse( obj, (TextFeld*)val->dublizieren() );
+        break;
+    case 38: // void setToolTipText( Text )
+        if( 1 )
+        {
+            if( parameter->getEintragAnzahl() < 1 )
+                error( 20, {}, obj );
+            Text *txt = parameter->z( 0 ) ? parameter->z( 0 )->getText() : 0;
+            val->setToolTipText( txt ? *txt : 0, obj->zBildschirm() );
+            if( txt )
+                txt->release();
+        }
+        break;
+    case 39: // void setPosition( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setPosition( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                          parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 40: // void setGröße( int, int )
+        if( parameter->getEintragAnzahl() < 2 )
+            error( 20, {}, obj );
+        val->setSize( parameter->z( 0 ) ? parameter->z( 0 )->getInt() : 0,
+                      parameter->z( 1 ) ? parameter->z( 1 )->getInt() : 0 );
+        break;
+    case 41: // int getBreite()
+        ret = new KSGSIntKlasse( obj, val->getBreite() );
+        break;
+    case 42: // int getHöhe()
+        ret = new KSGSIntKlasse( obj, val->getHeight() );
+        break;
+    case 43: // int getX()
+        ret = new KSGSIntKlasse( obj, val->getX() );
+        break;
+    case 44: // int getY()
+        ret = new KSGSIntKlasse( obj, val->getY() );
+        break;
+    case 45: // Text getToolTipText()
+        if( 1 )
+        {
+            Text *txt = val->zToolTip() ? val->zToolTip()->zText() : 0;
+            ret = new KSGSTextKlasse( obj, txt ? *txt : "" );
+        }
+        break;
+    case 46: // void setGrößeNachText()
+        if( 1 )
+        {
+            TextRenderer *t = val->zTextRenderer();
+            if( t )
+            {
+                t->setSchriftSize( val->getSchriftSize() );
+                val->setSize( t->getTextBreite( val->zText()->getText() ), t->getTextHeight( val->zText()->getText() ) );
+            }
+        }
         break;
     case 47: // void setTextNachGröße()
         if( 1 )
         {
-            Schrift *s = val->zSchrift();
-            if( s )
+            TextRenderer *t = val->zTextRenderer();
+            if( t )
             {
-                val->lockZeichnung();
-                s->textFormatieren( val->zText(), val->getBreite(), val->getSchriftSize() );
-                val->unlockZeichnung();
+                t->setSchriftSize( val->getSchriftSize() );
+                t->textFormatieren( val->zText(), val->getBreite() );
             }
         }
         break;
-	default: // unbekannt
-		error( 19, {}, obj );
-		break;
-	}
-	parameter->release();
-	return ret;
+    default: // unbekannt
+        error( 19, {}, obj );
+        break;
+    }
+    parameter->release();
+    return ret;
 }
 
 KSGSVariable *KSGSTextFeldKlasse::doOperator( int id, KSGSVariable *rechts )
 {
-	if( !rechts )
-	{
-		error( 3, {}, obj );
-		return 0;
-	}
-	KSGSVariable *ret = 0;
-	switch( id )
-	{
-	case KSGS_O_SET:
-		if( 1 )
-		{
-			val->release();
-			val = rechts->getTextFeld();
-			ret = getThis();
-		}
-		break;
-	}
-	if( !ret )
-		error( 21, {}, obj );
-	if( rechts )
-		rechts->release();
-	return ret;
+    if( !rechts )
+    {
+        error( 3, {}, obj );
+        return 0;
+    }
+    KSGSVariable *ret = 0;
+    switch( id )
+    {
+    case KSGS_O_SET:
+        if( 1 )
+        {
+            val->release();
+            val = rechts->getTextFeld();
+            ret = getThis();
+        }
+        break;
+    }
+    if( !ret )
+        error( 21, {}, obj );
+    if( rechts )
+        rechts->release();
+    return ret;
 }
 
 bool KSGSTextFeldKlasse::doMausEreignis( MausEreignis &me )
 {
-	if( mausF < 0 )
-		return 1;
-	RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
-	parameter->add( new KSGSMausEreignisKlasse( obj, me ) );
-	KSGSVariable *ret = obj->startFunktion( mausF, parameter );
-	if( ret )
-	{
-		bool r = ret->getBool();
-		ret->release();
-		return r;
-	}
-	return 1;
+    if( mausF < 0 )
+        return 1;
+    RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
+    parameter->add( new KSGSMausEreignisKlasse( obj, me ) );
+    KSGSVariable *ret = obj->startFunktion( mausF, parameter );
+    if( ret )
+    {
+        bool r = ret->getBool();
+        ret->release();
+        return r;
+    }
+    return 1;
 }
 
 bool KSGSTextFeldKlasse::doTastaturEreignis( TastaturEreignis &te )
 {
-	if( tastaturF < 0 )
-		return 1;
-	RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
-	parameter->add( new KSGSTastaturEreignisKlasse( obj, te ) );
-	KSGSVariable *ret = obj->startFunktion( tastaturF, parameter );
-	if( ret )
-	{
-		bool r = ret->getBool();
-		ret->release();
-		return r;
-	}
-	return 1;
+    if( tastaturF < 0 )
+        return 1;
+    RCArray< KSGSVariable > *parameter = new RCArray< KSGSVariable >();
+    parameter->add( new KSGSTastaturEreignisKlasse( obj, te ) );
+    KSGSVariable *ret = obj->startFunktion( tastaturF, parameter );
+    if( ret )
+    {
+        bool r = ret->getBool();
+        ret->release();
+        return r;
+    }
+    return 1;
 }
 
 // constant
 TextFeld *KSGSTextFeldKlasse::getVal() const
 {
-	return val->getThis();
+    return (TextFeld*)val->getThis();
 }
 
 TextFeld *KSGSTextFeldKlasse::zVal() const
 {
-	return val;
+    return val;
 }
 
 // Reference Counting
 KSGSVariable *KSGSTextFeldKlasse::release()
 {
-	ref--;
-	if( !ref )
-		delete this;
-	return 0;
+    ref--;
+    if( !ref )
+        delete this;
+    return 0;
 }
 
 
 // Ereignisse
 bool KSGScript::ksgsTextFeldME( void *var, void *obj, MausEreignis me )
 {
-	if( !var )
-		return 1;
-	return ( (KSGSTextFeldKlasse*)var )->doMausEreignis( me );
+    if( !var )
+        return 1;
+    return ( (KSGSTextFeldKlasse*)var )->doMausEreignis( me );
 }
 
 bool KSGScript::ksgsTextFeldTE( void *var, void *obj, TastaturEreignis te )
 {
-	if( !var )
-		return 1;
-	return ( (KSGSTextFeldKlasse*)var )->doTastaturEreignis( te );
+    if( !var )
+        return 1;
+    return ( (KSGSTextFeldKlasse*)var )->doTastaturEreignis( te );
 }

ksgScript/ksgScript.vcxproj

@@ -114,7 +114,7 @@
       <AdditionalDependencies>Framework.lib;%(AdditionalDependencies)</AdditionalDependencies>
     </Link>
     <CustomBuildStep>
-      <Command>copy "..\x64\Debug\ksgScript.dll" "..\..\Test\Test\KSGScript.dll"
+      <Command>copy "..\x64\Debug\ksgScript.dll" "..\..\Framework_Test\Test\KSGScript.dll"
 copy "..\x64\Debug\ksgScript.dll" "..\..\..\Spiele Platform\Klient\patcher\patcher\data\bin\KSGScript.dll"
 copy "..\x64\Debug\ksgScript.dll" "..\..\..\Spiele Platform\Klient\Fertig\Debug\x64\data\bin\KSGScript.dll"</Command>
     </CustomBuildStep>