Форум: "KOL";
Текущий архив: 2007.07.22;
Скачать: [xml.tar.bz2];
Вниз_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 вся ветка
Форум: "KOL";
Текущий архив: 2007.07.22;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 6.778 c