On 22/11/2007, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote:
> Hi,
> I've a small application with a configuration window.
> this window is created with a for-loop and some textfields with "prompt" for
> the values.
> this window is shown with an Animate().
> but the prompts aren't shown until i focus it with tabstopps or the mouse.
> what's my problem?
>
> thx for help.
> juergen
Juergen,
As the example you have posted is a snippet and not a complete script
that I can look at then I can't tell what your problem is. I expect
that in your do_animation() you only deal with the textfield, and not
with the associated label, but without seeing more code I can't really
tell. If you were to post a short but complete example showing your
problem, then I'm happy to have another look.
Regards,
Rob.
>
> [snip]
> sub configuration
> {
> configuration_window(); # create the window
> my $count = 0;
> my $padding = 10;
>
> $cfg_window->AddGroupbox(
> -name => "CFGX",
> -title => "Configuration",
> -left => 25,
> -top => 10,
> -width => 400,
> -group => 1,
> );
>
> foreach my $xx (sort(keys %config))
> {
> $count = $count + 1;
> print "$xx = $config{$xx}\n";
> $cfg_window->AddTextfield(
> -name => "${xx}_name",
> -text => "$config{$xx}",
> -tip => "$config_tooltips{$xx}",
> -left => 35,
> -prompt => [ "$xx:" , 150 ],
> -height => 20,
> -width => 200,
> -top => 25 + ($count * 20),
> -width => $cfg_window->CFGX->Width() - (2 * 20),
> -tabstop => 1,
> );
> }
>
> $cfg_window->CFGX->Height(350);
> $cfg_window->CFGX->Width(550);
>
> $cfg_window->{archive_destination_name}->SetFocus();
> do_animation($cfg_window);
> $cfg_window->SetRedraw(1);
> get_configuration();
> }
> [/snip]
>
> --
> Psssst! Schon vom neuen GMX MultiMessenger gehört?
> Der kann`s mit allen: http://www.gmx.net/de/go/multimessenger
>
> -------------------------------------------------------------------------
> This SF.net email is sponsored by: Microsoft
> Defy all challenges. Microsoft(R) Visual Studio 2005.
> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> _______________________________________________
> Perl-Win32-GUI-Users mailing list
> [email protected]
> https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
> http://perl-win32-gui.sourceforge.net/
>
--
Please update your address book with my new email address:
[EMAIL PROTECTED]
-------------------------------------------------------------------------
SF.Net email is sponsored by:
Check out the new SourceForge.net Marketplace.
It's the best place to buy or sell services for
just about anything Open Source.
http://sourceforge.net/services/buy/index.php
_______________________________________________
Perl-Win32-GUI-Users mailing list
[email protected]
https://lists.sourceforge.net/lists/listinfo/perl-win32-gui-users
http://perl-win32-gui.sourceforge.net/
