Анимация компонентов на форме

@ANDAHAY · Регистрация: 06.02.2015

Author24 — интернет-сервис помощи студентам

Ребят, нужно чтобы при нажатии кнопки на форму снизу выползал shape. Я пытался сделать через цыкл и свойство shape.Top, но цикл ругается: выражение должно быть типа boolean.

@krapotkin · 12.04.2015, 13:31

и где же кот?

@ANDAHAY · 12.04.2015, 14:44 **[ТС]**

krapotkin, что?

@krapotkin · 12.04.2015, 14:57

Сообщение от ANDAHAY

цыкл

Сообщение от krapotkin

кот

плюс-минус буква никого же не напрягает?

@ANDAHAY · 12.04.2015, 16:18 **[ТС]**

krapotkin, ааааа, я просто с начала не понял

Добавлено через 9 минут
krapotkin,

Delphi

procedure TMain.FormActivate(Sender: TObject);
begin
while Main.Shape1.Top<>30 do Main.Shape1.Top:= Main.Shape1.Top-1;
end;

Delphi

procedure TMain.FormCreate(Sender: TObject);
begin
 Main.Shape1.Top:=700;
end;

@krapotkin · 12.04.2015, 16:52

Delphi

procedure TMain.FormCreate(Sender: TObject);
begin
  Shape1.Top:=700;
end;
 
procedure TMain.FormActivate(Sender: TObject);
begin
  while Shape1.Top>30 do 
  begin
    Shape1.Top:= Shape1.Top-10;
    repaint;
  end;
end;

@ANDAHAY · 12.04.2015, 16:54 **[ТС]**

krapotkin, спасибо тебе, но вот вопрос. Что за команда repaint?

@krapotkin · 12.04.2015, 17:07

главное - не ищи в документации!
это тайная команда, исполняющая желания...

@ANDAHAY · 12.04.2015, 17:15 **[ТС]**

krapotkin, ха ха, живот лопается. Голова не варит сегодня вообще

@pandaaaaa92 · 12.04.2015, 17:20

krapotkin,

Не по теме:

Я написал программу
'Hochu '+Edit1.Text;
repaint;
repaint;
repaint;
А желания не исполняются, не могли бы Вы подсказать в чем ошибка?

@krapotkin · 12.04.2015, 17:30

Не по теме:

не читайте, ибо в доках написано, чьи!

@NIKOLAYY · 12.04.2015, 17:35

krapotkin, krapotkin,
Я так и не понял что ему надо..

Сообщение от ANDAHAY

Ребят, нужно чтобы при нажатии кнопки на форму снизу выползал shape.

Довольно таки глупый вопрос:
-Непонятно какой именно
- И непонятно дальше..

@ANDAHAY 1 / 1 / 0 Регистрация: 06.02.2015 Сообщений: 58
		1
	Анимация компонентов на форме 12.04.2015, 12:11. Показов 1846. Ответов 11 Метки нет (Все метки) Ребят, нужно чтобы при нажатии кнопки на форму снизу выползал shape. Я пытался сделать через цыкл и свойство shape.Top, но цикл ругается: выражение должно быть типа boolean. 0

@krapotkin 5784 / 4526 / 1431 Регистрация: 14.04.2014 Сообщений: 20,157 Записей в блоге: 20
	12.04.2015, 13:31	2
	и где же кот? 0

@ANDAHAY 1 / 1 / 0 Регистрация: 06.02.2015 Сообщений: 58
	12.04.2015, 14:44 [ТС]	3
	krapotkin, что? 0

@krapotkin 5784 / 4526 / 1431 Регистрация: 14.04.2014 Сообщений: 20,157 Записей в блоге: 20
	12.04.2015, 14:57	4
	Сообщение от ANDAHAY цыкл Сообщение от krapotkin кот плюс-минус буква никого же не напрягает? 0

@ANDAHAY 1 / 1 / 0 Регистрация: 06.02.2015 Сообщений: 58
	12.04.2015, 16:54 [ТС]	7
	krapotkin, спасибо тебе, но вот вопрос. Что за команда repaint? 0

@krapotkin 5784 / 4526 / 1431 Регистрация: 14.04.2014 Сообщений: 20,157 Записей в блоге: 20
	12.04.2015, 17:07	8
	главное - не ищи в документации! это тайная команда, исполняющая желания... 0

@ANDAHAY 1 / 1 / 0 Регистрация: 06.02.2015 Сообщений: 58
	12.04.2015, 17:15 [ТС]	9
	krapotkin, ха ха, живот лопается. Голова не варит сегодня вообще 0

@pandaaaaa92 6 / 6 / 6 Регистрация: 07.04.2015 Сообщений: 48
	12.04.2015, 17:20	10
	krapotkin, Не по теме: Я написал программу 'Hochu '+Edit1.Text; repaint; repaint; repaint; А желания не исполняются, не могли бы Вы подсказать в чем ошибка? 0

@krapotkin
	12.04.2015, 17:30 #11
	Не по теме: не читайте, ибо в доках написано, чьи! 0

@NIKOLAYY 843 / 738 / 342 Регистрация: 22.09.2012 Сообщений: 5,034
	12.04.2015, 17:35	12
	krapotkin, krapotkin, Я так и не понял что ему надо.. Сообщение от ANDAHAY Ребят, нужно чтобы при нажатии кнопки на форму снизу выползал shape. Довольно таки глупый вопрос: -Непонятно какой именно - И непонятно дальше.. 0