Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.06.2011, 15:24   #1
Marryy
Пользователь
 
Регистрация: 11.06.2011
Сообщений: 14
По умолчанию вычисление динамики изменения сгенерированного значения

Уважаемые гуру!
В таймере генерирую число и помещаю его в Edit1.
В Edit2 необходимо поместить разницу между значением из Edit1 и новым сгенерированным числом. Не получается.
Код:
a:=random;
form1.edit1.text:=InttoStr(a);
form1.edit2.text:=?
Marryy вне форума Ответить с цитированием
Старый 13.06.2011, 15:55   #2
Jaguar83
Профессионал
Пользователь
 
Аватар для Jaguar83
 
Регистрация: 25.05.2011
Сообщений: 91
По умолчанию

Во-первых, нужно объявить а как глобальную переменную
Если я правильно понял, то
Код:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
Randomize;
a:=Random(100);
Edit2.Text:=IntToStr(StrToInt(Edit1.Text)- a);
Edit1.Text:=IntToStr(a);
end;
Только в этом случае надо заранее проинициализировать переменные
a и Edit1.Text (можно например в событии FormCreate)
Помог? Будь человеком - жми на весы слева!
Jaguar83 вне форума Ответить с цитированием
Старый 13.06.2011, 16:51   #3
Marryy
Пользователь
 
Регистрация: 11.06.2011
Сообщений: 14
Радость

Спасибо.
Marryy вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вычисление значения и процент от результата Teon Microsoft Office Excel 5 10.02.2011 01:24
Макрос работа по условию изменения значения по ссылке Uralmaster Microsoft Office Excel 9 05.02.2011 16:44
Вычисление значения функции evklid Помощь студентам 6 10.11.2010 22:30
Является ли ввод сгенерированного ключа незаконным? artemavd Свободное общение 18 16.07.2010 03:27
Си++ Составить программу на вычисление значения по формуле verpl Помощь студентам 3 28.05.2009 11:16