ООП

← →
T54 © (2006-10-14 13:43) [0]

Думал куда запостить, решил сюда. Вот какая ситуация я хочу сделать так создовать объекты (много) Timage, чтобы они были привязаны к какому-нибудь одному объекту, и когда бы я ставил объект.Visible:=false, то все созданные Timage гасли бы, вот такая история. Если кто-нибудь кинет код пришлю пиво :)

← →
Nic © (2006-10-14 14:08) [1]

Пиво не пью.

← →
T54 © (2006-10-14 14:13) [2]

> Пиво не пью.

можно без пива огромную благодарность !!!

← →
Nic © (2006-10-14 17:34) [3]

T54 © (14.10.06 14:13) [2]
Расскуажите подробнее, что за задача. Сколько Image"ов и что за проект, может чего и подскажем.

← →
ANTPro © (2006-10-14 17:35) [4]

А зачем это нужно ?

← →
Ketmar © (2006-10-15 18:47) [5]

положить их все на панель и долго смеяться от радости.

← →
nikola232 © (2006-10-16 08:04) [6]

Может спрайты пойдут?

← →
Cash © (2006-10-16 12:08) [7]

А парень однако садист! Якудза так ска-а-ть! :)

T54 © (14.10.06 13:43):
Поясни цель такого изврата. Мож и подскажу кой чего...

← →
VolanD666 (2006-10-16 14:35) [8]

Image1.Visible:=Image2.Visibe:=...ImageN.Visible:=Object.Visible;

← →
Shirson © (2006-10-16 15:17) [9]

VolanD666 и в какой версии Delphi такое прокатит?

← →
Ketmar © (2006-10-16 18:18) [10]

>[9] Shirson(c) 16-Oct-2006, 15:17
>VolanD666 и в какой версии Delphi такое прокатит?
это индуцированый бред.

← →
T54 © (2006-10-17 17:06) [11]

пользователь в любом месте на форме жмет кнопку ему предлагают вбрать, что поставаить (кругляшки разного цвета), он ставит . . . есть кнопки которые одновременно гасят кругляшки одного цвета, также при нажатии на кругляшок должно происходить событие (кстати прописать событие OnClick для программно созданного Timage тоже пока не получилось, если поможешь буду очень благодарен)

← →
Ketmar © (2006-10-17 17:09) [12]

у-у-у... с таким не в "игры", с таким -- в "начинающим". да и там запинают... %-)

← →
@!!ex © (2006-10-17 17:13) [13]

> Ketmar © (17.10.06 17:09) [12]

эт точно....

> T54 © (17.10.06 17:06) [11]

Массивы + Канвас = сшастье
Компоненты зло в абстрактном смысле(Не пинать, это ИМХО), и конкретное зло в конкретном случае.

← →
T54 © (2006-10-17 18:37) [14]

> Массивы + Канвас = сшастье
> Компоненты зло в абстрактном смысле(Не пинать, это ИМХО),
> и конкретное зло в конкретном случае.
>

отображение и появление я сделал через tag
может кто подскажет как прописать событие onClick для созданного Timage, буду благодарен

← →
@!!ex © (2006-10-17 18:45) [15]

> T54 © (17.10.06 18:37) [14]

Господи... Идиотизм то какой..
ЗАчем вам Имаджи???
Ща. сделаю примерчик.
Кину. Постараюсь сегодня.

← →
Ketmar © (2006-10-17 18:49) [16]

>[15] @!!ex(c) 17-Oct-2006, 18:45
>Ща. сделаю примерчик.
поручик, отставить! не губите потенциального программиста пережёваной пищей.

← →
T54 © (2006-10-17 18:55) [17]

> Господи... Идиотизм то какой..
> ЗАчем вам Имаджи???
> Ща. сделаю примерчик.
> Кину. Постараюсь сегодня.

За примерчик заранее большой Пасиб
выбрал Имаджи так-как у них есть как-раз то, что требуется: хинты, висабл, по-идее должно быть событие onClick, но как оно прописывается, повторюсь, не знаю (но очень хотелось бы)

← →
Cash © (2006-10-17 19:02) [18]

А-а-а-а-а! Блин! Это что ваще за убийство компа по средствам насилия
над бедной Делфёй? Так разве можно делать? Ну... ладно... можно... промолчу...

T54 ©, юзай TList класс для хранения указателей на TImage.
Юзай операцию := для присваивания события OnClick у вновь созданного TImage.
Но! я умоляю! ни за что не переходи на OpenGL! Не надо!
Пусть все будет на имаджах.

← →
@!!ex © (2006-10-17 19:39) [19]

http://afera-net.narod.ru/ColorsTestWOComponents.rar
3 кила. Откомпилить смогете? :))
Пример с "кружочками"
Вместо кружочков мона сделать картинки, 3Д объекты, мувики, без разницы.

P.S.
из VCL тока главная форма и Canvas заюзаны.

← →
@!!ex © (2006-10-17 19:40) [20]

P.P.S.
Можно еще и мерцание убрать с помощью двойной буфферизации, но это в другой теме.

← →
@!!ex © (2006-10-17 19:48) [21]

> Ketmar © (17.10.06 18:49) [16]

Там ООП, полиморфизм..... Может она и пережеванная...
Но переварить не так то просто будет, если до этого через имаджи делал....

← →
T54 © (2006-10-17 19:54) [22]

> http://afera-net.narod.ru/ColorsTestWOComponents.rar
> 3 кила. Откомпилить смогете? :))
> Пример с "кружочками"
> Вместо кружочков мона сделать картинки, 3Д объекты, мувики,
> без разницы.
>
> P.S.
> из VCL тока главная форма и Canvas заюзаны.

Огромное спасибо за пример !!! и, всё-таки, чисто из интереса как у созданного объекта прописывать и отслеживать события ? (просто очень надо), к примеру тотже злополучный onClick ?

> T54 © (17.10.06 19:54) [22]

Так чисто из интереса или очень надо? :))
Говорить из принципа не буду....
Тем более что тут уже сказали. ;)

> Говорить из принципа не буду....
> Тем более что тут уже сказали. ;)

Сказать, то сказали, но я свою имеющююся инфу всю перерыл - не нашёл . . . Всё-равно спасибо

Ну объясните тупому ламеру как это делается, ну image.OnClick:= чему и как ?

Очень не хочется разжевывать... Может стоит хелпом попользоваться... Или примеры посмотреть? можно просто подумать.
Ну вроде и так уже все разжевали, дальше некуда....

@!!ex ©, не флейми! ^^
(Послать читать справку, на форуме, это все равно что просто послать)

T54 ©, а чему OnClick у кнопки равен, когда на ней в дизайнере два
раза кликнешь?

этож как: mov eax, DWORD[Ptr]03F1h

> Cash © (17.10.06 22:47) [29]

Просто если автор не понимает того, что ему тут уже разжевали, только в рот положить.... ТО ему одна дорога: RTFM

← →
nstur (2006-10-18 11:53) [31]

Если много, создай массив к примеру TListImages = array[0..6, 0..6] of TNsImage;

Пример на ScrollBox

for kx:= 0 to 6 do
for ky:= 0 to 6 do begin
FListImages[kx,ky]:= TImage.Create(ScrollBox1);
FListImages[kx,ky].Parent:= ScrollBox1;
with FListImages[kx,ky] do begin
Left:= kx * 30 + 1; Width:= 30;
Top:= ky * 30 + 1; Height:= 30;
OnClick:= MySetImage;
Hint:= "Кликни меня";
ShowHint:= True;
end;

Вроде так...

> nstur (18.10.06 11:53) [31]

Это пример чего? :))

ООП Найти похожие ветки