ordinal type required ajuda

Question

Boa tarde, estou enfrentando problemas na hora de compilar um execut�vel no Delphi6, aparece a seguinte mensagem: ordinal type required]Segue o c�digo:begin//ativa a tabeladm.usuario.Open;//ver...

Raimundo Pereira · Answer

Boa tarde, tente realizar o locate com mais de um campo
dm.usuario.close;
dm.usuario.open;
IF dm.usuario.Locate('DESCRICAO;SENHA', VarArrayOf([editusuario.Text, editsenha.TexT]),[loPartialKey, loCaseinsensitive]) THEN
BEGIN
SHWOMESSAGE('OK');
END
ELSE
BEGIN
SHWOMESSAGE('FAIL);
END;
END;