[vitalik1]

да пробовал. Вот:

program NewProject;
begin
   setcolor(0,0,0);
   DrawText('Привет!', 5, 5); 
   Repaint;      
   Delay(2000);
   setcolor(255,255,255);
   fillrect(0,0,getwidth,getheight);   
   setcolor(0,0,0);
   DrawText('ППППППП', 5, 5);   
   Repaint;       
   Delay(10000);  
end.