Главная страница Случайная страница Разделы сайта АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Глоссарий. 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. Заставка қ ою. Заставка терезе деп программаны жү ктеген кезде ең бірінші экранғ а шығ арылатын терезені айтады. Заставка терезесі осы программа туралы қ ысқ аша мә ліметті сақ тайды. Заставка терезесін шығ ару программа проектісінде заставка-формасын қ ұ рып, белгілі бір уақ ыт ө ткеннен кейін ол форманы жою арқ ылы жү зеге асады. Мысал. Заставка жә не негізгі формадан тұ ратын қ осымша қ ұ райық. Негізгі терезе заставка терезесінен кейін біраз уақ ыттан соң пайда болсын. Қ осымша проектісі келесі тү рде болады:
|