как сохранить Рисование в Файл?

[SnAIper]

Вот рисую я на picture методами circle, line и т п(pset). но когда окно сбрасывается - инфа теряется. А как сохранить нарисованное таким способом в файл?

[fort]

что значит сохранить рисунок в файл???
ты типа програмно нарисовал к-нибудь рисунок, а потом нажал на кнопку и он у тебя сохраняется как файл *.bmp

[Amed]

Выставить Picture1.AutoRedraw=True

Код: Выделить всё

Private Sub Command1_Click()
    Picture1.Picture=Picture1.Image
    SavePicture Picture1.Picture, "C:\123.bmp"
End Sub

[tyomitch]

Выставить Picture1.AutoRedraw=True

Код: Выделить всё

Private Sub Command1_Click()
    Picture1.Picture=Picture1.Image
    SavePicture Picture1.Picture, "C:\123.bmp"
End Sub

А чё б не

Код: Выделить всё

Private Sub Command1_Click()
    SavePicture Picture1.Image, "C:\123.bmp"
End Sub

На одну строку короче, а эффект тот же.

[SeT]

А если Picture1 обозвать просто Pic - короче на 5 символов. Чё, придраться не к чему?

[tyomitch]

А если Picture1 обозвать просто Pic - короче на 5 символов. Чё, придраться не к чему?

Угу, если к чему-нибудь не придерусь, - считай, день прожил зря
А ты-то чего хотел? Тоже было не к чему придраться?