如何在图片上加一条与图片同宽的黑条？

[xiaoxingchi]

如何在图片上加一条与图片同宽的黑条？

然后在黑条上输出指定的文字。效果如有些电影字幕一样。

如何实现？

[bdmh]

自己在canvas上画

[xiaoxingchi]

如何画？

[bdmh]

image组件也有canvas，里面提供了画的方法

[bzworinima]

创建一个画布， 指定画布的显示区域，（下面），长度，宽度，起始位置 top,left
设置 画布颜色（黑色），设置文字颜色（白色） 大小

[xiaoxingchi]

canvas下具体哪个方法是可以用来画黑条的？
属性怎么设置？

[sforiz]

  
Image1.Canvas.Brush.Color := $00000000;
Image1.Canvas.Rectangle(Image1.Left, Image1.ClientHeight - 30, Image1.ClientWidth, Image1.ClientHeight);
Image1.Canvas.Font.Color := clRed;
Image1.Canvas.TextOut(10, Image1.ClientHeight - 22, '文字显示位置需要调整');

把代码放在OnPaint中试试