Borland C++ Builder FAQ - Как закрасить рабочий стол по пикселю

ОГЛАВЛЕНИЕ


Как закрасить рабочий стол по пикселю

// Напишите следующий код:
void __fastcall TForm1::Button1Click(TObject *Sender)
{
    TCanvas *dt = new TCanvas ;
    randomize();
    dt->Handle = GetDC(0);
    while (dt)
    {
        dt->Pixels[random(1024)][random(768)]= 0 ;
    }
}