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
|
//---------------------------------------------------------------------------
#ifndef viewerH
#define viewerH
//---------------------------------------------------------------------------
#include <Classes.hpp>
#include <Controls.hpp>
#include <StdCtrls.hpp>
#include <Forms.hpp>
#include <ExtCtrls.hpp>
#include <Dialogs.hpp>
#include <ComCtrls.hpp>
#include <Buttons.hpp>
#define MAXLINE 20000
//---------------------------------------------------------------------------
class TTextViewer : public TForm
{
__published:
TPanel *Panel1;
TButton *BtnClose;
TPanel *Panel2;
TButton *BtnRead;
TOpenDialog *OpenDialog;
TButton *BtnOpt;
TSpeedButton *BtnReload;
TRichEdit *Text;
TSaveDialog *SaveDialog;
TEdit *FindStr;
TButton *BtnFind;
void __fastcall BtnCloseClick(TObject *Sender);
void __fastcall BtnReadClick(TObject *Sender);
void __fastcall BtnOptClick(TObject *Sender);
void __fastcall FormShow(TObject *Sender);
void __fastcall BtnReloadClick(TObject *Sender);
void __fastcall BtnFindClick(TObject *Sender);
void __fastcall FindStrKeyPress(TObject *Sender, char &Key);
private:
AnsiString File;
wchar_t *TextStr;
void __fastcall ReadText(AnsiString file);
void __fastcall UpdateText(void);
public:
int Option;
static TColor Color1,Color2;
static TFont *FontD;
__fastcall TTextViewer(TComponent* Owner);
void __fastcall Read(AnsiString file);
void __fastcall Save(AnsiString file);
};
//---------------------------------------------------------------------------
extern PACKAGE TTextViewer *TextViewer;
//---------------------------------------------------------------------------
#endif
|
