1.我想要RichEdit的每5个字符一种颜色?怎么办?
2.怎样在richedit的背景上画一些横线,做出类似稿纸的效果?
3.那种全屏效果怎么做?
2.怎样在richedit的背景上画一些横线,做出类似稿纸的效果?
3.那种全屏效果怎么做?
解决方案 »
- 请问 WebBrowser 如何 忽略 _blank 直接在本WebBrowser中浏览?
- 中间件发布
- 急 请问:如何写代码,远程备份SQLServer数据库?在线等
- 连接数据库问题
- JPG图片写入SQL数据库,如何在QREPORT报表中利用QRDBImage显示出供打印???在线等,急.
- 【转贴】猛禽 大大的帖子。精彩,经典。
- 在RICHEDIT中怎么让文本对齐,和插入字符的问题(有有关这个方面的源码吗)。
- 关于动行期创建Timage对象的显示问题
- 请问那位有Web Services的资料??高分请进,
- 我安装了InterBase ,但不知道如何创建一个数据库gdb文件以及在其中建表
- 问个很菜的小问题:吉利分数,先答先得 :)--关于Flash控件的~~~
- delphi+SQLserver做指纹数据库
procedure TForm1.Button1Click(Sender: TObject);
Var
len,jsq:LongInt;
begin
len:=length(richedit1.Lines.Text);
if len<=0 then
exit;
randomize;
jsq:=0;
while jsq<len do
begin
richedit1.SelStart:=jsq;
richedit1.SelLength:=5;
richedit1.SelAttributes.Color:=rgb(random(255),random(255),random(255));
jsq:=jsq+5;
end;
end;