Не могу разобраться с буфером обмена

[Morphling]

Доброе время суток!
Прошу помощи. Помогите мне дописать программу. Кароче нужно написать программу, которая не имеет форму и чтобы программа всегда находилась в списке процессов. Наша программа должна постоянно проверять содержание буфера обмена, и если он отличается от той которую мы задали, то он записал бы туда наш текст.
По идее я сделал, но не могу разобраться с циклом, чтобы когда код заканчивался, то начиналось с самого начала.

Вот мой код:

program Project1;

uses
Forms, clipbrd;

{$R *.res}

begin

clipboard.Open;
clipboard.Clear;
clipboard.astext:='Буфер обмена пуст';
clipboard.Close;
end.

[W0LF]

Тут СТАТЬЯ, отлавливает изминение в реестре, узнаете о изминении и добовляете свой текст или чо там вам нада