Чтение файла в Builder.

[серофим]

Здравствуйте, пытаюсь записать\считать массив int-ов через OpenDialog\SaveDialog , но столкнулся с непонятной ошибкой и не знаю что делать - в интернете информации найти не удалось . Буду признателен ,если подскажете ,что же я делаю не так:

void __fastcall TForm1::Button6Click(TObject *Sender)
{
FILE *f;
int a,n=0;
char *s=new char;
 if (!OpenDialog1->Execute()) return;
 s=(char *)&(OpenDialog1->FileName);
 if( (f=fopen(s,"w+b"))==NULL)
 Edit1->Text="Ошибка";     
...
 fclose(f);
}

[Stilet]

Раз уж в Бульдере, по играй по его правилам:

void __fastcall TForm1::Button6Click(TObject *Sender)
{
int a,n=0;
 if (!OpenDialog1->Execute()) return;
 try{
  TFileStream *f=new TFileStream (OpenDialog1->FileName,fmCreate);
 } catch(Exception e) {
  Edit1->Text="Ошибка "+e.message;
  return;
 }     
...
Здесь пишем в файл методом f->WriteBuffer(...)
...
 if(f) f.Free();
}

Направление понятно?

(char *)&(

Кстати, по-моему это глупость.

[серофим]

Понятно ,более-менее ,спасибо.А (char *)&( вполне работало с open .