Ver Mensaje Individual
  #9  
Antiguo 20-04-2012
Walterio Walterio is offline
Miembro
 
Registrado: nov 2006
Posts: 46
Reputación: 0
Walterio Va por buen camino
Copio aqui nuevamente el mensaje anterior porque veo que salió mal formateado :
Hola Al González...
Muchas gracias por tu respuesta y mis disculpas por la tardanza en la mía, estaba trabajando con otra cosa y no quería responderte sin antes haber probado tu sugerencia.
Estuve haciendo unas pruebas muy grotescas y a grandes razgos, tu sugerencia sería la solución, pero ahora tengo otro problema.
Sé que en el foro encontré una vez la respuesta a lo que voy a preguntar ahora, pero sinceramente, no la puedo hubicar.
Antes aclaro lo que estoy usando :
Delphi 6, MySQL, ADOQuery, DataSetProvider y ClientDataset, conectados entre si.
El tema ahora es el siguiente:
Al agregar las columnas del tipo InternalCalc, desaparecen las columnas que habia creado anteriormente con el Query :

Código Delphi [-]
sQuery := 'SELECT '+                 
                'id385, '+                 
                'CMC385,'+                 
                'DES385,'+                 
                'RES385,'+                 
                'UFA385 '+               
              'FROM cc385';      
TDBO.buscoReg(sQuery, qryMaster);      
with cdsMaster do     
begin        
  Open;       
  for i := 0 to Fields.Count - 1 do SetField(Fields[i], 'CC534'); //  <-- aqui les doy formato a los campos de la query...         
  First;
End;

Y en el BeforeOpen del ClientDataSet agrego los campos InternalCalc :

Código Delphi [-]
procedure TFrmGenericGrid.cdsMasterBeforeOpen(DataSet: TDataSet); 
var xSelected: TStringField; 
begin   
  xSelected := TStringField.Create(Self);    
  xSelected.Name      := 'MasterTag';   
  xSelected.FieldKind := fkInternalCalc;   
  xSelected.FieldName := 'Tag';   
  xSelected.Size      := 2 ;   
  xSelected.DataSet   := cdsMaster; 
End;

Y cuando ejecuto el programa, sólo me aparece el campo TAG creado ultimamente.
Vuelvo a repetir, he visto por ahi que habia un pequeño truco para "revivir" los campos que agrega la Query y que aparezcan junto a mi campo calculado, pero no encuentro la forma.

Desde ya, agradezco infinitamente las ayudas, sugerencias y consejos recibidos.

Saludos.
Responder Con Cita