Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.02;
Скачать: CL | DM;

Вниз

QRRichText   Найти похожие ветки 

 
Xmen   (2005-08-16 14:40) [0]

Привет мастера.
В панели QReport есть компонент QRRichText кто нибуд в него может писать разными шрифтами или разными формами шрифта(жирный, италик). Только нужно в одну компоненту а не в отдельные компоненты нужно писать разными шрифтами.


 
Xmen   (2005-08-16 16:59) [1]

Или я не то написал или никто незнаеть ответ или нехочет ответить


 
Alexander Panov ©   (2005-08-16 17:12) [2]

А разве в QRRichText нет поля ParentRichEdit?


 
Плохиш ©   (2005-08-16 17:15) [3]

А разве в Д6 нет справки по quickreport?


 
Xmen   (2005-08-17 10:04) [4]

2Alexander Panov ©   (16.08.05 17:12) [2]

>>А разве в QRRichText нет поля ParentRichEdit?

Есть нашел. Его чем едять? Если можно пример. Helpе написано чтото но этот чтота на англиском а я ещё слабоват в в этом.


 
Xmen   (2005-08-17 15:20) [5]

Я пробовал иползовать его но все равно в репорте шрифт получается одинаковые. если делаю размер 16 то весь текст отабражается в этом размере.
QRForm3.QRRichText1.ParentRichEdit.Font.Size:=16;
Как можно сделать Часть текста жирным, осталной часть обычным.


 
Плохиш ©   (2005-08-17 15:32) [6]


> Xmen   (17.08.05 10:04) [4]
> Helpе написано чтото

В хелпе написано не "чтото", а то, что ParentRichEdit указывает на компонент TRichEdit, который содержит форматированный тект, Этот текст и будет распечатан в QRRichText.

PS. А англо-русский словарь тебе всё равно придётся купить.


 
Виталий Панасенко   (2005-08-17 15:35) [7]

Вообще-то, в помощи не так написано.. Если определен родитель(Parent), то данные берутся отттуда.. А в родителе можно так:
 with RichEdit1.SelAttributes do
 begin
   Color := clRed;
   Height := Height + 5;
 end;
 RichEdit1.Lines.Add("This line of text will be red.");


 
Виталий Панасенко   (2005-08-17 15:37) [8]

:-) Это
> Виталий Панасенко   (17.08.05 15:35) [7]
относилось к Xmenу


 
Xmen   (2005-08-18 09:00) [9]

2>Виталий Панасенко   (17.08.05 15:35) [7]
Спасибо коечто понятно становится и еще один вопрос как можно в одном строке писат разными стилями шрифта, то есть жирным и обичным.
Например:
Ф.И.О.: Иванов Иван Иванович


 
Виталий Панасенко   (2005-08-18 11:27) [10]

Может, еще жевать за тебя ?:-))


 
Xmen   (2005-08-18 14:52) [11]

2>>Виталий Панасенко   (18.08.05 11:27) [10]
>>Может, еще жевать за тебя ?:-))
Ненадо!
Я кое как нашел выход и написал такой код.

function TextPos(st1,st2:string):string ;
var SelPos:integer;
begin
with ProbaForm.RichEdit1.SelAttributes do
begin
  Name := "Times New Roman";
  Size := 12;
  Style := [fsbold];
end;
ProbaForm.RichEdit1.SelText:=st1;
SelPos:=ProbaForm.RichEdit1.SelLength+ ProbaForm.RichEdit1.SelStart;
with ProbaForm.RichEdit1.SelAttributes do
begin
  Color := clBlack;
  Name := "Arial";
  Size := 11;
  Style := [fsItalic];
end;
ProbaForm.RichEdit1.SelStart:=SelPos+10;
ProbaForm.RichEdit1.SelText:=st2;
ProbaForm.RichEdit1.Lines.Add("");
end;

Все работает прикрасно, но между первым и вторыми значениями не выходить управление пробелей
ProbaForm.RichEdit1.SelStart:=SelPos+10;
не работаетю Здесь я хотел оставить 10 пробелей. Но не получилось.



Страницы: 1 вся ветка

Текущий архив: 2005.10.02;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.065 c
1-1126249924
Makhanev A.S.
2005-09-09 11:12
2005.10.02
Управление версионированием проекта...


2-1124816384
userrrrr
2005-08-23 20:59
2005.10.02
Помогите отправить почту!!


14-1126108538
Ксардас
2005-09-07 19:55
2005.10.02
Первые проблемы с ServicePAck2


2-1124979182
Sphinx
2005-08-25 18:13
2005.10.02
Странная ошибка


6-1118288912
dDan
2005-06-09 07:48
2005.10.02
Indy Post