⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 unit1.cpp

📁 学生档案管理系统
💻 CPP
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
   Edit12->Text=DBEdit1->Text;
   Edit13->Text=DBEdit7->Text;
   str="select * from 学习情况表 where 学号='"+view_select->Text+"'";
   Query4->Active=false;
   Query4->SQL->Text=str;
   Query4->Active=true;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::learnClick(TObject *Sender)
{
 String str;
 mainview->Visible=false;
 studentview->Visible=false;
 learnview->Visible=true;
 workview->Visible=false;
 basechange->Visible=false;
 studentchange->Visible=false;
 learnchange->Visible=false;
 workchange->Visible=false;
 lessonchange->Visible=false;
 main->Enabled=true;
 details->Enabled=true;
 learn->Enabled=false;
 work->Enabled=true;
 N11->Enabled=true;
 N12->Enabled=true;
 N13->Enabled=true;
 N14->Enabled=true;
 N15->Enabled=true;
 if(DBEdit1->Text!="")
 {
  Edit11->Text=view_select->Text;
  Edit12->Text=DBEdit1->Text;
  Edit13->Text=DBEdit7->Text;
  str="select * from 学习情况表 where 学号='"+view_select->Text+"'";
  Query4->Active=false;
  Query4->SQL->Text=str;
  Query4->Active=true;
  }
}
//---------------------------------------------------------------------------

void __fastcall TForm1::workClick(TObject *Sender)
{
 Query4->Active=false;
 mainview->Visible=false;
 studentview->Visible=false;
 learnview->Visible=false;
 workview->Visible=true;
 basechange->Visible=false;
 studentchange->Visible=false;
 learnchange->Visible=false;
 workchange->Visible=false;
 lessonchange->Visible=false;
 main->Enabled=true;
 details->Enabled=true;
 learn->Enabled=true;
 work->Enabled=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button5Click(TObject *Sender)
{
 String picture1,str;
 if(OpenPictureDialog1->Execute())
     {
      picture1=OpenPictureDialog1->FileName;
      Image1->Picture->LoadFromFile(picture1);
      Image1->Refresh();
      Image1->Show();
      str="Update 学生基本信息表 set 照片='"+picture1+"' where 学号='"+view_select->Text+"'";
      Query1->Active=false;
      Query1->SQL->Text=str;
      Query1->ExecSQL();
      str="select * from 学生基本信息表 where 学号='"+str10+"'";
      Query1->SQL->Text=str;
      Query1->Active=true;
      ShowMessage("更新成功！");
      Button25->Enabled=true;
     }

}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{ CheckBox1->Checked=false;
  CheckBox2->Checked=false;
  CheckBox3->Checked=false;
  CheckBox4->Checked=false;
  CheckBox5->Checked=false;
  CheckBox6->Checked=false;
  CheckBox7->Checked=false;
  CheckBox8->Checked=false;
  CheckBox9->Checked=false;
  CheckBox12->Checked=false;
  Query3->Active=false;
  Edit1->Text="";
  Edit2->Text="";
  Edit3->Text="";
  Edit4->Text="";
  Edit5->Text="";
  Edit6->Text="";
  Edit7->Text="";
  Edit8->Text="";
  Edit9->Text="";
  Edit10->Text="";
  Edit20->Text="";
  Query4->Active=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{String str;
 if(CheckBox5->Checked==false&&CheckBox6->Checked==false&&CheckBox7->Checked==false&&CheckBox8->Checked==false&&CheckBox9->Checked==false&&CheckBox12->Checked==false)
   str="select 学生基本信息表.学号,学生基本信息表.姓名,在校信息表.班级,学生基本信息表.性别,在校信息表.寝室号,在校信息表.寝室电话,在校信息表.手机号,学生基本信息表.民族,学生基本信息表.籍贯,学生基本信息表.家庭住址,学生基本信息表.家庭电话,学生基本信息表.政治面貌,在校信息表.班级职务,在校信息表.学生会职务 from 学生基本信息表,在校信息表 where 在校信息表.学号=学生基本信息表.学号";
 else
   str="select 学生基本信息表.学号,学生基本信息表.姓名,在校信息表.班级,学生基本信息表.性别,在校信息表.寝室号,在校信息表.寝室电话,在校信息表.手机号,学生基本信息表.民族,学生基本信息表.籍贯,学生基本信息表.家庭住址,学生基本信息表.家庭电话,学生基本信息表.政治面貌,在校信息表.班级职务,在校信息表.学生会职务 from 学生基本信息表,在校信息表 where ";

 if(CheckBox5->Checked==true)
   {
    if(Edit1->Text=="")
      {ShowMessage("请输入学号！");return;}
    str=str+" 学生基本信息表.学号='"+Edit1->Text+"' and 在校信息表.学号=学生基本信息表.学号";
   }

 if(CheckBox6->Checked==true)
   {
    if(Edit7->Text=="")
      {ShowMessage("请输入姓名！");return;}
    if(CheckBox5->Checked==true)
      str=str+" and 学生基本信息表.姓名='"+Edit7->Text+"' ";
    else
      str=str+" 学生基本信息表.姓名='"+Edit7->Text+"' and 在校信息表.学号=学生基本信息表.学号";
   }

 if(CheckBox7->Checked==true)
   {
    if(Edit8->Text=="")
      {ShowMessage("请输入班级！");return;}
    if(CheckBox5->Checked==true||CheckBox6->Checked==true)
      str=str+" and 在校信息表.班级='"+Edit8->Text+"' ";
    else
      str=str+" 在校信息表.班级='"+Edit8->Text+"' and 学生基本信息表.学号=在校信息表.学号";
   }

  if(CheckBox12->Checked==true)
   {
    if(Edit20->Text=="")
      {ShowMessage("请输入寝室号！");return;}
    if(CheckBox5->Checked==true||CheckBox6->Checked==true||CheckBox7->Checked==true)
      str=str+" and 在校信息表.寝室号='"+Edit20->Text+"' ";
    else
      str=str+" 在校信息表.寝室号='"+Edit20->Text+"' and 学生基本信息表.学号=在校信息表.学号";
   }

 if(CheckBox8->Checked==true)
   {
    if(Edit9->Text=="")
      {ShowMessage("请输入班级职务！");return;}
    if(CheckBox5->Checked==true||CheckBox6->Checked==true||CheckBox7->Checked==true||CheckBox12->Checked==true)
      str=str+" and 在校信息表.班级职务='"+Edit9->Text+"' ";
    else
      str=str+" 在校信息表.班级职务='"+Edit9->Text+"' and 学生基本信息表.学号=在校信息表.学号";
   }

 if(CheckBox9->Checked==true)
   {
    if(Edit10->Text=="")
      {ShowMessage("请输入学生会职务！");return;}
    if(CheckBox5->Checked==true||CheckBox6->Checked==true||CheckBox7->Checked==true||CheckBox12->Checked==true||CheckBox8->Checked==true)
      str=str+" and 在校信息表.学生会职务='"+Edit10->Text+"' and 学生基本信息表.学号=在校信息表.学号";
    else
      str=str+" 在校信息表.学生会职务='"+Edit10->Text+"' and 学生基本信息表.学号=在校信息表.学号";
   }

 Query4->Active=false;
 Query4->SQL->Text=str;
 Query4->Active=true;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::CheckBox5Click(TObject *Sender)
{
 if(CheckBox5->Checked==true)
    Edit1->Enabled=true;
 else Edit1->Enabled=false;
 if(CheckBox6->Checked==true)
    Edit7->Enabled=true;
 else Edit7->Enabled=false;
 if(CheckBox7->Checked==true)
    Edit8->Enabled=true;
 else Edit8->Enabled=false;
 if(CheckBox8->Checked==true)
    Edit9->Enabled=true;
 else Edit9->Enabled=false;
 if(CheckBox9->Checked==true)
    Edit10->Enabled=true;
 else Edit10->Enabled=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::CheckBox6Click(TObject *Sender)
{
  if(CheckBox5->Checked==true)
    Edit1->Enabled=true;
 else Edit1->Enabled=false;
 if(CheckBox6->Checked==true)
    Edit7->Enabled=true;
 else Edit7->Enabled=false;
 if(CheckBox7->Checked==true)
    Edit8->Enabled=true;
 else Edit8->Enabled=false;
 if(CheckBox8->Checked==true)
    Edit9->Enabled=true;
 else Edit9->Enabled=false;
 if(CheckBox9->Checked==true)
    Edit10->Enabled=true;
 else Edit10->Enabled=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::CheckBox7Click(TObject *Sender)
{
  if(CheckBox5->Checked==true)
    Edit1->Enabled=true;
 else Edit1->Enabled=false;
 if(CheckBox6->Checked==true)
    Edit7->Enabled=true;
 else Edit7->Enabled=false;
 if(CheckBox7->Checked==true)
    Edit8->Enabled=true;
 else Edit8->Enabled=false;
 if(CheckBox8->Checked==true)
    Edit9->Enabled=true;
 else Edit9->Enabled=false;
 if(CheckBox9->Checked==true)
    Edit10->Enabled=true;
 else Edit10->Enabled=false;       
}
//---------------------------------------------------------------------------

void __fastcall TForm1::CheckBox8Click(TObject *Sender)
{
 if(CheckBox5->Checked==true)
    Edit1->Enabled=true;
 else Edit1->Enabled=false;
 if(CheckBox6->Checked==true)
    Edit7->Enabled=true;
 else Edit7->Enabled=false;
 if(CheckBox7->Checked==true)
    Edit8->Enabled=true;
 else Edit8->Enabled=false;
 if(CheckBox8->Checked==true)
    Edit9->Enabled=true;
 else Edit9->Enabled=false;
 if(CheckBox9->Checked==true)
    Edit10->Enabled=true;
 else Edit10->Enabled=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::CheckBox9Click(TObject *Sender)
{
 if(CheckBox5->Checked==true)
    Edit1->Enabled=true;
 else Edit1->Enabled=false;
 if(CheckBox6->Checked==true)
    Edit7->Enabled=true;
 else Edit7->Enabled=false;
 if(CheckBox7->Checked==true)
    Edit8->Enabled=true;
 else Edit8->Enabled=false;
 if(CheckBox8->Checked==true)
    Edit9->Enabled=true;
 else Edit9->Enabled=false;
 if(CheckBox9->Checked==true)
    Edit10->Enabled=true;
 else Edit10->Enabled=false;        
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button6Click(TObject *Sender)
{
 RadioGroup1->ItemIndex=-1;
 CheckBox10->Checked=false;
 CheckBox11->Checked=false;
 ComboBox1->ItemIndex=-1;
 ListBox1->Clear();
 Edit11->Text="";
 Edit12->Text="";
 Edit13->Text="";
 Query4->Active=false;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button4Click(TObject *Sender)
{
 String str;
 int i,count3;
 Query5->RequestLive=false;
 if(ListBox1->Items->Text!="")
   {
    str="select 学习情况表.学号,学生基本信息表.姓名,学习情况表.班级 ";
    count3=ListBox1->Items->Count;
    for(i=0;i<count3;i++)
      {
       str=str+",学习情况表."+ListBox1->Items->Strings[i];
      }
    str=str+" from 学习情况表,学生基本信息表 where ";
   }
 else str="select 学生基本信息表.姓名,学习情况表.* from 学习情况表,学生基本信息表 where " ;

 if(RadioGroup1->ItemIndex==0)
  str=str+" 学习情况表.英语四级='是' and 学习情况表.学号=学生基本信息表.学号 ";
 if(RadioGroup1->ItemIndex==1)
  str=str+" 学习情况表.英语六级='是' and 学习情况表.学号=学生基本信息表.学号 ";

 if(RadioGroup1->ItemIndex==0||RadioGroup1->ItemIndex==1)
   {
    if(CheckBox10->Checked==true&&CheckBox11->Checked==true)
      str=str+" and 学习情况表.计算机二级='是' and 学习情况表.计算机三级='是' ";
    if(CheckBox10->Checked==true&&CheckBox11->Checked==false)
      str=str+" and 学习情况表.计算机二级='是' ";
    if(CheckBox10->Checked==false&&CheckBox11->Checked==true)
      str=str+" and 学习情况表.计算机三级='是' ";
   }

 if(RadioGroup1->ItemIndex!=0&&RadioGroup1->ItemIndex!=1)
   {
    if(CheckBox10->Checked==true&&CheckBox11->Checked==true)
      str=str+" 学习情况表.计算机二级='是' and 学习情况表.计算机三级='是' and 学习情况表.学号=学生基本信息表.学号 ";
    if(CheckBox10->Checked==false&&CheckBox11->Checked==true)
      str=str+" 学习情况表.计算机三级='是' and 学习情况表.学号=学生基本信息表.学号 ";
    if(CheckBox10->Checked==true&&CheckBox11->Checked==false)
      str=str+" 学习情况表.计算机二级='是' and 学习情况表.学号=学生基本信息表.学号 ";
   }

 if(RadioGroup1->ItemIndex==-1&&CheckBox1->Checked==false&&CheckBox2->Checked==false)
   {
    if(Edit11->Text!=""&&Edit12->Text==""&&Edit13->Text=="")
      str=str+" 学生基本信息表.学号='"+Edit11->Text+"' and 学习情况表.学号=学生基本信息表.学号 ";
    if(Edit11->Text==""&&Edit12->Text!=""&&Edit13->Text=="")
      str=str+" 学生基本信息表.姓名='"+Edit12->Text+"' and 学习情况表.学号=学生基本信息表.学号 ";
    if(Edit11->Text==""&&Edit12->Text==""&&Edit13->Text!="")
      str=str+" 学习情况表.班级='"+Edit13->Text+"' and 学习情况表.学号=学生基本信息表.学号 ";
    if(Edit11->Text!=""&&Edit12->Text!=""&&Edit13->Text=="")
      str=str+" 学生基本信息表.学号='"+Edit11->Text+"' and 学生基本信息表.姓名='"+Edit12->Text+"' and 学习情况表.学号=学生基本信息表.学号 ";
    if(Edit11->Text!=""&&Edit12->Text==""&&Edit13->Text!="")
      str=str+" 学生基本信息表.学号='"+Edit11->Text+"' and 学习情况表.班级='"+Edit13->Text+"' and 学习情况表.学号=学生基本信息表.学号 ";
    if(Edit11->Text==""&&Edit12->Text!=""&&Edit13->Text!="")
      str=str+" 学生基本信息表.姓名='"+Edit12->Text+"' and 学习情况表.班级='"+Edit13->Text+"' and 学习情况表.学号=学生基本信息表.学号 ";
    if(Edit11->Text!=""&&Edit12->Text!=""&&Edit13->Text!="")
      str=str+" 学生基本信息表.学号='"+Edit11->Text+"' and 学生基本信息表.姓名='"+Edit12->Text+"' and 学习情况表.班级='"+Edit13->Text+"' and 学习情况表.学号=学生基本信息表.学号 ";
   }

 if(RadioGroup1->ItemIndex!=-1||CheckBox1->Checked==true||CheckBox2->Checked==true)
   {
    if(Edit11->Text!=""&&Edit12->Text==""&&Edit13->Text=="")
      str=str+" and 学生基本信息表.学号='"+Edit11->Text+"' ";
    if(Edit11->Text==""&&Edit12->Text!=""&&Edit13->Text=="")
      str=str+" and 学生基本信息表.姓名='"+Edit12->Text+"' ";
    if(Edit11->Text==""&&Edit12->Text==""&&Edit13->Text!="")
      str=str+" and 学习情况表.班级='"+Edit13->Text+"' ";
    if(Edit11->Text!=""&&Edit12->Text!=""&&Edit13->Text=="")
      str=str+" and 学生基本信息表.学号='"+Edit11->Text+"' and 学生基本信息表.姓名='"+Edit12->Text+"' ";
    if(Edit11->Text!=""&&Edit12->Text==""&&Edit13->Text!="")
      str=str+" and 学生基本信息表.学号='"+Edit11->Text+"' and 学习情况表.班级='"+Edit13->Text+"' ";
    if(Edit11->Text==""&&Edit12->Text!=""&&Edit13->Text!="")
      str=str+" and 学生基本信息表.姓名='"+Edit12->Text+"' and 学习情况表.班级='"+Edit13->Text+"' ";
    if(Edit11->Text!=""&&Edit12->Text!=""&&Edit13->Text!="")
      str=str+" and 学生基本信息表.学号='"+Edit11->Text+"' and 学生基本信息表.姓名='"+Edit12->Text+"' and 学习情况表.班级='"+Edit13->Text+"' ";
12345

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -