Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Вниз

мне очень надо 


Катя   (2001-12-20 08:27) [0]

в стрингриде отбираю по условию строки и именно их нужно удалить из таблицы -как это сделать? излазила всю справку , там куча функций , но ни одна толком не работает ...или я с утра торможу..:-(



gek   (2001-12-20 08:41) [1]

Ну возьи наследуй от грида и перенеси туда функции

procedure RowMoved(FromIndex, ToIndex: Longint); override;
procedure ColumnMoved(FromIndex, ToIndex: Longint); override;
procedure InsertRow(ToIndex: LongInt);
procedure DeleteRow(DIndex: LongInt);

в public

в самом гриде они в привате



MBo   (2001-12-20 08:47) [2]

procedure TForm1.Button2Click(Sender: TObject);
var i,j:integer;
begin
with StringGrid1 do
for i:=RowCount-1 downto 0 do
if (твое условие) then begin
begin
Rows[i].Clear;
if i<RowCount-1 then
for j := i to RowCount - 2 do Rows[j].Assign(Rows[j + 1]);
RowCount := RowCount - 1;
end;
end;
end;




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.01.08;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.71 MB
Время: 0.02 c
1-22175           v-o-y-a-g-e-r         2001-12-20 16:06  2002.01.08  
о Hint е


3-21897           МаксБ                 2001-11-27 14:33  2002.01.08  
СУБД Cache


4-22462           Winnie!               2001-11-01 19:50  2002.01.08  
использоание BitBlt и CreateBitmap


14-22398          Jey                   2001-11-10 18:55  2002.01.08  
Тут вот приспичило IRC клиент сделать ....


1-22258           mashinist             2001-12-16 23:16  2002.01.08  
Уравнение третьей степени.