Delphi - Criando um Componente IBQuery em Tempo de Execução

Para aqueles que como eu não gostam muito de ficar enchendo as telas da aplicação ou o data module com componentes ibquery, eu dedico este pequeno tutorial.
Eu utilizo a rotina abaixo para criar um componente ibquery para fazer uma seleção na base de dados:

QuerySelectProd := TIBQuery.Create(nil); //Aqui eu crio o componente e atribuo a ele o estado vazio [nil]
QuerySelectProd.Database := DataModule.Database; //Aqui eu atribuo qual banco de dados estou utilizando
QuerySelectProd.Close; //Fecho a conexão
QuerySelectProd.SQL.Clear;//Limpo a SQL antiga
QuerySelectProd.SQL.Add('select ');
QuerySelectProd.SQL.Add('  produtos.estoqueatual ');
QuerySelectProd.SQL.Add('from ');
QuerySelectProd.SQL.Add('  produtos ');
QuerySelectProd.SQL.Add('where ');
QuerySelectProd.SQL.Add('  produtos.id_produto = ' + #39 + edCodigo.Text + #39);
QuerySelectProd.Open; //Abro a conexão

edQuantidade.Text := QuerySelectProd.FieldByName('estoqueatual').Text; //Atribuo ao componente Edit o valor do estoque atual do produto

QuerySelectProd.Close; //Fecho novamente  a conexão
QuerySelectProd.Free; //Limpo da memória o componente criado

OBS.: Tem que declarar a biblioteca TIBQuery na uses do Form

Você pode utilizar a mesma estrutura pra instruções SQL de Insert, Update, Delete...