VPF::вывод на печать значении из Edit

nurlan120578

Дата 25.3.2011, 13:42 (ссылка)

(голосов:2)

Загрузка ...

Новичок

Профиль
Группа: Участник
Сообщений: 1
Регистрация: 25.3.2011

Репутация: нет
Всего: нет

Как вывести на печать значение из Едит на Ексел?
Ну типа чтобы было как шаблон.
скажем в Едите 1005
должно вывести на печать:

разработка 1005
Помогите??!!! smile

Frees

Дата 25.3.2011, 14:15 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2233
Регистрация: 2.12.2005
Где: Екатеринбург

Репутация: 16
Всего: 54

Код


uses
  Printers
...
procedure TForm5.Button1Click(Sender: TObject);
begin
  while true do  with Printer do
  Begin
    BeginDoc;
    Canvas.Font := Edit1.Font;
    Canvas.TextOut(100, 100, 'разработка ' + Edit1.Text);
    EndDoc;
  end;
end;

--------------------

Кольцов Виктор Владимирович

Данкинг

Дата 25.3.2011, 14:29 (ссылка)

(нет голосов)

Загрузка ...

Yersinia pestis

Профиль
Группа: Завсегдатай
Сообщений: 8302
Регистрация: 7.11.2006
Где: მოსკოვი

Репутация: 11
Всего: 130

Цитата(nurlan120578 @ 25.3.2011, 13:42

)

Как вывести на печать значение из Едит на Ексел?

Что значит "на Ексел"? smile

--------------------

There's nothing left but silent epitaphs.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »