SplashFast(3pm)
π NAME π
Wx::Perl::SplashFast β a fast splash screen for the Wx module. This is a Perl thing, bestie, from the User Contributed Perl Documentation collection. π
β¨ 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 πΈ
okay so here's the tea β β if you use Wx::SplashScreen from Wx::App::OnInit, you can get a big old delay before the splash screen even shows up on low end machines. Not the vibe. π
This module works around that limitation; you just need to follow the example. That's it. That's the whole gig. π
π¦ 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β the path of the image file to show. πΌοΈSPLASH_TIMEOUTβ how long the splash screen sticks around, in milliseconds. β±οΈ
If you do use Wx::Perl::SplashFast './logo.jpg', 1000; it has the same affetc as:
BEGIN {
require Wx::Perl::SplashFast;
Wx::Perl::SplashFast->new( './logo.jpg', 1000 );
}
(yeah, "affetc" β that's what the original says, I don't make the rules, I just enforce them π«Ά)
π new ( IMG_FILE , SPLASH_TIMEOUT )
Shows the splash screen. the main character makes her entrance β¨
IMG_FILEβ the path of the image file to show. πΌοΈSPLASH_TIMEOUTβ how long the splash screen sticks around, 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> β and a huge thank you to the wxWidgets people and to Mattia Barbon for wxPerl! :P π«Άπ
π COPYRIGHT π
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.
and that's the whole page, bestie β SplashFast(3pm) from perl v5.42.3, dated 2026-08-20. go make a splash, you absolute icon π
β¨π
π¦ where this page comes from
- ubuntu stonking: libwx-perl 1:0.9932-10build2 Β· Artistic-1.0-Perl OR GPL-1.0-or-later
- π girlified by deepseek-ai/DeepSeek-V4.1-Flash on : a language model's rewrite of the original, under its terms