root/campo-sirio
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Uso delle mitica TSkelon_app

Browse Source 
git-svn-id: svn://10.65.10.50/trunk@5446 c028cbd2-c16b-5b4b-a496-9718f37d4682
This commit is contained in:
augusto 1997-10-24 14:40:00 +00:00
parent 4d9444eccd
commit fae346b549
1 changed files with 9 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
mg/mg4100.cpp
View File

@ -1,18 +1,13 @@
#include <applicat.h> #include <applicat.h>
#include <config.h>
#include <mask.h>
#include <printer.h>
#include <relation.h> #include <relation.h>
#include <tabutil.h> #include <tabutil.h>
#include <urldefid.h> #include <urldefid.h>
#include <utility.h>
#include <form.h> #include <form.h>
#include <printapp.h>
#include "mglib.h" #include "mglib.h"
#include "mg4100.h" #include "mg4100.h"
class TStampa_listamov : public TApplication class TStampa_listamov : public TSkeleton_application
{ {
TArray _files; TArray _files;
TMask * _mask; TMask * _mask;
@ -25,8 +20,10 @@ class TStampa_listamov : public TApplication
protected: protected:
virtual bool create(); virtual bool create();
virtual bool destroy(); virtual bool destroy();
virtual void main_loop();
}; };
bool TStampa_listamov::create() bool TStampa_listamov::create()
{ {
_files.add(new TLocalisamfile(LF_MOVMAG)); _files.add(new TLocalisamfile(LF_MOVMAG));
@ -34,7 +31,12 @@ bool TStampa_listamov::create()
_files.add(new TLocalisamfile(LF_ANAMAG)); _files.add(new TLocalisamfile(LF_ANAMAG));
_files.add(new TLocalisamfile(LF_UMART)); _files.add(new TLocalisamfile(LF_UMART));
_files.add(new TLocalisamfile(LF_TAB)); _files.add(new TLocalisamfile(LF_TAB));
TSkeleton_application::create();
return TRUE;
}
void TStampa_listamov::main_loop()
{
TRectype darec(LF_RMOVMAG),arec(LF_RMOVMAG); TRectype darec(LF_RMOVMAG),arec(LF_RMOVMAG);
_mask = new TMask("mg4100"); _mask = new TMask("mg4100");
while (_mask->run() == K_ENTER) { while (_mask->run() == K_ENTER) {
@ -92,11 +94,11 @@ bool TStampa_listamov::create()
_form->print(); _form->print();
delete _form; delete _form;
} // while true } // while true
return FALSE;
} }
bool TStampa_listamov::destroy() bool TStampa_listamov::destroy()
{ {
delete _mask; delete _mask;
TSkeleton_application::destroy();
return TRUE; return TRUE;
} }