|
Платные хостинги
Раскрутка сайта
Книги по программированию
Проблемы с ListView., Не могу добавить строку в нужную строку
- Код // Нужно ТОЛЬКО для демонстрации работы //////////////////////////var i: Integer;procedure TForm1.FormCreate(Sender: TObject);begin i:= 0;end;/////////////////////////////////////////////////////////////////////////////////////procedure TForm1.Button2Click(Sender: TObject);begin with ListView1.Items.Insert(0) do begin Inc(i); // Только для демонстрации Caption:= IntToStr(i); end; if ListView1.Items.Count > 10 then ListView1.Items.Delete(10);end;highlightSyntax('delphimZhZWQ','delphi'); Добавлено @ 20:30 Добавление всегда происходит в 1-ую строку и если кол-во строк становится равным 11-и, то последняя строка удаляется.
Интернет казино
Онлайн игры
Увеличение члена
Купить DVD
|