Построчный разбор кода программы

@Ychandr · Регистрация: 23.12.2010

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

Ребят помогите прокомментировать программу, а то завтра защита! Препод придирается ко всему!

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
//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
struct Akkord
{
bool hit;
char Ak[2];
};
TForm1 *Form1;
Akkord Akk[8] = {{false,'A','m'},{false,'A','7'},{false,'D','m'},{false,'E','m'},{false,'G','7'},{false,'F','m'},{false,'F'},{false,'G'}};// массив структур который инициализуется данными. первый элемент это значение которое определет есть ли в музыке данный аккрод. второй это название аккорода
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
 
 
//---------------------------------------------------------------------------
 
 
//---------------------------------------------------------------------------
 
void __fastcall TForm1::N4Click(TObject *Sender)
{
 int i=0,j=0;
 OpenDialog1->Execute();
        if(OpenDialog1->FileName.Length() != 0)
        {
                Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
                String a = Memo1->Lines->Text;
                for(i=0;i<strlen(a.c_str())-1;i++)
                {
                        for(j=0;j<8;j++)
                        {
                                if(j<6)
                                {
                                        if(a.c_str()[i]==Akk[j].Ak[0] && a.c_str()[i+1]==Akk[j].Ak[1])
                                        {Akk[j].hit=true;}
                                }
                                else
                                {
                                        if(a.c_str()[i]==Akk[j].Ak[0])
                                        {Akk[j].hit=true;}
                                }
                        }
                }
                for(i=0;i<8;i++)
                {
                        if(Akk[i].hit)
                        {
                                switch(i)
                                {
                                case 0:
                                        {L_Am->Font->Color=clRed;}break;
                                case 1:
                                        {L_A7->Font->Color=clRed;}break;
                                case 2:
                                        {L_Dm->Font->Color=clRed;}break;
                                case 3:
                                        {L_Em->Font->Color=clRed;}break;
                                case 4:
                                        {L_G7->Font->Color=clRed;}break;
                                case 5:
                                        {L_Fm->Font->Color=clRed;}break;
                                case 6:
                                        {L_F->Font->Color=clRed;}break;
                                case 7:
                                        {L_G->Font->Color=clRed;}break;
                                }
                        }
                }
        }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N7Click(TObject *Sender)
{
        Memo1->Clear();
        for(int i=0;i<8;i++)
        {
                Akk[i].hit=false;
        }
        L_Am->Font->Color=clBlack;
        L_A7->Font->Color=clBlack;
        L_Dm->Font->Color=clBlack;
        L_Em->Font->Color=clBlack;
        L_Fm->Font->Color=clBlack;
        L_F->Font->Color=clBlack;
        L_G->Font->Color=clBlack;
        L_G7->Font->Color=clBlack;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N6Click(TObject *Sender)
{
PostMessage(Application->Handle, WM_CLOSE, NULL, NULL);
}
//---------------------------------------------------------------------------

cpp_developer · 23.12.2010, 15:58

помогите - это не синоним "сделайте вместо меня" - и используйте тег [ CPP](без пробелов)[ /CPP] (с++) - код читается куда лучшее

@Ychandr · 23.12.2010, 16:05 **[ТС]**

Ну так поможите?

Добавлено через 3 минуты
Вот будет у вас проблема с базами данных обратитесь ко мне я помогу! А сдесь я дуб дубом!

Добавлено через 2 минуты
«Игра на гитаре»
Необходимо создать программу, которая позволит пользователю определять, как ставятся аккорды на грифе. Текст песни загружается .txt файлом. В окне будет располагаться песня с аккордами. Справа от окна располагаются табулатуры (расположение пальцев на грифе) которые подсвечены красным цветом.
Смысл программы!

@Ychandr · 23.12.2010, 16:12 **[ТС]**

Ребята помогите. а то препод завтра съест!

cpp_developer · 23.12.2010, 16:16

комментировать что-то типа

C++
1
2
3
int i=0,j=0;
OpenDialog1->Execute();
  if(OpenDialog1->FileName.Length() != 0)

- вы и сами справитесь

, а с аккордами - лес друмучий

.
гм...

C++
1
2
if(Akk[i].hit) // если нажат аккорд с индексом "і"
Akk[i].hit=false; // состояние аккорда с индексом "і" - "Не нажат"

... типа так

?

@Ychandr · 23.12.2010, 16:36 **[ТС]**

Спвсибо!

Добавлено через 19 минут

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

... типа так ?

типа ек так!
а вот так!
/*
Метод для вывода таблицы умножения
заданной размерности

// промежуточная переменная
public int my_variable;

// константы для кодов возврата приложения
#define RESULT_OK 0; // программа отработала правильно
#define RESULT_FAIL 1; // некорректное завершение программы

Входные данные
user_input – входная информация
output_stream – выходной поток

Возвращаемые данные: флаг результата обработки.
0 – успешно
1 и выше – код ошибки
*/

cpp_developer · 23.12.2010, 16:39

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
#include <vcl.h>
#pragma hdrstop
 
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
struct Akkord // определяем структуру "Аккорды"
{
bool hit;
char Ak[2];
};
TForm1 *Form1;
Akkord Akk[8] = {{false,'A','m'},{false,'A','7'},{false,'D','m'},{false,'E','m'},{false,'G','7'},{false,'F','m'},{false,'F'},{false,'G'}};// массив структур который инициализуется данными. первый элемент это значение которое определет есть ли в музыке данный аккрод. второй это название аккорода
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
  : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N4Click(TObject *Sender)
{
 int i=0,j=0;
 OpenDialog1->Execute();
  if(OpenDialog1->FileName.Length() != 0)
  {
    Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
    String a = Memo1->Lines->Text;
    for(i=0;i<strlen(a.c_str())-1;i++)
    {
      for(j=0;j<8;j++)
      {
        if(j<6)
        {
          if(a.c_str()[i]==Akk[j].Ak[0] && a.c_str()[i+1]==Akk[j].Ak[1])
          // если строка "а" с индексом [i] равна аккорду с индексом [0]
          {Akk[j].hit=true;} // состояние аккорда с индексом "j" - "Нажат"
        }
        else 
        {
          if(a.c_str()[i]==Akk[j].Ak[0]) 
          {Akk[j].hit=true;}
        }
      }
    }
    for(i=0;i<8;i++)
    {
      if(Akk[i].hit)  // если нажат аккорд с индексом "і"
      {
        switch(i)
        {
        case 0:
          {L_Am->Font->Color=clRed;}break; // если аккорд L_Am - цвет обозначения - "Красный"
        case 1:
          {L_A7->Font->Color=clRed;}break;
        case 2:
          {L_Dm->Font->Color=clRed;}break;
        case 3:
          {L_Em->Font->Color=clRed;}break;
        case 4:
          {L_G7->Font->Color=clRed;}break;
        case 5:
          {L_Fm->Font->Color=clRed;}break;
        case 6:
          {L_F->Font->Color=clRed;}break;
        case 7:
          {L_G->Font->Color=clRed;}break;
        }
      }
    }
  }
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N7Click(TObject *Sender)
{
  Memo1->Clear();
  for(int i=0;i<8;i++)
  {
    Akk[i].hit=false;
  }
  L_Am->Font->Color=clBlack; // если аккорд L_Am - цвет обозначения - "Черный"
  L_A7->Font->Color=clBlack;
  L_Dm->Font->Color=clBlack;
  L_Em->Font->Color=clBlack;
  L_Fm->Font->Color=clBlack;
  L_F->Font->Color=clBlack;
  L_G->Font->Color=clBlack;
  L_G7->Font->Color=clBlack;
}
//---------------------------------------------------------------------------
void __fastcall TForm1::N6Click(TObject *Sender)
{
PostMessage(Application->Handle, WM_CLOSE, NULL, NULL); // закрыть приложение
}
//---------------------------------------------------------------------------

@Ychandr · 23.12.2010, 16:41 **[ТС]**

Спасибо тебе мил человек!!!

cpp_developer · 23.12.2010, 17:09

учитывая, что я про эти аккорды слышу впервые

- не за что

Добавлено через 1 минуту
bool hit; // объявляем булевую переменную - "Состояние аккорда"

Добавлено через 24 минуты
кажись, все же так:

C++
1
2
3
4
5
6
7
8
if ( a.c_str()[i]==Akk[j].Ak[0] &&
     a.c_str()[i+1]==Akk[j].Ak[1] )
// если строка "а" с индексом [i]
// равна аккорду с индексом [j]
// строки с индексом [0]
// и строка "а" с индексом [i+1]
// равна аккорду с индексом [j]
// строки с индексом [1]

@Ychandr · 23.12.2010, 17:10 **[ТС]**

спасяб!!

Новые блоги и статьи Все статьи Все блоги /
Первый деплой lagorue 16.01.2026 Не спеша развернул своё 1ое приложение в kubernetes. А дальше мне интересно создать 1фронтэнд приложения и 2 бэкэнд приложения развернуть 2 деплоя в кубере получится 2 сервиса и что-бы они. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь постоянного тока с R, L, C, k(ключ), U, E, J. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа, решает её и находит токи на L и напряжения на C в установ. режимах до и. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Изучаю kubernetes lagorue 13.01.2026 А пригодятся-ли мне знания kubernetes в России?
Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/	WordPad для Windows 11 Jel 10.01.2026 WordPad для Windows 11 — это приложение, которое восстанавливает классический текстовый редактор WordPad в операционной системе Windows 11. После того как Microsoft исключила WordPad из. . .	Classic Notepad for Windows 11 Jel 10.01.2026 Old Classic Notepad for Windows 11 Приложение для Windows 11, позволяющее пользователям вернуть классическую версию текстового редактора «Блокнот» из Windows 10. Программа предоставляет более. . .	Почему дизайн решает? Neotwalker 09.01.2026 В современном мире, где конкуренция за внимание потребителя достигла пика, дизайн становится мощным инструментом для успеха бренда. Это не просто красивый внешний вид продукта или сайта — это. . .

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	23.12.2010, 15:58
	помогите - это не синоним "сделайте вместо меня" - и используйте тег [ CPP](без пробелов)[ /CPP] (с++) - код читается куда лучшее 1

@Ychandr 0 / 0 / 0 Регистрация: 23.12.2010 Сообщений: 6
	23.12.2010, 16:05 [ТС]
	Ну так поможите? Добавлено через 3 минуты Вот будет у вас проблема с базами данных обратитесь ко мне я помогу! А сдесь я дуб дубом! Добавлено через 2 минуты «Игра на гитаре» Необходимо создать программу, которая позволит пользователю определять, как ставятся аккорды на грифе. Текст песни загружается .txt файлом. В окне будет располагаться песня с аккордами. Справа от окна располагаются табулатуры (расположение пальцев на грифе) которые подсвечены красным цветом. Смысл программы! 0

@Ychandr 0 / 0 / 0 Регистрация: 23.12.2010 Сообщений: 6
	23.12.2010, 16:12 [ТС]
	Ребята помогите. а то препод завтра съест! 0

@Ychandr 0 / 0 / 0 Регистрация: 23.12.2010 Сообщений: 6
	23.12.2010, 16:41 [ТС]
	Спасибо тебе мил человек!!! 0

@Ychandr 0 / 0 / 0 Регистрация: 23.12.2010 Сообщений: 6
	23.12.2010, 17:10 [ТС]
	спасяб!! 0