📄 ydyhcz.cpp
字号:
//---------------------------------------------------------------------------
#include <vcl.h>
#pragma hdrstop
#include "YDYHCZ.h"
#include "YDdatam.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TFyhcz *Fyhcz;
//---------------------------------------------------------------------------
__fastcall TFyhcz::TFyhcz(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TFyhcz::BitBtn2Click(TObject *Sender)
{
Close();
}
//---------------------------------------------------------------------------
void __fastcall TFyhcz::BitBtn1Click(TObject *Sender)
{
Variant LoolupResults;
if (RadioButton1->Checked)
{
YDData->TByhda->Close();
YDData->TByhda->IndexFieldNames="hhhh";
YDData->TByhda->Open();
if (!YDData->TByhda->FindKey(new TVarRec(Edit1->Text),0))
MessageBox(NULL,"没有找到满足条件的用户!","提示",MB_OK|MB_ICONWARNING);
}
else
{
YDData->TByhda->Close();
YDData->TByhda->IndexFieldNames="yhmc";
YDData->TByhda->Open();
if (!YDData->TByhda->FindKey(new TVarRec(Edit2->Text),0))
MessageBox(NULL,"没有找到满足条件的用户!","提示",MB_OK|MB_ICONWARNING);
}
}
//---------------------------------------------------------------------------
void __fastcall TFyhcz::RadioButton1Click(TObject *Sender)
{
Edit1->SetFocus();
Edit2->Text="";
}
//---------------------------------------------------------------------------
void __fastcall TFyhcz::RadioButton2Click(TObject *Sender)
{
Edit2->SetFocus();
Edit1->Text="";
}
//---------------------------------------------------------------------------
void __fastcall TFyhcz::FormShow(TObject *Sender)
{
Edit1->SetFocus();
}
//---------------------------------------------------------------------------
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -