📄 sms1.~cpp
字号:
void __fastcall TForm1::daifaListView(TObject *Sender, TListItem *Item,
TItemChange Change)
{
char TimeStr[20],TypeStr[10],jradeStr[10],statStr[10],st[20];
int accI;
int accI_list;
TDateTime DateTime = Time();
AnsiString timeS=TimeToStr(DateTime);
DateTime = Date();
AnsiString dateS = DateToStr(DateTime);
AnsiString shijianS;
shijianS=dateS+' '+timeS;
sprintf(fileNameAcc,"%s\\send\\Acc\0", dateS.c_str());
if(FileExists(fileNameAcc))
{
char list2stracc[10];
memset(accS,0x00,sizeof(accS));
fpacc=fopen(fileNameAcc,"r") ;
fgets(list2stracc,10,fpacc);
fclose(fpacc);
accI_list=atoi(list2stracc);
if(accI<=0)
accI_list=0;
}else
{
//fp =fopen(fileName,"w") ;
//fclose(fp );
accI_list=0;
}
numI= Item->Index+1+SUOYH[Item->Index]+accI_list;
//ShowMessage(SUOYH[Item->Index]);
//numI= Item->Index+1;
//strcpy( st,Item->Index);
sprintf(fileNameD,"%s\\new\\DA%d\0", dateS.c_str(),numI) ;
sprintf(fileNameRe,"%s\\new\\R%d\0", dateS.c_str(),numI) ;
// ShowMessage( fileNameD);
char str1[1024];
int i=0;
memset(str1,0x00,sizeof(str1));
// ShowMessage( fileNameRe) ;
//fpRecv=fopen( fileNameRe,"r+");
if((fpRecv=fopen(fileNameRe,"r+"))==NULL) return;
str1[i]=fgetc(fpRecv);
while (!feof(fpRecv)) {
i++;
str1[i]=fgetc(fpRecv);
}
str1[i]='\0';
fclose(fpRecv);
Memo1->Text= str1;
SHoujS=str1;
//ShowMessage( SHoujS);
i=0;
// ShowMessage( fileNameD);
fpd=fopen( fileNameD,"r+");
memset(str1,0x00,sizeof(str1));
str1[i]=fgetc(fpd);
while (!feof(fpd)) {
i++;
str1[i]=fgetc(fpd);
}
str1[i]='\0';
fclose(fpd);
Memo2->Text= str1;
}
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
void __fastcall TForm1::MemoTextChangeView(TObject *Sender)
{
AnsiString str;
int i =strlen(duanxin->Text.c_str());
//str=Label10->Caption;
Label10->Caption="已输入"+ IntToStr(i)+"个字符 ";
//shoujihao->Text=IntToStr(i);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{ // char str[20];
//ShowMessage( Edit1->Text.c_str()
//strcpy(str, Edit1->Text.c_str());
WritePrivateProfileString(
"SET" ,
"COM" ,
Edit1->Text.c_str(),
"./server.txt"
);
WritePrivateProfileString(
"SET" ,
"RATE" ,
Edit2->Text.c_str(),
"./server.txt"
);
WritePrivateProfileString(
"SET" ,
"SMSCODE" ,
Edit3->Text.c_str(),
"./server.txt"
);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button5Click(TObject *Sender)
{
int n,y,r;
char str[20],str2[20];
strcpy(str2, nian_Edit7->Text.c_str());
strcat(str2,"-");
getstring( str2,1,str,'-');
n=atoi(str);
getstring( str2,2,str,'-');
y= atoi(str);
getstring( str2,3,str,'-');
r= atoi(str);
r=r--;
if(r<=0)
{
r=31;
y--;
if(y==2) r=29;
if(y==4|| y==6|| y==9||y==11 ) r =30;
if(y<=0)
{
y=12;
n--;
}
}
sprintf(str,"%4d-\0", n);
strcpy(str2,str);
sprintf(str,"%d-\0", y);
strcat(str2,str);
sprintf(str,"%d\0", r);
strcat(str2,str);
nian_Edit7->Text=str2;
if(n<1000)
{ TDateTime DateTime = Time();
AnsiString timeS=TimeToStr(DateTime);
DateTime = Date();
nian_Edit7->Text= DateToStr(DateTime);
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button6Click(TObject *Sender)
{
int n,y,r;
char str[20],str2[20];
strcpy(str2, nian_Edit7->Text.c_str());
strcat(str2,"-");
getstring( str2,1,str,'-');
n=atoi(str);
getstring( str2,2,str,'-');
y= atoi(str);
getstring( str2,3,str,'-');
r= atoi(str);
r=r+1;
if(y==2 )
{
if(r>29)
{
r=1;
y++;
if(y>12)
{
y=1;
n++;
}
}
}
if(y==4|| y==6|| y==9||y==11 )
{
if(r>30)
{
r=1;
y++;
if(y>12)
{
y=1;
n++;
}
}
}
if(r>31)
{
r=1;
y++;
if(y>12)
{
y=1;
n++;
}
}
sprintf(str,"%4d-\0", n);
strcpy(str2,str);
sprintf(str,"%d-\0", y);
strcat(str2,str);
sprintf(str,"%d\0", r);
strcat(str2,str);
nian_Edit7->Text=str2;
if(n<1000)
{ TDateTime DateTime = Time();
AnsiString timeS=TimeToStr(DateTime);
DateTime = Date();
nian_Edit7->Text= DateToStr(DateTime);
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button3Click(TObject *Sender)
{
int n,y,r;
char str[20],str2[20];
strcpy(str2, Edit4->Text.c_str());
strcat(str2,"-");
getstring( str2,1,str,'-');
n=atoi(str);
getstring( str2,2,str,'-');
y= atoi(str);
getstring( str2,3,str,'-');
r= atoi(str);
r=r--;
if(r<=0)
{
r=31;
y--;
if(y==2) r=29;
if(y==4|| y==6|| y==9||y==11 ) r =30;
if(y<=0)
{
y=12;
n--;
}
}
sprintf(str,"%4d-\0", n);
strcpy(str2,str);
sprintf(str,"%d-\0", y);
strcat(str2,str);
sprintf(str,"%d\0", r);
strcat(str2,str);
Edit4->Text=str2;
if(n<1000)
{ TDateTime DateTime = Time();
AnsiString timeS=TimeToStr(DateTime);
DateTime = Date();
Edit4->Text= DateToStr(DateTime);
}
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button4Click(TObject *Sender)
{
int n,y,r;
char str[20],str2[20];
strcpy(str2, Edit4->Text.c_str());
strcat(str2,"-");
getstring( str2,1,str,'-');
n=atoi(str);
getstring( str2,2,str,'-');
y= atoi(str);
getstring( str2,3,str,'-');
r= atoi(str);
r=r+1;
if(y==2 )
{
if(r>29)
{
r=1;
y++;
if(y>12)
{
y=1;
n++;
}
}
}
if(y==4|| y==6|| y==9||y==11 )
{
if(r>30)
{
r=1;
y++;
if(y>12)
{
y=1;
n++;
}
}
}
if(r>31)
{
r=1;
y++;
if(y>12)
{
y=1;
n++;
}
}
sprintf(str,"%4d-\0", n);
strcpy(str2,str);
sprintf(str,"%d-\0", y);
strcat(str2,str);
sprintf(str,"%d\0", r);
strcat(str2,str);
Edit4->Text=str2;
if(n<1000)
{ TDateTime DateTime = Time();
AnsiString timeS=TimeToStr(DateTime);
DateTime = Date();
Edit4->Text= DateToStr(DateTime);
}
}
//---------------------------------------------------------------------------
//---------------------------------------------------------------------------
void __fastcall TForm1::add_dianboClick(TObject *Sender)
{
FILE *fp;
//if((fp = fopen("query","a+"))==NULL) ShowMessage("aaa");
//fprintf(fp,"aaaa");
//fclose(fp);
CreateDir("./query/");
WritePrivateProfileString(
"query" ,
"000000" ,
"222222",
"./query/query"
);
char strtmp[10];
AnsiString str1;
GetPrivateProfileString("query",Edit7->Text.c_str(),"wwwwww",strtmp,10, "./query/query");
str1=strtmp;
char Memo8_strtmp[1024];
strcpy(Memo8_strtmp ,Memo8->Text.c_str());
int i_tmp=0,xxx=strlen(Memo8_strtmp);
for( i_tmp=0;i_tmp<xxx;i_tmp++)
{
if( Memo8_strtmp[i_tmp]=='\r'|| Memo8_strtmp[i_tmp]=='\n') Memo8_strtmp[i_tmp]=' ';
}
String InputStr=sms_EncodeChinese(Memo8->Text) ;
if (InputStr.Length()>=260) {ShowMessage("收信内容不能太多！");return ;}
// ShowMessage( str1);
if(strcmp(strtmp,"wwwwww")==0)
{
WritePrivateProfileString(
"query" ,
Edit7->Text.c_str() ,
Memo8_strtmp,
"./query/query"
);
char str[10];
int i;
if((fp = fopen("./query/acc","r"))==NULL)
{ fp = fopen("./query/acc","w");
fprintf(fp,"0");
// ShowMessage("ssssss");
fclose(fp);
}
fgets(str,10,fp);
fclose(fp);
if(i<=0) i=0;
i=atoi(str)+1;
fp = fopen("./query/acc","w");
fprintf(fp,"%d",i);
fclose(fp);
}
}
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -