我输出到屏幕上的文字都是白色的底,太难看了,能不能变成透明的呢?
还有文字能不能变成半透明的呢,
文字能不能用在最上面呢?不防碍其他操作。谢谢大家
还有文字能不能变成半透明的呢,
文字能不能用在最上面呢?不防碍其他操作。谢谢大家
解决方案 »
- 关于WIN2000 professional与SQL Server2000的问题
- 需要大家帮忙指点
- 100分请教每个人都会遇到的常见问题。
- 我将图形旋转90度(能行),却无法使原图形消失 (可加分 20)
- 如何我把listbox中的每条记录 在我创建的sql数据库中查找到 并输出sql中的和这条记录相关的其他字段到另一个listbox中
- Tangram框架2.5版发布
- 搜索引擎问题(2)---程序检测链接有效性,并获得链接速率
- 救命呀,偶必须在今天解决这个问题,重金悬赏,关于setrange的(牛虻)
- help me about add dir.
- 如何获取文件的更新时间
- 关于Delphi7的数据模块怎样用?
- 帮我看看这段代码出错在哪?
Canvas.Brush.Style := bsClear;//等等,你自己查查就知道了;
Shift: TShiftState; X, Y: Integer);
var
LogFont : TLogFont;
newFont : TFont;
begin
with Form1.Canvas do
begin
Font.Name := '黑体'; // 字体
Font.Size := 32; // 字号
Font.Color:= $00ffcc; // 颜色
// 创建新字体
newFont := TFont.Create;
newFont.Assign(Font); // 新字体继承窗体字体的属性
Font.Assign(newFont);
newFont.Free;
// 在鼠标按下的位置显示文字
TextOut(X, Y, '旋转文字Demo');
end;end;
Canvas.Brush.Color := 你的颜色;
Canvas.TextOut();
下面这一句不能用否则反会显示背景。
Canvas.Brush.Color := 你的颜色;
Canvas.Brush.Style := bsClear;
Canvas.TextOut();