Не могу создать ini файл

@iskatel73 · Регистрация: 21.12.2011

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

Привет всем.Нашёл пример как создать ini файл тутhttp://devoid.com.ua/faq/cpp_b... older.htmlДелал всё как написанно.Выдаёт ошибку

C++
1
2
3
4
5
[C++Error]Uint1.ccp(24): E2451 Undefined simbol 'TInifile'
[C++Error]Uint1.ccp(24): E2451 Undefined simbol 'Ini'
[C++Error]Uint1.ccp(24): E2303 Tyre name expected
[C++Error]Uint1.ccp(24): E2379 Statement missing;
[C++Error]Uint1.ccp(26): E2158 Operand of 'delete' must be non-const pointer

.Помогите пожалуйста.

@iskatel73 · 02.11.2012, 22:28 **[ТС]**

Разобрался надо было в той форме в который переходит удалить

C++
1
#include "Unit1.h"

@Dr. Who · 02.11.2012, 22:32

Теперь вы не сможете из второй формы управлять компонентами первой

@iskatel73 · 02.11.2012, 22:33 **[ТС]**

Спс большое а что делать чтоб можно было

@Dr. Who · 02.11.2012, 22:38

попробуй написать во второй форме extern TIniFile *Ini;

@iskatel73 · 02.11.2012, 22:39 **[ТС]**

Во всё ошибки нет сделал так

C++
1
extern TIniFile *Ini; //=  new TIniFile(Patch+"Klevalka.ini");

Спс большое за совет

@Dr. Who · 02.11.2012, 22:43

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

extern TIniFile *Ini; //= new TIniFile(Patch+"Klevalka.ini")

А зачем

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

//= new TIniFile(Patch+"Klevalka.ini");

@iskatel73 · 02.11.2012, 22:53 **[ТС]**

А как во 2 форме будет связь с ini файлом без этого

C++
1
extern TIniFile *Ini; //= new TIniFile(Patch+"Klevalka.ini")

@Dr. Who · 02.11.2012, 22:55

Я имею ввиду, зачем все, что после //?
Оно же заремлено.

@iskatel73 · 02.11.2012, 22:59 **[ТС]**

Это для меня чтоб знать для чего нужно

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

extern TIniFile *Ini;

@iskatel73 · 07.11.2012, 21:14 **[ТС]**

галочки в CheckListBox сохраняются но после закрытия они не читаются

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
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
TIniFile *Ini; //=  new TIniFile(Patch+"test.ini");
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
  {
  AnsiString Patch;
  Patch = ExtractFilePath(ParamStr(0)) ; // получаем путь к каталогу программы
  Ini = new TIniFile(Patch+"test.ini");
  for(int i = 0; i < CheckListBox1->Items->Count; i++)
     {
      CheckListBox1->Checked[i] = Ini ->ReadBool("fish",CheckListBox1->Items->Strings[i], false);
     }
}
 
 
//---------------------------------------------------------------------------
 
 void __fastcall TForm1::CheckListBox1Click(TObject *Sender)
{
    for(int i = 0; i < CheckListBox1->Items->Count; i++)
   {
    Ini->WriteBool("fish",CheckListBox1->Items->Strings[i],CheckListBox1->Checked[i]);
   }
 
   
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
delete Ini;
Ini = NULL;
}
//---------------------------------------------------------------------------

и ещё проблемка они идут подряд.
[fish]
Валек=1
Голец арктический=1
Голец Черского=0
Гольян Чекановского=0
Елец Сибирский=0
Карась золотой=0
Карась серебряный=0
Колюшка девятииглая=0
Корюшка=0
Ленок=0
Ленский пескарь=0
Ленский хариус=0
Лещ Восточносибирский=0
Муксун=0
Налим=0
Нельма=0
Окунь=0
но рыбы иногда повторяются.допустим окунь есть на амуре озере и ещё на 5 базах.если я ставлю галочку амур окунь она будет появлятся на волге на окуне.можно как нибудь сделать чтоб сначала прописывалась база с ListBox1 а потом рыбы с этой базы
[амга]
Голец арктический=1
Голец Черского=0
Гольян Чекановского=0
Елец Сибирский=0
Карась золотой=0
Карась серебряный=0
Колюшка девятииглая=0
[амур]
Ленский пескарь=0
Ленский хариус=0
Лещ Восточносибирский=0
Муксун=0
Налим=0
Нельма=0
Окунь=0

@iskatel73 · 12.11.2012, 12:22 **[ТС]**

привет всем.что не у кого нет вариантов что сделать?

@Sasha · 12.11.2012, 12:44

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

галочки в CheckListBox сохраняются но после закрытия они не читаются

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
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
 
TIniFile *Ini; //=  new TIniFile(Patch+"test.ini");
 
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
  {
  AnsiString Patch;
  Patch = ExtractFilePath(ParamStr(0)) ; // получаем путь к каталогу программы
  Ini = new TIniFile(Patch+"test.ini");
  for(int i = 0; i < CheckListBox1->Items->Count; i++)
     {
      CheckListBox1->Checked[i] = Ini ->ReadBool("fish",CheckListBox1->Items->Strings[i], false);
     }
}
 
 
//---------------------------------------------------------------------------
 
 void __fastcall TForm1::CheckListBox1Click(TObject *Sender)
{
    for(int i = 0; i < CheckListBox1->Items->Count; i++)
   {
    Ini->WriteBool("fish",CheckListBox1->Items->Strings[i],CheckListBox1->Checked[i]);
   }
 
   
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
delete Ini;
Ini = NULL;
}
//---------------------------------------------------------------------------

и ещё проблемка они идут подряд.
[fish]
Валек=1
Голец арктический=1
Голец Черского=0
Гольян Чекановского=0
Елец Сибирский=0
Карась золотой=0
Карась серебряный=0
Колюшка девятииглая=0
Корюшка=0
Ленок=0
Ленский пескарь=0
Ленский хариус=0
Лещ Восточносибирский=0
Муксун=0
Налим=0
Нельма=0
Окунь=0
но рыбы иногда повторяются.допустим окунь есть на амуре озере и ещё на 5 базах.если я ставлю галочку амур окунь она будет появлятся на волге на окуне.можно как нибудь сделать чтоб сначала прописывалась база с ListBox1 а потом рыбы с этой базы
[амга]
Голец арктический=1
Голец Черского=0
Гольян Чекановского=0
Елец Сибирский=0
Карась золотой=0
Карась серебряный=0
Колюшка девятииглая=0
[амур]
Ленский пескарь=0
Ленский хариус=0
Лещ Восточносибирский=0
Муксун=0
Налим=0
Нельма=0
Окунь=0

Помоему тут у тебя опять накручено с кодом

cpp_developer · 12.11.2012, 13:17

Вообще-то, в ини следует заносить не окуня, а переменную:

C++
1
2
3
4
5
6
7
8
9
10
11
12
AnsiString perch1,perch2,perch3,perch4,perch5;
perch1 = "окунь 1";
perch2 = "окунь 2";
perch3 = "окунь 3";
perch4 = "окунь 4";
perch5 = "окунь 5";
// в ини
perch1 = 0;
perch2 = 0;
perch3 = 1;
perch4 = 1;
perch5 = 0;

@iskatel73 · 12.11.2012, 18:55 **[ТС]**

LK получается если 40 окуней на разных базах .мне надо создать 40 переменных?

@Sasha · 12.11.2012, 18:59

А зачем ты вообще используешь переменные для рыб?

@iskatel73 · 12.11.2012, 19:37 **[ТС]**

Саня я не использую переменную.В ини у меня так
[fish]
Валек=0
Голец арктический=0
Голец Черского=0
Гольян Чекановского=0
Елец Сибирский=0
Карась золотой=0
Карась серебряный=0
Колюшка девятииглая=0

С галочками разобрался теперь читаются

просто надо было на ListBox1 ставить

C++
1
2
for(int i = 0; i < CheckListBox1->Items->Count; i++)
CheckListBox1->Checked[i] = Ini ->ReadBool("fish",CheckListBox1->Items->Strings[i], false);

Добавлено через 2 минуты
Мне теперь бы разобратся как в место [fish] ставилась база.чтоб с рыбами не мудрить

cpp_developer · 12.11.2012, 23:07

Переменные, я так понимаю, для разных видов окуня, сиречь, Окунь Балтийский и Окунь Небалтийский, это раз, и кто мешянет занести в переменную как там ваша база называется и прописать эту переменную как имя секции ини?

@iskatel73 · 13.11.2012, 22:04 **[ТС]**

LK,в том и проблема, что вид окунь один.но он водится на 15 базах.и когда я ставлю галочку на окуне на одной базе,то на 14 тоже стоят галочки.вот и думаю как сделать имя секции,именем базы.PS.базы загружаются у меня в ListBox1.При клике на базу в (ListBox1) загружаются рыбы с этой базы в CheckListBox1.Я так понимаю что при клике на ListBox1 должна создаваться секция с именем базы в ini (по которой был произведён клик)А как вот это сделать не знаю.

cpp_developer · 14.11.2012, 11:50

C++
1
2
AnsiString baseName = ListBox->Item;
Ini ->WriteString(baseName,Гольян Чекановского...

@iskatel73 · 15.11.2012, 20:27 **[ТС]**

LK,извини но я не совсем понял.

C++
1
AnsiString baseName = ListBox->Item;

это считывает какая база

C++
1
Ini ->WriteString(baseName,Гольян Чекановского...

а это какая рыба на базе.получается каждую рыбу прописывать?
Сейчас у меня вот такой код

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
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma link "trayicon"
#pragma resource "*.dfm"
TForm1 *Form1;
extern TIniFile *Ini; //=  new TIniFile(Patch+"Klevalka.ini");
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
    AnsiString Patch;
  Patch = ExtractFilePath(ParamStr(0)) ; // получаем путь к каталогу программы
   Ini = new TIniFile(Patch+"Klevalka.ini");
 
}
//---------------------------------------------------------------------------
void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action)
{
delete Ini;
Ini = NULL;
 
}
//---------------------------------------------------------------------------
 
 
void __fastcall TForm1::ListBox1Click(TObject *Sender)
{
   AnsiString name;
    name+="БЛОКНОТ\\";
    name+=ListBox1->Items->Strings[ListBox1->ItemIndex];
    name+="\\";
    name+="ИНФО";
    name+=".txt";
    ListBox2->Clear();
    ListBox2->Items->LoadFromFile(name);
    name="";
 
    for(int i = 0; i < CheckListBox1->Items->Count; i++)
CheckListBox1->Checked[i] = Ini ->ReadBool("fish",CheckListBox1->Items->Strings[i], false);//чтение галочек
 
}
 
//-загрузка наживок--------------------------------------------------------------------------
 
void __fastcall TForm1::CheckListBox1Click(TObject *Sender)
{
    AnsiString name;
    name+="ИНФО.О РЫБЕ\\";
    name+=CheckListBox1->Items->Strings[CheckListBox1->ItemIndex];
    name+="\\";
    name+="НАЖИВКА";
    name+=".txt";
    Memo2->Clear();
    Memo2->Lines->LoadFromFile(name);
    name="";
 
    for(int i = 0; i < CheckListBox1->Items->Count; i++)
 Ini->WriteBool("fish",CheckListBox1->Items->Strings[i],CheckListBox1->Checked[i]); //СОХРАНЕНИЯ ИНИ
 
//---------------------------------------------------------------------------

и куда твой код вставить?

Новые блоги и статьи Все статьи Все блоги /
Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .	Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .
Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .	мат медиц модель 30. презентация проекта anaschu 27.08.2026 хоп хоп хоп хидахоп, а я кладую))

@Dr. Who 29 / 29 / 4 Регистрация: 28.08.2012 Сообщений: 154
	02.11.2012, 22:32
	Теперь вы не сможете из второй формы управлять компонентами первой 0

@iskatel73 5 / 5 / 0 Регистрация: 21.12.2011 Сообщений: 157
	02.11.2012, 22:33 [ТС]
	Спс большое а что делать чтоб можно было 0

@Dr. Who 29 / 29 / 4 Регистрация: 28.08.2012 Сообщений: 154
	02.11.2012, 22:38
	попробуй написать во второй форме extern TIniFile *Ini; 1

@Dr. Who 29 / 29 / 4 Регистрация: 28.08.2012 Сообщений: 154
	02.11.2012, 22:55
	Я имею ввиду, зачем все, что после //? Оно же заремлено. 0

@iskatel73 5 / 5 / 0 Регистрация: 21.12.2011 Сообщений: 157
	12.11.2012, 12:22 [ТС]
	привет всем.что не у кого нет вариантов что сделать? 0

@iskatel73 5 / 5 / 0 Регистрация: 21.12.2011 Сообщений: 157
	12.11.2012, 18:55 [ТС]
	LK получается если 40 окуней на разных базах .мне надо создать 40 переменных? 0

@Sasha 4956 / 2420 / 531 Регистрация: 05.06.2008 Сообщений: 7,518 Записей в блоге: 3
	12.11.2012, 18:59
	А зачем ты вообще используешь переменные для рыб? 0

cpp_developer 20124 / 5691 / 417 Регистрация: 09.04.2010 Сообщений: 22,546 Записей в блоге: 1
	12.11.2012, 23:07
	Переменные, я так понимаю, для разных видов окуня, сиречь, Окунь Балтийский и Окунь Небалтийский, это раз, и кто мешянет занести в переменную как там ваша база называется и прописать эту переменную как имя секции ини? 0

@iskatel73 5 / 5 / 0 Регистрация: 21.12.2011 Сообщений: 157
	13.11.2012, 22:04 [ТС]
	LK,в том и проблема, что вид окунь один.но он водится на 15 базах.и когда я ставлю галочку на окуне на одной базе,то на 14 тоже стоят галочки.вот и думаю как сделать имя секции,именем базы.PS.базы загружаются у меня в ListBox1.При клике на базу в (ListBox1) загружаются рыбы с этой базы в CheckListBox1.Я так понимаю что при клике на ListBox1 должна создаваться секция с именем базы в ini (по которой был произведён клик)А как вот это сделать не знаю. 0