Como llenar un stringGrid a partir de un Query?

[johnnySan]

[quote=pcicom;227652]Prueba ESTO:

Yo trabajando en DBE , lleno datos en un stringgrid asi:

Código Delphi [-]procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);
var c:integer;begin
if Key=#13 then begin
query.sql.Closequery.sql.Clear;
query.SQL.Add(' SELECT ref, articulo, cantidad FROM articulos ');
query.SQL.Add('WHERE ref = '+QuotedStr(Edit1.Text) );
Open;
while not query.Eof do begin
StringGrid1.Cells[1,c]:=query.Fields[0].asstring; //campo de cantidad
StringGrid1.Cells[2,c]:=query1.Fields[1].asstring;//campo de articulo
inc(c);query.next; end;if c=1 then ShowMessage('Articulo no existe');
query.close; end;
end;
Pero en un ADO ,debe ser a ese estilo o... no se.

[johnnySan]

(no se por donde puedo enviar a todos este mensaje...)
Quiero que mi StringGrid sea al modo del DBGrig.
Es decir yo quiero que mi Stringgrid, sea al modo de el DBgrid, osea que las columnas se ajusten al modo del usuario usando el mouse,....al momento de ejecutarlo.
Por favor ayudenme en ese problemita.
Gracias.
Johnnysan