[C++ Error] Unit2.cpp(47): E2141 Declaration syntax error

@Твердотельный · Регистрация: 10.01.2015

Студворк — интернет-сервис помощи студентам

Не могу понять в чём проблема, код ошибки
[C++ Error] Unit2.cpp(47): E2141 Declaration syntax error

Вот сам код программы

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
void __fastcall TForm2::Button3Click(TObject *Sender)
{
float comis () ;
Form1->StringGrid1->RowCount=StrToInt(Form1->StringGrid1->RowCount)+1;
Form1->StringGrid1->Cells[0][StrToInt(Form1->StringGrid1->RowCount)-2]=Form2->Edit1->Text;
Form1->StringGrid1->Cells[1][StrToInt(Form1->StringGrid1->RowCount)-2]=Form2->Edit2->Text;
Form1->StringGrid1->Cells[2][StrToInt(Form1->StringGrid1->RowCount)-2]=Form2->Edit3->Text;
Form1->StringGrid1->Cells[3][StrToInt(Form1->StringGrid1->RowCount)-2]=Form2->Edit4->Text;
float comis ()
{
int result, year1,dohod;
unsigned short Year;
unsigned short Month;
unsigned short Day;
TDateTime::CurrentDateTime().DecodeDate(&Year, &Month, &Day) ;
result = 5;
year1 = StrToInt(Form1->StringGrid1->Cells[2][StrToInt(Form1->StringGrid1->RowCount)-2]) ;
dohod = StrToInt(Form1->StringGrid1->Cells[3][StrToInt(Form1->StringGrid1->RowCount)-2]);
if (Year-year1>=10 && dohod>=1000)
{
result=7;
}
  else if (dohod>=1000 || Year-year1>=10)
{
    result=6;
}
else
result=result;
return result;
}
Form1->StringGrid1->Cells[4][StrToInt(Form1->StringGrid1->RowCount)-2]=comis();
Form2->Edit1->Clear();
Form2->Edit2->Clear();
Form2->Edit3->Clear();
Form2->Edit4->Clear();
}

Добавлено через 1 минуту
Извните, что не обьяснил, ошибка в 10 строке

@Sasha · 10.01.2015, 19:13

нужно определить функцию отдельно, т.е вынести из кнопки

@Твердотельный · 10.01.2015, 19:15 **[ТС]**

Сообщение от Sasha

нужно определить функцию отдельно, т.е вынести из кнопки

А где её определить?

@Sasha · 10.01.2015, 20:23

За пределами кнопки

@BRcr · 11.01.2015, 04:10

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
float comis( )
{
    int result( 5 ), year1, dohod;
    unsigned short Year, Month, Day;
 
    Now( ).DecodeDate( & Year, & Month, & Day );
    year1 = StrToIntDef( Form1->StringGrid1->Cells[ 2 ][ Form1->StringGrid1->RowCount - 2 ], 0 );
    dohod = StrToIntDef( Form1->StringGrid1->Cells[ 3 ][ Form1->StringGrid1->RowCount - 2 ], 0 );
 
    if ( year1 == 0 )
    {
        result = -1;
    }
    if ( ( Year - year1 ) >= 10 && dohod >= 1000 )
    {
        result = 7;
    }
    else if ( dohod >= 1000 || ( Year - year1 ) >= 10 )
    {
        result = 6;
    }
    return result;
}
 
void __fastcall TForm2::Button3Click( TObject * Sender )
{
    Form1->StringGrid1->RowCount = StrToInt( Form1->StringGrid1->RowCount ) + 1;
    Form1->StringGrid1->Cells[ 0 ][ Form1->StringGrid1->RowCount - 2 ] = Form2->Edit1->Text;
    Form1->StringGrid1->Cells[ 1 ][ Form1->StringGrid1->RowCount - 2 ] = Form2->Edit2->Text;
    Form1->StringGrid1->Cells[ 2 ][ Form1->StringGrid1->RowCount - 2 ] = Form2->Edit3->Text;
    Form1->StringGrid1->Cells[ 3 ][ Form1->StringGrid1->RowCount - 2 ] = Form2->Edit4->Text;
    Form1->StringGrid1->Cells[ 4 ][ Form1->StringGrid1->RowCount - 2 ] = comis( );
    Form2->Edit1->Clear( );
    Form2->Edit2->Clear( );
    Form2->Edit3->Clear( );
    Form2->Edit4->Clear( );
}

PS. kostahuj, не знать таких основ - значит, не знать ничего. Налегай на литературу.

Новые блоги и статьи Все статьи Все блоги /
Доступность команды формы по условию Maks 07.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .	Уведомление о неверно выбранном значении справочника Maks 06.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .	Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt 8Observer8 05.04.2026 Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .	AkelPad-скрипты, структуры, и немного лирики.. testuser2 05.04.2026 Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .	Фото всей Земли с борта корабля Orion миссии Artemis II kumehtar 04.04.2026 Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .	Вывод диалогового окна перед закрытием, если документ не проведён Maks 04.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .	Программный контроль заполнения реквизитов табличной части документа Maks 02.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	10.01.2015, 19:13
	нужно определить функцию отдельно, т.е вынести из кнопки 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	10.01.2015, 20:23
	За пределами кнопки 0