Código
ADOConnection1
ADOQuery1
DataSouce1
DBGrid1
Edit1
Button1
1
ADOCONNECTION: Faça a coneção do ADOConnection1 com o banco de dados (pelo ConnectionString[...])
[Connected] = True
[name]= ADOConnection1
[LoginPrompt] = False
2
ADOQUERY: Ligue a propriedede [connection] do ADOQuery ao ADOConnection1
na propriedade SQL digite [SELECT * FROM NOME DA TABELA]
[Active]= True
[Name]=ADOQuery1
[Connection]= ADOConnection1
[SQL]= Select * from Nome_da_tabela
3
DATASOURCE: Ligue a propriedade [DataSet] do DataSource1 ao ADOQuery
[Name]= DataSource1
[DataSet]= ADOQuery1
4
DBGRID: Ligue a propriedade [DataSource] do DBGrid1 ao DataSouce1
[Name]= DBGrid1
[DataSource] = DataSource1
Evento do Button1
begin
ADOQuery1.Close; {Fecha a query}
ADOQuery1.SQL.Clear; {Limpa o conteúdo da propriedade SQL}
ADOQuery1.SQL.Add('Select *'); {Selecionar tudo}
ADOQuery1.SQL.Add('From Tab_venda'); {Da tabela Tab_venda}
ADOQuery1.SQL.Add('Where VenNum = "'+Edit1.Text+'"'); {onde Numerodavenda=}
ADOQuery1.Open ;
end;
// SQL.Clear = limpa a propriedade SQL
// SQL.Add = Adiciona na propriedade SQL
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009