有没有办法:输出可以改变色彩及背景色的字? ( 积分: 50 )

  • 主题发起人 主题发起人 wei0916
  • 开始时间 开始时间
W

wei0916

Unregistered / Unconfirmed
GUEST, unregistred user!
有没有办法:输出可以改变色彩及背景色的字?
是这样的,我想输出一行可以改变色彩及背景色的字,不知有没有办法.比如想输出一条信息:
'我爱DELPHI','我'是红色(而这个字的背景色是绿色),'爱'是绿色(而背景色是红色),'DELPHI'是黄色(而背景色是黑色),而且要带光标插入的功能,就是不止是输出这些信息,而且输出信息后,想把光标插在这行信息的哪就插在哪里(因为信息要更改),我想了很久,无法实现,也不知有没有这样的第三方控件,所以来求你们相助...,谢谢.
 
有没有办法:输出可以改变色彩及背景色的字?
是这样的,我想输出一行可以改变色彩及背景色的字,不知有没有办法.比如想输出一条信息:
'我爱DELPHI','我'是红色(而这个字的背景色是绿色),'爱'是绿色(而背景色是红色),'DELPHI'是黄色(而背景色是黑色),而且要带光标插入的功能,就是不止是输出这些信息,而且输出信息后,想把光标插在这行信息的哪就插在哪里(因为信息要更改),我想了很久,无法实现,也不知有没有这样的第三方控件,所以来求你们相助...,谢谢.
 
你一方面想让一行字有多种颜色,一方面想让可以随时插入,请问你插入的字是什么颜色?实在不行,一个一个Label帖上去(听着都挺累),并即时更新Label的位置!
 
这是一个不得已的办法呀.而且这还要求随时定位光标的位置.就是说,要像在文本框内输入文字一样的方便.用LABEL是可以达到变换色彩的方法.但是鼠标光标不好定位.那天想到了一个问题,就是用网页编辑软件可以做到一个字的色彩这么变换,不知在DLEPHI里有没有像网页编辑一样的组件,如果有的话,也许可以做到一个字一个字地改色彩了.
 
SetBackColor
Font.color
不断用这个两句设置字体和背景色
http://www.tommstudio.com/
 
Self.Canvas.Brush.Color := clBlack;
Self.Canvas.Font.Color := clRed;
self.Canvas.TextOut(100,10,'我');
Self.Canvas.Brush.Color := clWhite;
Self.Canvas.Font.Color := clBlue;
self.Canvas.TextOut(120,10,'爱');
 
guvexie这个方法好呀.但是没有光标插入功能,也不能把文本输到MEMO或者EDIT里,如果这样把文本输到MEMO或者EDIT里就好了.遗憾...
 
网上有一个MLABEL的控件,找找吧,有原码的,看看这个控件如何控制颜色的
 
后退
顶部