Problema al enlazar DBgrid con DataSource

[fito42]

Tengo una query realizada y enlazada todo con una base de datos y enlazada a un grid...Pues bien,lo que quiero es hacer un boton que al pulsar me haga la consulta y me la muestre en el grid.

Por ultimo tengo un boton que se llama ,Actualizar o refrescar que al pulsarlo quiero que o me vacie el grid o me lo deje como estaba en un principio...

Les paso el codigo y espero que puedan ayudarme...


unit Unit1;

interface

uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Grids, DBGrids, ExtCtrls, Db, DBTables, StdCtrls, DBCtrls, Buttons;

type
TForm1 = class(TForm)
Label1: TLabel;
Edit1: TEdit;
SISCONIB: TDatabase;
Table1: TTable;
DSSISEST: TDataSource;
Panel1: TPanel;
DBGrid1: TDBGrid;
Panel2: TPanel;
DBNavigator1: TDBNavigator;
Query1: TQuery;
DataSource1: TDataSource;
consulta: TBitBtn;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
procedure consultaClick(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.consultaClick(Sender: TObject);
begin
Query1.close;
Query1.open;

// Asociar datasource
DBGrid1.

// Refrescar grid


end;

end.

Mi principal probema es no saber decirle al boton que al ejecutar la consulta debe rellenar el DBgrid1 con los datos del DataSource1....No se como enlazarlo...

Busque y busque pero nada...llevo ya dos dias con esto dandome cabezazos espero puedan ayudarme...

Un saludo y muchas gracias por anticipado-

[Casimiro Notevi]

Bienvenido a clubdelphi, ¿ya leiste nuestra guía de estilo (http://www.clubdelphi.com/foros/guiaestilo.php)?, gracias por tu colaboración :)


Recuerda poner los tags al código fuente, ejemplo:

http://www.clubdelphi.com/images/UtilizarTAGs.png

Gracias :)


¡¡¡ Y no repitas hilos !!!


.

[fito42]

Gracias por el consejo.

Aqui estoy peleandome para poder enlazar el grid con la consulta en un boton y el datasource...

No se por que no me va la verdad...pero lo sigo intentando.

Un saludo.

[Casimiro Notevi]

Pues nada, sigue intentándolo ;)

Pero, hombre, ¿has leido la guía de estilo?, ¿cómo pretendes que te ayudemos si no nos cuentas nada? :confused:

[defcon1_es]

Hola.
Para asociar un datasource a un dbgrid, se hace usando la propiedad Datasource del dbgrid.
No se si es eso lo que preguntas...:confused:


procedure TForm1.consultaClick(Sender: TObject);
begin
Query1.close;
Query1.open;

MiDataSource.DataSet := Query1;
// Asociar datasource
DBGrid1.DataSource := MiDataSource;

// Refrescar grid


end;