Сохранения результатов программы в файл

@Best777 · Регистрация: 09.01.2013

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

Здраствуйте всем.

Создаю программу "Среда для создания экспертных систем" на c++ Builder 6. Вопросы создаются как названия в GroupBox-сах а варианты как CheckButton или RadioButton внутри этих GroupBox-сов. Понятно что они создаются динамически.

Нужно чтоб когда нажата кнопка Сохранить все даные сохранялись в файл например txt(Вам знать какой лучше).
И после того как программа перезапускалась и нажата кнопка Загрузить все какбы Я думаю пересоздавались у цыкле снова на форму. Как это лучше зделать??? Помогите пожалуйста. Если можно какие та наброски(программы),
Или просто на словах с чего начать. Буду очень благодарен.

@Best777 · 14.01.2013, 04:11 **[ТС]**

еще один вопросик:

как записать свойство parent?

пишу так:

C++
1
Ini->WriteString("GroupBox",AnsiString("Parent")+AnsiString(i),KNOPKA[i]->Parent);

видает ошибки:

C++
1
2
[C++ Error] Unit1.cpp(1077): E2034 Cannot convert 'TWinControl * const' to 'AnsiString'
[C++ Error] Unit1.cpp(1077): E2342 Type mismatch in parameter 'Value' (wanted 'const AnsiString', got 'TWinControl *')

как исправить??

@BRcr · 14.01.2013, 04:26

C++
1
KNOPKA[i]->Parent->Name

@Best777 · 14.01.2013, 05:20 **[ТС]**

блин. заработало но неправильно...
не записывает ето свойство всеравно!

C++
1
2
3
4
5
6
[number]
number=1
[GroupBox]
Parent1=
Left1=11
Top1=104...

может еще вариант есть?
просто если parent не указать то объект не пересоздастца правильно.
У меня
KNOPKA[i]->Parent=PageControl1->ActivePage;

Добавлено через 21 минуту
наверное все дело в том что PageControl1->ActivePage не имеет нормального имени!(
виводил KNOPKA[i]->Parent->Name в Edit->Text--- пусто.

@BRcr · 14.01.2013, 14:34

C++
1
2
3
4
5
6
7
void __fastcall TForm1::btn1Click( TObject *Sender )
{
    TButton *bt = new TButton( this );
    bt->Parent = pgctrl1->ActivePage;
    bt->Caption = "new button";
    Caption = bt->Parent->Name;
}

Все арбайтен как положено. Выкладывай код...

@Best777 · 14.01.2013, 15:07 **[ТС]**

У вас тогда наверно новее версия с++ builder или что?,потому что я тоже самое пишу:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 KNOPKA[N] = new TGroupBox(Form1);
  
         
KNOPKA[N]->Parent = PageControl1->ActivePage;
              Edit8->Text=KNOPKA[N]->Parent->Name;
        if(top<400){
        KNOPKA[N]->Left = 11;
        KNOPKA[N]->Top = 4+N*100;}
        else{
         KNOPKA[N]->Left = 4+N*10;
        KNOPKA[N]->Top = 300;}
              KNOPKA[N]->ParentColor=false;
            KNOPKA[N]->Color=ColorBox1->Selected;
        KNOPKA[N]->Font->Color=clNavy;
        if(Form1->Edit2->Text.Length()>12){
         KNOPKA[N]->Width=140+2*Form1->Edit2->Text.Length();} //äîïðàöþâàòè(íå ïðàâåëüíà ôîðìóëà)
        else {KNOPKA[N]->Width=140;}
        KNOPKA[N]->Name=AnsiString("KNOPKA")+ AnsiString(N);
        KNOPKA[N]->Font->Size=14;
  KNOPKA[N]->Caption =Edit2->Text;

наверно в моей 6 версии Borland c++ ето не доработано.... какое ваше мнения?

Добавлено через 1 минуту
от того что заминил Form1 на this нічего не поменялось...

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

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

Caption = bt->Parent->Name;

Caption--простая переменная?

mimicria · 14.01.2013, 15:30

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

наверно в моей 6 версии Borland c++ ето не доработано.... какое ваше мнения?

В моей 6 всё доработано

C++
1
2
3
4
    TButton *bt = new TButton( this );
    bt->Parent = Form1;
    bt->Caption = "new button";
    ShowMessage(bt->Parent->Name);

Показывает родителя как и положено - Form1

@BRcr · 14.01.2013, 15:37

Caption эквивалентно this->Caption, то бишь это свойство формы в данном случае.

У меня XE.
Вероятно, глюк билдера какой-то... эти групбоксы хоть появляются на вкладке-то?
Еще можешь попробовать создать пустой проект и протестировать это поведение в нем...

Добавлено через 3 минуты
Где у тебя этот код выполняется?

@Best777 · 14.01.2013, 15:52 **[ТС]**

сори...
на чистом проекте етот код идет.
Я нашел ошибку: Когда названия стандартное(TabSheet[i]) тогда все норм. а у меня кнопкой можно свое названия записывать и тогда ничего не записуетса в ini файл и если просто вывести на Edit то тоже пусто!
как ето выправить если я хочу что б названия били написание на русском? (Получается что названия parent оно берет с TabSheet1->Caption) почему так?? спасибо что помогаете!!
меняю названия так:

C++
1
2
3
int j=PageControl1->ActivePageIndex+1;
  tab[j]->Caption="";
  tab[j]->Caption=AnsiString(Edit5->Text);

Добавлено через 4 минуты
BRcr Все показуется все работает, но не записывается parent в ini-файл.
Полюбом названия parent есть, потому что оно б так не создалось на вкладке.

Добавлено через 4 минуты
извини mimicria у меня проблема с PageControl1->ActivePage. если тебе не сложно можешь создать на форме
PageControl1 и на создавать там вкладок(правий клик->new page). Потом создать кнопку и туда запихнуть тот код что у меня више и Edit1 создать. Потом поменять названия вкладок на шото русское и вывести
Edit1->Text=KNOPKA[N]->Parent->Name;. пожалуйста...

Добавлено через 1 минуту
В Edit1 что то вывелось?

mimicria · 14.01.2013, 16:00

Да без разницы

C++
1
2
3
4
 TButton *bt = new TButton( this );
 bt->Parent = PageControl1->ActivePage;
 bt->Caption = "new button";
 ShowMessage(bt->Parent->Name);

А название Табшита меняете через Caption? Или таки Name ?

@Best777 · 14.01.2013, 16:03 **[ТС]**

Через Caption.
По любом глюк какой то...

mimicria · 14.01.2013, 16:06

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

tab[j]->Caption=AnsiString(Edit5->Text);

А, табы тоже динамические? Как имена табам присваиваются?

@BRcr · 14.01.2013, 16:09

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

Как имена табам присваиваются?

Чувствую, что никак...

mimicria · 14.01.2013, 16:17

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

Чувствую, что никак...

Это решило бы вопрос с пустотой в паренте, и это черт возьми работает

C++
1
2
3
4
5
 TTabSheet *mytab = new TTabSheet(PageControl1);
 mytab->Parent=PageControl1;
 mytab->PageControl=PageControl1;
// mytab->Name="MyTab"; // всё покажем и без name
 mytab->Caption="Тест";

@Best777 · 14.01.2013, 16:30 **[ТС]**

Присваиваю так:

C++
1
tab[np]->Name=AnsiString("Stor")+AnsiString(np);

шас допишу твои строчки...

mimicria · 14.01.2013, 16:38

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

tab[np]->Name=AnsiString("Stor")+AnsiString(np );

Если уж на то пошло, то

C++
1
tab[np]->Name="Stor"+IntToStr(np);

@Best777 · 14.01.2013, 16:53 **[ТС]**

блин! перепутал формы вместо tab[np]->Parent=Form1->PageControl1 написано tab[np]->Parent=Form4->PageControl1
спасибо вам огромное!

Итак следующий вопрос от нуба в ini файлах:
я ище записую результати в файл. пишу так:

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
if (SaveDialog1->Execute()){
TIniFile *Ini = new TIniFile(SaveDialog1->FileName);
 
Ini->WriteInteger("number","number",N);//10 --ê³ëüê³ñòü
 
for(int i=1;i<=N;i++){
 
Ini->WriteString("GroupBox",AnsiString("Parent")+AnsiString(i),KNOPKA[i]->Parent->Name);//ошибка здесь
 
Ini->WriteInteger("GroupBox",AnsiString("Left")+AnsiString(i),KNOPKA[i]->Left);
Ini->WriteInteger("GroupBox",AnsiString("Top")+AnsiString(i),KNOPKA[i]->Top);
Ini->WriteInteger("GroupBox",AnsiString("Height")+AnsiString(i),KNOPKA[i]->Height);
Ini->WriteInteger("GroupBox",AnsiString("Width")+AnsiString(i),KNOPKA[i]->Width);
Ini->WriteString("GroupBox",AnsiString("Caption")+AnsiString(i),KNOPKA[i]->Caption);
Ini->WriteBool("GroupBox",AnsiString("ParentColor")+AnsiString(i),KNOPKA[i]->ParentColor);
Ini->WriteString("GroupBox",AnsiString("Color")+AnsiString(i),KNOPKA[i]->Color);
Ini->WriteString("GroupBox",AnsiString("FontColor")+AnsiString(i),KNOPKA[i]->Font->Color);
Ini->WriteString("GroupBox",AnsiString("Name")+AnsiString(i),KNOPKA[i]->Name);
 
delete KNOPKA[i];
}
delete Ini;
N=1;
Label1->Caption=SaveDialog1->FileName;
}

считую так:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
if (OpenDialog1->Execute()){
TIniFile *Ini = new TIniFile(OpenDialog1->FileName);
 
int i=Ini->ReadInteger("number","number",0);
 
   for(int j=1;j<=i;j++){
   KNOPKA[j] = new TGroupBox(Form1);
 
 KNOPKA[j]->Parent->Name=Ini->ReadString("GroupBox",AnsiString("Parent")+AnsiString(j),"Form1");
 
      Edit8->Text=KNOPKA[j]->Parent->Name;
  //KNOPKA[j]->Name=Ini->ReadString("GroupBox",AnsiString("Name")+AnsiString(i),"none");
   //KNOPKA[j]->Left =Ini->ReadInteger("GroupBox",AnsiString("Left")+AnsiString(j),0);
   //KNOPKA[j]->Top = Ini->ReadInteger("GroupBox",AnsiString("Top")+AnsiString(j),0);;
 //  KNOPKA[j]->Caption=Ini->ReadString("GroupBox",AnsiString("Caption")+AnsiString(j),"íå íàéäåíî");;
 //  KNOPKA[j]->ParentColor=Ini->ReadBool("GroupBox",AnsiString("ParentColor")+AnsiString(j),true);
 
   }  } //  }

при записи ini файл виглядит так:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
[number]
number=1
[GroupBox]
Parent1=Stor1
Left1=11
Top1=104
Height1=100
Width1=140
Caption1=вв
ParentColor1=0
Color1=255
FontColor1=8388608
Name1=KNOPKA1

вибивает ошибку сообщениям уже при роботе програмы что :

@Best777 · 14.01.2013, 16:56 **[ТС]**

если там где загружает написать статическое parent то работает без ошибки.
может не правильно записал parent или Stor1 оно почему то не видит...
подскажите пожалуйста.

mimicria · 14.01.2013, 16:57

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

for(int j=1;j<=i;j++)

Индексы массива от 1 до 10, а массив как объявлен? Про нумерацию с 0 не забыли?

@Best777 · 14.01.2013, 17:04 **[ТС]**

Stor[i]--так и осталась caption в Tabsheet...

Добавлено через 2 минуты
TGroupBox *KNOPKA[30];
но у меня N стартует при создавании с 1

Добавлено через 4 минуты
ради интереса пробивал считать без цикла. та самая ошибка. значит тепер уже не правильно считую свое названия вкладки как parent KNOPKA[i];

mimicria · 14.01.2013, 17:19

Конечно неправильно. В файл пишется Parent->Name - это только строка с именем.
А при загрузке Component->Parent требует не строку, а полноценный TWinControl

Новые блоги и статьи Все статьи Все блоги /
Нейросеть на алгоритме "эстафета хвоста" как перспектива. Hrethgir 06.05.2026 На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .	Асинхронный приём данных из COM-порта Argus19 01.05.2026 Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .	попытка написать игровой сервер на C++ pyirrlicht 29.04.2026 попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .	Контроль уникальности выбранного документа-основания при изменении реквизита Maks 28.04.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .
Благородство как наказание Maks 24.04.2026 У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .	Валидация и контроль данных табличной части документа перед записью Maks 22.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .	Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .

@Best777 2 / 2 / 0 Регистрация: 09.01.2013 Сообщений: 134

	Сохранения результатов программы в файл 09.01.2013, 19:01. Показов 6430. Ответов 58 Метки нет (Все метки) Здраствуйте всем. Создаю программу "Среда для создания экспертных систем" на c++ Builder 6. Вопросы создаются как названия в GroupBox-сах а варианты как CheckButton или RadioButton внутри этих GroupBox-сов. Понятно что они создаются динамически. Нужно чтоб когда нажата кнопка Сохранить все даные сохранялись в файл например txt(Вам знать какой лучше). И после того как программа перезапускалась и нажата кнопка Загрузить все какбы Я думаю пересоздавались у цыкле снова на форму. Как это лучше зделать??? Помогите пожалуйста. Если можно какие та наброски(программы), Или просто на словах с чего начать. Буду очень благодарен. 0

@BRcr 4043 / 2333 / 292 Регистрация: 03.02.2011 Сообщений: 5,066 Записей в блоге: 10
	14.01.2013, 15:37
	Caption эквивалентно this->Caption, то бишь это свойство формы в данном случае. У меня XE. Вероятно, глюк билдера какой-то... эти групбоксы хоть появляются на вкладке-то? Еще можешь попробовать создать пустой проект и протестировать это поведение в нем... Добавлено через 3 минуты Где у тебя этот код выполняется? 0

@Best777 2 / 2 / 0 Регистрация: 09.01.2013 Сообщений: 134
	14.01.2013, 16:03 [ТС]
	Через Caption. По любом глюк какой то... 0

@Best777 2 / 2 / 0 Регистрация: 09.01.2013 Сообщений: 134
	14.01.2013, 16:56 [ТС]
	если там где загружает написать статическое parent то работает без ошибки. может не правильно записал parent или Stor1 оно почему то не видит... подскажите пожалуйста. 0

@Best777 2 / 2 / 0 Регистрация: 09.01.2013 Сообщений: 134
	14.01.2013, 17:04 [ТС]
	Stor[i]--так и осталась caption в Tabsheet... Добавлено через 2 минуты TGroupBox KNOPKA[30]; но у меня N стартует при создавании с 1 Добавлено через 4 минуты* ради интереса пробивал считать без цикла. та самая ошибка. значит тепер уже не правильно считую свое названия вкладки как parent KNOPKA[i]; 0

mimicria return (true); 1977 / 1112 / 221 Регистрация: 19.04.2011 Сообщений: 2,346
	14.01.2013, 17:19
	Конечно неправильно. В файл пишется Parent->Name - это только строка с именем. А при загрузке Component->Parent требует не строку, а полноценный TWinControl 0