[miguel_fr]

Bueno la verdad no es de imitar mi tipo de programacion pero al fin y al cabo me las ingenie para solucionar

Código Delphi [-]
{en otro proceso pongo esto}
 stringgrid1.Cells[4,fila]:='a';
{de este modo puedo poner un la celda en 'vacio' y 
soluciono el otro problema que aun no se que era}
 
procedure TForm1.StringGrid1GetEditMask(Sender: TObject; ACol,
  ARow: Integer; var Value: String);
begin
if (StringGrid1.Cells[ACol, 0]='mi columna')then
 begin
  if stringgrid1.Cells[4,fila]<>'a' then
    Value :=  '!99:99;1'
  else
   stringgrid1.Cells[4,fila]:='';
 end;
end;