| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Перемещение строк в StringGrid [D7, XP]
Gizza © (2006-07-02 10:03:00)Доброго времени...
Все хэлпаки облазил, не нашел...
Подскажите пожалуйста, можно ли как нибудь легко сдвинуть (например, строки с 7по StringGrid1.rowcount) вверх на одну строчку (естественно, она пустая).
Если нет, придется каждую строчку копировать в предыдущую, удалять текущую, как то это неудобно и муторно....
Заранее спасибо.
MBo (2006-07-03 12:12:00) [1]как уже сказали, в uses должен быть указан модуль Grids, чтобы компилятор знал про TStringGrid.
Сильно настораживает номер строки
>[Error] Unit2.pas(87):
он далеко не 17 ;)
В каком меcте модуля ты вписал эту строку?
Gizza (2006-07-02 23:40:00) [2]Всё равно ни фига не понял...
Ладно уж, забейте, я ручками.....
Leonid Troyanovsky (2006-07-02 23:26:00) [3]
> Gizza © (02.07.06 23:06) [12]
> Хнык, там на английском, не очень то вдумчиво получается.
Ну а слово "Example" понятно?
Может именно он спасет отца русской демократии?
--
Regards, LVT.
Gizza (2006-07-02 23:06:00) [4]
> Кликни мышью на эту строку и нажми F1,Читать вдумчиво.
Хнык, там на английском, не очень то вдумчиво получается....
Leonid Troyanovsky (2006-07-02 22:58:00) [5]
> Gizza © (02.07.06 22:44) [10]
> [Error] Unit2.pas(87): Local class, interface or object
> types not allowed
Кликни мышью на эту строку и нажми F1,
Читать вдумчиво.
--
Regards, LVT.
Gizza (2006-07-02 22:44:00) [6]
> 1. Прямо так и говорит что именно на форме нет?
Пишу дословно:
[Error] Unit2.pas(87): Local class, interface or object types not allowed
[Error] Unit2.pas(87): Class type required
И курсор ставит после:
THackGrid = class(курсорTStringGrid);
Жуков Олег (2006-07-02 21:29:00) [7]
> мол на форме нет никаких TStringGrid, и дальше работать
> не буду.....
1. Прямо так и говорит что именно на форменет?
2. Если не 1., тогда uses Grids; иначе - уже ничем не поможешь.
Leonid Troyanovsky (2006-07-02 21:03:00) [8]
> Gizza © (02.07.06 21:01) [7]
> Прямо так и написал, но "говорит": ERROR, мол на форме нет
> никаких TStringGrid, и дальше работать не буду.....
Не верю.
--
Regards, LVT.
Gizza (2006-07-02 21:01:00) [9]
> Прямо так и написать
Прямо так и написал, но "говорит": ERROR, мол на форме нет никаких TStringGrid, и дальше работать не буду.....
MBo (2006-07-02 20:32:00) [10]>А как это ввести в форму, на которой нет TStringGrid?
Прямо так и написать в разделе type нужного модуля
Gizza (2006-07-02 19:55:00) [11]
> THackGrid = class(TStringGrid);
А как это ввести в форму, на которой нет TStringGrid?
Всмысле таблица на одной форме, а кнопка, кот удаляет строки на другой...
MBo (2006-07-02 14:26:00) [12]THackGrid = class(TStringGrid);
...
THackGrid(StringGrid1).DeleteRow(1);
Gizza (2006-07-02 13:34:00) [13]
> Можно в цикле
Вот, сделал... кому надо пользуйтесь:
vardelrow: TGridRect; movrow:integer;
delrow:=grid1.Selection;
formovrow:=delrow.Top togrid1.RowCount-1 do
begin
grid1.Rows[movrow].Text := grid1.Rows[movrow+1].Text;
grid1.Rows[movrow+1].Clear;
end;
PSPF2003 (2006-07-02 13:08:00) [14]Можно в цикле
SUN_ALF (2006-07-02 13:03:00) [15]То, о чём Вы говорите, есть ничто иное, как исключение целой строки из таблицы. Я сам как-то раз искал подобную вещь, но никаких ДелетеРоу так и не нашел :((
| |
