[Luvac]

Solo que ahora no me deja ingresar datos me dise que no conoce Rowcount,cell[] etc.

Estoy utilizando Xe4, por cierto en esta parte

function TStringGrid.CreateEditor: TInplaceEdit;
begin
  Result := inherited CreateEditor;
  if Focused then
    TMaskEdit(Result).Font.Color := clRed
  else
    TMaskEdit(Result).Font.Color := clBlack;
end;

'if Focused' me marca error,si pudieras decirme que unidades utilizaste te lo agradecería ya que yo puse unas y no se si son las correctas.