00001
00002
00003
00004
00005
00006
00007
00008
00009
00010
00011 #ifndef configuracionH
00012 #define configuracionH
00013
00014 #include <Classes.hpp>
00015 #include <Controls.hpp>
00016 #include <StdCtrls.hpp>
00017 #include <Forms.hpp>
00018 #include <DBLookup.hpp>
00019 #include <DBCtrls.hpp>
00020 #include <ExtCtrls.hpp>
00021
00022 #include "UFcomunicaciones.h"
00023
00027 struct TConexion
00028 {
00030 HANDLE MPuerto;
00032 AnsiString Puerto;
00034 DWORD Baudios;
00036 BYTE Paridad;
00038 BYTE BitsDatos;
00040 BYTE BitStop;
00042 AnsiString CFlujo;
00044 AnsiString conf;
00045 AnsiString Preceptor;
00046 bool establecimiento;
00047 };
00048
00051 class TFormConf : public TForm
00052 {
00053 __published:
00054 TLabel *Label1;
00055 TLabel *Label2;
00056 TLabel *Label3;
00057 TLabel *Label4;
00058 TLabel *Label5;
00059 TLabel *Label6;
00060 TLabel *Label7;
00061 TButton *Button1;
00062 TButton *Button2;
00063 TComboBox *OPpuerto;
00064 TComboBox *bitpdatos;
00065 TComboBox *bitpseg;
00066 TComboBox *paridad;
00067 TComboBox *bitstop;
00068 TComboBox *controlflujo;
00069 TBevel *Bevel1;
00070 TButton *Button3;
00071 TLabel *Label8;
00072 TComboBox *Preceptor;
00073 TCheckBox *CheckEst;
00075 void __fastcall Button1Click(TObject *Sender);
00077 void __fastcall Button2Click(TObject *Sender);
00079 void __fastcall FormCreate(TObject *Sender);
00081 void __fastcall Button3Click(TObject *Sender);
00082
00083 private:
00084
00085
00086 DCB dcb;
00087 public:
00088
00089 TConexion *conexion;
00091 __fastcall TFormConf(TComponent* Owner);
00092 };
00093
00094
00095
00096 extern PACKAGE TFormConf *FormConf;
00097
00098 #endif