hola, no tengo ningun codigo en el cxgrid, incluso lo borre, puse uno nuevo y nada, nada mas hago vincularlo con el datasource del query y ya no me hace el first, y no es que no lo visualice bien, es que no lo hace ni el zquery, verás este es el codigo que uso, en el que veo que no me funciona el zquery.first,
Código Delphi
[-] with form1 do
begin
AppPath := TApplication(Application).ExeName;
DeleteName(AppPath);
AppPath := AppPath + 'Empresas.xls';
Lcid := LOCALE_USER_DEFAULT;
ExcelModelo := TExcelApplication.Create(Application);
ExcelModelo.ConnectKind := ckNewInstance;
ExcelWorkbook1 := TExcelWorkbook.Create(Application);
ExcelWorkbook1.ConnectTo(ExcelModelo.Workbooks.Add(AppPath, Lcid));
ZQueryEmpresas.First;
i := 6;
while not ZQueryEmpresas.Eof do
begin
ExcelModelo.Cells.Item[i,1] := ZQueryEmpresas.FieldByName('nombre').AsString;
ZQueryEmpresas.Next;
inc(i);
end;
ExcelModelo.Visible[Lcid] := true;
ExcelModelo.Disconnect;
end;
cuando vinculo el datasource al cxgrid pues me sale en blanco el excel, desvinculo el datasource y me llena el excel con los datos.
???