[ecfisa]

Hola JosepMLlort y bienvenido a Club Delphi

Como a todos los que se inician participando en los foros te invitamos a que leas nuestra guía de estilo.

En cuanto a tu consulta, probá de este modo:

Código Delphi [-]
...
procedure TForm1.FormCreate(Sender: TObject);
begin
  DrawGrid1.Selection:= TGridRect(Rect(-1,-1,-1,-1));
  DrawGrid2.Selection:= TGridRect(Rect(-1,-1,-1,-1));
end;

(* Asignar al evento OnExit de ambos TDrawGrid *)
procedure TForm1.DrawGridExit(Sender: TObject);  
begin
  (Sender as TDrawGrid).Selection:= TGridRect(Rect(-1,-1,-1,-1));
end;
...

Saludos.