[Nyctos Kasignete]

Собственно, можно посмотреть в исходнике, как реализован тот и другой методы:

Сообщение от Unit Controls.pas

procedure TControl.Refresh;
begin
Repaint;
end;

X)