[vitalik1]

Ну тогда или закрашивай только текст так:

setcolor(0,0,0);
    DrawText('Привет!', 5, 5); 
    repaint;
    Delay(2000); 
    setcolor(255,255,255);//цвет фона
    DrawText('Привет!', 5, 5);
    setcolor(0,0,0); 
    DrawText('ППППППП', 5, 5);  
    Repaint;      
    Delay(999999999); 


или так

setcolor(0,0,0);
    DrawText('Привет!', 5, 5); 
    repaint;
    Delay(2000); 
    setcolor(255,255,255);//цвет фона
    fillrect(5,5,getstringwidth('Привет!'),getstringheight('Привет!'));
    setcolor(0,0,0); 
    DrawText('ППППППП', 5, 5);  
    Repaint;      
    Delay(999999999); 


или перерисовывай все на экране