Почему не читается файл?

//---------------------------------------------------------------------------
 
#pragma hdrstop
#include <stdio.h>
#include <conio.h>
 
//---------------------------------------------------------------------------
 
#pragma argsused
void main()
{
FILE *tmpFile;
char dummy[100];
  tmpFile = fopen ("SNCL.CSQ","r");
  if (tmpFile!=NULL)
  {
    fgets(dummy,50,tmpFile);
    printf("%s",dummy);
    fclose (tmpFile);
  }
getch();
}
//---------------------------------------------------------------------------

(char*)asTmp.c_str()

//---------------------------------------------------------------------------
 
#include <vcl.h>
#pragma hdrstop
 
#include "UnTest.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
       int iFil, err;
        AnsiString asDataFil;
        char buffer[100];
        iFil=FileOpen(".\\SNCL.CSQ",fmOpenRead);
        //Чтение строки из 25 символов.
        err=FileRead(iFil, buffer, 25);
        if (err==-1||err==0) //Если файл пустой
                {
                        ShowMessage("Файл пустой!");
                        return ;
                }
        asDataFil = buffer;//содержимое файла
        if (Button1->Caption=="Записать")
            {Label2->Caption= asDataFil;
            Button1->Caption="Стереть";}
        else
            {Label2->Caption= "";
            Button1->Caption="Записать";}
 
        FileClose(iFil);
}
//---------------------------------------------------------------------------

int iFil;
AnsiString asTmp, asOut;
 
iFil=FileCreate(".\\SNCL.SCQ");
FileWrite(iFil, asTmp.c_str(), asTmp.Length());
FileClose(iFil);

int iFil;
AnsiString asTmp, asOut;
 
iFil=FileCreate(".\\SNCL.SCQ");
FileWrite(iFil, asTmp.c_str(), asTmp.Length());
FileClose(iFil);