Tecistel/Tecsitel_FactuGES2
0
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Modulo nuevo para los informes estadisticos e informes que ya tenian anteriormente

Browse Source 
git-svn-id: https://192.168.0.254/svn/Proyectos.Tecsitel_FactuGES2/trunk@685 0c75b7a4-871f-7646-8a2f-f78d34cc349f
This commit is contained in:
roberto 2008-10-15 18:47:51 +00:00
parent df415dd09e
commit 242094cb67
1 changed files with 8 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
Source/GUIBase/uEditorPreview.pas
View File

@ -29,6 +29,8 @@ type
procedure Print; procedure Print;
procedure Preview; procedure Preview;
procedure Refresh;
function GetController : IControllerBase; function GetController : IControllerBase;
procedure SetController (const Value : IControllerBase); procedure SetController (const Value : IControllerBase);
property Controller : IControllerBase read GetController property Controller : IControllerBase read GetController
@ -165,6 +167,7 @@ type
write SetController; write SetController;
property Title: string read GetTitle write SetTitle; property Title: string read GetTitle write SetTitle;
property Report: TfrxReport read GetReport; property Report: TfrxReport read GetReport;
procedure Refresh;
procedure Print; procedure Print;
procedure Preview; procedure Preview;
procedure LoadFromStream(AStream : TStream); procedure LoadFromStream(AStream : TStream);
@ -450,6 +453,11 @@ begin
Enabled := True; Enabled := True;
end; end;
procedure TfEditorPreview.Refresh;
begin
// Report.Preview.Repaint;
end;
procedure TfEditorPreview.SetController(const Value: IControllerBase); procedure TfEditorPreview.SetController(const Value: IControllerBase);
begin begin
FController := Value; FController := Value;