如何实现在程序运行期间一个Edit控件不可能拥有输入焦点? 现在的情形是是鼠标单击,或用Tab都能使它有输入焦点,但我不想要这个输入焦点使我的程序不美观! 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 procdure tform1.edit1keypress(); begin edit1.enabled:=false; end;我不知道对不对,你可以试一试啊 你如果不想有输入,就用edit1.enabled:=false;用SetFocusedControl()可以设置焦点,你试试 让它的enable为false是可行的,只是它这样,Edit1的显示字体的颜色发生了变化,我选择的是(在Edit1的Font.Color里)clMaroon但自从enable为false后,运行时显示的字体颜色为灰色的。太不美观了 把enabled设成false不就可 以了我只会瞎说 让它的enabled为false是可行的,只是它这样,Edit1的显示字体的颜色发生了变化,我选择的是(在Edit1的Font.Color里)clMaroon但自从enabled为false后,运行时显示的字体颜色为灰色的。太不美观了 procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);begin key:=chr(0);end;这样连paste都失效了。 如何把stringgrid的数据写入到excel? 如何把语音文件调入内存? 请教一个ado的问题! ◆◆可由JavaScript 调用的 Com myval=N'123'? 图象在1024*768向800*600转换时,怎么保持图象的位置? 指针如何释放? 关于IDUDPSERVER,高手请进 append的問題 急 谁知道用CSDN搜索如何输入几个关键字? 收藏登陆界面的写法。 运行程序时,在桌面的任务栏里,程序名是Project1!怎么改掉它?
begin
edit1.enabled:=false;
end;
我不知道对不对,你可以试一试啊
只是它这样,Edit1的显示字体的颜色发生了变化,
我选择的是(在Edit1的Font.Color里)clMaroon但自从enable为false后,运行时显示的字体颜色为灰色的。太不美观了
我只会瞎说
只是它这样,Edit1的显示字体的颜色发生了变化,
我选择的是(在Edit1的Font.Color里)clMaroon但自从enabled为false后,运行时显示的字体颜色为灰色的。太不美观了
begin
key:=chr(0);
end;
这样连paste都失效了。