Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2004.03.09;
Скачать: [xml.tar.bz2];

Вниз

Всех с праздником! м вопросик заодно   Найти похожие ветки 

 
LAMER-XP   (2004-02-25 23:26) [0]

Всех с праздником!
Есть следующая проблема.
Есть переменная i которая равна нулю. И есть на форме кнопка. Как сделать так, чтобы на первое нажатие i=i+1, на второе нажатие i=i+2 и так до 40 нажатий кнопки. Я знаю, что можно как то отследить сколько раз была нажата кнопка, но как это сделать я не знаю…подскажите плиззз.


 
Palladin   (2004-02-25 23:32) [1]

так и пиши
i:=i+1

код писать то умеешь? написал что нибудь или просто в раздумьях сидишь?


 
Gero   (2004-02-25 23:56) [2]

Button.OnClick:

if a <= 40 then
begin
i := i + a;
Inc(a);
end;
...
initialization
a := 1;


 
Islander   (2004-02-25 23:57) [3]

LAMER-XP не может знать что такое Initialization. Так что лучше написать это в Oncreate формы


 
Gero   (2004-02-25 23:59) [4]

> LAMER-XP не может знать что такое Initialization

Вы думаете, что у него на клаве не предусмотрена клавиша F1?


 
Defunct   (2004-02-26 00:19) [5]

Gero © (25.02.04 23:59) [4]
Помоему [1] самый верный ответ. LAMER-XP никак не мог понять, что переменная может быть i=i+1, с мат. точки зрения это парадокс.

Для простоты понимания пользуйтесь (эт если религия не позволяет писать выражения вида i:=i+1) процедурами "Увеличить/Уменьшить"

Inc(i, x); // Сделать I больше на X
Dec(i, x); // Сделать I меньше на X


 
Германн   (2004-02-26 01:08) [6]

2 Defunct © (26.02.04 00:19) [5]
По-моему, все-таки, самый верный ответ [2]. Но это уже связано с телепатией. :))

2 Gero © (25.02.04 23:59) [4]
>Вы думаете, что у него на клаве не предусмотрена клавиша F1?

Не, мы думаем, что у него в голове не предусмотрено дать команду руке нажать клавишу F1.



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

Форум: "Основная";
Текущий архив: 2004.03.09;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.009 c
1-25766
Kraj
2004-02-26 15:40
2004.03.09
Преобразование Char в Word


1-25820
Creator
2004-02-25 16:13
2004.03.09
Копирование


1-25771
Yad
2004-02-26 13:02
2004.03.09
Динамическое создание контролов


14-25909
Князь Мышкин
2004-02-17 01:13
2004.03.09
Где можно скачать прошивку для процессора.


14-25893
Алексей
2004-02-16 12:06
2004.03.09
Помогите решить графическую задачу на паскале





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский