como mostrar o resultado da minha pesquisa na stringgrid

Delphi

20/04/2004

como mostrar o resultado da minha pesquisa na stringgrid se ele nao tem a propriedade datasource


me de um exemplo uso interbase 6.1


Eltontlms

Eltontlms

Curtidas 0

Respostas

Lucas Silva

Lucas Silva

20/04/2004

o StringGrid é um componente que você tem que fazer tudo a mão nele.

Tipo assim:

StringGrid1.Cells[0,1] := ´texto´;

e por ai vai...


GOSTEI 0
Paullus

Paullus

20/04/2004

Vê se esse código aí quebra teu galho.

procedure TfMain.carregaBanco;
var
  i : integer; //controle de loop
begin
  StringGrid.FixedCols := 0;
  StringGrid.FixedRows := 1;

  StringGrid.ColCount := Query.Fields.Count;
  StringGrid.RowCount := Query.RecordCount + 1;

  for i := 0 to (Query.Fields.Count - 1) do
    StringGrid.Cells[i,0] := Query.Fields.Fields[i].FieldName;

  Query.First;

  while not Query.EOF do
  begin
    for i := 0 to (Query.Fields.Count - 1) do
      StringGrid.Cells[i,Query.RecNo] := Query.FieldByName(Query.Fields.Fields[i].FieldName).AsString;
    Query.Next
  end;
end;


O négocio é o seguinte... se o banco estiver muito grande vai demorar pra carregar.


GOSTEI 0
POSTAR