FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Gracias Cadetill por tus aportaciones lo he solucionado del
siguiente modo: var F : String; I : Integer; Begin for i := 0 to AdoQuery1.FieldDeflist.count -1 do begin F:= AdoQuery1.FieldDefList.FieldDefs[i] case F.DataType of ftString: ..... ftInteger: .... else String end; end; end; end; end. |
|
|
|