You've already forked lazarus-ccr
RxFPC: fix cimpile on fpc < 3.1.1
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5114 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -35,6 +35,7 @@ unit RxDBGridExportPdfSetupUnit;
|
|||||||
|
|
||||||
interface
|
interface
|
||||||
|
|
||||||
|
{$IF (FPC_FULLVERSION >= 30101)}
|
||||||
uses
|
uses
|
||||||
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
|
Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, StdCtrls,
|
||||||
EditBtn, ButtonPanel, ExtCtrls, ComCtrls, ColorBox, fpPDF;
|
EditBtn, ButtonPanel, ExtCtrls, ComCtrls, ColorBox, fpPDF;
|
||||||
@ -93,7 +94,9 @@ const
|
|||||||
'B5' // ptB5
|
'B5' // ptB5
|
||||||
);
|
);
|
||||||
|
|
||||||
|
{$ENDIF}
|
||||||
implementation
|
implementation
|
||||||
|
{$IF (FPC_FULLVERSION >= 30101)}
|
||||||
uses rxdconst;
|
uses rxdconst;
|
||||||
|
|
||||||
{$R *.lfm}
|
{$R *.lfm}
|
||||||
@ -133,5 +136,6 @@ begin
|
|||||||
ComboBox1.Items.Add(pdfPaperNames[C]);
|
ComboBox1.Items.Add(pdfPaperNames[C]);
|
||||||
end;
|
end;
|
||||||
|
|
||||||
|
{$ENDIF}
|
||||||
end.
|
end.
|
||||||
|
|
||||||
|
Reference in New Issue
Block a user