00001
00002
00003
00004
00005
00006
00007
00008
00009 #ifndef UFmediaposH
00010 #define UFmediaposH
00011
00012 #include <Classes.hpp>
00013 #include <Controls.hpp>
00014 #include <StdCtrls.hpp>
00015 #include <Forms.hpp>
00016 #include <ComCtrls.hpp>
00017 #include <ExtCtrls.hpp>
00018
00019 #include "UFpos.h"
00020 #include "GestionTrama.h"
00021 #include <ExtCtrls.hpp>
00022
00025 class TFormMediapos : public TForm
00026 {
00027 __published:
00028 TRadioGroup *Trama;
00029 TProgressBar *ProgressBar1;
00030 TLabel *Label1;
00031 TLabel *Label2;
00032 TLabel *Label3;
00033 TLabel *Label4;
00034 TEdit *TxtDuracion;
00035 TEdit *Txtperiodo;
00036 TButton *Button1;
00037 TButton *Button2;
00038 TButton *Button3;
00039 TTimer *Timer1;
00040 TTimer *Timer2;
00041 TButton *Button4;
00042
00044 void __fastcall Button1Click(TObject *Sender);
00046 void __fastcall Button2Click(TObject *Sender);
00048 void __fastcall Button3Click(TObject *Sender);
00050 void __fastcall FormActivate(TObject *Sender);
00052 void __fastcall Timer1Timer(TObject *Sender);
00054 void __fastcall Timer2Timer(TObject *Sender);
00056 void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
00058 void __fastcall Button4Click(TObject *Sender);
00059
00060 private:
00062
00064
00066
00068
00070
00072
00073
00074 public:
00076
00078
00080
00082
00084
00086
00088
00090
00091
00092 void Rellenamedia(struct Trama *aux);
00093 };
00094
00095 extern PACKAGE TFormMediapos *FormMediapos;
00096
00097 #endif