![]() |
![]() |
![]() |
![]() |
![]() |
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
|
|||
|
|||
![]() Tengo este codigo pero por alguna extraña razon me desaparece los datos al querer insertar una nueva columna y enlazarla a un nuevo campo , alguna idea?
![]() Código:
SQLClientDataSet1.close; campo := TStringField.Create(SQLClientDataSet1); campo.Name := 'Edgar1'; campo.FieldKind := fkData; campo.FieldName := 'CCO_CLAVECOND'; SQLClientDataSet1.Fields.Add(campo); SQLClientDataSet1.CommandText := 'SelectATR_DESEMPCOND,CCO_CLAVECOND,ATR_IDRUTA' + ' from A_TURNO'+ ' where ATR_IDRUTA = 1'; DBGrid1.Columns.Add; DBGrid1.Columns.Items[2].Title.caption := 'Prueba'; DBGrid1.Columns.Items[2].FieldName := 'Edgar1'; SQLClientDataSet1.open;
__________________
Edgar Talavera |
![]() |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
![]() |
|