如何使dbedit 的光标停留在编辑框的左端 tab键使输入焦点在几个dbedit之间转换,但光标总在最有端,怎样才能使光标停留在最左端哪??? 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 to gytyl(delphi混混) :是dbedit,不是edit,不信你试一下to ljmanage(过客): 如果是修改时,会给使用者造成误解,好象是没有清除,里边的内容却不见了如何解决那??? DBEdit1->SetFocus();DBEdit1->SelStart =0;DBEdit1->SelLength=0; to baffling(迷茫困惑中) :不行,唉,郁闷,如何是好?? to baffling(迷茫困惑中) :我的dbedit很多,不可能挨个写代码,有没有好的实现方法?多谢了! 哎,帮人帮到底.你在其中一个dbedit的enter事件中加入如下代码():((TDBEdit*)(Sender))->SelStart =0;((TDBEdit*)(Sender))->SelLength=0;例如:void __fastcall TForm1::DBEdit1Enter(TObject *Sender){ ((TDBEdit*)(Sender))->SelStart =0; ((TDBEdit*)(Sender))->SelLength=0;}然后在窗口上选中其它所有的DBEdit控件,在enter事件的下拉列表中找到DBEdit1Enter事件,双击即可,再多的DBEdit也能轻松搞定.我试过了,绝对行的. procedure TForm1.DBEdit1Enter(Sender: TObject);begin TDBEdit(Sender).Text := DBEdit1.Text ; TDBEdit(Sender).SelStart := 0 ; TDBEdit(Sender).SelLength := 0;end;然后将所有的DBEDIT控件的ONENTER事件写为DBEdit1Enter 服务程序中使用数据库对象的问题.. ClientDataSet没有返回数据 史上最好的界面框架 是不是TQuery每次只能执行一条SQL语句? 在线求助:如何只得到openpicturedialog的文件名,而不要路径。 没有可用分的进来。 请问怎样与远程DB2连接? 参与分干什么的?可用分怎么来的 请教线程高手!!!! 还有人用DELPHI 做 IOS或者ANDROID项目? 各位大侠,帮帮忙啊 不明白...;不明白...请指教串口卡问题:打开几个串口后程序变慢或死机???
to ljmanage(过客): 如果是修改时,会给使用者造成误解,好象是没有清除,里边的内容却不见了如何解决那???
DBEdit1->SelStart =0;
DBEdit1->SelLength=0;
多谢了!
((TDBEdit*)(Sender))->SelStart =0;
((TDBEdit*)(Sender))->SelLength=0;
例如:
void __fastcall TForm1::DBEdit1Enter(TObject *Sender)
{
((TDBEdit*)(Sender))->SelStart =0;
((TDBEdit*)(Sender))->SelLength=0;}然后在窗口上选中其它所有的DBEdit控件,在enter事件的下拉列表中找到DBEdit1Enter事件,双击即可,再多的DBEdit也能轻松搞定.
我试过了,绝对行的.
begin
TDBEdit(Sender).Text := DBEdit1.Text ;
TDBEdit(Sender).SelStart := 0 ;
TDBEdit(Sender).SelLength := 0;
end;
然后将所有的DBEDIT控件的ONENTER事件写为DBEdit1Enter