Tienes razón Román, me confundí con el equivalente de MaskEdit de DevExpress que viene mas completo...
Contestando a nuestra amiga:
Pon esto en el onKeyPress del Edit
Código Delphi
[-]
procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
begin
If ((Key<>'E') and (key<>'V')) and (Length(Edit1.Text)=0) Then
key:=chr(00);
código...jeje
end;
Solo permite E como primer caracter y V como segundo, los demas pueden ser cualesquiera