Форум: "Система";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];
ВнизПроблем с принтером!!! Найти похожие ветки
← →
dim_zay (2002-02-08 14:04) [0]Помогите, пожайлусто, программно настроить ориентацию бумаги на принтере(нужна Альбомная). Заранее благодарен.
← →
Dimaond Cat (2002-02-08 23:20) [1]мда видемо хелпы пишут просто для увеличения объема поставляемого продукта. вот если к примеру написать
Tprinter, поставить на это словечко курсор и нажать F1, то как ни странно плучишь хелп по интересующей теме, Если вдруг этого оказалось мало, то в хелпе открываем Properties и видим там такую строчку Orientation, жмем на нее и о чудо, до чего дошла техника, идет описание типа TPrinterOrientation, но если уж нам и этого мало то поискав немного глазками по экрану видим такую строчку EXAMPLE, поразмышляв, что это значит несмело жмем
БУХ-БАБАХ и появляется
procedure TForm1.Button1Click(Sender: TObject);
begin
Printer.BeginDoc;
Printer.Canvas.TextOut(100,100,"Hi there");
Printer.EndDoc;
end;
procedure TForm1.PortraitClick(Sender: TObject);
begin
Printer.Orientation := poPortrait;
end;
procedure TForm1.LandscapeClick(Sender: TObject);
begin
Printer.Orientation := poLandscape;
end;
Ну чтож, осталось вставить в Uses строчечку Printers, и вперед, можно распечатывать весь хелп, хошь вдоль, хошь поерек листа.
Представляешь мне было не впадлу печатать эту всю ерунду, а тебе лень хелп посмотреть
← →
Anatoly Podgoretsky (2002-02-09 01:32) [2]Понимаешь, там надо F1 нажимать, а так может найдется наивный и добрый дядя
← →
Dimaond Cat (2002-02-13 00:27) [3]Вот не поверишь я очень злой , и не упустил возможности поглумиться поэтому так развернуто и ответил, так что получается что и не наивный
Страницы: 1 вся ветка
Форум: "Система";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.007 c