|
kuler в блоге «Блог им. kuler»
Диалоги в Delphi |
|
Привет всем) Сегодня я покажу простую функцию пользовательского диалога(да, нет)
function CustomMessageDialog(mess,title:string; DlgType: TMsgDlgType; buttons: TMsgDlgButtons; Custom : string = ''):integer;
var d: TForm; s:TStringList; i,k:integer;
begin
d:=CreateMessageDialog(mess,DlgType,buttons);
s:=TStringList.Create;
s.Delimiter:=',';
s.DelimitedText:=Custom;
if s.Count>0 then begin
for i := 0 to d.ControlCount - 1 do
if (d.Controls[i] is TButton) then begin
TButton(d.Controls[i]).caption:=s[0];
s.Delete(0);
if s.Count=0 then break;
end;
end; // end if
s.Free;
d.BorderIcons:=[];
d.Caption:=title;
result:=d.ShowModal;
d.free;
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
if CustomMessageDialog('hello','Сообщество Айтишников',mtConfirmation,[mbYes,mbNo],'да,нет') = mrYes then ShowMessage('1');
end;
- 17 мая 2012, 20:47
- 2
|
Ramzil_Nixon в блоге «Вопросы и Ответы»
Квадратная ава. Ошибка в скрипте |
|
Написал такой скрипт:
Выдвет ошибку в этой строке:
Ошибка:
В чем подвох? Я понять не могу…
function Ava100($dirAnName, $Ava100) // Запускаем функцию
{
$GI = getimagesize($dirAnName, $Ava100); // Получаем информацию о изображении
$Sho = 100; // 100 на 100 пикселевый квадратная аватарка
// Вычесляем большую и менюьшую сторону
if($GI[0] <= $GI[1]) // Ширина меньше высоты или равен
{
$w = $GI[0]; // Ширина
$h = $GI[0]; // Высота изображения
}
elseif($GI[0] > $GI[1]) // Высота меньше ширины
{
$w = $GI[1];
$h = $GI[1];
}
$image = imagecreatetruecolor($w, $h); // Создаем изображение, с нужными нам размерами
$n_image = imagecreatefromjpeg($dirAnName); // Создаем JPEG файл
imagecopy($image, $n_image, 0, 0, $w, $h, $w, $w); // Клеим изображение
imagejpeg($image, $Ava100, 100); // Записываем изображение
}Выдвет ошибку в этой строке:
imagejpeg($image, $Ava100, 100);Ошибка:
Notice: Array to string conversion in L:\home\localhost\www\pages\akkunt\setting\ava.php on line 100
В чем подвох? Я понять не могу…
- 17 мая 2012, 14:41
- 2
Как определить язык на PHP? |
|
Здравствуйте, сегодня я хотел бы показать метод, который я использую в качестве выбора языка
// список языков
$sites = array(
"ru" => "http://ru.mysite.com/",
"en" => "http://en.mysite.com/",
"fr" => "http://fr.mysite.com/",
);
// получаем язык
$lang = substr($_SERVER['HTTP_ACCEPT_LANGUAGE'], 0, 2);
// проверяем язык
if (!in_array($lang, array_keys($sites))){
$lang = 'ru';
}
// перенаправление на субдомен
header('Location: ' . $sites[$lang]);
- 15 мая 2012, 17:39
- Оставить комментарий
|
Ramzil_Nixon в блоге «Вопросы и Ответы»
Защита от DDOS атак. |
|
Появилась новая фигня при строительстве сайта.
DDOS атаки. Своими глазами видел как развитый сайт завалили с ноги хакеры с этим методом.
Хотелось бы узнать. Как от низ защититься?
DDOS атаки. Своими глазами видел как развитый сайт завалили с ноги хакеры с этим методом.
Хотелось бы узнать. Как от низ защититься?
- 15 мая 2012, 12:34
- 6
|
Ramzil_Nixon в блоге «Вопросы и Ответы»
Вползание окна в страницу. |
|
Всем привет!
Этот мой вопрос будет на тему Jquery и знактокам этого языка. Не давно начал это изучать, по этому пока не все знаю :)
И так собственно вопрос:

Как сделать чтобы такие окошки вползали в страницу, а не так чтобы появились там плавно или слайдом типа show(); fadeIn(); slideDown();
А именно вползал в страницу?
Этот мой вопрос будет на тему Jquery и знактокам этого языка. Не давно начал это изучать, по этому пока не все знаю :)
И так собственно вопрос:

Как сделать чтобы такие окошки вползали в страницу, а не так чтобы появились там плавно или слайдом типа show(); fadeIn(); slideDown();
А именно вползал в страницу?
- 28 апреля 2012, 14:27
- 4
Создание блога на PHP+MYSQL [Часть 2] |
|

Привет всем! Снова я:) Сегодня я хочу продолжить тему о создании велосипеда. В этой части мы выведем все статьи из БД, сделаем постраничную навигацию, а также вы сможете просматривать полный топик. А вот ещё просмотры прикрутим:)
читать дальше
- 10 апреля 2012, 16:42
- Оставить комментарий
|
Gigola в блоге «Вопросы и Ответы»
Как сделать премодерацию статей, комментов на php |
|
Здравствуйте, подскажите как можно модерировать статьи и комменты? прошу пример (простой)
- 09 апреля 2012, 13:45
- 4
Школьники диградируют |
|
Треть московских школьников не смогут заплатить за электричество. Это показал пробный экзамен по ЕГЭ, который состоялся 17 марта. Экзамен проводил Московский институт открытого образования. Его итоги на совещании столичного департамента по образованию подводил сегодня проректор Иван Ященко.
30% школьников не смогли решить простейшую математическую задачу, заявил проректор вуза.
Условия ее таковы: школьникам предлагалось рассчитать, каков будет платеж за электроэнергию, если 1 января счетчик показывал 88742 кВт*ч, а 1 февраля – 88940 кВт*ч. Стоимость одного кВт*ч составляет 3,5 рубля.
Ситуации на экзамене доходили до абсурда. Один из школьников посчитал, что за месяц ему придется заплатить 260 тысяч рублей.
Ященко рассказал, что институт получал письма с претензиями, что в задаче не описан алгоритм решения. Это «задача не по математике».
Анализируя причины таких результатов пробного ЕГЭ по математике, Ященко предположил, что их было несколько: невнимательность школьников и их формальное натаскивание на решение определенного вида
30% школьников не смогли решить простейшую математическую задачу, заявил проректор вуза.
Условия ее таковы: школьникам предлагалось рассчитать, каков будет платеж за электроэнергию, если 1 января счетчик показывал 88742 кВт*ч, а 1 февраля – 88940 кВт*ч. Стоимость одного кВт*ч составляет 3,5 рубля.
Ситуации на экзамене доходили до абсурда. Один из школьников посчитал, что за месяц ему придется заплатить 260 тысяч рублей.
Ященко рассказал, что институт получал письма с претензиями, что в задаче не описан алгоритм решения. Это «задача не по математике».
Анализируя причины таких результатов пробного ЕГЭ по математике, Ященко предположил, что их было несколько: невнимательность школьников и их формальное натаскивание на решение определенного вида
- 08 апреля 2012, 14:54
- 1
Создание блога на PHP+MYSQL [Часть 1] |
|
Здравствуйте, сегодня я начну курс уроков по изобретению велосипеда!
Я бы хотел начать с такого понятие: Что такое блог? Это в целом страничка, где вы можете писать статьи. Также это может быть ваш личный дневник. Хочу сразу огорчить любителей smarty, тут не будет этого шаблонизатора!
Давайте сразу определимся как будет работать наш блог:
читать дальше
Я бы хотел начать с такого понятие: Что такое блог? Это в целом страничка, где вы можете писать статьи. Также это может быть ваш личный дневник. Хочу сразу огорчить любителей smarty, тут не будет этого шаблонизатора!
Давайте сразу определимся как будет работать наш блог:
1. Вывод статьиПока я думаю этого будет достаточно! Сразу предупрежу, что данный курс статей будет посвящен новичкам.
2. Комментирование статьи
3. Постраничная навигация
4. Добавление статьи
5. Изменение статьи
6. Удаление статьи
7. Авторизация+Регистрация
читать дальше
- 07 апреля 2012, 21:29
- 1
