FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
|||
|
|||
Como crear un campo en tiemo de ejecucion
Me gustaria añadir un campo de tipo lookup en tiempo de ejecucion sobre una tabla, lo estoy creando de esta manera:
var Campo:TStringField; ident:TIntegerField; begin with datamodule do begin ident:=TIntegerField.Create(nil); ident.FieldName:='IDcampo'; ident.FieldKind:=fkData; ident.Name:='IDcampo'; qryTabla.Fields.Add(ident); Campo:=TStringField.Create(nil); Campo.DisplayLabel:='Nombre'; Campo.FieldKind:=fkLookup; Campo.FieldName:='NOMBRE'; Campo.LookupDataSet:=qryTabla2; Campo.LookupKeyFields:='IDcampo'; Campo.LookupResultField:='NOMBRE'; Campo.KeyFields:='IDcampo'; Campo.Size:=30; Campo.Lookup:=True; Campo.Name:='Campo'; qryTabla.Fields.Add(Campo); end; end; pero al abrir la tabla me suelta una violacion de acceso Última edición por xerkan fecha: 19-01-2004 a las 13:14:09. |
|
|
|