(Resolvido) erro na pesquisa sql

[vms]

ola pessoal,

tenho um campo na minha tabela que é o seguite

PK ID BIGINT NOT NULL,

estou tentando fazer uma pesquisa dessa forma

DM.CQProduto.Close;
        DM.CQProduto.CommandText := 'SELECT * FROM PRODUTOS WHERE ID LIKE :P ORDER BY ID';
        DM.CQProduto.Params.ParamByName('P').AsInteger := StrToInt(Edit1.Text);
        DM.CQProduto.Open;

e está dando o seguinte erro

''7891008121025'' is not a valid integer value.

OBS. 7891008121025 é o codigo de um produto já cadastrado.

esta função funcionava certinho quando o campo era INTEGER, mas depois que mudei para BIGINT não funcionou mais.

alguém pode dizer o que esta errado?

desde já agradeço.

[Jhonas]

Client SQL dialect 1 não suporta referência ao tipo de dados BIGINT. Tente conectar-se com o dialect 3.

abraço

[vms]

Client SQL dialect 1 não suporta referência ao tipo de dados BIGINT. Tente conectar-se com o dialect 3.

abraço

Já estar em dialect 3. Alguma outra sugestão?

[Jhonas]

mude o tipo da variavel para int64

procedure TForm1.Button1Click(Sender: TObject);
var i : INT64;
begin
   i := 7891008121025;
   showmessage(inttostr(I));
end;

abraço

[vms]

Valeu Jhonas deu certo.

DM.CQProduto.Close;
        DM.CQProduto.CommandText := 'SELECT * FROM PRODUTOS WHERE (UPPER('+ComboBox1.Text+')) LIKE :P ORDER BY '+ComboBox2.Text;
        DM.CQProduto.Params.ParamByName('P').AsLargeInt := StrToInt64(Edit1.Text);
        DM.CQProduto.Open;