Форум: "Начинающим";
Текущий архив: 2006.01.22;
Скачать: [xml.tar.bz2];

Вниз

Font Size selector   Найти похожие ветки 

← →
aleyna   (2005-12-29 00:14) [0]

вот зделал Font selector. Но не могу по этойже схеме зделать Font Size selector,помагите.

procedure TForm1.ComboBox1Change(Sender: TObject);
begin
richedit1.Font.Name:=combobox1.Text;
end;
on create
combobox1.Items:=screen.Fonts;

---

← →
Bogdan1024 ©   (2005-12-29 00:20) [1]

richedit1.Font.size:=strtoint(edit1.text);

---

← →
Bogdan1024 ©   (2005-12-29 00:20) [2]

или тебе нужно загнать все размеры шрифта в комбобокс?

---

← →
Bogdan1024 ©   (2005-12-29 00:22) [3]

Шрифты не имеют ограниченный набор своих размеров, пропиши свои значения сам "по умолчанию".

---

← →
alex-drob ©   (2005-12-29 00:25) [4]

> richedit1.Font.Name:=combobox1.Text;

чтобы изменить не весь текст а только часть:
richedit1.SelAttributes.name:=strtoint(combobox1.text)

---

← →
aleyna   (2005-12-29 01:15) [5]

спасибо всем.

---

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

Форум: "Начинающим";
Текущий архив: 2006.01.22;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.553 c