El Tk:: Imagen:: Corte es una extensión Perl para una interface de usuario gráfica para cortar imágenes fotografías.

SINOPSIS

use Tk:: Imagen:: Corte;
mi $mw = MainWindow-> nuevo ();
$mw-> título ("el Cortador de cuadros");
$mw-> geometría ("+5+5");
mi $cut = $mw-> Corte ()-> reja ();
$mw-> Botón (
- texto => "Salida",
- mandan => suscripción {salida ();},
)-> reja ();
para (qw/
ButtonSelectImage
LabelShape
bEntryShape
ButtonColor
LabelWidthOut
EntryWidthOut
LabelHeightOut
EntryHeightOut
ButtonIncrease
ButtonReduce
LabelNameOut
EntryNameOut
ButtonCut
/)
{
El $cut-> Subartefacto ($ _)-> configura (
- fuente => "{Tiempos Nuevo romano} 10 {negrita}",
);
}
para (qw/
bEntryShape
EntryWidthOut
EntryHeightOut
EntryNameOut
Lona
/)
{
El $cut-> Subartefacto ($ _)-> configura (
- fondo => "#FFFFFF",
);
}
para (qw/
bEntryShape
EntryWidthOut
EntryHeightOut
/)
{
El $cut-> Subartefacto ($ _)-> configura (
- anchura => 6,
);
}
El $cut-> Subartefacto ("EntryNameOut")-> configura (
- anchura => 40,
);
El $cut-> Subartefacto ("Lona")-> configura (
- anchura => 1000,
- altura => 800,
);
MainLoop ();

Extensión de Perl para una interface de usuario gráfica para cortar imágenes fotografías. El módulo es un artefacto variado de Botones, Etiquetas, BrowseEntry, Entrys y artefactos de Lona.

Espero que la interface de usuario gráfica sea bastante simple de ser entendida sin grandes declaraciones.

Puede estar usado como una aplicación independiente o justo como como cualquier otro artefacto. Pruebe el programa de test.pl. Usted puede seleccionar entre cuatro formas que cortan.

"rectángulo", "oval", "círculo" "o polígono"

A fin de recortar imágenes fotografías en la forma circular u ovalmente hacer clic con el botón del ratón izquierdo en la esquina izquierda superior y sostener el botón pulsado mientras el ratón es movido.
A fin de cortar imágenes fotografías en el polígono le forman clic con el botón del ratón izquierdo en el primer punto y atraen al ratón al siguiente punto. Si usted ha dibujado el último punto usted hace clic con el botón del ratón correcto.

Usted puede usar todas las opciones de artefacto estándares.