object FrmPrincip: TFrmPrincip Left = 214 Top = 115 BorderStyle = bsSingle Caption = 'Rapid-Application 1.0' ClientHeight = 56 ClientWidth = 203 Color = clBtnFace Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [] OldCreateOrder = True PopupMenu = iPmGauche Position = poScreenCenter ShowHint = True OnClose = FormClose OnCreate = FormCreate OnHelp = FormHelp PixelsPerInch = 96 TextHeight = 13 object iImgDesactive: TImage Left = 148 Top = 8 Width = 35 Height = 35 Picture.Data = {} end object iImgActive: TImage Left = 104 Top = 8 Width = 35 Height = 35 Picture.Data = {} end object iPmGauche: TPopupMenu Left = 4 Top = 8 end object iPmDroit: TPopupMenu Left = 36 Top = 8 object iMiActiveDesactive: TMenuItem Caption = 'A&ctiver/D�sactiver' OnClick = iMiActiveDesactiveClick end object N1: TMenuItem Caption = '-' end object iMiConfig: TMenuItem Bitmap.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000120B0000120B00001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00370777033333 3330870700033337073000770333333070008870073333370077700070333333 0770703707333300080700333333330778083330003333000807073070370733 0780700070007037007800777770073070000770007703370730080777070003 3330780807077703333308078707000333330780007703333333} Caption = '&Configuration' OnClick = iMiConfigClick end object N2: TMenuItem Caption = '-' end object iMiAPropos: TMenuItem Caption = '&A propos...' OnClick = iMiAProposClick end object iMiAide: TMenuItem Bitmap.Data = { F6000000424DF600000000000000760000002800000010000000100000000100 04000000000080000000120B0000120B00001000000010000000000000000000 800000800000008080008000000080008000808000007F7F7F00BFBFBF000000 FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333 3333333333300033333333333005570333333330055FF870333330055FF00887 0333755FF0055088703375F00555550887037005553B55508870755555535555 080335F55555BB555003335F555553BB55033335F55535BB555033335F55BBB5 5500333335F5555500333333335F550033333333333550333333} Caption = '&Rubriques d'#39'aide' OnClick = iMiAideClick end object N3: TMenuItem Caption = '-' end object iMiQuitter: TMenuItem Caption = '&Quitter' OnClick = iMiQuitterClick end end object iCTITray: TCoolTrayIcon CycleInterval = 0 ShowHint = False PopupMenuGauche = iPmGauche PopupMenuDroit = iPmDroit StartMinimized = True Left = 72 Top = 8 end end