i tried some tricks that came to my mind, like intersecting mouse events,
but none has worked.
herbert
Am 29.09.2010 20:50, schrieb Alexander:
> 29.09.2010 21:38, herbert breunung:
>> you message is a bit confusing to be, you already make a timeout by saying
>> 10000, the amount of milliseconds it should stay. or you say:
>>
>>
>> my $sc;
>> BEGIN {
>> require Wx::Perl::SplashFast;
>> $sc = Wx::Perl::SplashFast->new('/pfad/zum/logo.jpg');
>> }
>> ...
>> $sc->Destroy();
>>
>> cheers
>> herbert aka lichtkind
>> http://kephra.sf.net
> I'm sorry for my bad English. Yes in my example i use timeout, but if i click
> to Splash screen it will be closed, and now matter when i click, at 1second or
> 9. I want that Splash did not close by mouse click on it. i try your example
> in minimal perl app.
> use Wx;
> package MyFrame;
> use strict;
> use base qw(Wx::Frame);
> sub new {
> my( $class, $label ) = @_;
> my $this = $class->SUPER::new( undef, -1, $label );
> $this;
> }
>
> package main;
> my $sc;
> BEGIN {
> require Wx::Perl::SplashFast;
> $sc = Wx::Perl::SplashFast->new('./res/image/start.png');
> }
> my $app = Wx::SimpleApp->new;
> my $frame = MyFrame->new( "Minimal wxPerl app" );
> $frame->Show;
> $app->MainLoop;
>
> and splash screen closed after 1 or 2 seconds at start , or immediately if
> click to splash.
>
> I hope i can explain that i need.
