Many thanks, Manfred - that is exactly what I was looking for. BTW I note
that there are a couple of missing library functions (notably I18N::Langinfo
and Text::Bidi) which I can't find under CPAN. However. I don't think they
are too important

 

Cheers

 

Geoff

 

From: Manfred Maier [mailto:manfred.ma...@kmk-miller.de] 
Sent: 03 April 2012 05:54
To: 'Geoff Horsnell'; perl-win32-users@listserv.activestate.com
Subject: AW: Perl graphics and calendars

 

Hello Geoff,

try this code:

 

# DateEntry_einfach.pl erstellt eine einfache Datumseingabe

use Tk;

use Tk::DateEntry;

$Datum = '01.01.2006'; # Startwert

$mw = MainWindow->new();

$mw->geometry( '130x40' );

 

$entry = $mw->DateEntry( -textvariable=>\$Datum,

                         -todaybackground => 'yellow',

                       )->pack;

MainLoop;

print "$Datum\n";

 

I hope it is helpful

Manfred

 

 

Von: Geoff Horsnell [mailto:ge...@horsnell.freeserve.co.uk] 
Gesendet: Montag, 2. April 2012 20:11
An: perl-win32-users@listserv.activestate.com
Betreff: Perl graphics and calendars

 

Does anyone know if Perl has a means of generating a pop-up month for
selecting a date in graphics? I am sure that there is a library function
somewhere that will allow me to do this.

 

Many thanks

 

Geoff Horsnell

 

_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs

Reply via email to