Форум программистов, компьютерный форум CyberForum.ru

перевод в С - C++

Восстановить пароль Регистрация
 
KIBERNETIK12
0 / 0 / 0
Регистрация: 18.06.2010
Сообщений: 31
19.06.2010, 10:23     перевод в С #1
Помогите перевести этот участок программы на язык С
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
procedure TForm2.BitBtn1Click(Sender: TObject);
begin
try
if StrToInt(Edit1.Text)>0 then
begin
Form2.Visible:=false;
Form1.Kol := StrToInt(Edit1.Text);
Form1.Visible:=True;
end;
except
MessageDlg('Введите число, не превышающее 20.', mtError,
[mbOk], 0);
end;
end;
6
end.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
19.06.2010, 10:23     перевод в С
Посмотрите здесь:

Перевод на С++ C++
Перевод из 2 в 10 сс C++
C++ перевод из с++ в с
Перевод из 16 сс в 4 сс C++
C++ Перевод
C++ Перевод из C в С++
Перевод с С на С++ C++
Перевод из C# в С++ C++

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
CyBOSSeR
Эксперт C++
 Аватар для CyBOSSeR
2294 / 1664 / 86
Регистрация: 06.03.2009
Сообщений: 3,675
19.06.2010, 10:27     перевод в С #2
C++
1
2
3
4
5
6
7
8
9
try {
  if (StrToInt(Edit1->Text) > 0) {
    Form2->Visible = false;
    Form1->Kol = StrToInt(Edit1->Text);
    Form1->Visible = true;
  }
} catch(...) {
  ShowMessage("Введите число, не превышающее 20");
}
Yandex
Объявления
19.06.2010, 10:27     перевод в С
Ответ Создать тему
Опции темы

Текущее время: 08:17. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru