Browse Source

* merged r49283

git-svn-id: branches/fixes_3_2@49297 -
nickysn 4 years ago
parent
commit
a0963ac7d5
1 changed files with 2 additions and 1 deletions
  1. 2 1
      packages/graph/src/ptcgraph/ptcgraph.pp

+ 2 - 1
packages/graph/src/ptcgraph/ptcgraph.pp

@@ -18,6 +18,7 @@ unit ptcgraph;
 
 {//$define logging}
 {$define FPC_GRAPH_SUPPORTS_TRUECOLOR}
+{$modeswitch DEFAULTPARAMETERS+}
 
 {******************************************************************************}
                                     interface
@@ -139,7 +140,7 @@ var
   WindowTitle: AnsiString;
   PTCWrapperObject: TPTCWrapperThread;
 
-function InstallUserMode(Width, Height: SmallInt; Colors: LongInt; HardwarePages: SmallInt; XAspect, YAspect: Word): smallint;
+function InstallUserMode(Width, Height: SmallInt; Colors: LongInt; HardwarePages: SmallInt = 1; XAspect: Word = 10000; YAspect: Word = 10000): smallint;
 
 {******************************************************************************}
                                  implementation