Menu

MS WINDOWS

Teunis Middelkoop

In the source specific WINDOWS statements are embraced by {$IFDEF WINDOWS} {$ENDIF}
The initiation file "Moneytalks_int" for linux it should be placed as a hidden file in the user's directory.
For Windows it should be placed in the same folder as the program.
Some code from "boekhouding1.pas":

lijst:= TStringList.Create;
{$IFDEF LINUX}
lijst.LoadFromFile(GetUserDir + '.MoneyTalks_int')
{$ENDIF}
 {$IFDEF WINDOWS}
lijst.LoadFromFile(ExtractFilePath(Application.ExeName) + 'MoneyTalks_int');
{$ENDIF}        

The printing in the program is done by CUPS-PDF
The page layout and resolution can be different between WIN and LINUX
The line height parameter rh can be adapted using the properties of the printer
Some code from "deprinter.pas":

rh:= Round(3 * Abs(Canvas.TextHeight('I'))); 
// OR
rh:= Round(Printer.YDPI)/5);     

Related

Wiki: Home