PDA

View Full Version : کد مربوط به منوی Edit\Copy



SYSMAN
یک شنبه 23 مرداد 1384, 12:47 عصر
چه کدی باید برای منوی Edit\Copy نوشته بشه تا عمل فشار دادن کلیدهای Ctrl+C رو شبیه سازی کنه؟

sadegi
یک شنبه 23 مرداد 1384, 13:25 عصر
این کد قسمتی از کلمات موجود در ریچ تکست باکس رو که انتخاب شده رو تو حافظه کپی میکنه
Clipboard.SetText RichTextBox1.SelText, vbCFRTF

sadegi
یک شنبه 23 مرداد 1384, 13:30 عصر
البته یادم رفت بگم که اگه میخواید از تصویر کپی بگیرید باید به جای
SetText از SetData استفاده کنید

SYSMAN
دوشنبه 24 مرداد 1384, 16:31 عصر
ممنون ولی من می خوام دقیقا مثل Edit\Copy عمل کنه چون مشخص نیست که کاربر چه چیزی رو انتخاب می کنه، منظورم این هست که اگه کاربر Edit\Copy رو انتخاب کرد زدن کلیدهای Ctrl+C انجام بشه.

dr_g
دوشنبه 24 مرداد 1384, 16:48 عصر
باسلام
دوست عزیز برای اینکه مشخص بشه کاربر متنی رو انتخاب کرده یا نه می توونی از کد زیر استفاده کنی

()Private Sub RichTextBox1_SelChange
If RichTextBox1.SelLength > 0 Then
MnuCopy.Enabled = True
Else
MnuCopy.Enabled= False
End If
End Sub

که اگر قسمتی از متن انتخاب شود منوی کپی فعال و در غیر این صورت غیر فعال می شود