如何在DBGrid每一行中中加入按钮(100分)

yoku · 2001-10-14

数据库有一个字段FileName用来保存语音文件的路径，
想在DBGrid中的每一行中增加一个按钮，如果FileName<>NULL
就显示按钮，单击按钮播放语音文件。
我在PB中用数据窗口轻松实现此功能，在Delphi不知如何实现。

txmaster · 2001-10-14

可以实现的。
不过我一时说不清楚。给你一下思路吧。
必须自已绘制DBGrid，这样才能定制它；
判断某个字段是否为空，如不为空，则绘制一个按钮。（在POST之后也应该检查）
给按钮加事件过程。（主要用到PlaySound这个API）。

Brave · 2001-10-14

我觉得可以利用把该列的buttonstyle设置成cbsellipsis，然后在dbgrid的oneditbuttonclick
事件写播放函数，加一个是否为空的判断

delphi_lsl · 2001-10-14

在DBGRID中的CELLDRAW（大概）事件中利用其中的RECT就可以轻松
知道设置按钮的位置和大小，不信你试试看

ykx · 2001-10-31

delphi_lsl的说法好像不好使。brave的办法可行。

bugs · 2001-10-31

有源代码吗？

liuly · 2002-03-19

接受答案了.