[escorpionrojo43]

Bueno Amigos no pude esperar por la respuesta asi que me vi forzado a buscar la manera de Hacerlo. Me puse a probar con todas las porpiedades del stringgrid hasta que la pegue. "Suerte de Principiante ".

Aqui Pongo la manera que logre hacerlo.

Código Delphi [-]
procedure TForm2.But_borrarClick(Sender: TObject);
var  i: Integer;
begin
If MessageDlg('Seguro de borrar Los Datos de '+#13+StringGrid.Cells[1,StringGrid.Row], mtConfirmation, [mbYes, mbNo], 0) = mrYes Then
  Begin
   Stringgrid.DeleteRow(StringGrid.Row);       //Borra la fila seleccionada
   StringGrid.Rows[Stringgrid.RowCount].Clear; //Limpia el historial de la ultima linea para evitar traer los datos
   SumarCeldas;
  End;
end;