Ver Mensaje Individual
  #6  
Antiguo 18-03-2011
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola jhonalone.

Cita:
desde el Form2 pretendo recuperar los valores del DBGrid que pertenece al Form1. No tengo definido otro DBGrid en el Form2. Los presento (algunos valores, no todos) en un TListBox de la forma que tú me enseñaste. Uno de ellos es el campo calculado.
Como te dije toma valor, si antes he entrado en el Form1, si entro directamente en el Form2 toman valor todos los campos excepto el campo calculado.
Disculpame, recién ahora que me refrescas la memoria busqué (y encontré) el post anterior.

Me parece que este caso podrías prescindir del DBGrid y trabajar directamente sobre el DataSet:
Código Delphi [-]
procedure TForm2.Button1Click(Sender: TObject);
var
  BM: TBookMarkStr;
  i: Integer;
  s: string;
begin
  ListBox1.Clear;
  with Form1 do  // (si el DataSet reside en Form1)
  begin
    DataSet.Open; // Opcional: ( si no esta abierto)
    BM:= DataSet.Bookmark;
    DataSet.DisableControls;
    DataSet.First;
    while not DataSet.Eof do
    begin
      s:= '';
      for i:= 0 to DataSet.FieldCount - 1 do
      begin
        s:= s + DataSet.Fields[i].AsString;
        if i < DataSet.FieldCount - 1 then
          s:= s + '  -  ';
      end;
      ListBox1.Items.Add(s);
      DataSet.Next;
    end;
    DataSet.Bookmark:= BM;
    DataSet.EnableControls;
    DataSet.Close; // Opcional ( si queres cerrarlo )
  end;
end;
Por que en realidad, el campo calculado está definido en el TDataSet no en el TDBGrid.

Un saludo.
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 19-03-2011 a las 02:28:04.
Responder Con Cita