[perl-win32-gui-users] Re: Textfield->Selection

2003-04-12 Thread artem-konev
> my ($start, $stop) = $textfield->Selection; And do you try it? I can't make it to work When there is no real selection it return something strange - Original Message - From: Sean Healy To: Sent: Saturday, April 12, 2003 4:46 PM Subject: Re: [perl-win32-gui-users] Push Button w

[perl-win32-gui-users] setting focus to a control

2003-04-12 Thread Darrik Mazey
i moved the call to Textfield->SetFocus() and it worked, although i'm not entirely sure why. any which way... nevermind my previous question. darrik >>i've been reading over the docs and looking through the files, but i can't seem to find a way to set focus to a control in >>a window. all i'm

[perl-win32-gui-users] setting focus to a control in a window

2003-04-12 Thread caterpillar
i've been reading over the docs and looking through the files, but i can't seem to find a way to set focus to a control in a window. all i'm doing is making a window with a couple textfields, and when it loads, i'd like the focus to be in the first textfield in the window. seems easy, but i can't

RE: [perl-win32-gui-users] Push Button with the picture (bitbtn)

2003-04-12 Thread Johan Lindstrom
At 07:25 2003-04-12 -0400, Stuart Arnold wrote: I'll assume the "Picture" is a bitmap or icon? This works for a bitmap, and icon is just as easy. Here's a sniplet. BEGIN{ our $bitmap; } Putting the declaration in a BEGIN block seems redundant. Why do you do that? But be aware of a W

Re: [perl-win32-gui-users] Push Button with the picture (bitbtn)

2003-04-12 Thread Sean Healy
And also I dont find possibility to put mask on textfield (such as dd/dd/ for date input), so I've made it by hands in Change event, but I can't get cursor position in textfield to put it on place. (by default cursor stands in the begining of the field when i make $textfield->Text($str), but i

RE: [perl-win32-gui-users] Push Button with the picture (bitbtn)

2003-04-12 Thread Stuart Arnold
I'll assume the "Picture" is a bitmap or icon? This works for a bitmap, and icon is just as easy. Here's a sniplet. BEGIN{ our $bitmap; } die "file doesn't exist" unless( -e "mypicture.bmp" ); $bitmap = new Win32::GUI::Bitmap( "mypicture.bmp" ) or die "Error, cannot load bitmap\n"; $win->