[perl-win32-gui-users] RE: Richg Edit Text Capture (selected text)

[Eric Hansen]

The below is what I settled on and it works great.

 

 

use Win32::GuiTest qw(SendKeys);

 

sub Copy_Click {

     Win32::GuiTest::SendKeys("^C");

}

 

-----Original Message-----
From: Eric Hansen [mailto:[EMAIL PROTECTED] 
Sent: Monday, August 30, 2004 1:49 PM
To: 'perl-win32-gui-users@lists.sourceforge.net'
Subject: Richg Edit Text Capture (selected text)

 

There definitely seems to be a problem getting selected

Text out of a rich edit control.  We need syntax of below nature

(Or something simple) for an application to be built with a menu option

Edit->Copy for getting the selected text into the Windows Clipboard.    

 

$Clip = Win32::Clipboard;

($x,$y) - $RichEdit->Selection();

$text = $RichEdit->Text([$x$,y]);

$Clip->Set($text);

 

Eric, Garland, Texas