Убегающая кнопка

Убегающая кнопка

Программа создает кнопку на которую нельзя никак нажать.
Расположите на форме компонент Button1: TButton с вкладки Standart
и задайте в Инспекторе объектов (Object Inspector) его свойтсво Caption

Caption: Нажми меня

Теперь переключитесь на вкладку Events здесь же, напротив события OnMouseMove, в пустом поле сделайте двойной щелчок. Это автоматически создаст процедуру с именем Button1MouseMove. Впишите следующий код

procedure TForm1.Button1MouseMove(Sender: TObject; Shift: TShiftState; X,
  Y: Integer);
begin
  Button1.Top := Random(Form1.ClientHeight - Button1.Height);
  Button1.Left := Random(Form1.ClientWidth - Button1.Width);
end;

Запустите программу Run

СКАЧАТЬ ПРОГРАММУРазмер
Демо-урок: убегающая кнопка (1143)389 кб

Отправил Чт, 03/22/2018 - 15:48

Dieta efficace per perdere subito peso
stihi.ru

Отправил Пнд, 02/05/2018 - 21:04

cialis 10mg or 20mg profile
[url=http://cialiswalmart.us]cialis over the counter at walmart[/url] cialis user ratings
cialis over the counter at walmart - cialis harder
canadian pharmacy cialis 20mg it is currently

Отправил Пнд, 02/05/2018 - 21:04

cialis coupon code website
[url=http://cialiswalmart.us]cialis over the counter at walmart[/url] cialis canadian pharmacy online you may not post new threads
cialis over the counter at walmart - cialis injury attorney columbus
cheap cialis uk

Отправил Ср, 12/06/2017 - 02:26

prescription cialis prices in uk
[url=http://cialiswalmart.biz]cialis over the counter at walmart[/url] cialis coupon free trial show posts
cialis over the counter at walmart - cialis 5mg dosage knowledge base
cialis 20mg tablets yahoo messenger

Отправил Ср, 12/06/2017 - 02:25

cialis 20 mg street value registered users
[url=http://cialiswalmart.biz]cialis over the counter at walmart[/url] buy cheap cialis
cialis over the counter at walmart - online prescription cialis uk
about cialis 20mg

Отправил Ср, 12/06/2017 - 02:14

cialis 5 mg online log in
[url=http://cialiswalmart.biz]cialis over the counter at walmart[/url] cialis spam filter ciallis
cialis over the counter at walmart - cialis buy
cialis free trial

Отправил Ср, 12/06/2017 - 02:11

cialis offers
[url=http://cialiswalmart.biz]cialis over the counter at walmart[/url] cialis from canada free samples user name
cialis over the counter at walmart - sls cialis
cache:www.cialis.com/common_pages/prescribe_pt_info.jsp www.cialis

Отправил Ср, 12/06/2017 - 02:08

cialis online prescription instant messaging
[url=http://cialiswalmart.biz]cialis over the counter at walmart[/url] buy affordable cialis,cialis online
cialis over the counter at walmart - how does cialis work custombbs.cgi
cialis total posts

Отправил Ср, 11/22/2017 - 09:51

when should you take cialis
[url=http://viagrawithoutdoctorus.net]viagra without a doctor prescription[/url] cialis spam filter ciallis
viagra without a doctor prescription - 5mg cialis cost
cialis 20mg canada our newest member

Отправил Ср, 11/22/2017 - 09:47

buy herbal cialis
[url=http://viagrawithoutdoctorus.net]viagra without a doctor prescription[/url] cialis doncaster
viagra without a doctor prescription - cialis buy uk
cialis first time

Отправил Ср, 11/22/2017 - 09:44

related:www.cialis.com/
[url=http://viagrawithoutdoctorus.net]viagra without a doctor prescription[/url] cialis 5mg memberlist
viagra without a doctor prescription - cialis on sale online
viagra and cialis comparison

Отправил Пт, 09/22/2017 - 13:27

canada drugs pharmacy
canadian drugs
mail order pharmacy
cialis daily
onlinecanadianpharmacy.com
canadian pharmacy king

Отправил Пт, 09/22/2017 - 07:01

mail order pharmacy
canadian online pharmacies
safe canadian online pharmacies
levitra coupon
get prescription online
impotence treatment

Отправил Чт, 09/21/2017 - 22:43

canadian cialis
canadian pharmacy online

cheap canadian drugs
sildenafilo
canada pharmacies prescription drugs
metformin

Отправил Чт, 09/21/2017 - 14:47

canadian pharmacy meds
canadian pharmacy
costco pharmacy pricing
levitra 20 mg
prescription prices comparison
buy xanax online

Отправил Ср, 09/20/2017 - 09:35

discount pharmacy online
http://canadianpharmacyrxbsl.com/
canadian pharmacy reviews
lactic acidosis metformin
online pharmacy no prescription needed
metformin problems

Отправил Чт, 09/07/2017 - 22:57

cuanto duran efectos secundarios cialis

cialis without a doctor prescription

cialis commercials meaning

cialis generic

Отправил Ср, 08/16/2017 - 00:08

Трава газонная недорого -
http://mixednews.ru/archives/116384
http://sornjak.ru/kak-pravilno-sdelat-gazon/
http://remontyes.ru/4628-chto-vybrat-rulonnyy-gazon-ili-seyanyy.html
http://acbproject.com/sad-i-ogorod/ukladka-rulonnogo-gazona
http://zona422.ru/post376909912/

Отправил Пнд, 08/07/2017 - 00:29

cialis 5mg dosage jump to
http://cialis.withoutdoctorprescription.net - cialis without a doctor's prescription vaigra
cialis without a doctor's prescription - cialis jokes cartoons
cialis pills online

Отправил Пт, 05/19/2017 - 02:47

yoga amsterdam yoga poses for pregnancy
what is bikram yoga http://yogaposes4lowerbackpain.today/#
yoga temple yoga mp3

Отправил Пнд, 02/13/2017 - 03:36

online pharmacy usa
http://cialis-overthecounterwalmart.org - cialis over the counter at walmart
can i split cialis tablets
cialis over counter at walmart
- cialys
cialis 20 mg cost profile

Отправил Чт, 12/01/2016 - 17:36

clilly icos cialis tablets
http://buycialis-us.com - cialis online
cialis online reviews last post
cialis online
- cialis vs cialis drugs comments.asp
pharmshop

Отправил Пнд, 11/28/2016 - 17:19

cialis information side effects visitor messages
http://pharmshop-online.com - generic cialis cialis erythromycin interaction effect
generic cialis - cialis 10 mg 4 tablet joined
cheap cialis generic online

Отправил Пт, 11/25/2016 - 15:43

viagra compatability with other medication
http://viagrawithouta-doctorprescription.net - viagra without a doctor prescription viagra information viagra vs viagra contact
viagra without a doctor prescription - buy tadalafil citrate viagra online overnight delivery
comparison viagra viagra levitra

Отправил Пт, 11/25/2016 - 01:50

viagra 10mg side effects last post
http://viagrawithoutadoctorprescriptionsale.com - viagra without a doctor
viagra online overnight quick links
viagra without a doctor prescription
- viagra 10mg or 20mg login
graph on sildenafil,viagra,vardenafil potency&47;streanths

Отправил Ср, 11/23/2016 - 14:24

viagra 20 mg cost our newest member
http://viagrawithoutadoctor-prescription.net - viagra without a doctor prescription buy viagra online without a prescription
viagra without a doctor prescription - viagra 10mg password
viagra more:for_patients

Отправил Пнд, 11/21/2016 - 11:45

cialis manufacturer
http://cialis-withoutdoctorsprescription.net - cialis without a doctor's prescription cialis testimonials treatment clever.cgi?mode=
cialis without a doctor's prescription - cialis 5mg works it is currently
cheap generic cialis usa no prescription

Отправил Сб, 11/19/2016 - 22:31

cialis pills price edit options
http://viagrawithoutadoctorprescription.org - viagra without a doctor prescription cialis india rayh
viagra without a doctor prescription - cialis commercials settings
cialis 20 mg cost our newest member

Отправил Вс, 11/13/2016 - 08:35

theodore roosevelts cialis
http://cialisoverthecounteratwalmart.org - cialis over the counter at walmart cialis 20 mg cost profile
cialis over the counter at walmart - cialis canadian pharmacy online members
cialis for order

Последние комментарии

  • variant4
  • Наша компания выполняет недорогие, качественные работы по срочному ремонту и настройке компьютеров и ноутбуков в Стерлитамаке. Выезд специалиста для оказания компьютерной помощи занимает не более часа. На всю работу, а также на запасные части предоставляется фирменная гарантия. В нашем...
  • Здравствуйте Cистема пассивного дохода от 4780 рублей в день! Заходите не пожалеете пока курс работает. Ссылка. http://glprt.ru/affiliate/9902013

Счетчики