📄 morph.pm
字号:
# ====================================================================# Copyright (c) 2000-2001 by Soheil Seyfaie. All rights reserved.# This program is free software; you can redistribute it and/or modify# it under the same terms as Perl itself.# ====================================================================# $Author: peterdd $# $Id: Morph.pm,v 1.3 2007/09/29 08:08:15 peterdd Exp $package SWF::Morph;use SWF ();$SWF::Morph::VERSION = $SWF::VERSION;sub getShapes{ my $self = shift; return ($self->getShape1(), $self->getShape2());}1;__END__=head1 NAMESWF::Morph - SWF Morph Class=head1 SYNOPSIS use SWF::Morph; my $morph = new SWF::Morph();=head1 DESCRIPTIONSWF::Morph twist from one shape to another.=head1 METHODS=over 4=item new SWF::Morph();Returns an SWF::Morph object.=item ($shape1, $shape2) = $morph->getShapes();Returns two SWF::Shape objects. The first one ($shape1) is the morph's starting shape while $shape2 is its final shape. You may also use L<"getShape1()"> and L<"getShape2()"> methods to get a handle of these shapes.=item $shape1 = $morph->getShape1();Returns the morph's starting shape.=item $shape2 = $morph->getShape2();Returns the morph's final shape.=back=head1 AUTHORSoheil Seyfaie (soheil@netcom.ca).=head1 SEE ALSOSWF, SWF::Button, SWF::DisplayItem, SWF::Shape, SWF::Movie, SWF::MovieClip=cut
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -