Ändern von Elementeigenschaften

/* Ändern von Elementeigenschaften */

/*=================================*/

#include "database.h"

long int EXPORTENTRY EigenschaftenAendern (int argc, char *argv[], PROOT root)

{

     PPLANS plan;

     POBJECT obj;

     PELEMENT el;

     PSTRING_ELEMENT string;

     STRING_SETTINGS strSet;

     PTEXT_ELEMENT text;

     TEXT_SETTINGS tSet;

     PSYMBOL_ELEMENT symbol;

     SYMBOL_SETTINGS sySet;

     T_PPOINT point;

     POINT_SETTINGS pSet;

     int pointertyp;

     plan = DBgetOpenPlan (root);

     if(!plan){

       IOwprintf(DBgetIOpipes(root), "Kein Plan geöffnet\n", strSet.zeichenschluessel);

     }

     obj = DBgetOpenObject(root);

     if(!obj){

       obj = DBfirstObjectOfPlan(plan);

     }

     if(!obj){

       IOwprintf(DBgetIOpipes(root), "Plan hat keine Objekte\n",

                         strSet.zeichenschluessel);

       return 1;

     }

     el = DBgetOpenElement (root);

     if (!el){

       el = DBfirstElementOfObject(obj);

     }

     if (!el){

       IOwprintf(DBgetIOpipes(root), "Objekt hat keine Elemente\n",

                         strSet.zeichenschluessel);

       return 1;

     }

     pointertyp = DBreturnPointerTyp(el);

     switch (pointertyp){

      case TYP_STRING_ELEMENT:

       DBreturnStringSettings(el, &strSet, 1);

       strSet.zeichenschluessel = 12;

       DBmodifyStringSettings(el, STRING_MODIFY_ZEICHENSCHLUESSEL, &strSet, 1);

       IOwprintf(DBgetIOpipes(root), "DKY geändert in %d\n", strSet.zeichenschluessel);

       break;

      case TYP_TEXT_ELEMENT:

       DBreturnTextSettings(el, &tSet, 1);

       tSet.zeichenschluessel = 15;

       DBmodifyTextSettings(el, TEXT_MODIFY_ZEICHENSCHLUESSEL, &tSet, 1);

       IOwprintf(DBgetIOpipes(root), "DKY geändert in %d\n", tSet.zeichenschluessel);

       break;

      case TYP_SYMBOL_ELEMENT:

       DBreturnSymbolSettings(el, &sySet, 1);

       sySet.symbol = 103;

       DBmodifySymbolSettings(el, SYMBOL_MODIFY_SYMBOL, &sySet, 1);

       IOwprintf(DBgetIOpipes(root), "Nummer geändert in %d\n", sySet.symbol);

       break;

      default:

       IOwprintf(DBgetIOpipes(root), "Erstes Element ist kein graphisches element\n");

     }

     return 0;

}

/*---------------------------------------------------------------------------*/