Ошибка при выводе бинарного файла

@Pavel_n · Регистрация: 07.04.2012

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

Добрый день!
Ошибка вот в чем: при сортировке массива, в одну ячейку StringGrid вставляет две переменные. И из-за этого наверно теряется одна строка файла. Вот скрин проблемы.
http://savepic.net/2743341.htm
Исходный код, вот:

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
#include <vcl.h>
#pragma hdrstop
#include <stdio.h>
#include <DateUtils.hpp>
#include "Unit1.h"
#include "bibl.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
int n=0;
//FILE *f2;
//---------------------------------------------------------------------------
 
void setka1(TStringGrid *sg)
{sg->Cells[0][0]="№";
sg->Cells[1][0]="Марка авто";
sg->Cells[2][0]="Производитель";
sg->Cells[3][0]="Тип";
sg->Cells[4][0]="Год выпуска";
sg->Cells[5][0]="Дата регистрации";
}
 
void setka2(TStringGrid *sg,int i)
{sg->Cells[1][i+1]=AnsiString(a.mark);
sg->Cells[2][i+1]=AnsiString(a.pr);
sg->Cells[3][i+1]=AnsiString(a.tip);
sg->Cells[4][i+1]=AnsiString(a.god);
sg->Cells[5][i+1]=AnsiString(a.d);
}
 
//Запись в файл
void __fastcall TForm1::Button1Click(TObject *Sender)
{
f1=fopen("avto.dat","ab+");
strcpy(a.mark,Edit1->Text.c_str());
strcpy(a.pr,Edit2->Text.c_str());
strcpy(a.tip,ComboBox1->Text.c_str());
strcpy(a.god,Edit3->Text.c_str());
strcpy(a.d,Edit4->Text.c_str());
fwrite(&a,sizeof(a),1,f1);
n++;
fclose(f1);
}
//---------------------------------------------------------------------------
//Просмотр файла
void __fastcall TForm1::Button2Click(TObject *Sender)
{
setka1(sg1);
int i=0;
f1=fopen("avto.dat","rb+");
while(fread(&a,sizeof(a),1,f1)>0)
{setka2(sg1,i);
i++;}
for(int j=1;j<=n;j++)
sg1->Cells[0][j]=IntToStr(j);
sg1->RowCount=i+1;
fclose(f1);
}
 
//---------------------------------------------------------------------------
// Сортировка массива
void __fastcall TForm1::Button4Click(TObject *Sender)
{
setka1(sg3);
int i,k=kol(f1);
avto *mas=new avto[k];
formir(f1,mas,k);
sort(mas,k);
for(i=0;i<=k;i++)
{sg3->Cells[1][i+1]=AnsiString(mas[i].mark);
sg3->Cells[2][i+1]=AnsiString(mas[i].pr);
sg3->Cells[3][i+1]=AnsiString(mas[i].tip);
sg3->Cells[4][i+1]=AnsiString(mas[i].god);
sg3->Cells[5][i+1]=AnsiString(mas[i].d);
}
{setka2(sg3,i);
i++;}
for(int j=1;j<=k;j++)
sg3->Cells[0][j]=IntToStr(j);
sg3->RowCount=k;
}

Вот библиотека bibl.cpp:

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
#pragma hdrstop
#include <stdio.h>
#include <DateUtils.hpp>
#include "bibl.h"
#pragma package(smart_init)
 
int kol(FILE *f1)
{int k=0;
f1=fopen("avto.dat","rb");
fseek(f1,0,2);
k=ftell(f1)/sizeof(a);
fclose(f1);
return k;
}
 
void formir(FILE *f1,avto mas[],int n)
{f1=fopen("avto.dat","rb");
for(int k=0;k<n;k++)
{fread(&a,sizeof(a),1,f1);
mas[k]=a;}
fclose(f1);
}
 
void sort(avto mas[],int k)
{int i,j;
avto z;
for(i=0;i<=k;i++)
for(j=i+1;j<k-1;j++)
if((AnsiString)mas[i].god<(AnsiString)mas[j].god)
{(avto)z=(avto)mas[i];
(avto)mas[i]=(avto)mas[j];
(avto)mas[j]=(avto)z;}
}

И bibl.h:

C++
1
2
3
4
5
6
7
8
9
#ifndef biblH
#define biblH
struct avto{char mark[20];char pr[15];char tip[10];char god[15];char d[10];}a;
FILE *f1;
 
int kol(FILE *f1);
void formir(FILE *f1,avto mas[],int n);
void sort(avto mas[],int k);
#endif

Заметил также, что в бинарный файл данные записываются без пробела, т.е. вот так:
"Toyota Япония Легковая 2007 12.05.2006Toyota Япония Легковая 2006 12.05.2006"

Может стоит поставить пробел при записи в бинарный файл? Если да, подскажите как.
Спасибо.

P.S. Задаю вопрос первый раз, если что не так прошу не ругать)))

@nick42 · 07.04.2012, 21:30

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

Если да, подскажите как.

Увеличьте значение поля d (у Вас 10 - это впритык: 11.11.2012 - десять символов) или добавьте пустое поле (пробел) в структуру после d.

@Pavel_n · 08.04.2012, 01:15 **[ТС]**

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

Увеличьте значение поля d (у Вас 10 - это впритык: 11.11.2012 - десять символов) или добавьте пустое поле (пробел) в структуру после d.

Помогло! Ура!
Спасибо большое.

Появилась еще одна проблема.
Описание: при сортировке не хочет учитывать последнюю введенную строку. Покажу на рисунках:
Рис1: то что в файле (3 строки):
http://savepic.net/2742371.htm
Рис2: сортировка (сортирует две первые):
http://savepic.net/2734179.htm
Формирование и сортировка происходит в библиотеке bibl.cpp:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
void formir(FILE *f1,avto mas[],int n)
{f1=fopen("avto.dat","rb");
for(int k=0;k<n;k++)
{fread(&a,sizeof(a),1,f1);
mas[k]=a;}
fclose(f1);
}
 
void sort(avto mas[],int k)
{int i,j;
avto z;
for(i=0;i<=k;i++)
for(j=i+1;j<k;j++)
if((AnsiString)mas[i].god<(AnsiString)mas[j].god)
{(avto)z=(avto)mas[i];
(avto)mas[i]=(avto)mas[j];
(avto)mas[j]=(avto)z;}
}

А вывод сортировки в StrinGrid вот:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
void __fastcall TForm1::Button4Click(TObject *Sender)
{
setka(sg3);
int i,k=kol(f1);
avto *mas=new avto[k];
formir(f1,mas,k);
sort(mas,k);
for(i=0;i<=k;i++)
{
sg3->Cells[1][i+1]=AnsiString(mas[i].mark);
sg3->Cells[2][i+1]=AnsiString(mas[i].pr);
sg3->Cells[3][i+1]=AnsiString(mas[i].tip);
sg3->Cells[4][i+1]=AnsiString(mas[i].god);
sg3->Cells[5][i+1]=AnsiString(mas[i].d);
}
for(int j=1;j<=k;j++)
sg3->Cells[0][j]=IntToStr(j);
sg3->RowCount=k;
}

И две (в моем примере одна) функции в этом выводе участвует:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
void setka(TStringGrid *sg)
{sg->Cells[0][0]="№";
sg->Cells[1][0]="Марка авто";
sg->Cells[2][0]="Производитель";
sg->Cells[3][0]="Тип";
sg->Cells[4][0]="Год выпуска";
sg->Cells[5][0]="Дата регистрации";
}
 
void zapoln(TStringGrid *sg,int i)
{
sg->Cells[0][i]=IntToStr(i);
sg->Cells[1][i]=AnsiString(a.mark);
sg->Cells[2][i]=AnsiString(a.pr);
sg->Cells[3][i]=AnsiString(a.tip);
sg->Cells[4][i]=AnsiString(a.god);
sg->Cells[5][i]=AnsiString(a.d);
i++;
sg->RowCount=i;
}

Если, кто-нибудь знает, подскажите как исправить ошибку или в каком блоке она находится.
Спасибо

@nick42 · 08.04.2012, 01:39

- глубоко не вникал, но в первом приближении вот здесь не правильно:

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

sg->Cells[5][i]=AnsiString(a.d);
i++;
sg->RowCount=i;

... RowCount на единицу больше номера последней строки, а в Вашем примере Вы строку не добавляете, а "подтверждаете" существующее состояние. Попробуйте

C++
1
->RowCount=i+2;

@Pavel_n · 08.04.2012, 04:23 **[ТС]**

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

- глубоко не вникал, но в первом приближении вот здесь не правильно:
... RowCount на единицу больше номера последней строки, а в Вашем примере Вы строку не добавляете, а "подтверждаете" существующее состояние. Попробуйте

C++
1
->RowCount=i+2;

Нет, не то. Это само заполнение и Я его именно в этом коде не использовал.
Но проблему нашел после Вашего сообщения

Вот где:

C++
1
2
3
4
5
6
7
sg3->Cells[4][i+1]=AnsiString(mas[i].god);
sg3->Cells[5][i+1]=AnsiString(mas[i].d);
}
for(int j=1;j<=k;j++)
sg3->Cells[0][j]=IntToStr(j);
sg3->RowCount=k+1;//Здесь поставил к+1
}

А в библиотеке:

C++
1
2
3
4
5
6
7
8
9
10
void sort(avto mas[],int k)
{int i,j;
avto z;
for(i=0;i<=k;i++)
for(j=i+1;j<k;j++)//Вот здесь убрал -1
if((AnsiString)mas[i].god<(AnsiString)mas[j].god)
{(avto)z=(avto)mas[i];
(avto)mas[i]=(avto)mas[j];
(avto)mas[j]=(avto)z;}
}

Огромное спасибо nick42 за помощь!

Новые блоги и статьи Все статьи Все блоги /
Модель заражения группы наркоманов alhaos 17.04.2026 Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .	Мысли в слух. Про "навсегда". kumehtar 16.04.2026 Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .	My Business CRM MaGz GoLd 16.04.2026 Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .	Знаешь почему 90% людей редко бывают счастливыми? kumehtar 14.04.2026 Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
Фиксация колонок в отчете СКД Maks 14.04.2026 Фиксация колонок в СКД отчета типа Таблица. Задача: зафиксировать три левых колонки в отчете. Процедура ПриКомпоновкеРезультата(ДокументРезультат, ДанныеРасшифровки, СтандартнаяОбработка) / / . . .	Настройки VS Code Loafer 13.04.2026 { "cmake. configureOnOpen": false, "diffEditor. ignoreTrimWhitespace": true, "editor. guides. bracketPairs": "active", "extensions. ignoreRecommendations": true, . . .	Оптимизация кода на разграничение прав доступа к элементам формы Maks 13.04.2026 Алгоритм из решения ниже реализован на нетиповом документе, разработанного в конфигурации КА2. Задачи, как таковой, поставлено не было, проделанное ниже исключительно моя инициатива. Было так:. . .	Контроль заполнения и очистка дат в зависимости от значения перечислений Maks 12.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеПерсонала", разработанного в конфигурации КА2. Задача: реализовать контроль корректности заполнения дат назначения. . .