全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:2938
推到 Plurk!
推到 Facebook!

如何把文字貼到別的應用程式視窗

答題得分者是:eaglewolf
pedro
尊榮會員


發表:152
回覆:1187
積分:892
註冊:2002-06-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2009-02-01 17:53:00 IP:61.216.xxx.xxx 未訂閱
小弟用下段程式,想達到把clipboard的文字貼到已執行的筆記本裡
但當找到該MainWindowHandle後,不知如何取得該Form並且貼上剪貼簿裡的文字?

[code c#]
private void button1_Click(object sender, EventArgs e)
{
String textData = "這些文字要貼到筆記本裡";

Clipboard.SetText(textData);
Process[] processes = Process.GetProcessesByName("notepad");

foreach (Process p in processes)
{

IntPtr pFoundWindow = p.MainWindowHandle;
//如何把clipboard裡的文字,貼到notepad裡?
}
}

[/code]
老大仔
尊榮會員


發表:78
回覆:837
積分:1088
註冊:2006-07-06

發送簡訊給我
#2 引用回覆 回覆 發表時間:2009-02-01 21:10:37 IP:220.140.xxx.xxx 訂閱
大大~不知道以下的文章是否是您要的呢?
http://delphi.ktop.com.tw/board.php?cid=168&fid=912&tid=74555
這是模擬輸入的方式~
pedro
尊榮會員


發表:152
回覆:1187
積分:892
註冊:2002-06-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2009-02-01 21:13:32 IP:61.216.xxx.xxx 未訂閱
謝謝您回應

觀念上是這樣沒錯,
只是我要在.Net平台下實作

===================引 用 老大仔 文 章===================
大大~不知道以下的文章是否是您要的呢?
http://delphi.ktop.com.tw/board.php?cid=168&fid=912&tid=74555
這是模擬輸入的方式~
eaglewolf
資深會員


發表:4
回覆:268
積分:429
註冊:2006-07-06

發送簡訊給我
#4 引用回覆 回覆 發表時間:2009-02-04 15:25:40 IP:211.75.xxx.xxx 訂閱

[code c#]
using System.Diagnostics;
using Microsoft.VisualBasic;
using Microsoft.VisualBasic.Devices;

private void button1_Click(object sender, EventArgs e)
{
String textData = "這些文字要貼到筆記本裡";
Clipboard.SetText(textData);
Process[] processes = Process.GetProcessesByName("notepad");
foreach (Process p in processes)
{
Interaction.AppActivate(p.Id); // 將應用程式設為Activate
new Keyboard().SendKeys("^V"); //將按鍵傳送到Activate的應用程式
}
}

[/code]

===================引 用 pedro 文 章===================
謝謝您回應

觀念上是這樣沒錯,
只是我要在.Net平台下實作

===================引 用 老大仔 文 章===================
大大~不知道以下的文章是否是您要的呢?
http://delphi.ktop.com.tw/board.php?cid=168&fid=912&tid=74555
這是模擬輸入的方式~
------
先查HELP
再查GOOGLE
最後才發問

沒人有義務替你解答問題
在標題或文章中標明很急
並不會增加網友回答速度

Developing Tool:
1.Delphi 6
2.Visual Studio 2005
3.Visual Studio 2008
DBMS:
MS-SQL
pedro
尊榮會員


發表:152
回覆:1187
積分:892
註冊:2002-06-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2009-02-04 17:15:46 IP:60.248.xxx.xxx 未訂閱
謝謝eaglewolf熱心的幫助,學到了

===================引 用 eaglewolf 文 章===================
Interaction.AppActivate(p.Id); // 將應用程式設為Activate
new Keyboard().SendKeys("^V"); //將按鍵傳送到Activate的應用程式
系統時間:2024-12-04 16:41:25
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!