Корейский рандом

[Mihanches]

Как сделать так, чтобы в любом месте экрана с интервалом менее 0.5 секунды появлялись любые буквы (язык без разницы). И происходить это все должно бесконечно.

[Arigato]

Таймер поставить с интервалом менее 500 и выводить на экран буквы, выбирая их рандомом. Что конкретно не получается? Вроде, все очень просто.

[Onekey]

хм вот мои неправильные дагадки.

можно создать один label и в таймере придавать ему разные значения и двигать его рандомно )

но этот вариант не канает тк отображаца будет тока один лабел. но можно ченить с этим помудрить

[Arigato]

Некоторые идеи (код сами доведете до ума):

  DC := GetDC (0);
  Width  := GetSystemMetrics (SM_CXSCREEN);
  Height := GetSystemMetrics (SM_CYSCREEN);
  SetBkMode (DC, TRANSPARENT);
  C := Char (Byte ('A') + Random (26));
  ExtTextOut (DC, Random (Width), Random (Height), ETO_CLIPPED, nil, @C, 1, nil);
...

[Mihanches]

Дополнение:
1) Это все должно происходить не в окне формы а на рабочем столе.
2) Поверх всех экон.
3) Цвет букв - красный.

[Smitt&Wesson]

Всё немного сложнее.
Берём форму.
Помещаем на неё Image.
Превращаем форму в полигон под нужный нам рисунок.
Двигаем форму в обработчике таймера - рандомом, в пределах TScreen->Widtch, TScreen->Height (перед стрелкой должна стоять переменная приведённого класса).
Код выложить не могу, он довольно громоздкий > 200 строк. Скопировать неоткуда, а руками набирать, сами понимаете...

[Mihanches]

Сообщение от Smitt&Wesson

Всё немного сложнее.
Берём форму.
Помещаем на неё Image.
Превращаем форму в полигон под нужный нам рисунок.
Двигаем форму в обработчике таймера - рандомом, в пределах TScreen->Widtch, TScreen->Height (перед стрелкой должна стоять переменная приведённого класса).
Код выложить не могу, он довольно громоздкий > 200 строк. Скопировать неоткуда, а руками набирать, сами понимаете...

ПостарайсЯ плиз... Или вышли мне на мыло gravitas@xakep.ru. С меня отзыв!

[Smitt&Wesson]

Попробую. Я такое уже делал, правда без рандома. Поищу исходник. Только он на Dorland C++ 6 написан. Устроит?

[Mihanches]

Неа) Я дельфер

[Smitt&Wesson]

Сообщение от Mihanches

Неа) Я дельфер

Увы. Я дельфи не знаю. Но словесный алгоритм правильный. Поищи. Думаю найдёшь.