请教Edit物件要怎么把它存成text档?可以读取

请问Edit物件要如何把它存成text档?可以读取

请问Edit物件要如何把它存成text档?
但也要能去读text档案到edit里面
有哪个高手可以帮帮忙吗?


下面这有两段读取码我目前可以成功把StringGrid存成text档然后又可以读取text档后写入StringGrid
如果可以的话要怎么样把Edit也加进来这程式里面呢?

void __fastcall TForm1::Button6Click(TObject *Sender)   //存成text

{

 if(SaveDialog2->Execute())

 {

 TStringList *Tempfile=new TStringList();

    for (int i=0;i < StringGrid1->RowCount;i++)

    {

        String Temptxt;

        Temptxt=StringGrid1->Cells[0][i];

        for (int j=0;j < StringGrid1->ColCount;j++)

        {

        Temptxt=Temptxt + "," + StringGrid1->Cells[j+1][i];

        }

        Tempfile->Add(Temptxt);

    }

    Tempfile->SaveToFile(SaveDialog2->FileName);


    delete Tempfile;

    }

}

void __fastcall TForm1::Button2Click(TObject *Sender)   //读取text到StringGrid里面

{

    if(OpenDialog1->Execute())

    {

    TStringList *Tempfile=new TStringList;

    Tempfile->LoadFromFile(OpenDialog1->FileName);

    StringGrid1->RowCount=Tempfile->Count;

    for(int i=0;i < StringGrid1->ColCount; i++)

    {

        TStringList *Temptext=new TStringList;

        Temptext->CommaText=Tempfile->Strings[i];

        for(int j=0; j < StringGrid1->RowCount; j++)

        {

        StringGrid1->Cells[j][i]=Temptext->Strings[j];

        }

        delete Temptext;

    }


    delete Tempfile;

    }

}

------解决方案--------------------
太简单了，怕理解错了你的意思

void __fastcall TForm1::Button6Click(TObject *Sender)   //存成text

{

 if(SaveDialog2->Execute())

 {

	TStringList *Tempfile=new TStringList();

	Tempfile->Add(Edit1->Text);

	Tempfile->Add(Edit2->Text);

     

    Tempfile->SaveToFile(SaveDialog2->FileName);

    delete Tempfile;

    }

}


void __fastcall TForm1::Button2Click(TObject *Sender)   //读取text到StringGrid里面

{

    if(OpenDialog1->Execute())

    {

    TStringList *Tempfile=new TStringList;

    Tempfile->LoadFromFile(OpenDialog1->FileName);

	Edit1->Text = 	Tempfile->Strings[0];

	Edit2->Text = 	Tempfile->Strings[1];

    delete Tempfile;

    }

}

------解决方案--------------------
Temptext->add(edit->text);

我用的手机，你调整一下大小写
------解决方案--------------------

#include <inifiles.hpp>


void __fastcall TForm1::Button6Click(TObject *Sender)

{

    if (SaveDialog2->Execute())

    {

        TIniFile *ini = new TIniFile(SaveDialog2->FileName);

        for (int i = 0;i < StringGrid1->RowCount; i++)

        {

            String Temptxt;

            Temptxt = StringGrid1->Cells[0][i];

            for (int j = 0; j < StringGrid1->ColCount; j++)

            {

                Temptxt = Temptxt + "," + StringGrid1->Cells[j+1][i];

            }

            ini->WriteString("StringGrid1", IntToStr(i), Temptxt);

        }

        ini->WriteString("Edit", "X", Edit1->Text);

        ini->WriteString("Edit", "Y", Edit2->Text);


        delete ini;