Definir modo de consulta Dinamicamente

Ola pessoal

Bom. Preciso fazer uma consulta em uma tabela de produtos,na qual tenho dois campos (fields) um com o codigo do Produto (1000) e outro com o codigo de barras do propduto(7894567891234).

A consulta sera freita atraves de um MaskEdit,
Quero que quando digitar o codigo do produto ele me localize pelo codigo do produto, e quamdo digitar ou passar o leito no codigo de barras ele me localize pelo codigo de barras .

mais ou menos isso :

procedure TForm1.BitBtn1Click(Sender: TObject);
begin
If Length(maskEdit.text) <= 13 then
begin
ShowMessage(´Localizado´);
exit;
end
else begin
ShowMessage(´Código do Filme não Cadastrado - Favor Corrigir!´);
MaskEdit.setfocus;
exit;
end;

If not Length(MaskEdit.text) = 13 then
begin
ShowMessage(´Localizado´);
exit;
end
else begin
ShowMessage(´ Código de Barras Inválido - Favor Corrigir!´);
MaskEdit.setfocus;
exit;
end;

end;

so que ai não esta funcionando direitinho, preciso que ele saiba quando eu digitei o codigo do produto(1000) ,e quando eu digitei o codigo de barras, aisim ele encontra na procedure o comando determinado para cada situação


espero que vcs entendam e me ajudem a terminar este codigo.