package QtCore;

use 5.008;
use strict;
use warnings;

require Exporter;
require DynaLoader;

our @ISA = qw(DynaLoader Exporter);
our $VERSION = '4.004';

#our @EXPORT = qw(qref);

# find in Win32::Gui  :)
sub bootstrap_subpackage {
    my($package) = @_;
    $package = 'Qt::' . $package;
    my $symbol = $package;
    $symbol =~ s/\W/_/g;
    no strict 'refs';
        DynaLoader::dl_find_symbol_anywhere( "boot_$symbol" )
    &{ "${package}::bootstrap" };

bootstrap QtCore $VERSION;

# Preloaded methods go here.

#sub qref {
#    my $q = shift;
#    return "" unless ref($q);
#    my $r = ref($q);
#    if ( $r eq 'SCALAR' ) {
#	return 'S';}
#    elsif ( $r eq 'ARRAY' ) {
#	return 'A';}
#    elsif ( $r eq 'HASH' ) {
#	return 'H';}
#    elsif ( $r eq 'REF' ) {
#	return 'R';}
#    else {
#	return "O"; }



=head1 QtCore

QtCore is a library for working with Qt4 QtCore in Perl.


    use Qt;
    use Qt::QTimer;
    use Qt::QCoreApplication;

    my $app = QCoreApplication(\@ARGV);
    my $timer = QTimer();
    print "app = $app, timer = $timer\n";
    $app->connect($timer, SIGNAL('timeout()'), $app, SLOT('quit()'));

    print "start (wait 2 seconds) ...\n";
    print "quit -- OK\n";
    print "\nok\n";
    # See other instances in examples directory.


Creating this library we aimed to use the Perl functionality as much as possible,
but to make the syntax similar to C++ Qt4.
This allows to use the original Qt4 documentation.
All the list classes (QVector,QList) are replaced by the Perl arrays.
All the associated arrays (QMap,QHash,QPair) are replaced by Perl hashes.
The classes of modules are completely coincide with the corresponding  ones of C++ Qt4.
One can use all the protected functions from the object classes (QObject children)
except of those that use *Private classes as input parameter.

It's advisable to study the examples attached before writing programs.

=head2 EXPORT

None by default.

=head1 SEE ALSO

Qt Reference Documentation

=head1 AUTHOR

Vadim Likhota, E<lt>vadim-lvv@yandex.ruE<gt>


Copyright (C) 2007-2008 by Vadim Likhota

This library is free software;
you can redistribute Perl/Qt4 modules under the GPL2 or any other Qt4 licencies.