Создание программ

ufna, winapi пусть учит, на-и-зусть Розыгрышей захотелось, ишь!

Grep, как написано у Вас в профиле
Цитата:

Создаю маленькие программки,знаю: PHP,java,Deplhi и другие...

вот на Java, Delphi, и других они и создаются.

Если желаете действительно что-то создавать, то как уже несколько раз сказали - прямой путь учиться начиная с азов.
А если только "хотЦа приколоться" не обременяя голову "лишним" знаниями, нагуглите исходников программ-приколов и скомпилируйте в соответствующей среде. По тому, как запустить компиляцию видео-урок наверняка найдётся в том же Гугле... и читать не надо. Хотя ещё проще сразу качать готовый exe.

PS вот вам "розыгрыш" клацающий приводом...

program Klats_CD;


uses windows,mmsystem;


var ha:THandle;

    t:longint;


begin

 Randomize;

 t:=5000+1000*random(300);

 sleep(t);

 mciSendString('Set cdaudio door open wait',nil,0,ha);

 mciSendString('Set cdaudio door closed wait',nil,0,ha);

end.

Цитата ("intelleks"):

PS вот вам "розыгрыш" клацающий приводом...

Видел такое очень давно. Вариация на ту же тему - message box с вопросом "do you need additional place for the beer ?",
при ответе "да" открывался CD-ROM.