📄 manage.cpp
字号:
AdvStringGrid2->Rows[1]->Clear();
}
}
else
{
MessageBox(NULL,"对不起！该账户不存在。","错误提示",MB_ICONHAND);
suiEdit14->Text="";
suiEdit15->Text="";
suiEdit16->Text="";
}
}
else
if(suiEdit15->Text!=""&&suiEdit16->Text!="")
{
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("select * from bankcards,accounts,client where bankcards.bcno='"+suiEdit15->Text+"' AND accounts.bcno=bankcards.bcno AND client.cno=bankcards.cno");
ADOQuery1->Open();
if(!ADOQuery1->IsEmpty())
{
if(suiEdit16->Text==ADOQuery1->FieldByName("cid")->Value)
{
suiEdit14->Text=ADOQuery1->FieldByName("ano")->Value;
AdvStringGrid2->Cells[0][1] =1;
AdvStringGrid2->Cells[1][1] = ADOQuery1->FieldByName("cno")->Value;
AdvStringGrid2->Cells[2][1] = ADOQuery1->FieldByName("cname")->Value;
AdvStringGrid2->Cells[3][1] = ADOQuery1->FieldByName("csex")->Value;
AdvStringGrid2->Cells[4][1] = ADOQuery1->FieldByName("cid")->Value;
AdvStringGrid2->Cells[5][1] = ADOQuery1->FieldByName("ano")->Value;
AdvStringGrid2->Cells[6][1] = ADOQuery1->FieldByName("bcno")->Value;
AdvStringGrid2->Cells[7][1] = ADOQuery1->FieldByName("amount")->Value;
AdvStringGrid2->Cells[8][1] = ADOQuery1->FieldByName("date")->Value;
if(MessageBox(NULL,"请仔细核对客户的账户信息，再继续！","确认提示",MB_OKCANCEL)==IDOK)
if(ADOQuery1->FieldByName("amount")->Value)
if(MessageBox(NULL,"账户存在余额，该操作会先对账户进行下账清零再注销账户！","警告提示",MB_OKCANCEL)==IDOK)
{
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("delete from manage where ano='"+suiEdit14->Text+"'");
ADOQuery1->SQL->Add("delete from accounts where ano='"+suiEdit14->Text+"'");
ADOQuery1->SQL->Add("delete from bankcards where bcno='"+AdvStringGrid2->Cells[6][1]+"'");
ADOQuery1->ExecSQL();
suiEdit14->Text="";
suiEdit15->Text="";
suiEdit16->Text="";
AdvStringGrid2->Rows[1]->Clear();
MessageBox(NULL,"销户成功！","成功提示",MB_ICONINFORMATION);
}
else
{
suiEdit14->Text="";
suiEdit15->Text="";
suiEdit16->Text="";
AdvStringGrid2->Rows[1]->Clear();
}
else
{
ADOQuery1->Close();
ADOQuery1->SQL->Clear();
ADOQuery1->SQL->Add("delete from manage where ano='"+suiEdit14->Text+"'");
ADOQuery1->SQL->Add("delete from accounts where ano='"+suiEdit14->Text+"'");
ADOQuery1->SQL->Add("delete from bankcards where bcno='"+AdvStringGrid2->Cells[6][1]+"'");
ADOQuery1->ExecSQL();
suiEdit14->Text="";
suiEdit15->Text="";
suiEdit16->Text="";
AdvStringGrid2->Rows[1]->Clear();
MessageBox(NULL,"销户成功！","成功提示",MB_ICONINFORMATION);
}
else
{
suiEdit14->Text="";
suiEdit15->Text="";
suiEdit16->Text="";
AdvStringGrid2->Rows[1]->Clear();
}
}
else
{
MessageBox(NULL,"对不起，账户身份认证失败！","错误提示",MB_ICONERROR);
suiEdit14->Text="";
suiEdit15->Text="";
suiEdit16->Text="";
AdvStringGrid2->Rows[1]->Clear();
}
}
else
{
MessageBox(NULL,"对不起！该账户不存在。","错误提示",MB_ICONHAND);
suiEdit14->Text="";
suiEdit15->Text="";
suiEdit16->Text="";
}
}
}
//---------------------------------------------------------------------------
void __fastcall TForm2::suiComboBox3Change(TObject *Sender)
{
if(suiComboBox3->Text=="客 户 号")
{
suiEdit17->Text="";
suiEdit18->Text="";
suiEdit19->Text="";
suiEdit20->Text="";
Label22->Font->Color=clWindowText;
Label23->Font->Color=clWindowText;
Label24->Font->Color=clRed;
Label25->Font->Color=clWindowText;
suiEdit17->Enabled=false;
suiEdit18->Enabled=false;
suiEdit19->Enabled=true;
suiEdit20->Enabled=false;
for(int i=1;i<=AdvStringGrid3->RowCount;i++)
{
AdvStringGrid3->Rows[i]->Clear();
}
AdvStringGrid3->RowCount=2;
suiEdit21->Text="";
suiEdit22->Text="";
suiEdit23->Text="";
suiEdit24->Text="";
suiEdit25->Text="";
suiEdit26->Text="";
suiEdit27->Text="";
suiEdit28->Text="";
}
else
if(suiComboBox3->Text=="身份证号")
{
suiEdit17->Text="";
suiEdit18->Text="";
suiEdit19->Text="";
suiEdit20->Text="";
Label22->Font->Color=clWindowText;
Label23->Font->Color=clWindowText;
Label24->Font->Color=clWindowText;
Label25->Font->Color=clRed;
suiEdit17->Enabled=false;
suiEdit18->Enabled=false;
suiEdit19->Enabled=false;
suiEdit20->Enabled=true;
for(int i=1;i<=AdvStringGrid3->RowCount;i++)
{
AdvStringGrid3->Rows[i]->Clear();
}
AdvStringGrid3->RowCount=2;
suiEdit21->Text="";
suiEdit22->Text="";
suiEdit23->Text="";
suiEdit24->Text="";
suiEdit25->Text="";
suiEdit26->Text="";
suiEdit27->Text="";
suiEdit28->Text="";
}
else
if(suiComboBox3->Text=="账 户 号")
{
suiEdit17->Text="";
suiEdit18->Text="";
suiEdit19->Text="";
suiEdit20->Text="";
Label22->Font->Color=clRed;
Label23->Font->Color=clWindowText;
Label24->Font->Color=clWindowText;
Label25->Font->Color=clWindowText;
suiEdit17->Enabled=true;
suiEdit18->Enabled=false;
suiEdit19->Enabled=false;
suiEdit20->Enabled=false;
for(int i=1;i<=AdvStringGrid3->RowCount;i++)
{
AdvStringGrid3->Rows[i]->Clear();
}
AdvStringGrid3->RowCount=2;
suiEdit21->Text="";
suiEdit22->Text="";
suiEdit23->Text="";
suiEdit24->Text="";
suiEdit25->Text="";
suiEdit26->Text="";
suiEdit27->Text="";
suiEdit28->Text="";
}
else
if(suiComboBox3->Text=="卡 号")
{
suiEdit17->Text="";
suiEdit18->Text="";
suiEdit19->Text="";
suiEdit20->Text="";
Label22->Font->Color=clWindowText;
Label23->Font->Color=clRed;
Label24->Font->Color=clWindowText;
Label25->Font->Color=clWindowText;
suiEdit17->Enabled=false;
suiEdit18->Enabled=true;
suiEdit19->Enabled=false;
suiEdit20->Enabled=false;
for(int i=1;i<=AdvStringGrid3->RowCount;i++)
{
AdvStringGrid3->Rows[i]->Clear();
}
AdvStringGrid3->RowCount=2;
suiEdit21->Text="";
suiEdit22->Text="";
suiEdit23->Text="";
suiEdit24->Text="";
suiEdit25->Text="";
suiEdit26->Text="";
suiEdit27->Text="";
suiEdit28->Text="";
}
else
if(suiComboBox3->Text=="")
{
suiEdit17->Text="";
suiEdit18->Text="";
suiEdit19->Text="";
suiEdit20->Text="";
Label22->Font->Color=clWindowText;
Label23->Font->Color=clWindowText;
Label24->Font->Color=clWindowText;
Label25->Font->Color=clWindowText;
suiEdit17->Enabled=false;
suiEdit18->Enabled=false;
suiEdit19->Enabled=false;
suiEdit20->Enabled=false;
for(int i=1;i<=AdvStringGrid3->RowCount;i++)
{
AdvStringGrid3->Rows[i]->Clear();
}
AdvStringGrid3->RowCount=2;
suiEdit21->Text="";
suiEdit22->Text="";
suiEdit23->Text="";
suiEdit24->Text="";
suiEdit25->Text="";
suiEdit26->Text="";
suiEdit27->Text="";
suiEdit28->Text="";
}
}
//---------------------------------------------------------------------------
void __fastcall TForm2::suiButton15Click(TObject *Sender)
{
Label22->Font->Color=clWindowText;
Label23->Font->Color=clWindowText;
Label24->Font->Color=clWindowText;
Label25->Font->Color=clWindowText;
suiEdit17->Enabled=false;
suiEdit18->Enabled=false;
suiEdit19->Enabled=false;
suiEdit20->Enabled=false;
suiComboBox3->Text="";
suiEdit17->Text="";
suiEdit18->Text="";
suiEdit19->Text="";
suiEdit20->Text="";
suiEdit21->Text="";
suiEdit22->Text="";
suiEdit23->Text="";
suiEdit24->Text="";
suiEdit25->Text="";
suiEdit26->Text="";
suiEdit27->Text="";
suiEdit28->Text="";
for(int i=1;i<=AdvStringGrid3->RowCount;i++)
{
AdvStringGrid3->Rows[i]->Clear();
}
AdvStringGrid3->RowCount=2;
}
//---------------------------------------------------------------------------
void __fastcall TForm2::suiButton14Click(TObject *Sender)
{
if(suiComboBox3->Text=="账 户 号")
{
if(suiEdit17->Text!="")
{
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -