I saw a demo where pictures are coming from memo fields.
Is it possible to insert pictures with links.
Thanks in advance
Otto
picture.filelink:=imagen
picture.filelink:=path+imagen
img:="c:\Fotos\image.jpg"
FrPrn:=FrReportManager():New("FRSysth.dll")
...
FrPrn:AddVariable("MisVariables","Imagen","'"+img+"'")
...
procedure ReportHOnStartReport(Sender: TfrxComponent);
begin
Picture1.FileLink:=<Imagen>; //path of img and name file img
end;
alias->field_1 :="c:\Fotos\image.jpg"
FrPrn:=FrReportManager():New("FRSysth.dll")
...
FrPrn:SetWorkArea("Alias" , nArea)
...
procedure ReportHOnStartReport(Sender: TfrxComponent);
begin
Picture1.FileLink:=<ALIAS."field_1">;
end;
var
img: string;
procedure ReportHOnStartReport(Sender: TfrxComponent);
begin
img:='c:\imagen.jpg';
Picture1.FileLink:=<img>;
end;
Return to FiveWin for Harbour/xHarbour
Users browsing this forum: Google [Bot] and 89 guests