| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Приравнивание одного шрифта к другому
pasha L © (2005-01-09 18:29:00)У меня есть var font1:TFont; Я хочу, чтобы он был такой же, как и TFont моего текстового поля TRichEdit (поле называется txt). Ето у меня получается очень просто font1:=txt.font, но после этого все изменения font1 отражаются на txt.font. Как этого избежать? Я пробовал приравнивать каждое св-во отдельно, но у меня тут же вылезает ошибка потому, что font1 абсолютно новая переменная и св-ва в ней не обозначены.
Yanis (2005-01-09 18:44:00) [1]Я слишком долго отвечал =)
Yanis (2005-01-09 18:43:00) [2]Замени код
font1 := txt.fontна
font1 := Tfont.Create;
font1.Assign(txt.Font);
olookin (2005-01-09 18:37:00) [3]Как я понимаю, эта проблема решается так:
var font1: TFont;
font1:=TFont.Create;
font1.Assign(SomeOldFont);
| |
