Как форму запихнуть в гр. файл ???

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
MiRC
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 10.06.2003 (Вт) 14:01

Как форму запихнуть в гр. файл ???

Сообщение MiRC » 10.06.2003 (Вт) 14:12

Как форму запихнуть в графический файл ??? Чтобы все нарисованные там линии и надписи сохранились как картинка ?

basicom
Обычный пользователь
Обычный пользователь
 
Сообщения: 60
Зарегистрирован: 20.05.2003 (Вт) 10:10
Откуда: Екатеринбург

Сообщение basicom » 10.06.2003 (Вт) 14:15

Запусти проект :Alt+PrintScreen, открой редактор, Ctrl-V , сохрани файл........
или я чё-то не понял?
в чём проблема, программно сохранить?

MiRC
Начинающий
Начинающий
 
Сообщения: 4
Зарегистрирован: 10.06.2003 (Вт) 14:01

Ну естественно программно

Сообщение MiRC » 10.06.2003 (Вт) 14:27

Ну естественно программно! SavePicture не помогает и т.д.

Mikle
Изобретатель велосипедов
Изобретатель велосипедов
Аватара пользователя
 
Сообщения: 4148
Зарегистрирован: 25.03.2003 (Вт) 14:02
Откуда: Туапсе

Сообщение Mikle » 10.06.2003 (Вт) 17:14

Сначала послать сообщение Alt+PrintScreen форме, затем ClipBoard.SavePicture.
Что-то вроде, проверить не на чем.

ShadowCaster
Бывалый
Бывалый
 
Сообщения: 254
Зарегистрирован: 24.05.2002 (Пт) 10:52

Сообщение ShadowCaster » 10.06.2003 (Вт) 17:28

Немного изменённый пример из Api-Guide:

Private Declare Function PrintWindow Lib "user32" (ByVal hWnd As Long, ByVal hdcBlt As Long, ByVal nFlags As Long) As Long
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Sub Form_Load()
'KPD-Team 2001
'URL: http://www.allapi.net/
'E-Mail: KPDTeam@Allapi.net
Dim mWnd As Long
'set the graphics mode to persistent
Me.AutoRedraw = True
'set the handle of the window
mWnd = Me.hWnd
'draw the image of the window on our form
PrintWindow mWnd, Me.hDC, 0
End Sub

Cyrax
Cyberninja
Cyberninja
Аватара пользователя
 
Сообщения: 891
Зарегистрирован: 25.04.2002 (Чт) 21:20
Откуда: Magnitogorsk, Russia

Сообщение Cyrax » 10.06.2003 (Вт) 17:35

ShadowCaster писал(а):Немного изменённый пример из Api-Guide:

Private Declare Function PrintWindow Lib "user32" (ByVal hWnd As Long, ByVal hdcBlt As Long, ByVal nFlags As Long) As Long

только эта функция работает начиная с ХР'ени, в предыдущих версиях Виндуса ее нет... :(
Ты это ему расскажи. Я уже пять болтов отвинтил, и конца не видно... (озадаченно) А это в какую сторону тянуть? Ну-ка... Ага, этот был лишний, этот вообще не отсюда, и этот... Точно, два болта.

Welcome to IRC

TRUST
Продвинутый пользователь
Продвинутый пользователь
 
Сообщения: 192
Зарегистрирован: 22.08.2002 (Чт) 20:24
Откуда: Orel

Сообщение TRUST » 10.06.2003 (Вт) 20:19

Попробуй сохранять не me.picture, а me.image . Должно получиться. Ну или сохраняй изображение форму через hDc. Сорря, как всегда, я без кода:).
Кто юзал мой аккаунт и весь его выюзал?!!


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: AhrefsBot и гости: 65

    TopList