private
    { Private declarations }
    //procedure WMGetMinMaxInfo(var Msg: TMessage); message WM_GETMINMAXINFO;
  public
    { Public declarations }
    IsP2KConnected: boolean;
    IsATConnected: boolean;
    IsFlashConnected: boolean;
    IsOBEXConnected: boolean;

   procedure ChangeProgMode(AMode: TProgramMods);
    procedure SwitchToP2K;
    procedure SwitchToAT;
    procedure SwitchToFlash;
    procedure SwitchToOBEX;
    procedure ClearStatusBar;
    function ExecuteFile(const FileName, Params, DefaultDir: string; ShowCmd: Integer): THandle;
    procedure LoadSettings(const AFileName: string);
    procedure LoadImages(const APath: string);
    procedure SetStatusConnected(AStatus: boolean; AText: string);
    procedure ApplySkin(ASkin: string);
    procedure ApplyLang;
    procedure ApplyHints;
    
    procedure SetColumnImage( List: TspSkinListView; Column, Image: Integer; ShowImage: Boolean);
    function GetSHIcon(FName: AnsiString; fType: string): HICON;
    /////////////
    procedure RebuildToolBar(AType: byte);
    procedure RebuildPanelButtons(AType: byte);
  end;
var
  ExePath: string;
  exestr: string;
  exemajor, exeminor, exerelease, exebuild: string;
  exeproductname, exefullversion, execompanyname: string;
  curToolBar: byte = 0;
  curTypeMenu: byte = 0;
  Form1: TForm1;
  P2K: TP2KApi;
  curTelStat: boolean = true;
  oldTelStat: boolean = false;
  IsOtherFeaturesFill: boolean = false;
  IsFillATCommands: boolean = false;
  IsSuspend: boolean = false;
  iCurrentMode: byte = 0;
  iFlashAvailable: integer = 0;
  ShowModule_KJava: byte = 0;
  ShowModule_FlexTools: byte = 0;  
  ShowModule_Patching: byte = 0;
  bOBEXAutoUpdateFileList: byte = 0; // 0 - no, 1 - yes
  iReadDisks: byte = 0; {0 - все доступные,
                     1 - не читать флешку (/b)
                     2 - только диск /a
                     3 - только диск /c
                     }
  iCloseP2K: byte = 0;
  iDynamicRefreshFolder: byte;
  iPhoneBookType: byte = 0;  // 0 v500, 1 - e1, 2 - L7e, 3 - v3x
  UseFirstNRecords: integer = 150;
  ATTimeOut: integer = 10000;
  OBEXTimeOut: integer = 1500;
  iREAD_PHONEBOOK_BLOCK: integer = 30;
  SKin: string;
  ThemeAdapt: boolean = false;
  iSkin: integer;
  iP2KCF: byte = 0;
  IFNUM: byte = 2;
  iOBEXType: byte = 0; //0 - old, 1- L7, L7e
  SwitchModeTimeOut: integer = 4000;
  EnableDebug: byte = 1;
  OBEXShowProgress: byte = 1;
  xP2KTimeOut: word = 10000;
  xFlashTimeOut: word = 10000;
  isP2KFound: boolean = false;
  xPlatform: string = '';
  xModel: string = '';
  xPLType: byte = 255;
  xKJType: byte = 255;
  PL01: boolean = false;
  PL02: boolean = false;
  PL03: boolean = false;
  PL04: boolean = false;
  PL05: boolean = false;
  PL06: boolean = false;
  PL07: boolean = false;
  KJ00: boolean = false;
  KJ01: boolean = false;
  KJ02: boolean = false;
  KJ03: boolean = false;
  KJ04: boolean = false;
  KJ05: boolean = false;
  KJ06: boolean = false;
  KJ07: boolean = false;
  AutoPlatform: boolean = false;
  MinToTray: boolean = false;
  RollUp: boolean = false;
  xPL: TStringList;
  xKJ: TStringList;
  ClassicSysMenu: byte = 0;
  ShowWindowContent: byte = 1;
  defShowWindowContent: byte = 1;
  xLang: string = 'russian.lng';
  iSOund: byte = 0;
  xCom_Port: TStringList;
  AmrByRing: boolean = false;
  WavByRing: boolean = false;
  UseMelodyFromCard: boolean = false;
  MMA_ReadJava_A: boolean = false; // читать яву с диска /a
  MMA_ReadJava_B: boolean = false; // читать яву с диска /b
  OtherFeaturesFile: TFileName = 'other_features.pof';
  //OtherFeaturesFile2: TFileName = 'other_features.pof';
  lit: cardinal; // for load image thread
  IsFlashTerminalLog: boolean = false;
  //function Logger(s:string):boolean;
  //procedure LoadImages;
  xLoggerHandle: integer;
  sCurrentProfile: string = '';
    procedure Logger(Astr: string); overload;
    procedure Logger(ABuff: Pointer; ASize: Integer); overload;
implementation
uses uAbout, uOptions, ufmOther_Features, ufmP2KFileManager, ufmSeemEditor,
  uTmpFrm, uObexFM, ufrmProgress, uAT, uAT_Terminal, uAT_PhoneBook,
  uSpecialUtils, uAT_Info, uLng, uRingStyles, uWebSession, uMMA_UCP,
  uMMAEdit, uAlarmClock, uAT_DateBook, uAT_Messages, uFlash_Terminal,
  uFlash_SHX, uFlash_Backup, uP2KInfo, uFlash_work_with_Pog, uKJava,
  uFlash_Patching, uFlexTools;
{$R *.dfm}