Сохраняем пароль в файл. Авторизация

TStringList data = new TStringList;
if (Key==VK_RETURN) { // or if (ButtoAccept->OnClick)
data->Add(Edit1->Text); // логин
data->Add(Edit2->Text); // пароль
data->SaveToFile("bigsecret.data");
}

TIniFile *User = new TIniFile("C:\\Users.ini");
User->WriteString("Users",0,Edit1->Text);
User->WriteString("Password","0",Edit2->Text);

struct adm
        {
        char log[15];
        char pas[15];
        adm *next;};
  char fname[]="D:\\pasw.dat";
  adm *admh=NULL;

Label4->Hide();
    FILE *dat;
   if((dat=fopen(fname,"r"))==NULL)
   Button2->Enabled=false;
   else Button2->Enabled=true;

    adm *a,*b;
    int i=1;
    if(admh!=NULL)
      {
        a=admh;
        i++;
        for(;a->next!=NULL;i++)
            {
             a=a->next;
            }
      }
 
        b=(adm*)malloc(sizeof(adm));//memory for struct
        AnsiString bufer;
        AnsiString bufer1;
        bufer=Edit1->Text;//ввод логин
        strcpy(b->log, bufer.c_str());
        bufer1=Edit2->Text;//ввод пароль
        bufer=Edit3->Text; //ввод пароль
    if(!strcmp(bufer1.c_str(),bufer.c_str())) //если пароль  2 раза введен верно
        strcpy(b->pas, bufer1.c_str());//copy  str v struct
    b->next=NULL;
    FILE *dat;
    dat=fopen(fname,"w");
    for(a=admh;a!=NULL;a=a->next)
        fprintf(dat,"%s %s \n",a->log,a->pas);
    fprintf(dat,"* \n",a->log);
    fprintf(dat,"***\n");
    fclose(dat);
    Form3->Hide();
    Form4->Show();

 FILE *dat;
     char ss[20];
     adm *a, *b;
      admh=NULL;
 
    do
     {
      fscanf(dat,"%s",ss);
       if(ss[0]!='*')
          {
            b=(adm *)malloc(sizeof(adm));
            if(admh==NULL) admh=b;
            else a->next=b;
            strcpy(b->log,ss);
            fscanf(dat,"%s %s \n",&(b->log),&(b->pas));
            b->next=NULL;
            a=b;
 
            }
      } while(ss[0]!='*');
     fclose(dat);
 
 
     AnsiString bufer;
     AnsiString bufer1;
     bufer=Edit1->Text;
     bufer1=Edit2->Text;
 
     if(!strcmp(b->log,bufer.c_str())||!strcmp(b->pas,bufer1.c_str()))
     //сравнение елементов структуры с введенными
     //вход зарегистрированого пользователя
     {
     Form2->Hide();
      Form4->Show();
      }
     else Label2->Caption="False!!" ;

 if ((Edit1->Text=="login")&&(Edit2->Text=="password")) Form3->Show();
 else ShowMessage("Íåâåðíûé ëîãèí èëè ïàðîëü!");

     Form1->ClientHeight = Panel0->Height ;
     Form1->ClientWidth  = Panel0->Width  ;
     Panel0->Left = 0; Panel0->Top = 0;