ورود

View Full Version : ُباز کردن عکس


robochoo
یک شنبه 26 فروردین 1386, 11:59 صبح
سلام. می دونم سوالم خیلی ... ولی تا حالا فقط با Delphi بر نامه نوشتم و الان مجبور شدم با VB بنویسم و بلد نیستم.
می خوام یه bmp رو تویه IMAGE نمایش بدم.
خواهش می کنم در مورد loud کردن و opendialog کمکم کنید
ممنون!
mehran8
یک شنبه 26 فروردین 1386, 15:31 عصر
سلام. می دونم سوالم خیلی ... ولی تا حالا فقط با Delphi بر نامه نوشتم و الان مجبور شدم با VB بنویسم و بلد نیستم.
می خوام یه bmp رو تویه IMAGE نمایش بدم.
خواهش می کنم در مورد loud کردن و opendialog کمکم کنید
ممنون!


سلام

اول از قسمت کامپونت ها این شی رو به برنامت اضافه کن CommonDialog1

بعد اون رو روی فرم قرار بده .
یه دکمه و یک عدد شی picture روی فرم قرار بده .

برای رویداد کلیک شی button کد زیر رو بنویس :



CommonDialog1.showopen
if CommonDialog1.filename <> "" then
picture1.picture = Loadpicture(CommonDialog1.filename)
end if


امیدوارم مورد استفاده شما قرار بگیره