problem with export lines from memo to excel but in different cells in bcb6

hello i use bcb6 and i have problem with export every line from a memo to a different cells in a excel.i have write this code but export only the first line in the first cell exported.
this is my code:

Code:

void __fastcall TForm1::Button1Click(TObject *Sender)
{
  ExcelApplication1->Connect();
   ExcelApplication1->Workbooks->Add();
  ExcelWorkbook1->ConnectTo(ExcelApplication1->ActiveWorkbook);
   ExcelWorksheet1->ConnectTo(ExcelApplication1->ActiveSheet);
 ExcelApplication1->set_SheetsInNewWorkbook(LOCALE_USER_DEFAULT, 1);
   int j;
   int i;
   for (j=2;j<=Memo1->Lines->Count;j++)
   {
          for(i=1;i<Memo1->Lines->Count;i++)
        {
        AnsiString temp = Memo1->Lines->Strings[i];
        ExcelWorksheet1->Cells->set_Item(TVariant(j), TVariant("A"), TVariant(temp));
       ExcelApplication1->set_Visible(LOCALE_USER_DEFAULT,1);
   ExcelApplication1->Disconnect();
         }
 }
}

have you any ideas for my problem;
thank you in advance

> ExcelApplication1->Disconnect();
Why is this inside your innermost loop?

Your indentation is awful enough to not spot this.
SourceForge.net: Indentation - cpwiki

So, with the mistake fixed in your cross-posted code over here -> Hello I Have Problem To Export Memo To Excel,use Bcb6 - C And C++ | Dream.In.Code

What is interesting is that the code here seems to be a degrade.

Are you just making random edits, and posting each new failure on a different forum?

hello again,i am new in programming ,so its normal to have failures,and yes i had written in differed forum cause i am register both of two...
i only ask for help not for critisism.

It is normal to have failures. Salem didn't suggest otherwise.

If you post in one forum, let that forum have a real opportunity to help you solve your problem before you post to a second forum. If, after some time passes, you aren't getting any help feel free to post on another forum.

If you post the same problem at multiple forums at the same time you should expect people to be cranky with you.

It is not just bad etiquette. (Though, it is absolutely bad etiquette.) It makes you come off as a jerk. People trying to help you solve the same problem at the same time without knowing about each groups efforts are doomed to repeat some of that effort. That wastes the time of the people trying to help you.

Understand this though, "not getting help" is not the same as "not working with the help you receive"; posting to another forum is still wrong when a forum is trying to help you and you aren't cooperating or just don't get what is being said.

Soma

i understand now what you say...i didn't think that way.But it isn't right to swear too..