Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Tshape и глупенький вопрос:) [D6]

Свой © (2005-12-08 11:08:00)
Есть форма на ней находиться im:Timage
при нажатии на кнопку нужно чтобы Tshape создавался и рисовался на im!
im:Timage-уже лежит на форме и картинка на нем есть в виде бмп файла
Пишу так но не ресует!
Да еще надо чтобы при каждом нажатии на кнопку создавалась новая фигура!

procedure Battonclick
Var
Sh:TShape;
begin
Sg:=Tshape.create(im);
sh.top:=x;
sh.left:=y;
sh.width:=20;
sh.heit:=20;
sh.фигура:=элипс; //под рукой нет делфи так что простите:)
sh.кист:=белая;
sh.repaint;
end;

Что не так?

Reindeer Moss Eater (2005-12-08 11:47:00) [1]
Может и упустил.
Например свойство.
Например парент.

Свой (2005-12-08 11:46:00) [2]
Да я все свойства указывал попорядку как идут не вижу и все тут!
может что то упустил:(

Reindeer Moss Eater (2005-12-08 11:44:00) [3]
Наверное ты забыл про какое-нибудь свойство. Например парент.

Свой (2005-12-08 11:42:00) [4]
т.е. мой код правильный?
Тогда почему я его не вижу?

Reindeer Moss Eater (2005-12-08 11:38:00) [5]
>Как создать Tshape (много и програмно)
TShape.Create

>и нарисовать его на Timage?
Он сам себя рисует. Его рисовать не надо.
Иначе см [1]

Свой (2005-12-08 11:35:00) [6]

> Пока мы ничего не знаем о дальнейших задачах.
> Так что используй [1]

Далнейшие Задачи не имею хначения!
1-не подходит!
Как создать Tshape (много и програмно) и нарисовать его на Timage?

Reindeer Moss Eater (2005-12-08 11:27:00) [7]
Пока мы ничего не знаем о дальнейших задачах.
Так что используй [1]

Свой (2005-12-08 11:26:00) [8]

> Зачем тебе TShape?
>
> Image1.Canvas.Ellipse(1,1,10,100);

Tshape нужен для решения дальнейших задачь!
поэтому Image1.Canvas.Ellipse(1,1,10,100) не устраивает!

Reindeer Moss Eater (2005-12-08 11:17:00) [9]
Зачем тебе TShape?

Image1.Canvas.Ellipse(1,1,10,100);

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »