各位大虾,帮帮忙啊!

skywolfY 2001-08-02 09:04:27
谁能给我讲讲Query控件的用法?主要是向数据库中存数据,
我在单独写数据时好用,为什么在Page页中写不进去呢?
帮帮忙吧,呜
代码如下:
void __fastcall TWizardForm::NextBtnClick(TObject *Sender)
{
if(WizardForm->PageControl1->ActivePage==TabSheet1)
{
if(WizardForm->Edit1->Text=="")
{
MessageBox(NULL,"帐套代号不能为空!!","提示",MB_ICONASTERISK);
WizardForm->Edit1->SetFocus();
return;
}
if(WizardForm->Edit3->Text=="")
{
MessageBox(NULL,"公司名称不能为空!!","提示",MB_ICONASTERISK);
WizardForm->Edit3->SetFocus();
return;
}
bool iY=false;;
CustomerData->CountQuery->First();
while(!CustomerData->CountQuery->Eof){
if(CustomerData->CountQuery->Fields->Fields[0]
->AsString==WizardForm->Edit1->Text){
iY=true;
break;
}
CustomerData->CountQuery->Next();
}
if(iY==false){
CustomerData->CountQuery->Close();
CustomerData->CountQuery->SQL->Clear();
CustomerData->CountQuery->SQL->Add("Select * From count1");//此句以后跳到别处执行,不知为什么
CustomerData->CountQuery->Insert();


CustomerData->CountQueryNUM->Value=WizardForm->Edit1
->Text;//CountQueryNum是Query中字段名
CustomerData->CountQueryCOMPANY->Value=WizardForm->Edit3->Text;//这一句好象执行不到
CustomerData->CountQuery->ApplyUpdates();
//CustomerData->CountQuery->Fields->Fields[0]->AsString=WizardForm->Edit1->Text;
//CustomerData->CountQuery->Fields->Fields[1]->AsString=WizardForm->Edit3->Text;
}
else{
MessageBox(NULL,"帐套代号已经被使用","提示",MB_ICONASTERISK);
return;
}
ToPage2();


}
else if(WizardForm->PageControl1->ActivePage==TabSheet2)
ToPage3();
else if(WizardForm->PageControl1->ActivePage==TabSheet3)
if(Edit4->Text=="")
{
MessageBox(NULL,"管理员名称不能为空","提示",MB_ICONASTERISK);
Edit4->SetFocus();
return;
}
else
ToPage4();
else if(WizardForm->PageControl1->ActivePage==TabSheet4)
ToPage5();
else if(WizardForm->PageControl1->ActivePage==TabSheet5)
ToPage6();
else
{
//CustomerData->CountQuery->Open();
CustomerData->CountQuery->ApplyUpdates();
/*
CustomerData->CountQuery->Post();
CustomerData->CountQuery->ApplyUpdates();
CustomerData->CountQuery->CommitUpdates();
*/
SetStringGrid(SelectCForm->StringGrid1,CustomerData);
MessageBeep(0xffffff);

WizardForm->Close();
}
}
...全文
43 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
skywolfY 2001-08-02
  • 打赏
  • 举报
回复
试了一下.
如果在
CustomerData->CountQuery->Insert();前加上
CustomerData->CountQuery->Open();结果还是一样,不过这次是跳到
else if(WizardForm->PageControl1->ActivePage==TabSheet4)处执行,
真的不明白,呜


highw 2001-08-02
  • 打赏
  • 举报
回复
CustomerData->CountQuery->SQL->Add("Select * From count1");
//此句以后跳到别处执行,不知为什么
因为你只给了sql语句,还没打开。
CustomerData->CountQuery->Insert();
//你在一个close的query里怎么insert?

13,825

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder相关内容讨论区
社区管理员
  • 基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧