17-10-12, 04:56 PM
كاتب الموضوع : AhmedEssawy
لوضع بيانات في ال Clipboard
' Visual Basic
// C#
لاسترجاع بيانات من ال Clipboard
' Visual Basic
// C#
' Visual Basic
كود :
[FONT=Arial][color=black]Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click[/color][/FONT][FONT=Arial][COLOR=black]
[color=black][FONT=Arial]Clipboard.SetDataObject(TextBox1.Text[/FONT][/color][color=black][FONT=Arial])[/FONT][/color]
[color=black][FONT=Arial]End Sub[/FONT][/color]
[/COLOR][/FONT]
كود :
[FONT=Arial][color=black][COLOR=black][FONT=Arial]private void button1_Click(object sender, System.EventArgs e[/FONT][/color][color=black][FONT=Arial])[/FONT][/color][/COLOR][/FONT][FONT=Arial][COLOR=black]
[color=black][FONT=Arial]{[/FONT][/color]
[color=black][FONT=Arial]Clipboard.SetDataObject(textBox1.Text[/FONT][/color][color=black][FONT=Arial]);[/FONT][/color]
[color=black][FONT=Arial]}[/FONT][/color]
[/COLOR][/FONT]
لاسترجاع بيانات من ال Clipboard
' Visual Basic
كود :
[FONT=Arial][color=black]Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click[/color][/FONT][FONT=Arial][COLOR=black]
[color=black][FONT=Arial]' [/FONT][/color][color=black][FONT=Arial]Create a new instance of the DataObject interface[/FONT][/color][color=black][FONT=Arial].[/FONT][/color]
[color=black][FONT=Arial]Dim data As IDataObject = Clipboard.GetDataObject[/FONT][/color][color=black][FONT=Arial]()[/FONT][/color]
[color=black][FONT=Arial]' [/FONT][/color][color=black][FONT=Arial]If the data is text, then set the text of the[/FONT][/color]
[color=black][FONT=Arial]' [/FONT][/color][color=black][FONT=Arial]TextBox to the text in the Clipboard[/FONT][/color][color=black][FONT=Arial].[/FONT][/color]
[color=black][FONT=Arial]If (data.GetDataPresent(DataFormats.Text)) Then[/FONT][/color]
[color=black][FONT=Arial]TextBox1.Text = data.GetData(DataFormats.Text).ToString[/FONT][/color][color=black][FONT=Arial]()[/FONT][/color]
[color=black][FONT=Arial]End If[/FONT][/color]
[color=black][FONT=Arial]End Sub[/FONT][/color]
[/COLOR][/FONT]
كود :
[FONT=Arial][color=black][COLOR=black][FONT=Arial]private void button1_Click(object sender, System.EventArgs e[/FONT][/color][color=black][FONT=Arial])[/FONT][/color][/COLOR][/FONT][FONT=Arial][COLOR=black]
[color=black][FONT=Arial]{[/FONT][/color]
[color=black][FONT=Arial]// [/FONT][/color][color=black][FONT=Arial]Create a new instance of the DataObject interface[/FONT][/color][color=black][FONT=Arial].[/FONT][/color]
[color=black][FONT=Arial]IDataObject data = Clipboard.GetDataObject[/FONT][/color][color=black][FONT=Arial]();[/FONT][/color]
[color=black][FONT=Arial]// [/FONT][/color][color=black][FONT=Arial]If the data is text, then set the text of the[/FONT][/color]
[color=black][FONT=Arial]// [/FONT][/color][color=black][FONT=Arial]TextBox to the text in the Clipboard[/FONT][/color][color=black][FONT=Arial].[/FONT][/color]
[color=black][FONT=Arial]if (data.GetDataPresent(DataFormats.Text[/FONT][/color][color=black][FONT=Arial]))[/FONT][/color]
[color=black][FONT=Arial]textBox1.Text = data.GetData(DataFormats.Text).ToString[/FONT][/color][color=black][FONT=Arial]();[/FONT][/color]
[color=black][FONT=Arial]}[/FONT][/color]
[/COLOR][/FONT]