perl_mlb
view release on metacpan or search on metacpan
os2/OS2/Process.pm view on Meta::CPAN
Next item in the same group. Wraps around to beginning of group when
the end of the group is reached.
=item EDI_NEXTTABITEM
Next item with style WS_TABSTOP. Wraps around to beginning of dialog
item list when end is reached.
=item EDI_PREVGROUPITEM
Previous item in the same group. Wraps around to end of group when the
start of the group is reached. For information on the WS_GROUP style,
see Window Styles.
=item EDI_PREVTABITEM
Previous item with style WS_TABSTOP. Wraps around to end of dialog
item list when beginning is reached.
=back
=item DesktopWindow()
gets the actual window handle of the PM desktop; most APIs accept the
pseudo-handle C<HWND_DESKTOP> instead. Keep in mind that the WPS
desktop (one with WindowText() being C<"Desktop">) is a different beast?!
=item TopLevel($hwnd)
gets the toplevel window of $hwnd.
=item ResetWinError()
Resets $^E. One may need to call it before the C<Win*>-class APIs which may
return 0 during normal operation. In such a case one should check both
for return value being zero and $^E being non-zero. The following APIs
do ResetWinError() themselves, thus do not need an explicit one:
WindowPtr
WindowULong
WindowUShort
WindowTextLength
ActiveWindow
PostMsg
This function is normally not needed. Not exported by default.
=back
=head2 Control of the PM data
=over
=item ActiveDesktopPathname()
gets the path of the directory which corresponds to Desktop.
=item ClipbrdText()
gets the content of the clipboard. An optional argument is the format
of the data in the clipboard (defaults to C<CF_TEXT>).
Note that the usual convention is to have clipboard data with
C<"\r\n"> as line separators.
=item ClipbrdText_set($txt)
sets the text content of the clipboard. Unless the optional argument
is TRUE, will convert newlines to C<"\r\n">. Another optional
argument is the format of the data in the clipboard (defaults to
C<CF_TEXT>).
=item InvalidateRect
=item CreateFrameControl
=item ClipbrdFmtInfo
=item ClipbrdOwner
=item ClipbrdViewer
=item ClipbrdData
=item OpenClipbrd
=item CloseClipbrd
=item ClipbrdData_set
=item ClipbrdOwner_set
=item ClipbrdViewer_set
=item EnumClipbrdFmts
=item EmptyClipbrd
=item AddAtom
=item FindAtom
=item DeleteAtom
=item AtomUsage
=item AtomName
=item AtomLength
=item SystemAtomTable
=item CreateAtomTable
=item DestroyAtomTable
Low-level methods to access clipboard and the atom table(s).
=back
=head1 OS2::localMorphPM class
This class morphs the process to PM for the duration of the given scope.
{
my $h = OS2::localMorphPM->new(0);
# Do something
}
The argument has the same meaning as one to OS2::MorphPM(). Calls can
nest with internal ones being NOPs.
=head1 TODO
Add tests for:
SwitchToProgram
ClassName
out_codepage
out_codepage_set
in_codepage
in_codepage_set
cursor
cursor_set
screen
screen_set
process_codepages
QueryWindow
EnumDlgItem
WindowPtr
WindowULong
WindowUShort
SetWindowBits
SetWindowPtr
SetWindowULong
SetWindowUShort
my_type
file_type
scrsize
scrsize_set
Document and test: Query/SetWindowULong/Short/Ptr, SetWindowBits.
InvalidateRect, CreateFrameControl, ClipbrdFmtInfo ClipbrdOwner
ClipbrdViewer ClipbrdData OpenClipbrd CloseClipbrd ClipbrdData_set
ClipbrdOwner_set ClipbrdViewer_set EnumClipbrdFmts EmptyClipbrd
AddAtom FindAtom DeleteAtom AtomUsage AtomName AtomLength
SystemAtomTable CreateAtomTable DestroyAtomTable
Implement SOMETHINGFROMMR.
>But I wish to change the default button if the user enters some
>text into an entryfield. I can detect the entry ok, but can't
>seem to get the button to change to default.
>
>No matter what message I send it, it's being ignored.
( run in 0.857 second using v1.01-cache-2.11-cpan-84e82930d8c )