Rechercher une page de manuel
Wx::Perl::SplashFast.3pm
Langue: en
Version: 2007-06-18 (ubuntu - 07/07/09)
Section: 3 (Bibliothèques de fonctions)
Sommaire
NAME
Wx::Perl::SplashFast - Fast splash screen for the Wx module.SYNOPSIS
use Wx::Perl::SplashFast ('/path/to/logo.jpg',3000); # timeout in milliseconds package myApp ; # subclass Wx::App ... package myFrame; # subclass Wx::Frame ... package main; my $myApp = myApp->new(); my $frame = myFrame->new(); $myApp->MainLoop();
DESCRIPTION
Using Wx::SplashScreen from Wx::App::OnInit may cause a high delay before the splash screen is shown on low end machines.This module works around this limitation; you just need to follow the example.
USAGE
Just put the code inside the 'BEGIN {}' of your main app, like:sub BEGIN { use Wx::Perl::SplashFast ; Wx::Perl::SplashFast->new("./logo.jpg",5000); }
or load the module before any other:
use Wx::Perl::SplashFast ("./logo.jpg",5000) ; use Wx ; ...
import ( IMG_FILE, SPLASH_TIMEOUT )
- IMG_FILE
- Path of the image file to show.
- SPLASH_TIMEOUT
- Timeout of the splash screen in milliseconds.
If you "use Wx::Perl::SplashFast './logo.jpg', 1000;" this has the same affetc as.
BEGIN { require Wx::Perl::SplashFast; Wx::Perl::SplashFast->new( './logo.jpg', 1000 ); }
new ( IMG_FILE , SPLASH_TIMEOUT )
Show the splash screen.- IMG_FILE
- Path of the image file to show.
- SPLASH_TIMEOUT
- Timeout of the splash screen in milliseconds.
EXAMPLE
use Wx::Perl::SplashFast ("./logo.jpg",5000) ; # Don't forget to put your own image in the same path. Duh package myApp ; use base 'Wx::App'; sub OnInit { return(@_[0]) ;} package myFrame ; use base 'Wx::Frame'; use Wx qw( wxDEFAULT_FRAME_STYLE ); sub new { my $app = shift ; my( $frame ) = $app->SUPER::new( @_[0] , -1, 'wxPerl Test' , [0,0] , [400,300] ) ; return( $frame ) ; } package main ; use Wx ; my $myApp = myApp->new() ; print "window\n" ; my $win = myFrame->new() ; $win->Show(1) ; $myApp->SetTopWindow( $win ) ; $myApp->MainLoop();
SEE ALSO
Wx, <Wx:SplashScreen>AUTHOR
Graciliano M. P. <gm@virtuasites.com.br> Thanks to wxWidgets people and Mattia Barbon for wxPerl! :PCOPYRIGHT
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.Contenus ©2006-2024 Benjamin Poulain
Design ©2006-2024 Maxime Vantorre