ciclao22
30-12-2008, 11:07:58
Hola estoy intentando crear objetos de tipo TDBText en tiempo de ejecucion pero no consigo que funcione, Mi idea es montar al vuelo todos los objetos que necesite en funcion de una consulta que hago. Si alguien tiene alguna idea de que evento debo utilizar o algun ejemplo que este claro lo agradecere.
Un saludo y felices fiestasˇ:D
Os paso el codigo de loque hago:
Código Delphi [-] (http://www.clubdelphi.com/foros/#)
procedure TForm3.Button1Click(Sender: TObject);
var
DBDesc:TppDBText;
begin
DBDesc:=TppDBText.Create(self);
DBDesc.SetParentComponent(ppReport1.DetailBand);
with DBDesc do
begin
top:=10;
left:=10;
DataPipeline:=ppBDEPipeLine1;
DataField:=DataSource;
end;
ppReport1.PrintReport;
end;
:cool::cool::cool::cool::cool:
--SOLUCIONADO. ME BAJE EL MANUAL DEL REPORT BUILDER Y AHI LO EXPLICA MUY BIEN--
Un saludo y felices fiestasˇ:D
Os paso el codigo de loque hago:
Código Delphi [-] (http://www.clubdelphi.com/foros/#)
procedure TForm3.Button1Click(Sender: TObject);
var
DBDesc:TppDBText;
begin
DBDesc:=TppDBText.Create(self);
DBDesc.SetParentComponent(ppReport1.DetailBand);
with DBDesc do
begin
top:=10;
left:=10;
DataPipeline:=ppBDEPipeLine1;
DataField:=DataSource;
end;
ppReport1.PrintReport;
end;
:cool::cool::cool::cool::cool:
--SOLUCIONADO. ME BAJE EL MANUAL DEL REPORT BUILDER Y AHI LO EXPLICA MUY BIEN--