🚀 go-pugleaf

Probably an old chestnut but I need help.

I have a TStringGrid that requires a delete row feature.

I have used the grid hack to gain access to "deleterow" which indeed
removes the selected row however subsequent to the deletion the row now
occupying the deleted rows position is inaccessible.

StringGrid1.rows[deletedposition] returns ([(out of bound) 2, (out of
bound) 4], #0. #0, 0 nil) as opposed to ([], #0, #0, 0, nil) for all of
the other rows.

I have tried many ways available via Google yet this problem keeps
occurring.

Essentially the string grid contains details of delivery notes which are
entered via TEdits. Each entry is checked to ensure it has not already
been entered.

The function is below - sTemp ends up as say "004564"

function TFormPOD.IsUnique:Boolean;
var
  sTemp : String;
  i     : integer;
begin
     Result := True;
     sTemp := ToStr(StrToInt(DNote.Text),6);
     with StringGrid1 do
       for I := 0 to rowcount -1 do begin
         if rows[i].IndexOf(sTemp) <> -1 then
           Result := False;
       end;
end;

After any deletion the rows.IndexOf[deletedposition] line gives an
Access Violation Error due to the "out of bound" feature explained
above.

Any insight greatly appreciated or even better a simple example of a
successful deletion of a row from a TStringGrid that leaves it stable.
-- 
Aramis Gunton