| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Ссылка на класс

Steep ©   (2007-04-10 15:55:00) 

Описание
Type
 TPathButton = class(TSpeedButton)
end;

Созданию кнопку
..
//Создаем иконку
 With TPathButton.Create(Self) do
 begin
   Parent := Frm_RunPanel.ScrollBox1;
   //Как сюда прописать этот Спин буттон который я создаю??
   PaintIcon(LE_IconPath.Text, ! Здесь описан TSpinButton  !);
 end;
..

---

Steep   (2007-04-10 15:59:00) [1]

Пасип!!!!

---

Ega23   (2007-04-10 15:58:00) [2]


var
btn:TPathButton;

//Создаем иконку
btn := TPathButton.Create(Self);
With btn do
begin
  Parent := Frm_RunPanel.ScrollBox1;
  //Как сюда прописать этот Спин буттон который я создаю??
  PaintIcon(LE_IconPath.Text, btn);
end;

---

Наверх