Создание функции

@Artem Fomich · Регистрация: 14.10.2011

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

Задание таково:
Ввести номер детали,наименование,цену и количество. Вывести количество деталей цена которых меньше 25. Данное задание я выполнил, плюс используя запись в файл, но еще нужно использовать функции,т.е. самому ее создать,здесь возникла проблема,прошу помощи у Вас.
Вот код программы:

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
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
 
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
struct detalies {
int number;
String name;
int n;
int price;
};
int j=0;
int i;
struct detalies ind1[100];
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{ind1[j].number=StrToInt(Edit1->Text);
ind1[j].name=Edit2->Text;
ind1[j].n=StrToInt(Edit3->Text);
ind1[j].price=StrToInt(Edit4->Text);
StringGrid1->Cells[0][j+1]=ind1[j].number;
StringGrid1->Cells[1][j+1]=ind1[j].name;
StringGrid1->Cells[2][j+1]=ind1[j].n;
StringGrid1->Cells[3][j+1]=ind1[j].price;
Edit1->Clear();
Edit2->Clear();
Edit3->Clear();
Edit4->Clear();
j++;
StringGrid1->RowCount++;
}
 
//---------------------------------------------------------------------------
void __fastcall TForm1::FormActivate(TObject *Sender)
{
    StringGrid1->Cells[0][0]="Номер";
StringGrid1->Cells[1][0]="Наименование";
StringGrid1->Cells[2][0]="Количество";
StringGrid1->Cells[3][0]="Стоимость";
 StringGrid2->Cells[0][0]="Номер";
StringGrid2->Cells[1][0]="Наименование";
StringGrid2->Cells[2][0]="Количество";
StringGrid2->Cells[3][0]="Стоимость";
}
//---------------------------------------------------------------------------
 
 
 
 
void __fastcall TForm1::Button2Click(TObject *Sender)
{
int k=0, i, n;
n=StringGrid1->RowCount;
for (i=1;i<n-1;i++)
{if (StringGrid1->Cells[3][i]<=25)
{
k++ ;
StringGrid2->Cells[0][k]=ind1[i-1].number;
StringGrid2->Cells[1][k]=ind1[i-1].name;
StringGrid2->Cells[2][k]=ind1[i-1].n;
StringGrid2->Cells[3][k]=ind1[i-1].price;
StringGrid2->RowCount++;
}
}
Label5->Caption=IntToStr(k);
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button3Click(TObject *Sender)
{
  for (int i = 0; i < StringGrid1->ColCount; i++)
    for (int j = 1; j < StringGrid1->RowCount; j++)
      StringGrid1->Cells[i][j] = "";
      Label5->Caption="";
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button4Click(TObject *Sender)
{
  for (int i = 0; i < StringGrid2->ColCount; i++)
    for (int j = 1; j < StringGrid2->RowCount; j++)
      StringGrid2->Cells[i][j] = "";
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button5Click(TObject *Sender)
{   TStringList *list = new TStringList;
for(int i = 1; i<StringGrid1->RowCount; i++)
{
        list->Add(StringGrid1->Rows[i]->DelimitedText);
}
list->SaveToFile("ss.txt");
delete list;
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button6Click(TObject *Sender)
{  TStringList *list = new TStringList;
 list->LoadFromFile("ss.txt");
 for(int i = 0; i<list->Count; i++)
{  StringGrid1->RowCount=i+1;
        StringGrid1->Rows[i+1]->DelimitedText = list->Strings[i];
}
delete list  ;
}
//---------------------------------------------------------------------------

Я хочу использовать функцию для очистки StringGrid, а именно данную операцию:CPP]for (int i = 0; i < StringGrid1->ColCount; i++)
for (int j = 1; j < StringGrid1->RowCount; j++)
StringGrid1->Cells[i][j] = "";[/CPP]Подскажите пжл как это сделать?
Ниже прикреплена программа

The_Immortal · 20.06.2012, 20:23

Artem Fomich, не совсем понял, что Вы хотите...

C++
1
2
3
4
5
6
7
void GridClear(){
for (int i = 0; i < Form1->StringGrid1->ColCount; i++)
for (int j = 1; j < Form1->StringGrid1->RowCount; j++)
Form1->StringGrid1->Cells[i][j] = "";
}
...
GridClear(); // вызов функции где надо

@Artem Fomich · 20.06.2012, 20:25 **[ТС]**

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

Artem Fomich, не совсем понял, что Вы хотите...

C++
1
2
3
4
5
void GridClear(){
for (int i = 0; i < StringGrid1->ColCount; i++)
for (int j = 1; j < StringGrid1->RowCount; j++)
StringGrid1->Cells[i][j] = "";
}

А вот дальше куда ее вставлять, и как использовать не совсем понятно?

The_Immortal · 20.06.2012, 20:27

Artem Fomich,

Сообщение от Artem Fomich

А вот дальше куда ее вставлять, и как использовать не совсем понятно?

Ну например можно на кнопочку повесить:

C++
1
2
3
4
5
6
7
8
9
10
void GridClear(){
for (int i = 0; i < Form1->StringGrid1->ColCount; i++)
for (int j = 1; j < Form1->StringGrid1->RowCount; j++)
Form1->StringGrid1->Cells[i][j] = "";
}
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 GridClear();
}

@Artem Fomich · 20.06.2012, 20:32 **[ТС]**

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

Artem Fomich,

Ну например можно на кнопочку повесить:

C++
1
2
3
4
5
6
7
8
9
10
void GridClear(){
for (int i = 0; i < Form1->StringGrid1->ColCount; i++)
for (int j = 1; j < Form1->StringGrid1->RowCount; j++)
Form1->StringGrid1->Cells[i][j] = "";
}
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 GridClear();
}

Спасибо болшое, Вы мне очень помогли) Порой, простое кажется сложным)

@nick42 · 20.06.2012, 20:32

Ну, если чтоб грамотно... в ClassExplorer на Form1 клацаете правой кнопкой и выбираете NewMethod.
В MethodName вписываете GridClear , FunctionResult - void , отмечаете _fastcall(4) и OK. В итоге появится соотв. заготовка, внутрь которой и вписываете вышеозначенные операции...

The_Immortal · 20.06.2012, 20:36

nick42,

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

в ClassExplorer на Form1

А не уточните где этот ClassExplorer находится? На XE2 что-то обнаружить не могу

А усе! Нашел... View - C++ ClassExplorer.

Новые блоги и статьи Все статьи Все блоги /
Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .	Модульный подход на примере F# DevAlt 06.03.2026 В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .	Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .

@nick42 Практикантроп 4841 / 2726 / 534 Регистрация: 23.09.2011 Сообщений: 5,798
	20.06.2012, 20:32
	Ну, если чтоб грамотно... в ClassExplorer на Form1 клацаете правой кнопкой и выбираете NewMethod. В MethodName вписываете GridClear , FunctionResult - void , отмечаете _fastcall(4) и OK. В итоге появится соотв. заготовка, внутрь которой и вписываете вышеозначенные операции... 4