Добрый вечер. Столкнулся с проблемой чтения/записи в файл. Задача в следующем: есть структура, ее необходимо записать в файл, а затем считать, причем запись может осуществляться несколько раз.
Записть организована следующим образом:
struct str
{
int m;
AnsiString vrt;
};
struct str var;
FILE *F;
var.m = 1;
var.vrt = Edit2->Text;
F = fopen("file","ab+");
fwrite(&var,sizeof(struct str),1,F);
fclose(F);
struct str
{
int m;
AnsiString vrt;
};
struct str var;
FILE *F;
int i = 0;
F = fopen("file","rb");
while (!feof(F))
{
fseek(F,i*sizeof(struct varan),SEEK_SET);
fread(&var,sizeof(struct str),1,F);
Edit1->Text = "";
Edit1->Text = IntToStr(var.m);
Label1->Caption = var.vrt;
i++;
}
fclose(F);
void __fastcall TForm1::Button1Click(TObject *Sender)
{
struct str var;
FILE *F;
var.m = 1;
var.vrt = Edit2->Text;
ShowMessage(IntToStr((int)sizeof(struct str)));
F = fopen("file","ab+");
fwrite(&var,sizeof(struct str),1,F);
fclose(F);
}
тоесть если я правильно понял нужно указать количество байт?
struct str
{
int m;
AnsiString vrt[20];
};
struct str
{
int m;
char vrt[20];
};
так тоже не верно...
я помню когда в delphi объявляется запись нужно указывать количество байт т.е.
zapis = record
str: string[20]
end;
struct strТолько заполнять такой массив надо будет по-другому, простое присваивание уже не пройдет.
{
int m;
TCHAR vrt[20]; // в неюникодном проекте будет char, в юникодном - wchar_t
};
Владимир, а заполнять массив просто обычным циклом? например:
struct str
{
int m;
TCHAR vrt[20];
};
struct str var;
for (int i = 0; i <= strlen(var.vrt); i++)
{
var.vrt[i] = 'q';
}
Сделал, вроде все работает, но как то, если чесно криво я это реализрвал...
запись в файл:
struct str
{
int m;
TCHAR vrt[20];
};
struct str var;
FILE *F;
int i;
AnsiString str2 = Edit2->Text;
char *str = str2.c_str();
for (i = 0; i <= strlen(str); i++)
{
var.vrt[i] = str[i];
}
var.vrt[i-1] = '\0';
F = fopen("file","ab+");
fwrite(&var,sizeof(struct str),1,F);
fclose(F);
struct str
{
int m;
TCHAR vrt[20];
};
struct str var;
FILE *F;
int i = 0;
char *ch;
F = fopen("file","rb");
while (!feof(F))
{
fseek(F,i*sizeof(struct str),SEEK_SET);
fread(&var,sizeof(struct str),1,F);
Edit1->Text = "";
ch = var.vrt;
Label1->Caption = ch;
i++;
}
fclose(F);
// запись
void __fastcall TForm1::Button1Click(TObject *Sender)
{
struct str var;
FILE *F;
var.m = Edit2->Text.Length();
sprintf(var.vrt, "%s", Edit2->Text.t_str());
F = fopen("file","ab+");
fwrite(&var,sizeof(struct str),1,F);
fclose(F);
}
// чтение
void __fastcall TForm1::Button2Click(TObject *Sender)
{
struct str var;
FILE *F;
int i = 0;
F = fopen("file","rb");
while (!feof(F))
{
fseek(F,i*sizeof(struct str),SEEK_SET);
fread(&var,sizeof(struct str),1,F);
Edit1->Text = IntToStr(var.m);
AnsiString s = "";
s.printf("%s", var.vrt);
Label1->Caption = s;
i++;
}
fclose(F);
}
Владимир, спасибо Вам большое все работает.