Gtk2::Ex::FormFactory::Form - A Form in a FormFactory framework


Gtk2-Ex-FormFactory documentation Contained in the Gtk2-Ex-FormFactory distribution.

Index


Code Index:

NAME

Top

Gtk2::Ex::FormFactory::Form - A Form in a FormFactory framework

SYNOPSIS

Top

  Gtk2::Ex::FormFactory::Form->new (
    label_top_align         => Align all labels at the top of their row,
    ...
    Gtk2::Ex::FormFactory::Container attributes
    Gtk2::Ex::FormFactory::Widget attributes
  );

DESCRIPTION

Top

This class implements a Form in a Gtk2::Ex::FormFactory framework. A Form is rendered as a two column table with labels in the first and the corresponding widgets in the second column. No application object attributes are associated with a Form.

OBJECT HIERARCHY

Top

  Gtk2::Ex::FormFactory::Intro

  Gtk2::Ex::FormFactory::Widget
  +--- Gtk2::Ex::FormFactory::Container
       +--- Gtk2::Ex::FormFactory::Form

  Gtk2::Ex::FormFactory::Layout
  Gtk2::Ex::FormFactory::Rules
  Gtk2::Ex::FormFactory::Context
  Gtk2::Ex::FormFactory::Proxy

ATTRIBUTES

Top

Attributes are handled through the common get_ATTR(), set_ATTR() style accessors, but they are mostly passed once to the object constructor and must not be altered after the associated FormFactory was built.

label_top_align = BOOLEAN [optional]

If you set this option all form element lables are aligned to the top of their row. By default labels are centered vertically.

AUTHORS

Top

 Jörn Reder <joern at zyn dot de>

COPYRIGHT AND LICENSE

Top


Gtk2-Ex-FormFactory documentation Contained in the Gtk2-Ex-FormFactory distribution.

package Gtk2::Ex::FormFactory::Form;

use strict;

use base qw( Gtk2::Ex::FormFactory::Container );

sub get_type { "form" }

sub get_label_top_align         { shift->{label_top_align}              }
sub set_label_top_align         { shift->{label_top_align}      = $_[1] }

sub new {
	my $class = shift;
	my %par = @_;
	my ($label_top_align) = $par{'label_top_align'};

	my $self = $class->SUPER::new(@_);
	
	$self->set_label_top_align($label_top_align);
	
	return $self;
}



1;

__END__