Ver Mensaje Individual
  #3  
Antiguo 02-10-2014
wilcg wilcg is offline
Miembro
 
Registrado: abr 2014
Posts: 107
Reputación: 11
wilcg Va por buen camino
Neftali, gracias por tu aporte me ayudo muchisimo. Y quedo asi por si alguien lo necesite.

No he creado variables pero, a las etiquetas lo he escrito asi.
Código Delphi [-]
[campo1]
[campo2]
........
y en el evento OnGetValue.
Código Delphi [-]
procedure TForm1.frxReport1GetValue(const VarName: string; var Value: Variant);
begin
  if CompareText(VarName, 'campo1') = 0 then begin
    Value := Edit1.Text;
  end
  else if CompareText(VarName, 'campo2') = 0 then begin
    Value := Edit2.Text;
  end
  else if CompareText(VarName, 'campo3') = 0 then begin
    Value := Edit3.Text;
  end;
end;
Responder Con Cita