| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Как в StringGrid'e удалить выделенную строку?
big © (2008-05-15 10:48:00)сабж..
Заранее спасибо за помощь! =)
{RASkov} (2008-05-15 17:05:00) [1]> [16] big (15.05.08 16:30)
Да мне вот он этот значек как бы ни к чему.
А вот модератором я бы с удовольствием помодерасил бы)
Например это обсуждение можно было закрывать после [4] поста... Да, ...вот такой вот я жестокий :)
шутка.
Palladin (2008-05-15 16:42:00) [2]
> big (15.05.08 16:30) [16]
тебе, чудику, это еще в двух первых ответак скзали...
big (2008-05-15 16:30:00) [3]Опля.. Заработало!! =)
{RASkov} - СПАСИБО ОГРОМНОЕ! Вам бы голубой значок! =)
big (2008-05-15 16:14:00) [4]Я ложу таблицу на форму и получается такой код:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
StringGrid1: TStringGrid;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
Дальше например в такой процедуре
procedure TForm1.Button1Click(Sender: TObject);
begin
end;
как удалить эту строку, например под номером N???
{RASkov} (2008-05-15 16:12:00) [5]type TFriendGrid = class(TStringGrid); //Объявили "новый старый" класс...
........
используем:
TFriendGrid(StringGrid1).DeleteRow(ARow);
ARow - номер удаляемой строки...
Что не ясно?
{RASkov} (2008-05-15 16:09:00) [6]> [12] big (15.05.08 16:08)
См [1] и [2]
big (2008-05-15 16:08:00) [7]
> Всандалил в паблишед-секцию объявление поля типа TFriendGrid
> и ждет чуда)
Я не жду чуда, я прошу помощи у Вас в в конференции "Начинающим"
Сергей М. (2008-05-15 16:06:00) [8]А нуда..
Всандалил в паблишед-секцию объявление поля типа TFriendGrid и ждет чуда)
Сергей М. (2008-05-15 16:05:00) [9]
> В итоге ошибка компиляции.
Секретная, наверно ?)
Palladin (2008-05-15 16:04:00) [10]А Игорю все больнее и больнее :))
big (2008-05-15 15:58:00) [11]
> Сделайте ТОЧНО как сказано и все получится.
Я не могу сделать точно!!!
У меня так:
type
TFriendGrid = class(TStringGrid);
TForm1 = class(TForm)
StringGrid1: TFriendGrid;
private
{ Private declarations }
public
{ Public declarations }
end;
В итоге ошибка компиляции.
{RASkov} (2008-05-15 11:47:00) [12]> [4] big (15.05.08 11:33)
> Что-то я не наблюдаю методов MoveRow и DeleteRrow
А их и нет, т.е. они есть у предка, но защищенные....protected
Поэтому и описывается "новый" ХакКласс.... или, как его назвал Юрий - дружественный.
См [1] и [2]....
Юрий Зотов (2008-05-15 11:42:00) [13]> big (15.05.08 11:33) [4]
[1] читали? Для чего там TFriendGrid?
Сделайте ТОЧНО как сказано и все получится.
Игорь Шевченко (2008-05-15 11:41:00) [14]
> Что-то я не наблюдаю методов MoveRow и DeleteRrow в классе
> StringGrid!!
Больно слышать
big (2008-05-15 11:33:00) [15]Что-то я не наблюдаю методов MoveRow и DeleteRrow в классе StringGrid!!
Пишу..
StringGrid1.Dele.. там такого нет!
Юрий Зотов (2008-05-15 11:16:00) [16]> Leonid Troyanovsky © (15.05.08 11:06) [2]
Хех... а и верно, прозевал. Хорошо хоть в коде не ошибся...
:o)
Leonid Troyanovsky (2008-05-15 11:06:00) [17]
> Юрий Зотов © (15.05.08 11:02) [1]
> MoveRow(Row, RowCount - 1);
> RowCount := RowCount - 1
DeleteRow
--
Regards, LVT.
Юрий Зотов (2008-05-15 11:02:00) [18]Что-то типа этого:
type
TFriendGrid = class(TStringGrid);
with TFriendGrid(StringGrid1) do
begin
MoveRow(Row, RowCount - 1);
RowCount := RowCount - 1
end;
| |
