[html-formfu] mutliple selects
Thorsten Domsch
tdomsch at gmx.de
Wed May 30 10:31:56 GMT 2007
Sample Code so far (pretty simple and straight i guess)...
package HTML::FormFu::Element::date;
use strict;
use warnings;
use base 'HTML::FormFu::Element::multi';
use Data::Dumper;
use HTML::FormFu::Util qw( append_xml_attribute );
__PACKAGE__->mk_attr_accessors(qw/ size start_year end_year/);
sub new {
my $self = shift->SUPER::new(@_);
my $id_day=$self->name."_day"; #<- not working :-( it should ??
my $id_month=$self->name."_month"; #<- not working :-( it should ??
my $id_year=$self->name"_year"; #<- not working :-( it should ??
my @options;
for ( my $i = 0 ; $i < 31 ; $i++ ) {
push( @options, { 'label' => $i + 1, 'value' => $i + 1 } );
}
my $days =
$self->form->element(
{ type => 'select', name => $id_day, options => \@options } );
my $months = $self->form->element(
{
type => 'select',
name => $id_month,
options => [
{ 'label' => 'Januar', 'value' => '1' },
{ 'label' => 'Februar', 'value' => '2' },
{ 'label' => 'März', 'value' => '3' },
{ 'label' => 'April', 'value' => '4' },
{ 'label' => 'Mai', 'value' => '5' },
{ 'label' => 'Juni', 'value' => '6' },
{ 'label' => 'Juli', 'value' => '7' },
{ 'label' => 'August', 'value' => '8' },
{ 'label' => 'September', 'value' => '9' },
{ 'label' => 'Oktober', 'value' => '10' },
{ 'label' => 'November', 'value' => '11' },
{ 'label' => 'Dezember', 'value' => '12' }
]
}
);
@options = ();
for ( my $i = 1977 ; $i <= 2010 ; $i++ ) {
push( @options, { 'label' => $i, 'value' => $i } );
}
my $years =
$self->form->element(
{ type => 'select', name => $id_year, options => \@options } );
return $self;
}
1;
--
Ist Ihr Browser Vista-kompatibel? Jetzt die neuesten
Browser-Versionen downloaden: http://www.gmx.net/de/go/browser
More information about the HTML-FormFu
mailing list