Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2004.05.02;
Скачать: CL | DM;

Вниз

Печать   Найти похожие ветки 

 
Ivolg ©   (2004-04-15 14:48) [0]

Помогите! Как можно текст из Мемо вивисти на принтер для печати!
Или Как можно напичатать текст который находится в МЕМО


 
Фикус ©   (2004-04-15 14:54) [1]

Хелп читать!

This example uses a button and a memo on a form. When the user clicks the button, the content of the memo is printed, with a 200-pixel border around the page. To run this example successfully, you must add the Printers unit to the uses clause of your unit.

procedure TForm1.Button1Click(Sender: TObject);

begin
 with Printer do
 begin
   BeginDoc;
   Canvas.TextRect(Rect(200,200,PageWidth-200,PageHeight-200),
                   200, 200, Memo1.Lines.Text);
   EndDoc;
 end;

end;


 
Ivolg ©   (2004-04-15 15:12) [2]

Фикус

Спасибо!А как можно сменить параметры печати!


 
Тимохов ©   (2004-04-15 15:14) [3]


> Ivolg ©   (15.04.04 15:12) [2]

Какие параметры вас интересуют!!!


 
Anatoly Podgoretsky ©   (2004-04-15 15:38) [4]

WriteLn(F, Memo1.Lines[I])
или
WriteLn(F, Memo1.Lines.Text)

второй вариант не проверял



Страницы: 1 вся ветка

Текущий архив: 2004.05.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.135 c
8-1075968210
SH
2004-02-05 11:03
2004.05.02
Чёрнобелый Jpeg


14-1081741095
mfender
2004-04-12 07:38
2004.05.02
День космонавтики


1-1081824510
Fighter
2004-04-13 06:48
2004.05.02
Как узнать есть ли у объекта заданное property?


14-1081635133
Soft
2004-04-11 02:12
2004.05.02
Соционика или типизация человеческой личности.


3-1080901697
Skulll
2004-04-02 14:28
2004.05.02
Веб клиент на PHP, ASP, JSP или CGI