| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как совместить несовместимое? [D7, WinXP]
kmi © (2005-03-15 00:05:00)Друзья, дайте дельный совет: нужно с минимальными затратами сделать компонент типа TLabel, но использующий в одной строке символы либо нескольких шрифтов, либо один шрифт с символами Unicode. Проще говоря, нужно в строку текста включить спецсимволы типа стрелок вверх или вниз, индекса и т.п.
Ruslan Solovyev (2005-03-15 03:12:00) [1]либо перекрываешь OnPaint от TPaintBox и ручками все рисуешь
Ruslan Solovyev (2005-03-15 03:07:00) [2]пример:
re: TRichEdit;
procedure TForm1.FormCreate(Sender: TObject);
begin
re.Text := 'Privet from Ruslan';
re.SelStart := Length('Privet from ');
re.SelLength:= Length('Ruslan');
re.SelAttributes.Size := 20;
re.SelAttributes.Name := 'Arial';
re.SelLength := 0;
end;
kmi (2005-03-15 02:56:00) [3]Я же сказал с минимальными... ;)
Ruslan Solovyev (2005-03-15 01:25:00) [4]RichEdit тебе поможет :-)
| |
