Crystal Preview에서 Export버튼을 눌렀을 때 발생하는 OnExportButtonClicked라는 이벤트가 있습니다.
여기에서 UseDefault := False로 값을 주고
Export 함수를 직접 호출해 주면 됩니다.(먼저 Export Type을 선택하는 GUI를 만드셔야 겠지요...^^)
HTML의 경우에는
with CrReport do
begin
ExportOptions.DestinationType := crEDTDiskFile;
ExportOptions.FormatType := crEFTHTML40;
ExportOptions.DiskFileName := 'c:\test.html'; ExportOptions.HTMLEnableSeparatedPages := True;
ExportOptions.HTMLHasPageNavigator := True;
Export(False);
end;
로,
PDF파일의 Export같은 경우에는(RTF, XLS파일도 비슷합니다.)
with CrReport do
begin
ExportOptions.DestinationType := crEDTDiskFile;
ExportOptions.FormatType := crEFTPortableDocFormat;
ExportOptions.DiskFileName := 'c:\test.pdf';
Export(False);
end;
와 같이 하시면 됩니다.
그럼..
Export속성 설정을 어떻게 하는지 알려달라는 것인지 모르겠네요..
Crystal Preview에서 Export버튼을 눌렀을 때 발생하는 OnExportButtonClicked라는 이벤트가 있습니다.
여기에서 UseDefault := False로 값을 주고
Export 함수를 직접 호출해 주면 됩니다.(먼저 Export Type을 선택하는 GUI를 만드셔야 겠지요...^^)
HTML의 경우에는
with CrReport do
begin
ExportOptions.DestinationType := crEDTDiskFile;
ExportOptions.FormatType := crEFTHTML40;
ExportOptions.DiskFileName := 'c:\test.html'; ExportOptions.HTMLEnableSeparatedPages := True;
ExportOptions.HTMLHasPageNavigator := True;
Export(False);
end;
로,
PDF파일의 Export같은 경우에는(RTF, XLS파일도 비슷합니다.)
with CrReport do
begin
ExportOptions.DestinationType := crEDTDiskFile;
ExportOptions.FormatType := crEFTPortableDocFormat;
ExportOptions.DiskFileName := 'c:\test.pdf';
Export(False);
end;
와 같이 하시면 됩니다.
그럼..