When I press Ctrl+A ,I want select all the Items in the Listbox. When I press Ctrl+A ,I want select all the Items in the Listbox. 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 写键盘事件你会吧?然后ListBox1.SelectAll multiselected := true;ONKeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin if ( key = ord('A')) OR ( KEY = ord('a')) then begin if shift = [ssctrl] then listbox1.SelectAll; end;end; 一个单据时间函数问题? 关于onclick事件的问题! 急 那位高手帮我解决一下这个问题!关于数据库恢复的问题 各位高手,请问Delphi7中为什么的Corba不在属于DataSnap? 救急!! XImage 控件哪里有? 已编译程序在系统重装了之后变了字体 用dbgrideh如何进行每列的统计,并在其中显示出来,或者打印出来 帮帮我,我在实现一个tray功能,为什么那个图标老是显示不出来,那个位置处只是一片空白?程序如下? delphi能生成asm代码吗?用工且转换将exe生成asm代码行吗? 三层中流数据的事务处理? 如何string内容复制到char数组中?
ONKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
if ( key = ord('A')) OR ( KEY = ord('a')) then
begin
if shift = [ssctrl] then
listbox1.SelectAll;
end;
end;