Hinzufügen von Objekten und Elementen

/* Hinzufügen von Objekten und Elementen */

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

#include "moskito.h"                        /* ist alles drin */

#include <string.h>

/*

Die folgende Routine fügt dem offenen Plan ein Objekt und einen Text hinzu.

*/

long int EXPORTENTRY MakeObject(

   int     argc,

   char *  argv[],

   PROOT   root)

{

     PPLANS plan;

   POBJECT obj;

     PELEMENT el;

     KEY objektschluessel[3];

     plan = DBgetOpenPlan(root);

     objektschluessel[0]=1200;

     obj = DBaddObject(plan, objektschluessel, 1);

   if (!obj) {

       return 1;

   }

   el = DBaddText(obj, 9, 100, 200, 0, 0, 0, 0, 1, 500, 0, "Hello",

             NULL, FALSE, TEXT_MODE_LEFT);

     if (!el){

       return 1;

     }

   return 0;

}

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