Fórum progress bae em consulta SQL #242350
10/07/2004
0
pro SQL to usando o sequinte codigo:
//***************************************************
procedure TFormLocaliza.BitBtn1Click(Sender: TObject);
begin
Query1.Close;
Query1.SQL.Text:=
´Select * From Dados Where Upper(Nome) Like ´´¬´+AnsiUpperCase(Edit1.Text)+´¬´´ ´;
Query1.Open;
if Query1.RecordCount=0 then
Begin
ShowMessage(´Nenhum registro encontrado!´);
end;
end;
//**************************************************
valew!!!!
Pedrohventura
Curtir tópico
+ 0Posts
10/07/2004
Uildenei
me corrijam se eu estiver errado, mas o componente da paleta DBExpress SQLMonitor nao tem como fazer algo parecido?
Gostei + 0
10/07/2004
Beppe
Gostei + 0
10/07/2004
Pedrohventura
Gostei + 0
16/02/2005
Pistesil
Grato pela atenção.
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)