Студопедия

Главная страница Случайная страница

Разделы сайта

АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника






Глоссарий. TPrinter класы ақпаратты баспаға шығаруды қамтамасыз ететін функциялардан тұрады.






TPrinter класы ақ паратты баспағ а шығ аруды қ амтамасыз ететін функциялардан тұ рады.

Ақ парат баспағ а Write жә не Writeln стандартты процедураларының кө мегімен жол бойынша шығ арылады.

Write процедурасын қ олданғ анда автоматты тү рде жаң а парақ қ а ауысу орындалмайды. Жаң а жолғ а кө шу текст ұ зындығ ы парақ енінен артық болғ ан жағ дайда ғ ана орындалады.

TPrinter класының басты қ асиеті – Canvas.

 

1. Мә ліметтерді баспағ а шығ ару. Баспағ а шығ ару процесі Delphi жү йесінде TPrinter класы басқ арады. Бұ л класс қ ұ ралдарын қ олдану ү шін Uses бө лімінде Printers модулін қ осу керек.

TPrinter класы ақ паратты баспағ а шығ аруды қ амтамасыз ететін функциялардан тұ рады. TPrinter класының басты қ асиеті – Canvas. Текстің, қ ылқ аламның параметрлерін жә не геометриялық фигураларды бояуды басқ аратын Font, Реn жә не Brush касиеттері Canvas қ асиеттері болып табылады.

Бұ дан басқ а TPrinter класының негізгі қ асиеттеріне мыналар жатады:

- PageHeight (Integer типті) - парақ биіктігін анық тайды.

- PageWidth (Integer типті) - парақ енін анық тайды.

- Orientation (ТРrinterОгіеntation типті)-парақ ориентациясын анық тайды:

- poPortrait - кітаптық

- poLandscape - альбомдық

- PageNumber (Integer типті) баспағ а шығ арылып жатқ ан ағ ымдағ ы бет нө мерін кө рсетеді. Бұ л нө мер NewPage ә дісін шақ ырғ анда артып отырады.

- Title (String типті) баспағ а шығ арылатын қ ұ жат тақ ырыбын береді.

- Printers (TString типті) жү йеде орнатылғ ан принтерлер тізімінен тұ рады.

- TPrinter класының Orientation қ асиетінен басқ а қ асиеттерінен ө згерту ү шін колданушы баспағ а шығ ару параметрлерін кү йге келтірудің стандартты диалогтарын шақ ыруы керек.

Баспағ а шығ ару процесін басқ ару TPrinter класының сә йкес ә дістерінің кө мегімен орындалады. NewPage ә дісі парақ тың жаң а бетіне кө шуді орындайды.

BeginDoc ә дісі ақ паратты принтерге жібереді. Бұ л баспағ а шығ ару кезіндегі орындалатын бірінші команда. Баспағ а шығ ару ЕпdDос ә дісі шақ ырылғ аннан кейін ғ ана басталады. Баспағ а шығ ару процесін ү зу ү шін Abort ә дісі қ олданылады. Бұ л ә дісті шақ ыру кезінде баспағ а шығ ару дереу тоқ татылады, ал баспағ а шығ ару буферіндегі барлық мә ліметтер жойылады.

SetPrintеr ә дісінің кө мегімен баспағ а шығ арудың ағ ымдағ ы қ ұ рылғ ысын ө згертуге болады.

Тексті баспағ а шығ ару. Тексті принтер жұ мысының текстік жә не графикттік режимінде баспағ а шығ аруғ а болады. Бірақ баспағ а шығ аруды текстік режимде ұ йымдастыру жең ілірек. Ақ парат баспағ а Write жә не Writeln стандартты процедураларының кө мегімен жол бойынша шығ арылады.

Writeln процедурасын шақ ырғ ан кезде текст ағ ымдағ ы шрифтпен шығ арылады, ал баспағ а шығ арудың ағ ымдағ ы кө рсеткіші жаң а жолдың бірінші позициясына ауысады. Егер текст ұ зындығ ы беттің енінен артық болса, баспағ а шығ ару автоматты тү рде келесі жолдан басталады. Парақ соң ына жеткен кезде автоматты тү рде жаң а парақ басталады.

Write процедурасын қ олданғ анда автоматты тү рде жаң а парақ қ а ауысу орындалмайды. Жаң а жолғ а кө шу текст ұ зындығ ы парақ енінен артық болғ ан жағ дайда ғ ана орындалады. Мысал: Текстік режимде баспағ а шығ ару.

 

Uses Printers;

Var Stroka: System.Text;

i: integer;

AssignPrn(Stroka); Rewrite (Stroka);

Printer.Canvas.Font: =Memo1.Font;

For i: =0 to Memo1.Lines. Count-1 do

Writeln(Stroka, Memo1.Lines[i]);

System.Close (Stroka);

 

Баспағ а Memo1 компонентінің мазмү ны шығ арылады. AssignPrn(Stroka) процедурасы текстік айнымалыны принтерменбайланыстырады. Принтермен тек қ ана бір текстік айнымалыны байланыстыру керектігін ескерген жө н. Баспағ а шығ арып болғ аннан кейін байланыс System.Close(Stroka) процедурасының кө мегімен ү зіледі.

Тексті графиктік режимде шығ ару қ иынырақ. Ақ парат TCanvas класының ә дістерінің кө мегімен шығ арылады. Бұ л жағ дайда жолдар санын, текстің бетте орналасуын, жаң а бетке кө шу жене т.б, программист ө зі басқ арады.

Бейнелерді баспага шығ ару. Графйкалық бейнелерді келесі тә сілдермен баспағ а шығ аруғ а болады:

- графикалық образды шығ ару;

- қ ағ азғ а графикалық примитивтерден тұ ратын бейнелерді салу.

Баспағ а шығ ару кезінде компоненттің емес привтердің Canvas қ асиеті қ олданылады. Сондық тан ә дісті шақ ыру кезінде Printer аты кө рсетіледі.

Мысал. Бейнені принтерге шығ ару.

Printer.BeginDoc;

Printer.Canvas.Draw(50, 50, Imagel);

Printer. EndDoc

Мысал. Геометриялық фигураларды принтерге шығ ару.

Printer.BeginDoc;

Printer.Canvas.Rectangle(lO, 20, 100, 80);

Printer.Canvas.Ellipse(30, 50, 130, 150);

Printer.EndDoc

 

2. Заставка қ ою. Заставка терезе деп программаны жү ктеген кезде ең бірінші экранғ а шығ арылатын терезені айтады.

Заставка терезесі осы программа туралы қ ысқ аша мә ліметті сақ тайды. Заставка терезесін шығ ару программа проектісінде заставка-формасын қ ұ рып, белгілі бір уақ ыт ө ткеннен кейін ол форманы жою арқ ылы жү зеге асады.

Мысал. Заставка жә не негізгі формадан тұ ратын қ осымша қ ұ райық. Негізгі терезе заставка терезесінен кейін біраз уақ ыттан соң пайда болсын. Қ осымша проектісі келесі тү рде болады:






© 2023 :: MyLektsii.ru :: Мои Лекции
Все материалы представленные на сайте исключительно с целью ознакомления читателями и не преследуют коммерческих целей или нарушение авторских прав.
Копирование текстов разрешено только с указанием индексируемой ссылки на источник.