[delphi.com.ar]

Empezado por YaninaGenia

Es que son todos 9, no hay ningún 0.

¿Proque no me mostras el código?

Probá esto:

Código Delphi [-]
program PruebaEditMask;

uses
  Forms, Mask;

var
  F: TForm;
begin
  F := TForm.Create(nil);
  try
    with TMaskEdit.Create(F) do
    begin
      Parent := F;
      Left := 0;
      EditMask := '99-99999999-9;0;_';
    end;

    with TMaskEdit.Create(F) do
    begin
      Parent := F;
      Left := 0;
      Top := 24;
      EditMask := '00-00000000-0;0;_';
    end;

    F.ShowModal;
  finally
    F.Free;
  end;
end.