这个不难。
1.如果你只是极少个别的字段需要大写,那不难,这个办法可以让你输入小写,但是你已离开这个cell就自动变成大写。在你需要的字段添加他的 OnSetText事件
void __fastcall TForm1::Table1FIRST_NAMESetText(TField *Sender,
const AnsiString Text)
{
Sender->Value= Text.UpperCase();
}2.这个办法就是自己在BDGrid里面判断了。
他有个事件OnKeyPress
void __fastcall TForm1::DBGrid1KeyPress(TObject *Sender, char &Key)
{
if (DBGrid1->SelectedField->Name= "xxxx") //判断是否是需要改的字段
Key= toupper(Key);
}
1.如果你只是极少个别的字段需要大写,那不难,这个办法可以让你输入小写,但是你已离开这个cell就自动变成大写。在你需要的字段添加他的 OnSetText事件
void __fastcall TForm1::Table1FIRST_NAMESetText(TField *Sender,
const AnsiString Text)
{
Sender->Value= Text.UpperCase();
}2.这个办法就是自己在BDGrid里面判断了。
他有个事件OnKeyPress
void __fastcall TForm1::DBGrid1KeyPress(TObject *Sender, char &Key)
{
if (DBGrid1->SelectedField->Name= "xxxx") //判断是否是需要改的字段
Key= toupper(Key);
}
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货