W jaki sposób odczytać index zaznczonego wiersza w StringGrid?
StringGrid1.Selection.Top
A w jaki sposób teraz usunąć ten zaznaczony wiersz?
bo jak daję stringgrid1.row[i].Delete[i];
to niedziała
W mouseDown komponentu StringGrid wstaw StringGrid1.Mousetocell(x,y,ACol,ARow)
Aby usynąć wiersz np w popmenu lub w buttonie
var usun,a:integer;
begin
usun:=ARow;
for a := usun to Xg.rowcount - 1 do
BEGIN
Xg.rows[a] := Xg.rows[a+1] ;
end;
Xg.rowcount := Xg.rowcount - 1;
U mnie działa pozdro
krop napisał(a)
bo jak daję
stringgrid1.row[i].Delete[i];
to niedziała
Nie dziwie się, że nie działa, bo usuwasz... hmm... Szczerze mówiąc, to nawet nie wiem, co! Polecam
stringgrid1.rows.delete[i]
albo coś takiego. Nie dam głowy, a dostępu do Delphi teraz nie mam.
Waldek r52 napisał(a)
W mouseDown komponentu StringGrid wstaw StringGrid1.Mousetocell(x,y,ACol,ARow)
Aby usynąć wiersz np w popmenu lub w buttonievar usun,a:integer;
begin
usun:=ARow;
for a := usun to Xg.rowcount - 1 do
BEGIN
Xg.rows[a] := Xg.rows[a+1] ;
end;
Xg.rowcount := Xg.rowcount - 1;
U mnie działa pozdro
Pomysł ciekawy, tylko po co Panowie te pętle! Przecież to jest koszmarnie nie optymalne!