{==========================================================}
{                                                          }
{  unit uMemory                        26/08/2003          }
{                                      Verze 1.0           }
{                                                          }
{  Definice rezervovane casti zalohovane staticke RAM      }
{                                                          }
{                                                          }
{  (C)2003, SofCon, Stresovicka 49, 160 00 Praha 6         }
{                                                          }
{                                                          }
{==========================================================}

unit uMemory;

{$I SETS.INC}

interface

uses
  Controls;

const

  cMemoryTop = $80000; { 512KB staticke RAM }

  cAppSettingsSeg = (cMemoryTop - SizeOf( TApplicationSettings )) div 16;

var

{$IFDEF MCP}
  { Ve verzi pro KIT je struktura nastaveni menu ulozena
  { v rezervovane casti staticke RAM }
  g_AppSettings : TApplicationSettings absolute cAppSettingsSeg:0;
{$ENDIF}

{$IFDEF DOS}
  { Ve verzi pro DOS je struktura nastaveni menu ulozena
  { v rezervovane casti staticke RAM }
  g_AppSettings : TApplicationSettings;
{$ENDIF}

implementation


end.