20 Fantastic Latest jQuery Plugins
3 мин
Перевод
Этот пост содержит коллекцию великолепных предпоследних плагинов и обучающих пособий, которые смогут добавить искру креативности в ваш дизайн

Перевод этой статьи

Перевод этой статьи
Web


<input class=":required" type="text" />
<input class=":integer" type="text" />
<input class=":length;4" type="text" />
<input class=":min_length;4" type="text" />
<input class=":format;/^(vanadium)+$/i" type="text" />
<input id="pass" class=":ajax;/username_checker/check.json" type="text" />
<input id="pass" class=":email" type="text" />
<input id="pass" class=":required" type="password" /><input class=":same_as;pass" type="password" />
* This source code was highlighted with Source Code Highlighter.
#!/usr/bin/perl -w
use strict;
use Tkx;
our $PROGNAME = 'app';
our $VERSION = '0.1';
<habracut>
my $windowingsystem = Tkx::tk_windowingsystem();
my $IS_AQUA = ($windowingsystem eq 'aqua');
# Учитывая, что имена некоторых кнопок могут различаться,
# в OSX это Control, в Win/X11 это Ctrl, добавим еще несколько переменных
# (пригодится для хоткеев)
my $plat_acc_ctrl = ($^O eq 'darwin') ? ('Control-') : ('Ctrl+');
my $plat_evt_ctrl = ($^O eq 'darwin') ? ('Control-') : ('Control-');
# Главное окно.
my $mw = Tkx::widget->new('.');
Tkx::tk( appname => $PROGNAME );
Tkx::wm_minsize( $mw => qw(320 200) );
# новое меню прикрепляется с помощью параметра -menu
$mw->configure(
-menu => make_menu( $mw ),
);
Tkx::MainLoop;
1;
sub on_quit {
Tkx::tk___messageBox( -message => 'Goodbye ;]' );
exit;
}
sub show_about {
Tkx::tk___messageBox( -message => "$PROGNAME $VERSION" );
}
sub make_menu {
my $mw = shift || return;
# По умолчанию, все меню выглядит подобно в GIMP, их можно открепить
# Поэтому, выключим данную опцию
Tkx::option_add('*Menu.tearOff', 0)
# ... продолжение ниже
return $m;
}
my $m = $mw->new_menu(); # Верхний уровень my $fm = $m->new_menu(); # File my $em = $m->new_menu(); # Edit # А теперь, добавим наши пункты в верхний уровень $m->add_cascade( -label => 'File', -menu => $fm, -underline => 0 ); $m->add_cascade( -label => 'Edit', -menu => $em, -underline => 0 );

# Меню File
$fm->add_command(
-label => 'Do something',
-underline => 0,
-command => sub { },
);
# разделитель
$fm->add_separator();
$fm->add_command(
-label => 'Quit',
-underline => 0,
-accelerator => "${plat_acc_ctrl}Q",
-command => [\&on_quit],
);
Tkx::bind( all => "<${plat_evt_ctrl}q>" => [\&on_quit] );
# Меню Edit
$em->add_command(
-label => 'Cut',
-underline => 2,
-accelerator => "${plat_acc_ctrl}X",
-command => sub { Tkx::event_generate(Tkx::focus(), '<
В предыдущем посте я рассказывал о методах борьбы с проблемой «не могу заснуть». Тема оказалась востребованной, и я решил написать о своих методах борьбы с проблемой «не могу проснуться».
Те из вас кто следит за автором на Github могли заметить, что недавно он добавил новый проект под названием «prettyPrint».
Feedback > 2.0 интересный аскетичный по дизайну виджет и необычный в реализации. В нем вы найдете только самые нужные функции для сбора отзывов и предложений от посетителей вашего сайта. Ничего лишнего – все только по делу.cp c:\windows\system32 -rec d:; done
