摘要:delphi是inprise(前borland)公司的优秀的可视化编程工具,它自带的mediaplayer控件是开发多媒体的利器。用它几分钟就可以做出一个象解霸一样可以播放多媒体文件的程序来。但可能很少人知道,用它也可以做一个录音程序。
运行delphi,在system页拖一个mediaplayer控件到窗体上,默认名为mediaplayer1。由于我们的程序是采用自己的按钮,所以将media......
摘要:假设我们要将某个结点treenode移动到另一结点anitem上并做为anitem的child,按照文档说明,只需这样做
treenode.moveto(anitem,nraddchild);
但实际上,在delphi 4中,假如anode原来没有child的话,这条语句将不做任何事情。折衷的办法是
tempnode:=topictv.items.addchild(anitem,);
tre......
如何使dbgrid中不同的值显示不同颜色在dbgrid的ondrawdatacell事件下写:
procedure tform1.dbgrid1drawdatacell(sender: tobject; const rect: trect; 【程序编程相关:
Dbgrid 中表字段所在的列序号
】 【推荐阅读:
将DBGrid 当前列定位到指定的字段上】
field: tfield; state: tgriddrawstate); 【扩展信息:
Delphi与DirectShow&DS】
begin
if table1.fieldbyname(partno).asfloat > 2500 then
dbgrid1.canvas.brush.color := clgreen;
//dbgrid1.canvas.font.color := clred;
dbgrid1.defaultdrawdatacell(rect, field, state);
end;
或(注意是"或")在ondrawcolumncell下写:
二者的区别是ondrawdatacell必须是columns属性为csdefault,既为空.而ondrawcolumncell没这个要求.
procedure tform_cost.dbgrid1drawcolumncell(sender: tobject;
const rect: trect; datacol: integer; column: tcolumn;
state: tgriddrawstate);
begin
with dbgrid1 do
begin ...
下一页 摘要:金凤霞
----delphi为用户提供了一个方便的绘图环境,即某些控件的canvas属性(画布)。用户可以把某些控件的表面作为一张画布,在上面绘制各种图形或显示图像,但在canvas的使用过程中少不了一个特殊对象,那就是矩形rect,灵活使用它会完成很多特殊的功能,为delphi编制的windows程序增加活力。
rect的特点
----rect既是一个特殊的数据结构,又是一个函数,它的作用就是......