home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Vectronix 2
/
VECTRONIX2.iso
/
FILES_01
/
PC_V11_B.LZH
/
DEMO_PC
/
PCGEM3.C
< prev
next >
Wrap
C/C++ Source or Header
|
1993-07-28
|
5KB
|
96 lines
/************************************************************************/
/* */
/* Beispielprogramm: EVNT_MESAG( ) */
/* */
/* Copyright (c) 1989 Borland International */
/* All rights reserved. */
/* */
/************************************************************************/
/* -------------------------------------------------------------------- */
/* Include-Files einbinden. */
/* -------------------------------------------------------------------- */
#include <aes.h>
/* -------------------------------------------------------------------- */
/* Konstantendefinitionen. */
/* -------------------------------------------------------------------- */
#define ME_HIDE 0
#define ME_SHOW 1
#define ME_NORM 1
#define RSC_NAME "F:\TEST.RSC"
/* -------------------------------------------------------------------- */
/* Typendefinition. */
/* -------------------------------------------------------------------- */
typedef enum
{
FALSE,
TRUE
}
boolean;
/* -------------------------------------------------------------------- */
/* Globale Variablen. */
/* -------------------------------------------------------------------- */
OBJECT *M_tree;
OBJECT *tree;
/* -------------------------------------------------------------------- */
/* Funktionsprototypen. */
/* -------------------------------------------------------------------- */
void gem_prg( void );
/* -------------------------------------------------------------------- */
/* void gem_prg( void ); */
/* */
/* Beispiel für die Verwendung der Funktion evnt_mesag( ) in */
/* einem GEM-Programm. */
/* */
/* -> Nichts. */
/* */
/* <- Nichts. */
/* -------------------------------------------------------------------- */
void gem_prg( void )
{
int msgbuff[8]; /* Mitteilungspuffer. */
boolean done = FALSE; /* 'Mach weiter'-Flag. */
if ( rsrc_load( RSC_NAME ) > 0 ) /* Es kann auch ein anderes */
{ /* Rsc-File geladen werden. */
rsrc_gaddr( 0, 0, &M_tree ); /* Startadresse des Baumes */
/* bestimmen. */
graf_mouse( M_OFF, 0 ); /* Maus ausblenden. */
menu_bar( M_tree, ME_SHOW ); /* Menü anzeigen. */
graf_mouse( M_ON, 0 );
graf_mouse( ARROW, 0 ); /* Mauszeiger ist der Pfeil. */
do
/* besitzt, dann ist es voll- */
/* bracht. */
menu_tnormal( M_tree, msgbuff[3], ME_NORM );
} /* Menütitel normal zeichnen. */
}
while ( !done ); /* Solange nichts getan ist! */
graf_mouse( M_OFF,0 );
menu_bar( M_tree, ME_HIDE ); /* Menü verschwinden lassen. */
graf_mouse( M_ON, 0 );
rsrc_free( ); /* Durch Rsc-Datei belegten */
} /* Speicher freigeben. */
else
form_alert( 1, "[3][Rsc-Datei nicht gefunden.][Abbruch]" );
}
/* -------------------------------------------------------------------- */
/* Ende der Beispielprogramms für EVNT_MESAG( ). */
/* -------------------------------------------------------------------- */