| Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате |
| Форум программистов > Delphi: Звук, графика и видео > Фон рабочего стола |
| Автор: Keeper89 29.3.2009, 06:10 |
| Требуется сохранить рисунок рабочего стола (не скриншот!) как картинку в TBitmap и в файл. Заранее спасибо. |
| Автор: Alexeis 29.3.2009, 12:59 |
| Заходишь сюда "HKEY_CURRENT_USER\Control Panel\Desktop", читаешь параметр WallPaper он дает путь к картинке, загружаешь ее и если там не bmp, то конвертируешь при помощи одного из классов VCL TJpegImage/TPngImage/TGifImage. В Delphi 7 доступен только TJpegImage. |
| Автор: Keeper89 29.3.2009, 13:24 | ||
А куда полученную картинку лучше загрузить, если не известен ее тип? |
| Автор: Alexeis 29.3.2009, 17:53 |
| Как неизвестен, по расширению можно определить. А вообще TImage должна принять все что понимает. Тогда обращаться к ней прийдется так Image1.Picture.Graphic , поскольку все контейнеры являются наследниками TGraphic. |
| Автор: Keeper89 29.3.2009, 20:03 | ||||
Просто по расширению не очень надежно...
Ок, спасибо |
