with RichEdit1.SelAttributes do
if fsBold in Style then
Style := Style - [fsBold]
else
begin
Style := Style + [fsBold];
TBbold.Down:=true;
end;
Style := Style - [fsBold]是什么意思?
Style := Style + [fsBold]是什么意思?
if fsBold in Style then
Style := Style - [fsBold]
else
begin
Style := Style + [fsBold];
TBbold.Down:=true;
end;
Style := Style - [fsBold]是什么意思?
Style := Style + [fsBold]是什么意思?
解决方案 »
- delphi 中的edit.txt 输入控制
- 如何动态设置ADOQuery的Connection属性?
- 高手救命呀!
- 如何将DBGRID中的选中纪录放到一个dataset里(选中是多条)
- 关于存储过程的问题?
- 寻找一个“TProvider”构件? (给分)
- 请问如何使dbgrid中的一列由自己定义显示。比如有一列当它的值为“0”时显示“是”,当“1”是时显示“否”?谢谢!
- 如何将pb中调用外部dll的声明改写到delphi中,关键是数据类型问题,在线等待.....
- 怎样用流方式读word的文件?
- 请教用过智能化UPS自动关闭服务器的具体情况。。。。
- 如何获得当前运行程序的路径?
- 新手初问:在Delphi中怎样点击Button控件打开指定的Excel文件?
if fsBold in Style then //如果粗体在显示类型中
Style := Style - [fsBold] //显示类型变成非粗体状态
else //反之
begin
Style := Style + [fsBold];//显示类型中应该包括粗体
TBbold.Down:=true; //不知道,呵呵
end;