Кто поможет (Delphi)?

Вставляем обычный Timage и обрабатываем событие onclick

 

Надо помочь!

Срочно нужна помощь!
Я создал форму но на форме поставил Border Style:=bsNone.
На верх поставил картинку ну думаю всё,но почему-то не могу перетаскивать форму!?!?
Подскажите пожалуйста что делать!

 

http://www.cyberforum.ru/delphi-beginners/thread28681.html и еще сотни ссылок в гугле.

 

Закрыто!

 

не можешь перетащить?!!! о____О
а так не пробовал?

Code:

procedure Imge1MouseDown(..);
begin
  ReleaseCapture();
  SendMessage(Form1.Handle, WM_SYSCOMMAND, $F012, 0);
end;

 

*Паника*
Только вот не понятно зачем поставил Border Style:=bsNone.
Ставь Border Style:=bsDialog да будет счастье =)

 

возможно человеку захотелось сделать красочный заголовок окна)