sumar 180 dias a partiendo de una columna de un grid

[elaprendizprog]

Muchas gracias a todo por la ayuda.
Sin embargo es necesito un poquito mas de ayuda de su parte con el codigo completo y en cuanto a:
StringDBGrid1->Cells[2][0]=StrToDate(StringGrid1->Cells[0][0])+190; lo que esta en negrito y en subrayado me da problema y en cuanto a la otra funciones no se donde ponerla y tambien puedo ver que tiene una variante que no se donde declararla.

envio sentencia:
procedure TFormAAD.DBGrid1ColExit(Sender: TObject);
begin
StringDBGrid1->Cells[2][0]=StrToDate(StringGrid1->Cells[0][0])+190;
END;
end.