if(SaveDialog1->Execute())
{
for(int i=1;i<16;i++)
Memo1->Lines->Add(((TMaskEdit*)FindComponent("MaskEdit"+IntToStr(i)))->Text);
Memo1->Lines->SaveToFile(SaveDialog1->FileName);
}
Почему не работает такой код?
есть 16 окошек MaskEdit пытаюсь из них занести все в Memo1 в цикле, не получается, код ниже, в чем дело?
SaveDialog1->Execute();
int i;
for(i=0;i<16;i++)
Memo1->Lines->Add((TMaskEdit*)Form1->FindComponent("MaskEdit"+IntToStr(i))->Text);
Memo1->Lines->SaveToFile->SaveDialog1->Filename;
да кстати и как будет выглядеть код цикла для загрузки из текстового файла из 16 строк в которых по числу, в каждый из 16 MaskEdit своего числа?
SaveDialog1->Execute();
int i;
for(i=0;i<16;i++)
Memo1->Lines->Add((TMaskEdit*)Form1->FindComponent("MaskEdit"+IntToStr(i))->Text);
Memo1->Lines->SaveToFile->SaveDialog1->Filename;
да кстати и как будет выглядеть код цикла для загрузки из текстового файла из 16 строк в которых по числу, в каждый из 16 MaskEdit своего числа?
Это загрузка из файла.
Код:
if(OpenDialog1->Execute())
{
Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
for(int i=0;i<4;i++)((TMaskEdit*)FindComponent("MaskEdit"+IntToStr(i)))->Text=Memo1->Lines->Strings;
}
{
Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
for(int i=0;i<4;i++)((TMaskEdit*)FindComponent("MaskEdit"+IntToStr(i)))->Text=Memo1->Lines->Strings;
}
Цитата:
Originally posted by lord Kelvin
Это загрузка из файла.
Это загрузка из файла.
Код:
if(OpenDialog1->Execute())
{
Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
for(int i=0;i<4;i++)((TMaskEdit*)FindComponent("MaskEdit"+IntToStr(i)))->Text=Memo1->Lines->Strings;
}
{
Memo1->Lines->LoadFromFile(OpenDialog1->FileName);
for(int i=0;i<4;i++)((TMaskEdit*)FindComponent("MaskEdit"+IntToStr(i)))->Text=Memo1->Lines->Strings;
}
ААААгромное спасибо, не знаю, что бы я без вас делал...
Цитата:
Originally posted by sys33
ААААгромное спасибо, не знаю, что бы я без вас делал...
ААААгромное спасибо, не знаю, что бы я без вас делал...
Оффтоп: Твои слова бальзам для моего сердца! Всегда приятно, когда благодарят не заранее (А ля "Заранее всем огромное спасибо!!!!!"), а потом. По заслугам.=)