[EMAIL PROTECTED] wrote:
> Why "-tabsotp=>1" can't directly work in the standard WINDOW?
> Why has to be able to use in DialogUI?
Read your microsoft documentation, and understand the difference between
standard windows and dialog boxes. Particularly look for the
IsDialogMessage() function - this is mostly what DialogUI(1) causes to
be implemented in the message loop.
> After also has adds on -dialogui=>1, Textfield controls in not to be
> able to
> input <TAB>,
That's standard dialog box behaviour. You use Ctrl-Tab to insert a tab
in a textfield in a dialog box.
> I now have the solution:
[snip]
> sub Result_KeyDown
> {
> my $key=Win32::GUI::GetKeyboardState;
> $Win->{Result}->ReplaceSel("\t") if $key->[0x09];
> }
> Also has a better method?
How about this (untested)
sub VK_TAB() {0x09}
sub Result_KeyDown
{
my(undef, $vkey) = @_;
$Win->Result->ReplaceSel("\t") if $vkey == VK_TAB
}
Regards,
Rob.
--
Robert May
Win32::GUI, a perl extension for native Win32 applications
http://perl-win32-gui.sourceforge.net/
