Прицел для cs1.6

[SAMY93]

Здравствуйте! Была у меня программа, суть которой в том, что это была красная точка прям посреди экрана. Очень удобно для контр-страйка. Мне захотелось сделать то же самое. Но я столкнулся с проблемой. Эта точка нормально выводится, но только если форма активна, иначе она пропадает. Вот мой код

procedure TForm5.FormCreate(Sender: TObject);

begin
timer1.Enabled:=true;
 AlphaBlend := True;
alphablendvalue:=50;

end;

procedure TForm5.FormKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
if key=VK_ESCAPE then
form5.Close;

end;

procedure TForm5.Timer1Timer(Sender: TObject);
var h,w:integer;
begin
image1.Create(self);
image1.Picture.LoadFromFile('Безымянный.jpg');
h:=clientheight;
w:=clientwidth;
image1.Top:=h div 2;
image1.Left:=w div 2;
form5.AlphaBlendValue:=110;
end;

Помогите пожалуйста.

[Человек_Борща]

Посылай изображение в текущее активное окно

[raxp]

>>> тырк...