کار با clipboard ? [بایگانی]

rezarko

دوشنبه 22 اسفند 1390, 20:48 عصر

سلام. چه جوری میشه یک فایل مثل عکس رو به درون clip board فرستاد یا از clipboard به درون یک picture box فستاد؟

محسن واژدی

دوشنبه 22 اسفند 1390, 23:04 عصر

سلام
برای ارسال تصویربه clipboard:

Private Sub Command2_Click()
Clipboard.SetData Picture1.Picture
End Sub

و برای دریافت تصویر موجود درclipboard در picture-box

Private Sub Command2_Click()
Picture1.Picture = Clipboard.GetData()
End Sub

موفق باشید

rezarko

سه شنبه 23 اسفند 1390, 00:14 صبح

ایا برای فیلم و اهنگ و ... میشه این کارو کرد؟

Mahdi_vb6

سه شنبه 23 اسفند 1390, 10:14 صبح

برای فیلم و آهنگ وهر نوع فایلی هم میشه این کارو کرد.

program2vb

سه شنبه 23 اسفند 1390, 20:07 عصر

بله میتونید قایل رو باز کینین و بصورت متن به حافظه بفرستین هنگام دریافت متن رو دریافت کرده و اونو به فایل تبدیل کنید ..

دوستان اگه نیاز به توضیح بود یا اگه مشکلی یا سوالی داشتین من در خدمتتون هستم :

موفق و پیروز باشید یا علی

cjmoon

یک شنبه 13 فروردین 1391, 19:05 عصر

سلام یه سوال
2 تا پیکچر باکس داریم که تو هر دوتاشون عکس لود شده و می خوایم عکس دومی رو تو اولی بچسبونیم و ذخیره کنیم چی؟

program2vb

دوشنبه 14 فروردین 1391, 10:02 صبح

سلام یه سوال
2 تا پیکچر باکس داریم که تو هر دوتاشون عکس لود شده و می خوایم عکس دومی رو تو اولی بچسبونیم و ذخیره کنیم چی؟

سلام دوست عزیز

با استفاده از کد زیر میتونی این کارو خیلی راحت انجام بدی

Clipboard.SetData Picture2.Picture
Picture1.Picture = Clipboard.GetData
SavePicture Picture1.Picture, "D:\temp.bmp"

موفق و پیروز باشی یا علی

cjmoon

دوشنبه 14 فروردین 1391, 11:36 صبح

سلام این کدتون کاملا درست فکر کنم منظورم رو بد بیان کردم
2 پیکچر باکس داریم و می خواییم به نوعی این 2 عکس رو با هم ادغام کنیم که عکس دومی رو کنار عکس اولی بزنیم :متعجب:

MiladMR

دوشنبه 14 فروردین 1391, 15:36 عصر

باید از paintpicture استفاده کنی
شکل کلی:

OBJECT.Paintpicture = stdPICTURE, X1, Y1, Width1, Height1
OBJECT اسم شیء
stdPICTURE مقداری که عکس رو برگردونه
X1 , Y1 مختصات شروع
Width1 , Height1 طول عرض تصویر

حالا فرض کن دوتا ImageBox داری و میخوای عکسی که توی این دوتا هست رو بیاری توی یک PictureBox و کنار هم قرار بدی:

Picture1.PaintPicture Image1.Picture, 0, 0, Image1.Width, Image1.Height
Picture1.PaintPicture Image2.Picture, Image1.Width, 0, Image2.Width, Image2.Height

خط اول عکس توی image1 رو از نقطه 0 و 0 با همون اندازه که توی image1 هست منتقل میکنه به picture1
و خط دوم عکس توی image2 رو از جایی که تصویر قبلی تموم شده با همون اندازه image2 منتقل میکنه به picture1