delphi7 listbox 修改了触发的事件是什么事件??我想修改listbox 时赋值给其它控件;
解决方案 »
- [特别醒目]雪地向内翻腾五周半垂直落地单手倒立 祝大家有一个辉煌的2006
- 在form里定义的类型,到别的form里无法调用的问题
- DBGrid中如何加入DateTimepicker控件。急急急急!!!!!
- 请教LockWindowUpdate()这个函数怎么用呀?
- 在DELPHI源程序中如何动态创建ACCESS数据库及当即建表文件
- 我要根据ADO数据集是否调用了Updatebatch或CancelBatch,以便设定一些按钮的Enabled属性,怎么做?
- 刚学DELPHI,小问题:如何使用另一个Form上的数据源(DataSource1)?
- 请问 DBTree一般是怎么用, 谁能很初级的讲讲?
- 安装tinydb成功,新工程编译报tinydb.pas找不到?
- 从DBgrid中一次性如何删除多条数据?
- 如何将极坐标转换成直角坐标
- delphi+ ado 两个数据库之间的表关联
1、设置ListBox.Sytle=lbOwnerDrawFixed
2、在 OnDrawItem 事件中编写自绘代码即可
procedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer; Rect: TRect; State: TOwnerDrawState);
begin
(Control as TListBox).Canvas.FillRect(Rect);
(Control as TListBox).Canvas.TextOut(Rect.Left, Rect.Top, (Control as TListBox).Items[Index]);
Edit1.Text := ListBox1.Items[Index];
end;procedure TForm1.FormCreate(Sender: TObject);
begin
self.ListBox1.Style := lbOwnerDrawFixed;
end;