sleep(3000); // игровой процесс замораживается на 3 секунды
room_goto_next(); // по истечении 3 секунд переходим в следующую комнату

//---------------------------------------------------------------------------

#include <vcl.h>
#pragma hdrstop
#include <fstream.h>

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
FILE *f;
struct Test
{
AnsiString a, b, c;
int d;
};

Test Ya[2];
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
         : TForm(Owner)
{
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Open1Click(TObject *Sender)
{
f = fopen("123.txt", "r");
int i;
for (i = 0; i < 2; i ++)
fscanf(f, "%10s%10s%10s%10u", Ya[i].a, Ya[i].b, Ya[i].c, &Ya[i].d);
Memo1->Clear();
Memo1->Lines->Add(Ya[i].a);
Memo1->Lines->Add(Ya[i].b);
Memo1->Lines->Add(Ya[i].c);
Memo1->Lines->Add(IntToStr(Ya[i].d));
fclose(f);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Save1Click(TObject *Sender)
{
f = fopen("123.txt", "w");
int i;
for (i = 0; i < 2; i ++)
fprintf(f, "%10s%10s%10s%10u", Ya[i].a, Ya[i].b, Ya[i].c, Ya[i].d);
fclose(f);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
Ya[0].a = "Текст1";
Ya[0].b = "Текст2";
Ya[0].c = "Текст3";
Ya[0].d = 10;
Ya[1].a = "Текст4";
Ya[1].b = "Текст5";
Ya[1].c = "Текст6";
Ya[1].d = 50;
}
//---------------------------------------------------------------------------

file.cpp `nocreate' is not a member of `std::ios'

#include <iostream.h>
#include <fstream.h>

int main()
{
ofstream F;

F.open("test.txt", ios::nocreate);
if (F) cout << "Opened!";
else cout << "Not opened";

system("Pause");
return 0;
}