Как в StringGrid e удалить выделенную строку?

← →
big (2008-05-15 10:48) [0]

сабж..
Заранее спасибо за помощь! =)

← →
Юрий Зотов © (2008-05-15 11:02) [1]

Что-то типа этого:
type TFriendGrid = class(TStringGrid); with TFriendGrid(StringGrid1) do begin MoveRow(Row, RowCount - 1); RowCount := RowCount - 1 end;

← →
Leonid Troyanovsky © (2008-05-15 11:06) [2]

> Юрий Зотов © (15.05.08 11:02) [1]

> MoveRow(Row, RowCount - 1);
> RowCount := RowCount - 1

DeleteRow

--
Regards, LVT.

← →
Юрий Зотов © (2008-05-15 11:16) [3]

> Leonid Troyanovsky © (15.05.08 11:06) [2]

Хех... а и верно, прозевал. Хорошо хоть в коде не ошибся...
:o)

← →
big (2008-05-15 11:33) [4]

Что-то я не наблюдаю методов MoveRow и DeleteRrow в классе StringGrid!!

Пишу..
StringGrid1.Dele.. там такого нет!

← →
Игорь Шевченко © (2008-05-15 11:41) [5]

> Что-то я не наблюдаю методов MoveRow и DeleteRrow в классе
> StringGrid!!

Больно слышать

← →
Юрий Зотов © (2008-05-15 11:42) [6]

> big (15.05.08 11:33) [4]

[1] читали? Для чего там TFriendGrid?

Сделайте ТОЧНО как сказано и все получится.

← →
{RASkov} © (2008-05-15 11:47) [7]

> [4] big (15.05.08 11:33)
> Что-то я не наблюдаю методов MoveRow и DeleteRrow

А их и нет, т.е. они есть у предка, но защищенные....protected
Поэтому и описывается "новый" ХакКласс.... или, как его назвал Юрий - дружественный.
См [1] и [2]....

← →
big (2008-05-15 15:58) [8]

> Сделайте ТОЧНО как сказано и все получится.

Я не могу сделать точно!!!
У меня так:

type TFriendGrid = class(TStringGrid); TForm1 = class(TForm) StringGrid1: TFriendGrid; private { Private declarations } public { Public declarations } end;

В итоге ошибка компиляции.

← →
Palladin © (2008-05-15 16:04) [9]

А Игорю все больнее и больнее :))

← →
Сергей М. © (2008-05-15 16:05) [10]

> В итоге ошибка компиляции.

Секретная, наверно ?)

← →
Сергей М. © (2008-05-15 16:06) [11]

А нуда..
Всандалил в паблишед-секцию объявление поля типа TFriendGrid и ждет чуда)

← →
big (2008-05-15 16:08) [12]

> Всандалил в паблишед-секцию объявление поля типа TFriendGrid
> и ждет чуда)

Я не жду чуда, я прошу помощи у Вас в в конференции "Начинающим"

> [12] big (15.05.08 16:08)

См [1] и [2]

type TFriendGrid = class(TStringGrid); //Объявили "новый старый" класс...
........
используем:
TFriendGrid(StringGrid1).DeleteRow(ARow);

ARow - номер удаляемой строки...
Что не ясно?

← →
big (2008-05-15 16:14) [15]

Я ложу таблицу на форму и получается такой код:

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???

← →
big (2008-05-15 16:30) [16]

Опля.. Заработало!! =)

{RASkov} - СПАСИБО ОГРОМНОЕ! Вам бы голубой значок! =)

> big (15.05.08 16:30) [16]

тебе, чудику, это еще в двух первых ответак скзали...

> [16] big (15.05.08 16:30)

Да мне вот он этот значек как бы ни к чему.
А вот модератором я бы с удовольствием помодерасил бы)
Например это обсуждение можно было закрывать после [4] поста... Да, ...вот такой вот я жестокий :)
шутка.

Как в StringGrid e удалить выделенную строку? Найти похожие ветки