Скачать: CL | DM;

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

← →
Trible   (2006-12-12 15:15) [0]

Мало доков по созданию компонентов.
Что значит @LabelActions здесь.
Как их использовать?

_NewControl(ASender,
                 "Test1",
                 WS_VISIBLE or WS_CHILD or SS_NOTIFY or SS_LEFTNOWORDWRAP or SS_NOPREFIX,
                 False,
                 @LabelActions
     )
 );

---

← →
Vladimir Kladov   (2006-12-12 15:57) [1]

исходный код - тоже доки. Если вы не хотите разбираться, зачем оно надо, то скорее всего оно вам не надо.

---

← →
Trible   (2006-12-12 16:11) [2]

Так я в исходниках и смотрю. Пробовал создавать уже готовый (рабочий) компонент  и с этим и без этого.
Ну объясните в двух словах. Что вам стоит?

---

← →
Gr   (2006-12-12 16:12) [3]

А что тебе мешает ввести в поле поиска LabelActions и увидишь!
const
 LabelActions: TCommandActions = (
     ...
     aTextAlignLeft: SS_LEFT;

а предположим для
 EditActions: TCommandActions = (
     ...
     aTextAlignLeft: ES_LEFT;

чтобы не писать, например,  для Edit и Label отдельные процедуры...
procedure TControl.SetTextAlign(const Value: TTextAlign);
...
 taLeft: NewStyle := fStyle and not DWORD(aTextAlignCenter or aTextAlignRight)
                         or aTextAlignLeft;
...

---

← →
Trible   (2006-12-12 16:20) [4]

Да это и так понятно.  это в первую очередь посмотрел. Как (и где) это использовать в своем компоненте вот в чем вопрос.
например
  aGetCount: 0;
   aSetCount: 0;
  aSetBkColor: 0;

---

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

Скачать: CL | DM;



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