font - Поиск - Библиотека программиста

Поиск

ActiveX - ProgressBarBest

Дата: 28.11.2024 Модуль: Категория: Компоненты ActiveX

Разместил: admin Адрес сайта: programmistu.info

Генерация изображения со случайным кодом (captcha)

Дата: 28.11.2024 Модуль: Категория: PHP

Чаще всего изображения со случайным кодом (так называемая captcha) используются для защиты от флуда (автоматизированного ввода сообщений), некоторые сервисы находят им применнение в качестве раздражителя (для перехода на платный вариант).

В общем, может пригодиться. PHP код следующий:

PHP - Код


$width = 100;                //Ширина изображения

$height = 60;                //Высота изображения

$font_size = 16;               //Размер шрифта

$let_amount = 4;            //Количество символов, которые нужно набрать

$fon_let_amount = 30;        //Количество символов на фоне

$font = "fonts/cour.ttf";    //Путь к шрифту

 

//набор символов

$letters = array("a","b","c","d","e","f","g");        

//цвета

$colors = array("90","110","130","150","170","190","210");    

 

$src = imagecreatetruecolor($width,$height);    //создаем изображение                

$fon = imagecolorallocate($src,255,255,255);    //создаем фон

imagefill($src,0,0,$fon);                        //заливаем изображение фоном

 

for($i=0;$i < $fon_let_amount;$i++)            //добавляем на фон буковки

{

    //случайный цвет

       $color = imagecolorallocatealpha($src,rand(0,255),rand(0,255),rand(0,255),100);    

       //случайный символ

       $letter = $letters[rand(0,sizeof($letters)-1)];    

    //случайный размер                                

       $size = rand($font_size-2,$font_size+2);                                            

       imagettftext($src,$size,rand(0,45),

           rand($width*0.1,$width-$width*0.1),

        rand($height*0.2,$height),$color,$font,$letter);

}

 

for($i=0;$i < $let_amount;$i++)        //то же самое для основных букв

{

   $color = imagecolorallocatealpha($src,$colors[rand(0,sizeof($colors)-1)],

           $colors[rand(0,sizeof($colors)-1)],

           $colors[rand(0,sizeof($colors)-1)],rand(20,40)); 

   $letter = $letters[rand(0,sizeof($letters)-1)];

   $size = rand($font_size*2-2,$font_size*2+2);

   $x = ($i+1)*$font_size + rand(1,5);        //даем каждому символу случайное смещение

   $y = (($height*2)/3) + rand(0,5);                            

   $cod[] = $letter;                           //запоминаем код

   imagettftext($src,$size,rand(0,15),$x,$y,$color,$font,$letter);

}

 

$cod = implode("",$cod);                    //переводим код в строку

 

header ("Content-type: image/gif");         //выводим готовую картинку

imagegif($src);

Это максимально упрощенный вариант с использованием только одного шрифта и небольшого количества символов и цветов, хотя и этого бывает достаточно, чтобы оградиться от незатейливых спамеров и флудеров.

Через HTML такое изображение вызывается стандартно:

Код

Скачать скрипт генерации защитного кода с полным набором символов и возможностью подключения своих шрифтов можно здесь [url=/uploads/files/public/secpic.rar]secpic.zip[/url]

Разместил: admin Смотрим и оставляем комментарий »

Визуальный HTML редактор своими руками

Дата: 28.11.2024 Модуль: Категория: Delphi и TurboPascal

Разместил: admin Смотрим и оставляем комментарий »

1С и Excel.

Дата: 28.11.2024 Модуль: Категория: Программирование 1С

Разместил: uncle Fedor Смотрим и оставляем комментарий »

Создание гиперссылки в Delphi

Дата: 28.11.2024 Модуль: Категория: Delphi и TurboPascal

Разместил: Смотрим и оставляем комментарий »

Создание хранителя экрана (ScreenSaver)

Дата: 28.11.2024 Модуль: Категория: Delphi и TurboPascal

Разместил: Aleksey Merlin Смотрим и оставляем комментарий »

Экспорт данных из 1С

Дата: 28.11.2024 Модуль: Категория: Программирование 1С

Разместил: admin Смотрим и оставляем комментарий »

Скрипт "падающий снег"

Дата: 28.11.2024 Модуль: Категория: Веб-дизайн

Разместил: admin Смотрим и оставляем комментарий »

Как вывести текст по окружности?

Дата: 28.11.2024 Модуль: Категория: С++, Visual C++

Изменяя аргумент iAngle, можно вращать начальную точку - центр. А изменяя iSector можно выводить текст как по окружности, так и по дуге (она задается в градусах). Наверняка многие видели такой эффектик. Какой-нибудь текст крутится вокруг центра и меняется его радиус - расстояние от центра до букв. И тут можно такое же сделать. Для этого надо вызывать эту процедуру по таймеру, где перед вызовом изменять iAngle и iR (переменные завести). Только перед каждым рисованием, надо в этой функции очищать уже нарисованное, чтобы не оставалось старого. А если это непосредственно на канве делается медленно и мигает, но надо рисовать на битмапе и оттуда изображение копировать.

Код

void DrawCircularText (TCanvas *Canvas, AnsiString asFontName, int iHeight, char *szText, int iAngle, int iR, int iCX, int iCY, int iSector)
{
LOGFONT lf; // создаем объект для нестандартного шрифта
HFONT hPrevFont, hFont;
int iPass = iSector/lstrlen(szText); // расстояние между буквами
ZeroMemory(&lf,sizeof(lf));
lf.lfCharSet=RUSSIAN_CHARSET; // для русского языка
lf.lfWeight = 900; // чтоб хоть видно было! Хотя можно убрать
for (int i=0;i<lstrlen(szText);i++)
{
lf.lfEscapement = 10*iAngle-(10*iPass*(i-1)); // угол
lstrcpy(lf.lfFaceName,asFontName.c_str()); // имя шрифта
lf.lfHeight = iHeight; // устанавливаем высоту
hFont = CreateFontIndirect(&lf); // создаем непосредственно шрифт
hPrevFont = SelectObject (Canvas->Handle, hFont); // делаем шрифт hFont
Canvas->TextOut (iCX+iR*sin((-180+iAngle-(i-1)*iPass)*3.14/180),iCY+iR*cos((-180+iAngle-(i-1)*iPass)*3.14/180),szText [i]); // выводим символ
hFont = SelectObject(Canvas->Handle, hPrevFont); // обратно меняем шрифт
DeleteObject (hFont); // удаляем
}
}

Разместил: admin Смотрим и оставляем комментарий »