Fórum validar placa de carro #300865

26/10/2005

0

gostaria de saber como faço para validar a placa de um carro quando o usuário digitar na edit.

ABG1990 - Quero saber os 3 primeiros sao letras e os 4 ultimos sa numeros


Fmtrevisan

Fmtrevisan

Responder

Posts

26/10/2005

_rodfaria_

Use a função ´copy´ e alguns ´if´s´ para saber.

Se preferir pode baixar TRegExpr de http://www.regexpstudio.com/TRegExpr/TRegExpr.html e montar uma expressão semelhante a
[a-zA-Z][a-zA-Z][a-zA-Z]-[0-9][0-9][0-9][0-9] para validar o edit.

Exemplo de uso de TRegExpr:
http://forum.clubedelphi.net/viewtopic.php?t=67957

Referência sobre expressões regulares:
http://www.aurelio.net/er


Responder

Gostei + 0

26/10/2005

Christian_adriano

function ValidaPlacaVeiculo(sPlaca:String): Boolean;
var
  i : byte;
begin

  sPlaca := UpperCase(sPlaca);
  Result := Length(sPlaca) = 8;
  if (Result) then
  for i := 1 to 8 do begin
      // Testa as Letras...
      if (i < 4) then
      Result := sPlaca[i] in [´A´..´Z´];

      if not(Result) then Exit;

      // Testa os Nros...
      if (i >= 5) then
      Result := sPlaca[i] in [´0´..´9´];
  end;

end;



Responder

Gostei + 0

27/10/2005

Fmtrevisan

agradeço pela ajuda,, e agradeço tambem pelo comentário da expressão regular,, ja estava procurando também....


Responder

Gostei + 0

12/01/2019

Lindomar Sousa.

Basa colocar um TMaskEdit e atribuir a seguinte máscara: >lll-9999;1;_
Responder

Gostei + 0

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar