Форум: "Основная";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];
ВнизСобытия программно созданых компонентов Найти похожие ветки
← →
mer (2002-11-13 07:27) [0]Как обработать событие onclick у программно созданого компанента???
← →
mmb (2002-11-13 07:38) [1]
procedure FormMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
Component := TComponent.Create;
Component.OnMouseDown := FormMouseDown;
← →
Freeze (2002-11-13 08:35) [2]Это делается очень просто, просто нужно чтобы руки росли от куда следует, а не откуда у тебя ростут :-)
← →
MBo (2002-11-13 08:39) [3]>Freeze
Смелое заявление, ничего не скажешь
← →
Separator (2002-11-13 08:45) [4]type
TMyButton = class(TButton)
public
constructor Create(AOwner: TComponent); override;
end;
TForm1 = class(TForm)
..........
public
procedure MyButtonClick(Sender: TObject);
..........
implementation
{$R *.dfm}
procedure TForm1.MyButtonClick(Sender: TObject);
begin
// Че-нить делаешь
end;
constructor TMyButton.Create(AOwner: TComponent); override;
begin
inherited Create(AOwner);
OnClick:= TForm1.MyButtonClick
end;
end.
← →
mer (2002-11-13 09:11) [5]>Freeze чья бы корова мычала сам меня вторую неделю достоешь со своими танками
← →
Freeze (2002-11-13 09:20) [6]>mer Долой ламеров с этого сайта, долой, долой!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
← →
SuperUmnik (2002-11-13 09:23) [7]Рябята! давайте жить дружно!
← →
Леван (2002-11-13 09:37) [8]Трудно представить программера, который знал все с рождения ,,,
Это к тому, что не надо бравировать сыоими знаниями и упрекать в незнание какой-нибудь хитрости других
пр существу: я несколько по другому делаю вариант MMB:
TCUSTOMDBGRID=CLASS(TDBGRID)
private
PROCEDURE CUSTOMKEYPRESS(SENDER:TOBJECT;VAR KEY:CHAR);
и при создании делаю так:
var
GRID:TCUSTOMDBGRID;
begin
GRID:=TCUSTOMDBGRID.CREATE(FORM);
grid.parent:=form;
GRID.OnKeyPress:=GRID.CUSTOMKEYPRESS;
далее где-то в программе описание
PROCEDURE TCUSTOMDBGRID.CUSTOMKEYPRESS(SENDER:TOBJECT;VAR KEY:CHAR);
BEGIN
..............
END;
Кстати. в этих примераъ форма тоже динамически создается и уничтожается.
Удачи
Леван
← →
ak75 (2002-11-13 10:15) [9]В "Королевстве" есть раздел "Hello, World !"
http://www.delphikingdom.com/helloworld/index.htm
В нем статья с примером, по-моему называется
"Пример создания и работы с динамическими объектами"
← →
ak75 (2002-11-13 10:41) [10]Извиняюсь
Правильная ссылка:
http://www.delphikingdom.ru/helloworld/runtime_comp.htm
Статья "Жизнь и смерть в режиме run-time"
← →
mmb (2002-11-15 11:08) [11]Я не уведел ничего более простого, Freeze - должен извиниться, либо валить, либо в real подойти и получить :)
← →
Calm (2002-11-15 11:35) [12]На мой взгляд реплики типа
> Это делается очень просто, просто нужно чтобы руки росли
> от куда следует, а не откуда у тебя ростут :-)
должны удаляться модераторами.
2 Freeze
Если тебе исполнилось 19 лет и ты прочитал, как присваивать обработчики событий в run-time, то это не означает, что ты круче всех на свете, а на остальных можно плевать.
Дело, разумеется, не в возрасте и не в обработчике событий, а в жизненной позиции. Тебе жить будет трудно.
P.S. В этой ветке я не откликаться не буду. Дискуссия закрыта.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.11.25;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.008 c