Телефонный справочник

  PhoneBook.List.Enabled:=false;

  PhoneBook.files.Enabled:=false;

  PhoneBook.Panel2.visible:=true;

  PhoneBook.Panel3.visible:=true;

  PhoneBook.EditFind.Enabled:=false;

  PhoneBook.Panel4.visible:=true;

  PhoneBook.PBToolButton6.Enabled:=false;

Кнопка «Продолжить»:

phonebook.show;

form9.Hide;

PhoneBook.List.Enabled:=true;

PhoneBook.files.Enabled:=true;

PhoneBook.Panel2.visible:=false;

PhoneBook.Panel3.visible:=false;

PhoneBook.EditFind.Enabled:=true;

PhoneBook.Panel4.visible:=false;

PhoneBook.PBToolButton6.Enabled:=true; 

Кнопка «Нет» закрывает диалоговое окно. 
 

Глава 3. Требования по обеспечению пожарной безопасности

В помещениях запрещается:

- зажигать огонь;

- включать электрооборудование, если в помещении пахнет газом;

- курить;

- сушить что-либо на отопительных приборах;

- закрывать вентиляционные отверстия в электроаппаратуре 

Источниками воспламенения являются:

а) искра  при разряде статического электричества

б) искры  от электроборудования

в) искры  от удара и трения

г) открытое пламя

При возникновении  пожароопасной ситуации или пожара персонал должен немедленно принять необходимые меры для его ликвидации, одновременно оповестить о пожаре администрацию.

Помещения с электроборудованием должны быть оснащены огнетушителями типа ОУ-2 или  ОУБ-3.

3.1 Общие требования пожарной безопасности:

     Правила пожарной безопасности, регламентированные законом Российской Федерации, включают ряд требований пожарной безопасности, которые являются обязательными  для применения и исполнения различным  субъектам государственной власти, органам местного самоуправления, предприятиям и организациям любой формы собственности и организационно-правовых форм.

     Также правила пожарной безопасности должны соблюдать и исполнять служащие и должностные лица, частные предприниматели, юридические лица, а также граждане Российской Федерации, иностранные граждане, лица без гражданства.

     Требования  исполнения правил пожарной безопасности направлены на защиту жизни и здоровья граждан, их имущества, имущества физических и юридических лиц, защиту имущества  государственных и муниципальных органов, а также на защиту окружающей среды. Организации, предприятия, их должностные лица, служащие и граждане, которые нарушили требования, и правила пожарной безопасности несут ответственность, предусмотренную законодательством Российской Федерации.

     При нарушении требований пожарной безопасности, которые приводят к возникновению пожара, органами внутренних дел возбуждаются уголовные дела, которые включают статьи: 167 часть 2 УК РФ «О поджоге», 168 часть 2 УК РФ «О неосторожном уничтожении чужого имущества при обращении с огнем», 219 УКРФ «О нарушении правил пожарной безопасности» и т.д.

3.2  Правила  поведения при пожаре:

Каждый  гражданин в случае обнаружения  пожара или выявления признаков  горения обязан немедленно вызвать  службу пожарной охраны, назвав точный адрес объекта, предположительное место возникновения возгорания, а также свои фамилию, имя и отчество.

     По  возможности принять все необходимые  меры по эвакуации людей с места  пожара, способствовать тушению пожара, а также оказать помощь в принятии мер по сохранности имущества и других материальных ценностей.

     Руководители  предприятий, должностные лица, лица, владеющие или пользующиеся имуществом на правах аренды или договора, а  также лица, отвечающие за обеспечение  пожарной безопасности, обязаны прибыть на место пожара, а также давать необходимые сведения подразделениям пожарной охраны, которые привлечены для устранения пожара и проведения первоочередных аварийно-спасательных работ о наличии на объекте горючих, взрывоопасных, сильнодействующих ядовитых и взрывчатых веществах необходимые для соблюдения безопасности личного состава.

     Также необходимо послать повторное сообщение  о возникновении пожара в службу пожарной охраны и поставить в  известность руководящий состав предприятия или организации, диспетчера и лицо, ответственное за дежурство по объекту.

3.3 Организация  мероприятий при пожаре:

В случае возникновения пожара необходимо организовать меры по эвакуации людей из здания, имеющимися для этого всеми силами и средствами. Проверить исправность  и включение в работу всех автоматических систем противопожарной защиты.

     В случае необходимости отключить  энергоснабжение за исключением  противопожарных систем защиты. Прекратить работу транспортирующего оборудования и устройств, агрегатов, аппаратов  и другого электрооборудования. Перекрыть снабжение сырьевых, паровых, газовых и водных коммуникаций, а также выключить системы вентиляции в аварийном помещении и смежных с ним помещениях. Кроме этого необходимо провести ряд других мероприятий, способствующих предотвращению распространения огня и задымления других помещений здания.

     В обязательном порядке необходимо остановить все работы в здании, которые допустимы  технологическим процессом производства, кроме работ, проводимых с целью  ликвидации пожара. Вывести за пределы опасной зоны лиц, не участвующих в тушении пожара, а также до момента прибытия подразделения службы пожарной охраны взять на себя руководство по организации мероприятий способствующих тушению пожара.

     Вместе  с этим необходимо принять меры по спасению и защите материальных ценностей и особо важной производственной документации. 

3.4 Ответственность

Причины. 
Должностные лица организации могут понести административное наказание за нарушение утвержденных правил по противопожарной безопасности. Кроме того, взыскание может быть наложено в случаях, когда руководитель отдавал работникам распоряжения, которые противоречат пожарным нормам, а также, если он не принял мер по организации безопасности, входящие в его непосредственные обязанности и прописанные в должностной инструкции. 
Наказание. 
Согласно законодательства Российской Федерации, на должностное лицо может быть наложено два вида административного наказании - штраф либо выписанное предупреждение. Предпринимателям следует изучить содержание статьи 20 (4) Кодекса об административных правонарушениях Российской Федерации. Она гласит, что на должностное лицо, в связи с отсутствием противопожарной сигнализации, загромождением путей эвакуации и некорректным их устройством и другими нарушениями может быть наложен штраф. Размер его колеблется, для физического лица, от 10 до 230 минимальных размеров оплаты труда, а для юридического лица от 100 до 300 МРОТ. 
Контроль. 
Юридическое лицо, за несоблюдение установленных правил, может штрафовать главный государственный инспектор Российской Федерации по пожарному надзору. Это говорит о том, что его представители в лице: заместителей, государственных инспекторов субъектов Российской Федерации и их заместителей, главных госинспекторов муниципальных образований и районных округов и их заместители, соответственно, имеют право проводить процедуру административного наказания.  
Протокол. 
Протокол об административном правонарушении составляется органами пожарной охраны либо отделения внутренних дел. Само дело по протоколу проходит рассмотрение у работников пожарного надзора РФ. 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 
 

Приложение 1

Листинг программы.

unit main;

interface

uses

  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,

  ComCtrls, ExtCtrls, ToolWin, Menus, Registry, inifiles, StdCtrls, Buttons,

  ActnList, ImgList,printers, shellApi, Grids, AppEvnts, Excel2000,

  OleServer, ComOBJ, XPMan, jpeg, OleCtrls, SHDocVw;

var

PhoneBook: TPhoneBook;

ini:TiniFile;

dir:string;            //рабочая деректория

newi:boolean;

tab:shortstring;

Node,ToNode:TTreeNode;

f:boolean=false;

II:integer=-1;

ind:integer=-2;

CommentChanged:boolean=false;

mplementation

uses new_phone, Change, cfg, Unit2, Unit3, Unit4, Unit1, Unit5, Unit7,

  Unit8, Unit6, Unit9;

{$R *.DFM}

procedure TPhoneBook.FormCreate(Sender: TObject);

var UT,AN,glist:tstringlist;

    m,k,n,i:integer;

    cfgini:Tinifile;

begin

groups.OnChange:=nil;

  Phones.OnChange:=nil;

dir:=extractfilepath(application.ExeName);

  if not DirectoryExists(dir+'text') then

    if not CreateDir(dir+'text') then begin

       raise Exception.Create('Cannot Create Work Dir');

       showmessage('Возможно диск защищен от записи или нет соответствующих прав доступа');

       application.Terminate;

    end;

  Newi:=True;

  SetCurrentDir(dir);

ini:=tinifile.create(dir+'phones.pdb');

// загрузка групп телефонов

  glist:=tstringlist.create;

  glist.Clear;

  Groups.Clear;

  try

    if fileexists(dir+'groups.pdb') then

       glist.LoadFromFile(dir+'groups.pdb')

  except

      writelog(log,'FileReadError(Groups.pdb)','FormCreate');

  end;

  Groups.AddItem('<Весь список>',nil);

  for i:=0 to gList.Count-1 do begin

     Groups.AddItem(gList[i],nil);

  end;

  GList.Free;

  groups.ItemIndex:=0;

  // загрузка списка заметок

  try

    FileSetAttr(dir+'text\notes.lst',$00);

    if FileExists(dir+'text\notes.lst') then

       List.LoadFromFile(dir+'text\notes.lst');//:3

  except

     WriteLog(Log,'FileAccessError(notes.lst)','FormCreate');

  end;

//-------------------------------

  cfgini:=tinifile.Create(dir+'PhoneBook.ini');

  AN:=tstringlist.create;

  ut:=tstringlist.create;

  ut.Clear;

  an:=GetAllNotesNames;

  m:=list.Items.AddChild(list.Items.GetFirstNode,'*').AbsoluteIndex;

  cfgini.writestring('group','*','Заметки не используемые ни в одной группе(востановленные после неудачного удаления)');

  UpdateNotesIcons;

  for k:=0 to List.Items.Count-1 do

    for n:=0 to An.Count-1 do

      if (list.items[k].Text=AN[n]) then

         UT.add(an[n]);

  for n:=0 to an.Count-1 do begin

    if UT.IndexOf(an[n])=-1 then

      list.Items.AddChild(list.Items[m],an[n]);

  end;

  AN.Free;

  UT.Free;

  if list.Items[m].Count<1 then list.Items[m].Delete;

  cfgini.Free;

  //-------------------------------