Tem como validar somente MES/ANO obs.: n�o pode ter dia

Question

Algu�m tem id�ia de como fa�o isso?Como fa�o pra [b:6536e9118f]validar somente MES/ANO[/b:6536e9118f] obs.: [b:6536e9118f]n�o pode ter dia.[/b:6536e9118f]Muito obrigadoAlex_  :)...

Josemarlourenco · Answer

Se for uma string do tipo �MM/AAAA�, pode fazer o seguinte:
Funciton valida(MesAno: String): Boolean;
var Mes, Ano: Integer;
Begin
Mes := StrToInt(copy(MesAno, 1, 2));
Ano := StrToInt(copy(MesAno, 4, 4));
Result := (Mes >= 1) and (Mes <= 12) and Ano >= 2000
End;

F�rum Tem como validar somente MES/ANO obs.: n�o pode ter dia #164684