Чтение освоил, всем спасибо, а запись не дается!
Не подскажите в чем беда?
Мой ini файл имеет структуру:
[FirmP]
Block=0
[FirmV]
Block=0
[FirmS]
Block=1
[FirmC]
Block=0
Код куска программы такой:
void LockDay(char *Sector)
{
int Block = 0;
TIniFile *ini;
ini = new TIniFile("J:\\Graph3\\data.ini");
ini->WriteInteger( Sector, "Block", 1);
  if (Block == 1)
   {Form2->BitBtn8->Enabled = false;
    Form2->BitBtn9->Enabled = false;
    Form2->BitBtn10->Enabled = false;}
  else
   {Form2->BitBtn8->Enabled = true;
    Form2->BitBtn9->Enabled = true;
    Form2->BitBtn10->Enabled = true;}
delete ini;
}
void __fastcall TForm3::Edit1KeyPress(TObject *Sender, char &Key)
{
if (Key==char(13))
{
if (Form3->Edit1->Text == "3038544")
 {
 if (Form2->Edit2->Text == "F")
  {
  if (Form2->Edit3->Text == "P")
   {LockDay("FirmP");}
  else
   {
   if (Form2->Edit3->Text == "V")
    {LockDay("FirmV");}
   else
     {
     if (Form2->Edit3->Text == "S")
      {LockDay("FirmS");}
     else
       {
       if (Form2->Edit3->Text == "C")
        {LockDay("FirmC");}
       else
         {
         if (Form2->Edit3->Text == "Y")
          {LockDay("FirmY");}
         else
           {
           if (Form2->Edit3->Text == "U")
            {LockDay("FirmU");}
           else
             {
             if (Form2->Edit3->Text == "W")
              {LockDay("FirmW");}
  }}}}}}}
  Form3->Close();
 }
else
 {ShowMessage("Ну если не знаешь пароль, чего суешь нос?");
 Form3->Close();}
}
}
Хотел получить следующее, в эдитах буквы P/V/S/C/Y/U/W
В зависимости от буквы надо менять значение Block c нуля на единицу, в определенном контейнере. Какой контейнер - видно из цепочки if`ов, при верно набранном парроле 3038544.
То есть если пароль набран верно, то читаю на другой форме, какая буква содержится в эдите, и от этого меняю в определенном sector значение block
Соответственно сектор должен принимать значения "FirmP", "FirmV", "FirmS" и т.д.