Пусть задана окружность (x0,y0,r0). Необходимо внутри разместить случайные точки так, чтобы они были распределены равномерно.

Решение в лоб:

  with canvas do begin
    Ellipse(x0-r0,y0-r0,x0+r0,y0+r0);
    for i := 1 to 10000 do begin
      a:=2*Pi*random;
      r:=r0*random;
      x:=x0+round(r*cos(a));
      y:=y0+round(r*sin(a));
      Pixels[x,y]:=clred;
    end;
  end;

Но понятно, что распределение не равномерное, плотность точек выше к центру круга:

Есть идеи, как распределить точки равномерно?

(читать всё…)

8Observer8

Поиграйте, пожалуйста, если найдёте ошибку — сообщите. К примеру, если номера будут неправильные, то покажите скриншот:

• Minesweeper_v1.2.1 (Win_x86)

Посмотрите, запускается ли из вашего браузера:

• Minesweeper_v1.2.1 (WebGL)
• Minesweeper_v1.2.1 (WebPlayer)

Если у вас Linux или Mac, то сообщите запускается ли. Если один раз запустится, то я буду знать, что, скорее всего, и остальные приложения запустятся. Linux я ещё смогу поставить на Virtual Box, а Mac вряд ли:

• Minesweeper_v1.2.1 (Linux_x86)
• Minesweeper_v1.2.1 (Mac_x86)

С меня «плюс» в репутацию если запустите что либо и сообщите запустилось ли или нет. Особенно интересно — Мас и Linux (сообщите дистрибутив)

Язык: C#
Движок: Unity2D
Исходники: Minesweeper_v1.2.1 (Source)
Базовый туториал

тема на форуме

Задача такова. У меня имеется png рисунок, созданный в photoshop, свойство которого прозрачность 50%, т.е. полупрозрачность. Подскажите, как мне с помощью Canvas перенести этот прозрачный png из image1 на image2 не теряя прозрачности фона (нужно чтобы его не было) и не теряя полупрозрачности самого png объекта? Само изображение приложил к этому посту.

(читать всё…)

подскажите пожалуйста каким образом передать значение из списка (select) в url параметра action.

<p>Выберите ip <select id="ip">
<option>192.168.0.1</option>
<option>192.168.0.2</option>
<option>192.168.0.3</option>
</select></p>

<form method="get" action="http://значение_ip_из_списка/qwer.php">
   <span></span>
   <input name="imya" type="text" required/>
   <input type="submit" value="Отправить"/>
</form>

(читать всё…)

Давненько видел на youtube такую вещь.
Если создатель захотел обновить программный код и внести изменения то он просто отключает программу ..
и выдает что то типа такого showMessage(‘Ошибка соединения’); и при нажатие ок сообщение пропадает и приложение или программа не открывается .

Как можно это реализовать?
(читать всё…)

Создал новый компонент (заимствовал из Delphi7 TF1Book).
Компонент нормально установился в Delphi XE4. Виден в Options ToolBar в закладке Samples, но почему то не виден в Tool Pallete.
Если ручками , то великолепно становится в приложение.
В чём может быть дело?

(читать всё…)

Вадим Мошев

Меня попросили протестировать <nofollow></nofollow>. Если тег noindex существовал только для яндекса, то в существование ТЕГА (это значение атрибута rel для тега <a>) лично мне верится очень тяжело. Я могу ошибаться. Пусть знающие люди, а Alar относится к ним, меня поправят.

Итак, сейчас будет мозговыносящая фраза.

Зелёный бархатный мальчик упал в лужу пончикового безмолвия и трансцендентно позвал гируяку на помощь.

тема на форуме

Имеется:
1. База данных преподавателей и студентов в MS SQL Server 2005
2. В ней находится 5 таблиц: Факультеты, Группы, Преподаватели, Предметы и Основная.
3. Поля в первых 4 таблицах соответствуют их названиям (не считая целочисленные ключевые поля-идентификаторы). В них просто перечислены все группы, все преподаватели, все предметы и все факультеты
4. Последняя таблица состоит из 4 полей с теми же именами
Задача:
При введении данных в поля Основной таблицы необходимо обеспечить подстановку из таблиц Факультеты, Группы, Преподаватели и Предметы в соответствующие поля, т.е. чтобы не вводить полностью имя препода, который ведёт один из своих предметов у определённой группы на таком-то факультете, а обеспечить возможность выбора данных из динамически формирующегося списка при, скажем, установке курсора в нужное поле (это вообще было бы идеально), т.е. как в конструкторе — собрать Основную таблицу по деталям из четырёх других.
Поскольку связь в Основной таблице идёт многие ко многим, то, пожалуй, будет надобность создавать промежуточные таблицы
Вопрос:
Существуют ли способы, какие-либо select-запросы или ещё что-то, чтобы это можно было осуществить?

(читать всё…)

Библиотека для работы с графикой. Поддерживаются следующие форматы:

TIFF images (*.tif; *.tiff)
GFI fax images (*.fax)
SGI images (*.bw, *.rgb, *.rgba, *.sgi)
Autodesk images files (*.cel; *.pic)
Truevision images (*.tga; *.vst; *.icb; *.vda; *.win)
ZSoft Paintbrush images (*.pcx, *.pcc; *.scr)
Kodak Photo-CD images (*.pcd)
Portable pixel/gray map images (*.ppm, *.pgm, *.pbm)
Dr. Halo images (*.cut, *.pal)
CompuServe images (*.gif)
SGI Alias/Wavefront images (*.rla, *.rpf)
Standard Windows bitmap images (*.bmp, *.rle, *.dib)
Photoshop images (*.psd, *.pdd)
Paintshop Pro images (*.psp)
Portable network graphic images (*.png)
(читать всё…)

Пожалуйста помогите, нарисовать движущийся корабль в Delphi.

(читать всё…)