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
|
//---------------------------------------------------------------------------
#include <vcl.h>
#include <stdio.h>
#pragma hdrstop
#include "cmdoptdlg.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TCmdOptDialog *CmdOptDialog;
//---------------------------------------------------------------------------
__fastcall TCmdOptDialog::TCmdOptDialog(TComponent* Owner)
: TForm(Owner)
{
CmdEna[0]=CmdEna[1]=1;
}
//---------------------------------------------------------------------------
void __fastcall TCmdOptDialog::FormShow(TObject *Sender)
{
OpenCmd->Text=Cmds[0];
CloseCmd->Text=Cmds[1];
ChkOpenCmd->Checked=CmdEna[0];;
ChkCloseCmd->Checked=CmdEna[1];;
UpdateEnable();
}
//---------------------------------------------------------------------------
void __fastcall TCmdOptDialog::BtnOkClick(TObject *Sender)
{
Cmds[0]=OpenCmd->Text;
Cmds[1]=CloseCmd->Text;
CmdEna[0]=ChkOpenCmd->Checked;
CmdEna[1]=ChkCloseCmd->Checked;
}
//---------------------------------------------------------------------------
void __fastcall TCmdOptDialog::BtnLoadClick(TObject *Sender)
{
AnsiString OpenDialog_FileName;
TMemo *cmd[]={OpenCmd,CloseCmd};
FILE *fp;
char buff[1024];
int n=0;
if (!OpenDialog->Execute()) return;
OpenDialog_FileName=OpenDialog->FileName;
if (!(fp=fopen(OpenDialog_FileName.c_str(),"r"))) return;
cmd[0]->Text="";
cmd[1]->Text="";
while (fgets(buff,sizeof(buff),fp)) {
if (buff[0]=='@') {n=1; continue;}
if (buff[strlen(buff)-1]=='\n') buff[strlen(buff)-1]='\0';
cmd[n]->Text=cmd[n]->Text+buff+"\r\n";
}
fclose(fp);
}
//---------------------------------------------------------------------------
void __fastcall TCmdOptDialog::BtnSaveClick(TObject *Sender)
{
AnsiString SaveDialog_FileName;
AnsiString OpenCmd_Text=OpenCmd->Text,CloseCmd_Text=CloseCmd->Text;
FILE *fp;
if (!SaveDialog->Execute()) return;
SaveDialog_FileName=SaveDialog->FileName;
if (!(fp=fopen(SaveDialog_FileName.c_str(),"w"))) return;
fprintf(fp,"%s",OpenCmd_Text.c_str());
fprintf(fp,"\n@\n");
fprintf(fp,"%s",CloseCmd_Text.c_str());
fclose(fp);
}
//---------------------------------------------------------------------------
void __fastcall TCmdOptDialog::ChkCloseCmdClick(TObject *Sender)
{
UpdateEnable();
}
//---------------------------------------------------------------------------
void __fastcall TCmdOptDialog::ChkOpenCmdClick(TObject *Sender)
{
UpdateEnable();
}
//---------------------------------------------------------------------------
void __fastcall TCmdOptDialog::UpdateEnable(void)
{
OpenCmd->Enabled=ChkOpenCmd->Checked;
CloseCmd->Enabled=ChkCloseCmd->Checked;
}
//---------------------------------------------------------------------------
|
