Реферат Розробка програмного додатка &Автоматизація обліку клієнтів відділу позавідомчої охорони&

підпис ПІБ + # 13 + # 10 + # 13 + # 10); Tzayav.N6Click (Sender: TObject) ;, Doc: variant;

//Vrem: Word;:=CreateOleObject ( Word.Application ); ( Word не встановлено! ) ;;;. Visible:=true;:=Wordapp.Documents.Add;

//WordApp.Selection.TypeParagraph;.Selection.Paragraphs.Alignment:=2;.Selection.Font.Size:=13;

//WordApp.Selection.Font.Bold:=true; .Selection.TypeText ( Директору ФФГУП Охорона + # 13 + # 10 + МВС РФ по Калузької області raquo ; + # 13 + # 10 + Шіхіріну Г.В. + # 13 + # 10) ;. Selection.TypeText ( від + Edit1.Text + # 13 + # 10 + # 13 + # 10) ;. Selection.TypeText ( + # 13 + # 10 + # 13 + # 10 + # 13 +#10);.Selection.Paragraphs.Alignment:=1;.Selection.Font.Size:=13;.Selection.TypeText(laquo;Заявлениеraquo;+#13 + # 10) ;. Selection.Paragraphs.Alignment:=0; .Selection.Font.Size:=13; .Selection.Font.Bold:=false;

WordApp.Selection.TypeText ( Прошу Вас провести монтаж тривожної сигналізації в приміщенні + Edit2.Text); .Selection.TypeText ( розташований за адресою: + Edit3.Text + # 13 + # 10 + # 13) ;. Selection.TypeText ( Оплату гарантую. + # 13 + # 10 + # 13 + # 10 + # 13 + # 10 + # 13 + # 10);

WordApp.Selection.Paragraphs.Alignment:=2; .Selection.TypeText ( _______________ _____________ + # 13 + # 10) ;. Selection.TypeText ( підпис ПІБ ); ; Tzayav.N3Click (Sender: TObject) ;, Doc: variant;

//Vrem: Word;:=CreateOleObject ( Word.Application ); ( Word не встановлено! ) ;;;. Visible:=true;:=Wordapp.Documents.Add;

//WordApp.Selection.TypeParagraph;.Selection.Paragraphs.Alignment:=2;.Selection.Font.Size:=13;

//WordApp.Selection.Font.Bold:=true; .Selection.TypeText ( Директору ФФГУП Охорона + # 13 + # 10 + МВС РФ по Калузької області raquo ; + # 13 + # 10 + Шіхіріну Г.В. + # 13 + # 10) ;. Selection.TypeText ( від + Edit1.Text + # 13 + # 10 + # 13 + # 10) ;. Selection.TypeText ( + # 13 + # 10 + # 13 + # 10 + # 13 +#10);.Selection.Paragraphs.Alignment:=1;.Selection.Font.Size:=13;.Selection.TypeText(laquo;Заявлениеraquo;+#13 +#10);.Selection.Paragraphs.Alignment:=0;.Selection.Font.Size:=13;.Selection.Font.Bold:=false;.Selection.TypeText(laquo;Прошу Вас провести монтаж _______________ + Edit2.Text + сигналізації в приміщенні + Edit2.Text); .Selection.TypeText ( розташований за адресою: + Edit3.Text + # 13 + # 10 + # 13) ;. Selection.TypeText ( Оплату гарантую. + # 13 + # 10 + # 13 + # 10 + # 13 + # 10 + # 13 + # 10) ;. Selection.Paragraphs.Alignment:=2; .Selection. TypeText (DateToStr (DateTimePicker1.Date) + _____________ + # 13 + # 10) ;. Selection.TypeText ( ПІБ ) ;; Tzayav.N4Click (Sender: TObject) ;, Doc: variant;

//Vrem: Word;:=CreateOleObject ( Word.Application ); ( Word не встановлено! ) ;;;. Visible:=true;:=Wordapp.Documents.Add;

//WordApp.Selection.TypeParagraph;.Selection.Paragraphs.Alignment:=2;.Selection.Font.Size:=14;.Selection.Font.Bold:=true;

WordApp.Selection.TypeText ( Начальнику ОВО при + # 13 + # 10 + ОВС по Боровському району + # 13 + # 10 + підполковнику міліції + # 13 + # 10 + Лузгачеву С.І. + # 13 + # 10);

WordApp.Selection.TypeText ( + # 13 + # 10 + # 13 + # 10 + # 13 +#10);.Selection.Paragraphs.Alignment:=1;.Selection.Font.Size:=14;.Selection.TypeText(laquo;Заявлениеraquo;+#13 + # 10) ;. Selection.Paragraphs.Alignment:=0; .Selection.Font.Size:=15; .Selection.Font.Bold:=false;

WordApp.Selection.TypeText ( Прошу Вас укласти договір на екстрений виїзд наряду міліції при спрацювання тривожної кнопки в моєму будинку, розташованому за адресою: + Edit3.Text);

WordApp.Selection.TypeText ( з + DateToStr (DateTimePicker2.Date) + року. Час охорони об'єкта щодня з ______ годин до ______ годин. + # 13 + # 10 + # 13 + # 10 + # 13 + # 10) ;. Selection.TypeText ( Оплату гарантую. + # 13 + # 10 + # 13 + # 10 + # 13 + # 10 + # 13 + # 10 );

WordApp.Selection.Paragraphs.Alignment:=2; .Selection.TypeText ( _______________ _____________ + # 13 + # 10) ;. Selection.TypeText ( підпис ПІБ + # 13 + # 10 + # 13 + # 10); Tzayav.N5Click (Sender: TObject) ;, Doc: variant;

//Vrem: Word;:=CreateOleObject ( Word.Application ); ( Word не встановлено! ) ;;;. Visible:=true;:=Wordapp.Documents.Add;

//WordApp.Selection.TypeParagraph;.Selection.Paragraphs.Alignment:=2;.Selection.Font.Size:=14;.Selection.Font.Bold:=true;

WordApp.Selection.TypeText ( Начальнику ОВО при + # 13 + # 10 + ОВС по Боровському району + # 13 + # 10 + підполковнику міліції + # 13 + # 10 + Лузгачеву С.І. + # 13 + # 10);

//WordApp.Selection.TypeText ( від + DBEdit15.Text + # 13 + # 10 + # 13 + # 10) ;. Selection....