void __fastcall TForm1::Button1Click(TObject *Sender)
{
int count;
count=Memo1->Lines->Count-1;
for (int i=0;i<=count;i++){
Memo1->Lines->Delete(0);
ShowMessage("string number 0 was deleted!");
}
}
Не сложный цикл. как...?
Дамы и/или господа помогите решить задачу.
Дано:
Memo1 с количеством N строк;
Кнопка Button1.
Задание:
При нажатии на Button1 в Memo1 удаляется нулевая строка,
остальные строчки передвигаются на уровень вверх,
а затем опять удаляется нулевая строка и опять
остальные строчки передвигаются на уровень вверх.
Это все продолжается до тех пор, пока строк совсем не
останется.
Заранее спасибо.
Дано:
Memo1 с количеством N строк;
Кнопка Button1.
Задание:
При нажатии на Button1 в Memo1 удаляется нулевая строка,
остальные строчки передвигаются на уровень вверх,
а затем опять удаляется нулевая строка и опять
остальные строчки передвигаются на уровень вверх.
Это все продолжается до тех пор, пока строк совсем не
останется.
Заранее спасибо.
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Memo1->Lines->Delete(0);
}
{
Memo1->Lines->Delete(0);
}
Не совсем понятно условие задачи, при нажатии кнопки требуется удалить первую строку, или же все строки списка.
Для первого случая достаточно Memo1->Lines->Delete (0).
Для второго, просто и без затей: Memo1->Lines->Clear() :D
Для первого случая достаточно Memo1->Lines->Delete (0).
Для второго, просто и без затей: Memo1->Lines->Clear() :D
kosfiz'у БАЛЬШОЕ спасибо!