Переход данных в Мемо1

[VOVA-74]

Здравствуйте Форумчани. В МЕМО1 ввожу данные (буквы или цифры). С помощью кнопки БАТТОН1 задаю данные в МЕМО1.Первая строка идет нормально, но когда перехожу с помощью кнопки БАТТОН2 на вторую строку и начинаю вводить данные то этот символ прописывается и в первой и во второй строке, выхожу на третью строку символ прописывается и в первой и во второй и в третьей строке. Понимаю, что при переходе на другую строку должен прервать связь с предыдущей строкой чтобы он не повторялся. Сделал код посмотрите если не сложно. Заранее благодарен.

void __fastcall TForm2::Button1Click(TObject *Sender)
{
float d,r;
d=5;
  r=2;
 if ( d >r||d <r)

        {
         for(float r=0; r<Form1->Memo1->Lines->Count;r++)
          Form1->Memo1->Lines->Strings[r]="A";return;

         }
        else

         {for(float r=0; r<Form1->Memo1->Lines->Count;r++)
         Form1->Memo1->Lines->Strings[r]= Form1->Memo1->Lines->Strings[r]+ "A";return;



  }

void __fastcall TForm2::Button2Click(TObject *Sender)
{
 Form1->Memo1->Lines->Add(" ");}

[Stilet]

В МЕМО1 ввожу данные (буквы или цифры). С помощью кнопки БАТТОН1 задаю данные в МЕМО1

Кто-нибудь что-нибудь понял?

for(float r=0; r<Form1->Memo1->Lines->Count;r++)

Почему не int?

В чем логика сего кода?

[kventin_zhuk]

for(float r=0; r<Form1->Memo1->Lines->Count;r++)
          Form1->Memo1->Lines->Strings[r]="A";return;

При нажатии на кнопку у вас запускается цикл с нуля. И проодит по каждой строке. Но смысла кода не понял. Не знаю как в билдере, но в делфи добавление новой строки в Memo можно сделать так:

Memo1.Lines.Add('Your text');

Здесь должно быть примерно

Form1->Memo1->Lines->Add("TEXT");

но могу ошибаться - мало с билдером работаю

[FataLL]

А это что?

if ( d >r||d <r)

Так в Индии пишут

if( d != r )

???