Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

Edit1 to Edit2

2.4K
25 апреля 2003 года
Aiswer
15 / / 25.04.2003
Помогите!
Два окна Edit и одна клавишf решить
Вот сам вопрос:
Помогите написать код чтобы в Edit1 писать мой Х
а в edit2 при нажатии клавиши Button1 ришался пример 5*X
Help Please!!!!!
460
25 апреля 2003 года
Berg
261 / / 27.03.2003
Можно, например, попробовать что-нибудь типа
void __fastcall TForm1::Button1Click(TObject *Sender)
{
try { Edit2->Text = IntToStr(StrToInt(Edit1->Text)*5); }
__except { }
}

Или можешь в MSDN посмотреть, если надо через API замутить...:-)
2.4K
26 апреля 2003 года
Aiswer
15 / / 25.04.2003
Цитата:
Originally posted by Berg
Можно, например, попробовать что-нибудь типа
void __fastcall TForm1::Button1Click(TObject *Sender)
{
try { Edit2->Text = IntToStr(StrToInt(Edit1->Text)*5); }
__except { }
}

Или можешь в MSDN посмотреть, если надо через API замутить...:-)



СПАСИБОX)-

1.9K
26 апреля 2003 года
vpdt
34 / / 26.04.2003
Цитата:
Originally posted by AISWER
Помогите!
Два окна Edit и одна клавишf решить
Вот сам вопрос:
Помогите написать код чтобы в Edit1 писать мой Х
а в edit2 при нажатии клавиши Button1 ришался пример 5*X
Help Please!!!!!



int x;
x=StrToInt(Edit1->Text);
Edit2->Text=5*x;:)

442
27 апреля 2003 года
HexoGenus
121 / / 20.03.2000
Цитата:
Originally posted by vpdt


int x;
x=StrToInt(Edit1->Text);
Edit2->Text=5*x;:)



Хммм...
ну и охота вам потом исключения обрабатывать?
может лучше считать что если в поле не число то там ноль?
Edit2->Text=5*Edit1->Text.ToIntDef(0);

2.4K
29 апреля 2003 года
Aiswer
15 / / 25.04.2003
Цитата:
Originally posted by HexoGenus


Хммм...
ну и охота вам потом исключения обрабатывать?
может лучше считать что если в поле не число то там ноль?
Edit2->Text=5*Edit1->Text.ToIntDef(0);

Спасибо!!!

1.9K
09 мая 2003 года
Efendy
26 / / 09.05.2003
что делает фнкция try ??
не переводно а конкретно важно ли это ?
2.1K
10 мая 2003 года
domovoi
27 / / 27.03.2003
Можно и с исключениями
try
{
Edit2->Text=5*Edit1->Text.ToInt();
}
catch (EConvertError&)
{
Edit2->Text="Error";
}
Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог