[***XXX***]

Подскажите как можно написать программу, которая "ломает" экран молотком, стреляет в него, поджигает и т.п.(в Интернете видел, написать хочу)кто подскажет код и нужные компоненты???

[Winny]

Кинь-ка в личку ссылку на эту программу, интересно посмотреть.

[:S.p.a.m.]

Думаю нужно сначала сделать скрин экрана потом на нем рисовать эти трещины и все!

[***XXX***]

а как это всё сделать, знаю будет не легко

[Winny]

Нужна анимация? Рисуй её в Macromedia Flash MX, а потом с помощью ActiveX Shockwave Flash интегрируй в Delphi.

[***XXX***]

Winny а не пора ли проверить почту если честно я не слышал о Macromedia Flash MX,даже писать прогу желание пропало.но ничего есть же какие-то другие способы...

[DSL88]

Делаешь скрин экрана и рисуешь на нем.
Все просто (Так я получал скрин два года назад):

Код:

var
SC: TCanvas;
R: TRect;
begin
SC:=TCanvas.Create;
R.Left:=0;
R.Top:=0;
R.Bottom:=Screen.Height;
R.Right:=Screen.Width;
SC.Handle:=GetDC(0);
Image1.Canvas.CopyRect(R,SC,R);
SC.Free;
end;

Ну а потом все додумаешься...

[***XXX***]

блин надо двигаться с мертвой точки. моя задача написать программу которая делает скриншот, меняет курсор мыши (у меня имеется подходящий) и стреляет в экран(делает черные дырочки-левая кн. мыши).
кто мне поможет???

[Rat]

***XXX***, слушай, у меня такое ощущение, что ты хочешь, что бы за тебя программу написали, а не самому разобраться. Я могу тебе дать исходник такой программы. Ты разбираться будешь?

[Vayrus]

В интернете поищи внимательней-точно есть, сам в свое время нашел.

[***XXX***]

Rat скинь пожалуйста на почту разберусь! А исходник чей??? мой адрес Rusik.ukhta@rambler.ru

[Rat]

Исходник мой, специально для тебя. На мыло кидать не буду. Бери здесь.

[Virus]

СПАСибо, а как запихнуть wav в исполняемый файл чтобы прога состояла из 1 файла

[Rat]

Для тех кто не знает, как добавить wav файл в ресурсы своей программы:
Создаем текстовый файл с именем sounds.rc
Прописываем в него наши файлы. Каждый файл в ресурсах = 1 строке. Пример содержимого файла:

SND1 WAVE 1.wav
SND2 WAVE Bum.wav
SND3 WAVE Crazy.wav
Первое слово - имя, которое мы будем указывать в программе.
Второе - тип ресурса = wav файл
Третье - имя файла
сохраняем файл.
Компилим его из коммандной строки: brcc32 sounds.rc
В результате получаем откомпиленный файл - sounds.res.
Второй этап:
В программе подключаем этот файл:
{$R sounds.res}
Теперь для воспроизведения звука нужно дать комманду:
PlaySound('SND1', 0, SND_RESOURCE or SND_ASYNC);
, где первым параметром - имя, назначенное нами файлу в файле ресурсов.