FindNearest no Interbase
Eu usava este comando para consulta no Paradox
begin
DM1.IBTClientes.SetKey;
DM1.IBTClientes.FindNearest([Edit1.Text]);
end;
como faço no interbase;
begin
DM1.IBTClientes.SetKey;
DM1.IBTClientes.FindNearest([Edit1.Text]);
end;
como faço no interbase;
Tusa
Curtidas 0
Respostas
Afarias
14/11/2003
em Interbase vc usa SQL::
with DM1.IBQuery1 do
begin
Close; // ou melhor:: if Transaction.Active then Transaction.Commit;
Params[0].AsString := Edit1.Text;
Open;
end;
onde, a propriedade SQL do IBQuery1 seria::
SELECT * FROM SUA_TABELA
WHERE CAMPO_TAL STARTING WITH :VALOR
OBS:
esteja ciente q programar para IB não é a mesma coisa que programar para paradox... *não* são apenas os componentes q mudam!
T+
with DM1.IBQuery1 do
begin
Close; // ou melhor:: if Transaction.Active then Transaction.Commit;
Params[0].AsString := Edit1.Text;
Open;
end;
onde, a propriedade SQL do IBQuery1 seria::
SELECT * FROM SUA_TABELA
WHERE CAMPO_TAL STARTING WITH :VALOR
OBS:
esteja ciente q programar para IB não é a mesma coisa que programar para paradox... *não* são apenas os componentes q mudam!
T+
GOSTEI 0