работа с файлами

[one_awful_sing]

файл находится в папке windows, windows 7

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

#include <vcl.h>
#include <IniFiles.hpp>
#pragma hdrstop

#include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
: TForm(Owner)
{
}
//---------------------------------------------------------------------------

String wd ;
char wid[256] ;
TMemIniFile *myIni;

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

void __fastcall TForm1::FormCreate(TObject *Sender)
{
GetWindowsDirectory(wid,256);
wd = wid;
myIni=new TMemIniFile(wd+"\\system.ini");
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button1Click(TObject *Sender)
{
Edit1->Text = myIni->ReadString("vcache","minfilecache" ,"");
Edit2->Text = myIni->ReadString("vcache","maxfilecache" ,"");
Edit3->Text = myIni->ReadString("vcache","chunksize","" );
}
//---------------------------------------------------------------------------

void __fastcall TForm1::Button2Click(TObject *Sender)
{
myIni->WriteString("vcache","minfilecache ",Edit1->Text);
myIni->WriteString("vcache","maxfilecache ",Edit2->Text);
myIni->WriteString("vcache","chunksize",E dit3->Text);
myIni->UpdateFile() ;
}
//---------------------------------------------------------------------------

[one_awful_sing]

это как вы поняли ваша программа пока что.

[nick42]

- у меня тоже Windows 7; я запускаю эту "свою" программу; нажимаю верхнюю клавишу; нажимаю нижнюю; открываю файл system.ini и вижу следующее__
Я думаю, причина в степени допуска (или разрешения для пользователя); ищите там.

[one_awful_sing]

спасибо большое.

[Krok27]

#include <dialogs.hpp>

void __fastcall TForm1::Button1Click(TObject *Sender)
{
       //GetWindowsDirectory(wid,256);
       TOpenDialog* Dialog = new TOpenDialog(this);
       Dialog->Filter = "Файл System.ini|System.ini";
       if(Dialog->Execute())
       {
        TMemIniFile *myIni = new TMemIniFile(Dialog->FileName);
        Edit1->Text = myIni->ReadString("vcache","minfilecache","");
        Edit2->Text = myIni->ReadString("vcache","maxfilecache","");
        Edit3->Text = myIni->ReadString("vcache","chunksize","");
         delete myIni;
        
       }
       
       delete Dialog;
}

void __fastcall TForm1::Button2Click(TObject *Sender)
{

       TOpenDialog* Dialog = new TOpenDialog(this);
       Dialog->Filter = "Ôàéë System.ini|System.ini";
       if(Dialog->Execute())
       {

                TMemIniFile *myIni = new TMemIniFile(Dialog->FileName);
                myIni->WriteString("vcache","minfilecache",Edit1->Text);
                myIni->WriteString("vcache","maxfilecache",Edit2->Text);
                myIni->WriteString("vcache","chunksize",Edit3->Text);
                myIni->UpdateFile() ;
                delete  myIni;
               
       }
        
        delete Dialog;
}

[Smitt&Wesson]

#include "inifiles.hpp"; // грузим библиотеку
#include "SystemUtils.hpp";

AnsiString sys = ExpandFileName("system.ini");// Имя файла с путём к нему
if(!FileExists(sys)) // Файл не существует
{// создаём
TIniFile *Ini = new TIniFile(sys);//
Ini->WriteString("vcache", "minfilecache", "");
Ini->WriteString("vcache", "maxfilecache", "");
Ini->WriteString("vcache", "chunksize", "");
Ini->UpdateFile(sys);
delete Ini;
}
else
{
TIniFile *Ini = new TIniFile(sys);//
Ini->WriteString("vcache", "minfilecache", "");
Ini->WriteString("vcache", "maxfilecache", "");
Ini->WriteString("vcache", "chunksize", "");
Ini->UpdateFile(sys);
delete Ini;
}