FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Buscar | Temas de Hoy | Marcar Foros Como Leídos |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
|||
|
|||
Mira si esto te sirve:
Código:
var i, j : Integer; Tabla.First; j := 0; while NOT Tabla.EOF do begin for i:=0 to Tabla.FieldCount - 1 do WS.Cells[i, j] := Tabla.Fields[i].AsString; Inc(j); Tabla.Next; end;
__________________
Guía de Estilo |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
|