1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
|
//---------------------------------------------------------------------------
#ifndef getmainH
#define getmainH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <Buttons.hpp>
#include <ComCtrls.hpp>
#include <ExtCtrls.hpp>
#include <FileCtrl.hpp>
#include <Vcl.Dialogs.hpp>
#include <Vcl.Graphics.hpp>
#ifdef TCPP
#include <vcl\inifiles.hpp>
#else
#include <inifiles.hpp>
#endif
#include "rtklib.h"
//---------------------------------------------------------------------------
class TMainForm : public TForm
{
__published:
TPanel *Panel2;
TLabel *Label6;
TPanel *Panel3;
TButton *BtnOpts;
TButton *BtnLog;
TButton *BtnDownload;
TButton *BtnExit;
TPanel *Msg1;
TButton *BtnFile;
TPanel *Msg3;
TButton *BtnDir;
TListBox *DataList;
TComboBox *DataType;
TCheckBox *LocalDir;
TPanel *Msg2;
TLabel *LabelSta;
TOpenDialog *OpenDialog;
TListBox *StaList;
TPanel *Panel1;
TLabel *Label1;
TEdit *TimeY1;
TLabel *Label3;
TEdit *TimeY2;
TEdit *TimeH2;
TEdit *TimeH1;
TUpDown *TimeY1UD;
TUpDown *TimeY2UD;
TUpDown *TimeH2UD;
TUpDown *TimeH1UD;
TSpeedButton *BtnTime1;
TSpeedButton *BtnTime2;
TLabel *Label7;
TComboBox *TimeInt;
TPanel *Panel4;
TLabel *Label4;
TEdit *FtpLogin;
TEdit *FtpPasswd;
TLabel *Label8;
TSaveDialog *SaveDialog;
TButton *BtnTest;
TButton *BtnStas;
TSpeedButton *BtnKeyword;
TCheckBox *HidePasswd;
TTimer *Timer;
TImage *Image1;
TImage *Image2;
TImage *Image3;
TImage *Image4;
TCheckBox *UnZip;
TCheckBox *SkipExist;
TTrayIcon *TrayIcon;
TComboBox *SubType;
TSpeedButton *BtnTray;
TSpeedButton *BtnHelp;
TImage *Image5;
TImage *Image6;
TImage *Image7;
TImage *Image8;
TEdit *Number;
TLabel *Label2;
TButton *BtnAll;
TComboBox *Dir;
TLabel *MsgLabel2;
TLabel *MsgLabel1;
TLabel *MsgLabel3;
void __fastcall TimeY1UDChangingEx(TObject *Sender, bool &AllowChange,
short NewValue, TUpDownDirection Direction);
void __fastcall TimeH1UDChangingEx(TObject *Sender, bool &AllowChange,
short NewValue, TUpDownDirection Direction);
void __fastcall TimeY2UDChangingEx(TObject *Sender, bool &AllowChange,
short NewValue, TUpDownDirection Direction);
void __fastcall TimeH2UDChangingEx(TObject *Sender, bool &AllowChange,
short NewValue, TUpDownDirection Direction);
void __fastcall BtnExitClick(TObject *Sender);
void __fastcall BtnOptsClick(TObject *Sender);
void __fastcall BtnLogClick(TObject *Sender);
void __fastcall BtnDownloadClick(TObject *Sender);
void __fastcall DataTypeChange(TObject *Sender);
void __fastcall FormShow(TObject *Sender);
void __fastcall FormClose(TObject *Sender, TCloseAction &Action);
void __fastcall BtnFileClick(TObject *Sender);
void __fastcall DataListClick(TObject *Sender);
void __fastcall BtnDirClick(TObject *Sender);
void __fastcall LocalDirClick(TObject *Sender);
void __fastcall BtnStasClick(TObject *Sender);
void __fastcall BtnTime1Click(TObject *Sender);
void __fastcall BtnTime2Click(TObject *Sender);
void __fastcall BtnKeywordClick(TObject *Sender);
void __fastcall BtnHelpClick(TObject *Sender);
void __fastcall HidePasswdClick(TObject *Sender);
void __fastcall TimerTimer(TObject *Sender);
void __fastcall BtnTrayClick(TObject *Sender);
void __fastcall TrayIconDblClick(TObject *Sender);
void __fastcall BtnTestClick(TObject *Sender);
void __fastcall StaListClick(TObject *Sender);
void __fastcall FormCreate(TObject *Sender);
void __fastcall BtnAllClick(TObject *Sender);
void __fastcall DirChange(TObject *Sender);
private:
TStringList *Types;
TStringList *Urls;
TStringList *Locals;
void __fastcall DropFiles(TWMDropFiles msg);
void __fastcall LoadOpt(void);
void __fastcall SaveOpt(void);
void __fastcall UpdateType(void);
void __fastcall UpdateMsg(void);
void __fastcall UpdateStaList(void);
void __fastcall UpdateEnable(void);
void __fastcall PanelEnable(int ena);
void __fastcall GetTime(gtime_t *ts, gtime_t *te, double *ti);
int __fastcall SelectUrl(url_t *urls);
int __fastcall SelectSta(char **stas);
void __fastcall LoadUrl(AnsiString file);
void __fastcall LoadSta(AnsiString file);
int __fastcall ExecCmd(AnsiString cmd);
void __fastcall ReadHist(TIniFile *ini, AnsiString key, TStrings *list);
void __fastcall WriteHist(TIniFile *ini, AnsiString key, TStrings *list);
void __fastcall AddHist(TComboBox *combo);
BEGIN_MESSAGE_MAP
MESSAGE_HANDLER(WM_DROPFILES,TWMDropFiles,DropFiles);
END_MESSAGE_MAP(TForm);
public:
AnsiString IniFile;
AnsiString UrlFile;
AnsiString LogFile;
AnsiString Stations;
AnsiString ProxyAddr;
int HoldErr;
int HoldList;
int NCol;
int DateFormat;
int TraceLevel;
int LogAppend;
int TimerCnt;
__fastcall TMainForm(TComponent* Owner);
};
//---------------------------------------------------------------------------
extern PACKAGE TMainForm *MainForm;
//---------------------------------------------------------------------------
#endif
|
