delphi listbox自动获取列表框中的组件焦点

本文整理自网络，侵删。

 
示例：delphi listbox自动获取列表框中的组件焦点
procedure TForm1.Edit1KeyUp(Sender: TObject; var Key: Word;
  Shift: TShiftState);
var
  i:Integer;
begin
   for i:= 1 to Length(Trim(Edit1.text))do
    SendMessage(ListBox1.Handle,WM_CHAR,Integer(Edit1.Text[i]),0);
  SendMessage(ListBox1.Handle,WM_CHAR,Integer(Key),0);
end;



 

相关阅读 >>

Delphi mediaplayer 左声道右声道

Delphi debug release区别是什么？

webbrowser部分用法

Delphi 10.4.1 edgebrowser 模拟操作网页方法

Delphi窗体置顶

Delphi cxgrid 通过字段名取得列

Delphi 检查ip地址合法性

Delphi form的borderstyle属性

Delphi获取图片的真实类型

Delphi检测android mock位置

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » delphi listbox自动获取列表框中的组件焦点