Zeile löschen im StringGrid

[publes]

Nabend Leute......
Ich möchte gerne eine Zeile in meinem StringGrid löschen..... und zwar diejenige die ich markiert habe...
Kann mir jemand helfen????
Die Zeile soll nicht komplett gelöscht werden, sondern nur ihr Inhalt entfernt werden.....

[Harry M.]

ich habe dir schnell aml was gebastelt...

stringgrid1.option.gorowselect := TRUE <<- nicht vergessen im objectinspector einzustellen

Delphi-Quellcode:

  i : integer = 0;  // global inizalisieren !!!

procedure TForm1.LoeschenClick(Sender: TObject);
begin

  if I = Stringgrid1.RowCount then begin
    I := 0;
    exit
    end else begin
         Stringgrid1.Cells[i,stringgrid1.Row] := '';  // "steht für die zeile die du belegen willst"
          i := i +1;
          LoeschenClick(self);
         end;
end;

procedure TForm1.HinzufuegenClick(Sender: TObject);
begin    
  if I = Stringgrid1.RowCount then begin
    I := 0;
    exit
    end else begin
         Stringgrid1.Cells[i,stringgrid1.Row] := 'xxx';
          i := i +1;
          HinzufuegenClick(self);
         end;

end;

[publes]

So richtig funzt es nicht............

[Shaman]

Hoi


Ein bisschen umständlich, nicht?

Delphi-Quellcode:

var
  J: Integer
begin
  with StringGrid1 do
    for J:= FixedCols to Pred(ColCount) do
      Cells[J, Row]:= '';
end;

Gruss
Shaman

[publes]

Supi..... Danke!!!!!