Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 22.11.2010, 14:57   #1
Lesa1988
Пользователь
 
Регистрация: 22.11.2010
Сообщений: 11
По умолчанию обработка кнопок на форме

Есть форма на ней 2 кнопки, Печать и закрыть, написать чтоб закрывалась и печаталась
Lesa1988 вне форума Ответить с цитированием
Старый 22.11.2010, 15:03   #2
psycho-coder
Участник клуба
 
Аватар для psycho-coder
 
Регистрация: 06.04.2009
Сообщений: 1,524
По умолчанию

Закрыть
Код:
Close();
Печать тут и тут
psycho-coder вне форума Ответить с цитированием
Старый 22.11.2010, 15:17   #3
Lesa1988
Пользователь
 
Регистрация: 22.11.2010
Сообщений: 11
По умолчанию

при close ошибок не выдает но не закрывает почемуто, а вот при procedure TForm1.Button1Click(Sender: TObject);
begin
Printer.BeginDoc;
Printer.Canvas.TextOut(200,200,'Del phi is cool');
Printer.EndDoc;
end;

идут ошибки
Lesa1988 вне форума Ответить с цитированием
Старый 22.11.2010, 15:33   #4
psycho-coder
Участник клуба
 
Аватар для psycho-coder
 
Регистрация: 06.04.2009
Сообщений: 1,524
По умолчанию

Какие ошибки?
Где Вы пишите Close(); ?
psycho-coder вне форума Ответить с цитированием
Старый 22.11.2010, 15:38   #5
Lesa1988
Пользователь
 
Регистрация: 22.11.2010
Сообщений: 11
По умолчанию

Код:
procedure TAnaliz_mat2.closeClick(Sender: TObject);
begin
close;
end;


procedure TAnaliz_mat2.printClick(Sender: TObject);
begin
Printer.BeginDoc;
Printer.Canvas.TextOut(200,200,'Delphi is cool');
Printer.EndDoc;
end;
на строчке Printer.BeginDoc; пишет
[Pascal Error] Unit1.pas(52): E2003 Undeclared identifier: 'Printer'

Последний раз редактировалось Stilet; 22.11.2010 в 16:37.
Lesa1988 вне форума Ответить с цитированием
Старый 22.11.2010, 15:59   #6
psycho-coder
Участник клуба
 
Аватар для psycho-coder
 
Регистрация: 06.04.2009
Сообщений: 1,524
По умолчанию

Вместо Close(); попробуйте Terminate();

А еще лучше посмотрите нет ли процедуры OnCloseQuery для формы TAnaliz_mat2

В раздел uses допишите Printers.
Примерно так это будет выглядеть
Код:
uses
  ..., Printers;
psycho-coder вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
18 кнопок Xcopy Общие вопросы Delphi 9 11.03.2010 20:56
Изменение вида кнопок на форме VistaSV30 Microsoft Office Access 1 21.12.2009 21:55
Обработка wm_keydown если на форме присутствует TFrame Oburec Компоненты Delphi 1 13.04.2009 10:01
Блокировка кнопок Михаил Юрьевич Общие вопросы Delphi 10 11.02.2008 15:13
Количество кнопок на форме fuv Общие вопросы Delphi 5 25.04.2007 16:33