Вывод на печать компонента Image (рисунка)

[yuriy kuznetsov]

Доброго времени суток уважаемые профессионалы! Я не программист. Создаю для школы свою первую обучающую программу в Lazarus. Вопрос такой. Есть форма. На ней много чего, разные компоненты: Label, Memo и т. д. Кроме всего прочего компонент Image т. е. рисунок. Рядом с ним кнопка с надписью «печать рисунка». Мне нужно чтобы щелчок по кнопке вызывал диалоговое окно выбора принтера (ну как обычно в таких случаях) и выводился на печать именно этот рисунок. Заранее спасибо.

[Nik]

Например, так: http://lazarus.su/multimedia/pechat-izo ... image.html

[yuriy kuznetsov]

Спасибо за ссылку. Но при компиляции выскакивает сообщение следующего содержания:
project1.exe – Не удалось найти компонент
Приложению не удалось запуститься, поскольку winspool32.drv не был найден.
Повторная установка приложения может исправить эту проблему.

Не подскажете что это за файл и как эту проблему решить?

[Padre_Mortius]

В папке windows\system еcть файл winspool.drv. Сделайте копию этого файла с именем winspool32.drv в этой же папке

[yuriy kuznetsov]

to Nik
Скачал Ваш пример. В компонент Image загрузил конкретный рисунок. Код не изменял. Попробовал скомпилировать.
В окошечке «Сообщения» выскочил следующий текст:

windres: can’t open file `TForm1′: No such file or directory
Hint: Start of reading config file C:\lazarus\fpc\2.2.4\bin\i386-win32\fpc.cfg
Hint: End of reading config file C:\lazarus\fpc\2.2.4\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.4 [2009/10/25] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling project1.lpr
Compiling unit1.pas
unit1.pas(18,28) Hint: Parameter “Sender” not used
unit1.pas(19,26) Hint: Parameter “Sender” not used
Compiling resource C:\Documents and Settings\User\??? ?????????\???????????\??????????????? ? Lazarus\?????? ???????1_Print_TImage1_Print_TImage\unit1.lfm
c:\lazarus\fpc\2.2.4\bin\i386-win32\windres.exe: can’t open file `TForm1′: No such file or directory
unit1.pas(76,2) Error: Error while linking
unit1.pas(76,2) Fatal: There were 1 errors compiling module, stopping

Не подскажете что не так?

[Nik]

Судя по всему, проблема в русских путях к файлу проекта (знаки вопроса кучкой видите?).

Ещё вариант - попробуйте в исходном коде проекте (project1.lpr) закомментировать строчку {$R *.res}.

[yuriy kuznetsov]

Сделал всё как написано:
Путь к проекту теперь латинскими буквами.
Закомментировал строчку {$R *.res} в коде проекта.

В окошечке «Сообщения» выскакивает:

windres: can't open file `TForm1': No such file or directory
Hint: Start of reading config file C:\lazarus\fpc\2.2.4\bin\i386-win32\fpc.cfg
Hint: End of reading config file C:\lazarus\fpc\2.2.4\bin\i386-win32\fpc.cfg
Free Pascal Compiler version 2.2.4 [2009/10/25] for i386
Copyright (c) 1993-2008 by Florian Klaempfl
Target OS: Win32 for i386
Compiling project1.lpr
Compiling unit1.pas
unit1.pas(18,28) Hint: Parameter "Sender" not used
unit1.pas(19,26) Hint: Parameter "Sender" not used
Compiling resource C:\Program Files\MyPrograms\Lazarus\01_Print_TImage\unit1.lfm
c:\lazarus\fpc\2.2.4\bin\i386-win32\windres.exe: can't open file `TForm1': No such file or directory
unit1.pas(76,1) Error: Error while linking
unit1.pas(76,1) Fatal: There were 1 errors compiling module, stopping

В общем упёрся и нисместа.

[Nik]

Единственное предположение - проблема в разных версиях Lazarus. Пример написан в свежей SVN-сборке (с FPC 2.4.3). Попробуйте обновить Lazarus. По ссылке http://www.hu.freepascal.org/lazarus/ скачайте вот такой дистрибутив:

Lazarus + fpc 2.4.3 / win32 / Lazarus-0.9.31-29058-fpc-2.4.3-20110117-win32.exe

(имя файла может отличаться - сборки меняются каждый день).

[Xenar]

а модуль jwawingdi из WinAPI ??

А что тогда делать под Linuх??