Для профессионалов

jax · 24.11.2011, 21:39

Доброе время суток!
Задача на дельфи 7

Я ввожу в Edit текст(несколько полей),то что я ввёл нужно расспечать,если вдруг кто знает помогите пожалуйста.

AlexZir · 25.11.2011, 13:07

TEdit - однострочная компонента, в ней не может быть несколько полей. Дайте исходник программы, может, после этого будет понятнее, что вы имеете в виду.

Вообще распечатать содержимое полей можно несколькими способами, к примеру, используя диалог печати, непосредственно с формы или направляя поток данных из окна ввода непосредственно на принтер. Если дадите необходимые пояснения или исходник вашей программы - помогу с организацией печати.

jax · 25.11.2011, 14:49

Под нескольку полями я имел ввиду несколько TEdit.
К сожелению исходник прикрепить не могу,нету с собой.Пишу к интернет кафе.
На форму кидаю 4-ыре TEdit и одну кнопку.

Ввожу в TEdit какой то текст,затем нажимаю кнопку и мои данные открываются в word например,а через word я уже смогу расспечатать.
Если знаете то подскажите или если есть время,то лудше кодинк напишите.
Спасибо что уделили внемание!

AlexZir · 26.11.2011, 17:18

Есть другой вариант - распечатывать непосредственно с формы, без передачи данных во внешнее приложение, тем более, что MS Word из-за борьбы за лицензионную чистоту софта нынче уже не на каждом компьютере установлен.

jax · 26.11.2011, 17:23

Если есть тогда нипишите его пожалуйста

AlexZir · 26.11.2011, 20:59

Цитата:

Сообщение от jax

Если есть тогда нипишите его пожалуйста

Раз уж вы так настаиваете, то писать не буду, а то уже листинг почти достал

Код:

uses printers;

procedure Button1.Click(......);
var Prn: TextFile;
begin
AssignPrn(Prn);
Rewrite(Prn);
WriteLN(Prn,Edit1.Text);
WriteLN(Prn,Edit2.Text);
WriteLN(Prn,Edit3.Text);
WriteLN(Prn,Edit4.Text);
WriteLN(Prn,#12);
CloseFile(Prn);
end;

Простейшая процедурка для печати по нажатию кнопки.Если принтер не включен - могут быть ошибки печати. Обработку эксцепшн сами добавьте

jax · 26.11.2011, 21:37

Спасибо ))щас проверю

jax · 26.11.2011, 21:50

Принтера нету,написал данй листинг,открывается диалоговое окно,и появляется рассширение *.xps это что значит ??

AlexZir · 26.11.2011, 21:54

Предлагает напечатать в файл с расширением xps, это нормальная реакция операционной системы при обращении к виртуальному принтеру. Если бы был принтер - печатала бы на него.

jax · 27.11.2011, 10:52

Спасибо,всё понятно,курсовую написал(ЖД Касса),всё сделал,а вот с печатью не сталкивался.

24.11.2011, 21:39	#1 (permalink)
jax Технарёнок Регистрация: 30.12.2010 Сообщений: 77 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Для профессионалов Доброе время суток! Задача на дельфи 7 Я ввожу в Edit текст(несколько полей),то что я ввёл нужно расспечать,если вдруг кто знает помогите пожалуйста.

24.11.2011, 21:39
Helpmaster Member Регистрация: 08.03.2016 Сообщений: 0	Можно узнать множество полезной информации перейдя по этим ссылкам Задачка по Паскалю для истинных профессионалов в этом деле. Помогите с решением! Очень нужна помощь профессионалов.

25.11.2011, 13:07	#2 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	TEdit - однострочная компонента, в ней не может быть несколько полей. Дайте исходник программы, может, после этого будет понятнее, что вы имеете в виду. Вообще распечатать содержимое полей можно несколькими способами, к примеру, используя диалог печати, непосредственно с формы или направляя поток данных из окна ввода непосредственно на принтер. Если дадите необходимые пояснения или исходник вашей программы - помогу с организацией печати.

25.11.2011, 14:49	#3 (permalink)
jax Технарёнок Регистрация: 30.12.2010 Сообщений: 77 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Под нескольку полями я имел ввиду несколько TEdit. К сожелению исходник прикрепить не могу,нету с собой.Пишу к интернет кафе. На форму кидаю 4-ыре TEdit и одну кнопку. Ввожу в TEdit какой то текст,затем нажимаю кнопку и мои данные открываются в word например,а через word я уже смогу расспечатать. Если знаете то подскажите или если есть время,то лудше кодинк напишите. Спасибо что уделили внемание!

26.11.2011, 17:18	#4 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	Есть другой вариант - распечатывать непосредственно с формы, без передачи данных во внешнее приложение, тем более, что MS Word из-за борьбы за лицензионную чистоту софта нынче уже не на каждом компьютере установлен.

26.11.2011, 17:23	#5 (permalink)
jax Технарёнок Регистрация: 30.12.2010 Сообщений: 77 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Если есть тогда нипишите его пожалуйста

Ads
Яндекс Member Регистрация: 31.10.2006 Сообщений: 40200 Записей в дневнике: 0 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 55070

26.11.2011, 21:37	#7 (permalink)
jax Технарёнок Регистрация: 30.12.2010 Сообщений: 77 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Спасибо ))щас проверю

26.11.2011, 21:50	#8 (permalink)
jax Технарёнок Регистрация: 30.12.2010 Сообщений: 77 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Принтера нету,написал данй листинг,открывается диалоговое окно,и появляется рассширение *.xps это что значит ??

26.11.2011, 21:54	#9 (permalink)
AlexZir support Регистрация: 19.08.2007 Адрес: Зея Сообщений: 15,797 Записей в дневнике: 71 Сказал(а) спасибо: 166 Поблагодарили 203 раз(а) в 86 сообщениях Репутация: 75760	Предлагает напечатать в файл с расширением xps, это нормальная реакция операционной системы при обращении к виртуальному принтеру. Если бы был принтер - печатала бы на него.

27.11.2011, 10:52	#10 (permalink)
jax Технарёнок Регистрация: 30.12.2010 Сообщений: 77 Сказал(а) спасибо: 0 Поблагодарили 0 раз(а) в 0 сообщениях Репутация: 10	Спасибо,всё понятно,курсовую написал(ЖД Касса),всё сделал,а вот с печатью не сталкивался.