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
|
||||
|
||||
Crear Campos Calculados en una Dataset
Hola a todos:
La situación del día de hoy es la siguiente: estoy creando mediante código una consulta y para el caso necesito adicionar unos campos a dicha consulta, como la ésta fue creada mediante código poir lo tanto no dispongo de la presentación gráfica y de los asistentes del caso para poderle adicionar campos calculados. Entonces mi pregunta en concreto es si alguien conocen la forma adicionarlos mis agradecimientos anticipados y muchas gracias de antemano Gertorresm Colombia |
#2
|
||||
|
||||
Hola GerTorresM.
No decís con que base de datos estás trabajando, por lo que lamento no poder ser más específico. Te escribo un ejemplo simple con BDE. Código:
var tbCalc: TStringField; procedure TForm1.FormCreate(Sender: TObject); begin tbCalc:= TStringField.Create(Self); with tbCalc do begin Name := 'tbCalc'; FieldKind:= fkCalculated; FieldName:= 'tbCalc'; DisplayLabel:= 'CALCULADO'; Size := 30; DataSet := Table1; end; Table1.OnCalcFields:= Table1CalcFields; Table1.Open; end;
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
#3
|
||||
|
||||
Muchas Gracías
Te agradezco el detalle de tu respuesta, para el caso de hecho trabajo con BDE, Pero quisiera colocarte una nueva molestia, como opera para el caso de los lookUp y en el caso de utilizar Postgres y Zeos el procedimiento sería similar.
Muchas gracías de antemano. gertorresm Colombia |
#4
|
||||
|
||||
Hola GerTorresM.
No estoy con Delphi en esta máquina pero creo que sería algo así: Código:
... with TStringField.Create(Table1) do begin DataSet := Table1; FieldName := 'Table1_NombreDeCampo'; FieldKind := fkLookup; Name := Table1.Name + FieldName; KeyFields := 'Table1_KeyFields'; LookupDataSet := Table2; LookupKeyFields := 'Table2_KeyFields'; LookupResultField := 'Table2_Resultado'; FieldDefs.Add(FieldName, ftString, 30, False); end; Pero create un nuevo hilo en el foro correspondiente y seguro que hay quien te pueda asesorar sobre ellos. Saludos
__________________
Daniel Didriksen Guía de estilo - Uso de las etiquetas - La otra guía de estilo .... |
Herramientas | Buscar en Tema |
Desplegado | |
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Campos Calculados | Kaller | Tablas planas | 1 | 12-12-2006 00:11:13 |
campos calculados | Nelly | SQL | 2 | 07-10-2005 18:13:51 |
Campos Calculados | jonny0157 | C++ Builder | 1 | 10-08-2005 11:00:44 |
Campos calculados | SaurioNet | MS SQL Server | 4 | 21-01-2005 23:47:38 |
Lio Con Los Campos Calculados. | JROMAN | OOP | 2 | 18-09-2003 02:02:36 |
|