Lev Alexandrovsky wrote:
> Hello,
>
> I want to change text in the clipboard.
>
> ...
> my $clip = Win32::Clipboard;
> return unless $clip->IsText;
> my @formats = $clip->EnumFormats;
> my $text = $clip->Get;
> # do something with $text
> # ...
> $clip->Set($text);
> print 'Old formats: ', join(',', @formats), "\n";
> print 'New formats: ', join(',', $clip->EnumFormats), "\n";
> ...
>
> How I can set old identifiers describing the format (@formats)
> to new clipboard content?
Apparently you can only Set text data :
>From pod :
=item *
text (C<CF_TEXT>)
The clipboard contains some text; this is the B<only> format you can use to set
clipboard data; you get it as a single string.
I tried playing with Win32::API to do this, but never got that far
with it.
--
,-/- __ _ _ $Bill Luebkert Mailto:[EMAIL PROTECTED]
(_/ / ) // // DBE Collectibles Mailto:[EMAIL PROTECTED]
/ ) /--< o // // Castle of Medieval Myth & Magic http://www.todbe.com/
-/-' /___/_<_</_</_ http://dbecoll.tripod.com/ (My Perl/Lakers stuff)
_______________________________________________
Perl-Win32-Users mailing list
[EMAIL PROTECTED]
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
