Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.01.05;
Скачать: CL | DM;

Вниз

Онклик к кнопке   Найти похожие ветки 

 
jCode   (2003-12-18 18:43) [0]

В программе динамически создается кнопка, вписанная в ячейку таблицы. Вопрос - какой присвоить этой кноппке ОнКлик, чтобы было понятно из какой строки кнопка??
Спасибо.


 
Тимохов ©   (2003-12-18 18:48) [1]

Ну блин вопрос.
Присваивай какой хочешь.
В событии анализируй sender, т.е. кнопку, и из нее и получай координаты ячейки.


 
jCode   (2003-12-18 18:55) [2]

Тогда получается, что нужно при создании кнопки как-то ее сделать узнаваемой? Код вот:
var
Knopka:Tbutton;
begin

Knopka:=(Table.Objects[ACol,Arow] as TButton);
if Knopka<>nil then
begin
Knopka.Visible:=false;
Table.Objects[ACol,Arow]:=nil;
end;

Knopka:=Tbutton.Create(Application);

knopka.Visible:=false;
Knopka.Caption:=s;
Knopka.OnClick:=wd;
Knopka.Parent:=Starter;
Knopka.Tag:=1;
Table.Objects[ACol,ARow]:=Knopka;
Dr(ACol,Arow); //отрисовка кнопки
end;


Я начинающий, так что можно поподробнее.


 
Александр из Минска ©   (2003-12-18 19:05) [3]

В Королевстве Дельфи есть статья "Жинь и смерть в run-time" Вот там все и расписано.


 
Тимохов ©   (2003-12-18 19:17) [4]

jCode (18.12.03 18:55) [2]
Совершенно верно - при создании кнопку надо сделать узнаваемой.
Решений несколько
1. Сделать потомка - TYourButton с полями Col и Row. Заносить туда значения.
2. Использовать tag - там 4 байта, разберешься как туда засунуть то, что тебе нужно.
3. Можно еще как-то - например хранить нужную информацию в name, но это изврат.

ИМХО лучше всего 1.


 
jCode   (2003-12-18 22:40) [5]

Тимохов © (18.12.03 19:17) [4]
Спасибо, для меня приемлим второй - тег это номер строки, а по ней можно любое поле взять, а другого и не надо!
спасибо!



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

Текущий архив: 2004.01.05;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.033 c
1-11988
Никола
2003-12-19 10:11
2004.01.05
Знатоки, подскажите есть ли в DELPHI процедуры, которые


1-11993
sevgen
2003-12-19 07:18
2004.01.05
Left, Right


1-11972
Andrey V.
2003-12-19 12:48
2004.01.05
Досовская задача в CreateProcess


14-12149
Alexey Lipatov
2003-12-12 17:33
2004.01.05
Неправильно показываются фильмы


1-11872
ruslan_as
2003-12-15 11:51
2004.01.05
Помогите посчитать часы