摘要：
TForm* TfmMain::FormExist(AnsiString szCaption){ for(int i=0; i<this->MDIChildCount; i++) { TForm *pForm = this->MDIChildren[i]; if(pForm->Caption == szCaption) return pForm; // 已存在窗体,返回该窗体 } return NULL; // 不存在窗体,返回空值}使用方法:void __fastcall TfmMain::mnuRegCli... 阅读全文
该文被密码保护。 阅读全文
摘要：
void __fastcall TForm1::DBGrid1DrawColumnCell(TObject *Sender, const TRect &Rect, int DataCol, TColumn *Column, TGridDrawState State){ AnsiString name= Column->Field->DataSet->FieldByName("NAME")->AsString; if(name=="功能科室"&&DataCol==1) //只绘制name为功能科室行和第二列的 阅读全文