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

Вниз

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

 
hatchy ©   (2002-12-20 11:41) [0]

Люди как мне сделать чтобы если первый раз нажимаешь поялвяется например появляется что нибудь например какой нибудь риснок,потом например еще раз нажимаешь еще что нибдь делается..
Вопрос в том сделать так чтобы нажал 1раз что произошло еще раз еще что произошло ит.д


 
esu ©   (2002-12-20 11:43) [1]

procedure TMainForm.Button1Click(Sender: TObject);
begin
Button1.Tag := Button1.Tag + 1;
ShowMessage(IntToStr(Button1.Tag));
end;


 
Игорь Шевченко ©   (2002-12-20 11:46) [2]

OnClick менять, к примеру


 
hatchy ©   (2002-12-20 11:51) [3]

if button1.tag = 6 then showmessage("Вот оно, то что на 6ой раз появляется");



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
14-25046
[666]VaaL
2002-12-20 13:41
2003.01.09
Потоки


1-24895
бред
2002-12-25 19:46
2003.01.09
новый компонент ошибку дает


6-25004
Cu
2002-11-11 12:35
2003.01.09
Компонент TIdSMTP (Indy)


3-24774
Karbo
2002-12-14 12:42
2003.01.09
Помогите составить запрос...


14-25051
Johnmen
2002-12-20 12:13
2003.01.09
С праздником !