Всем привет.При работе с массивом в C++ Builder 2009 возникла непонятная ситуация с выводом массива в Memo.Вот мой код:
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
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
| //---------------------------------------------------------------------------
#include <vcl.h>
#include <stdio.h>
#include <string.h>
#include <ctype.h>
#include <new.h>
#include <math.h>
#pragma hdrstop
#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
FILE *f;
int row=0;
int column=0;
char *col[100];
void newHandler();
//---------------------------------------------------------------------------
void newHandler()
{
MessageDlg("Недостаточно памяти!", mtError, TMsgDlgButtons() << mbOK, 0);
}
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button1Click(TObject *Sender)
{
char mas[1000][800];
int i=0,j=0;
int a;
int length; //количество символов в строке
int value; //размер массива angle_az
char *new_mas;
double *angle_az;
float step_az,step_pol; //шаг азимутального и полярного углов
char *start,*end; //указатели на начало и конец строки
Memo1->Clear();
if(OpenDialog1->Execute())
{
if((f=fopen(OpenDialog1->FileName.c_str(),"r")) == NULL) //открытие файла
{
ShowMessage("Файл не удалось открыть");//нет файла или выбран несуществующий
return;
}
else
{
Label1->Caption=OpenDialog1->FileName.c_str();
while(!feof(f))
{
fgets(mas[i], 800, f); //запись строк в массив
i++;
row++; //подсчет количества строк
}
row=row-5; //количество строк,содержащих только измерянные значения
length=strlen(mas[3]);//нахождение длині строки азим. углов
int size=length-15;
new_mas= new char[size];//выделение памяти под массив new_mas
set_new_handler(newHandler); //обработка ситуации при недостаточном обьеме
//памяти для выделения под массив
for(i=15; i<length; i++)
{
if((mas[3][i]=='C')||(mas[3][i]=='-'))
{
mas[3][i]=' '; //исключение из строки нечисловых элементов
}
new_mas[i-15]=mas[3][i];
}
//нахождение количества столбцов в массива,разбиением строк на лексемы
col[j]=strtok(mas[4]," ");
j++;
while (col[j-1]!=NULL)
{
col[j]=strtok(NULL," ");
j++;
column++;
}
column=column-1;
value=2*column+1; //подсчет количества элементов в массиве азимутальных углов
angle_az = new double[value]; //выделение памяти под массив angle_az
//извлечение и запись в массив азимутальных углов числовых данных
start=new_mas;
end=start;
j=0;
while(*start)
{
angle_az[j] = strtod(start,&end);
j++;
start=end;
while(!isdigit(*start)&& *start)
start++;
}
angle_az[value-1]=360;
//Memo1->Lines->Add(angle[26]);
//сортировка массива углов по возрастанию
for(i=0;i<value;i++)
{
for(j=value-1;j>i;j--)
{
if (angle_az[j-1]>angle_az[j])
{
a=angle_az[j-1];
angle_az[j-1]=angle_az[j];
angle_az[j]=a;
}
}
}
//расчет шага изменения азимутального угла
if((180%column)==0)
{
step_az=180/(float)column;
}
else
{
step_az=180/((float)column-1);
}
//расчет шага изменения полярного угла
step_pol=180/((float)row-1);
if((step_pol>0)&&(step_pol>=0.5))
{
step_pol=0.5;
}
for(j=0; j<value; j++)
{
Memo1->Lines->Add(angle_az[j]);
}
//Memo1->Lines->Add(value);
//Memo1->Lines->Add(size);
//Memo1->Lines->Add(FloatToStrF(step_pol,ffFixed,2,2));
}
delete[] angle_az;
delete[] new_mas;
//delete[] col;
}
fclose(f);
}
//---------------------------------------------------------------------------
void __fastcall TForm1::Button2Click(TObject *Sender)
{
Edit1->Text=IntToStr(row)+" "+"строчек";
Edit2->Text=IntToStr(column)+" "+"столбцов";
}
//--------------------------------------------------------------------------- |
|
при повторном чтении данных из файла появляется почему-то перед выводимыми числами еще 26 нулей и пробел в конце.Это странно...
Может кто сможет помочь...
Буду очень благодарен
Файлы проекта прилагаются