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 🫢🌟


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