Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Основная";
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];

Вниз

Создание компонент   Найти похожие ветки 

 
M@XIDROM   (2002-02-01 15:32) [0]

Народ, мне нужно чтобы юзеру предоставлялась возможность выбрать любое, заранее неизвестное, количество компонент, скажем TPanel, на форме. Может 2, может 100 или 200. Неизвестно. Как решить эту задачу??? Спасибо.


 
yaJohn   (2002-02-01 16:05) [1]

>юзеру предоставлялась возможность выбрать любое
rech idet o komponente, a ne o application? V smisle user - eto programmist? ETO OSKORBLENIE!!!
;)))

Esli tak, to vot IMHO prosteyshiy sposob:
TMyItem = class(TCollectionItem)
.....
published
property Target: TComponent read.........
.....
end;
----------------------
TMyCollection = class (T OwnedCollection)
.......
end;
----------------------
TMyComponent = class (TComponent)
published
property Items: TMyCollection...........
end;

Samo soboy perepisat" constructor/destructor dlia vseh i pr.
Obrashau vnimanie na jirnoe videlenie. Ya s etim namuchalsia v svoe vremia.... Pochti sobstvennuu T OwnedCollection = class (TCollection) napisal %)


 
drpass   (2002-02-01 16:39) [2]

А если тебе нужно, чтобы на форме появлялось различное количество компонент, заранее неизвестное, то можно примерно так:
var
a:array[0..300] of TPanel;
...

for i:=0 to NumberOfPanel do begin
a[i]:=TPanel.Create(Self);
with a[i] do begin
Parent:=Self;
... //какие еще нужны параметры, например, положение на форме
Left:=10;
Top:=(i+1)*20;
end;
end;


 
M@XIDROM   (2002-02-02 18:09) [3]

А может есть какой другой способ создать THUMBNAILS(уменшиные картинки)



Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.02.18;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.44 MB
Время: 0.004 c
3-57010
olden
2002-01-22 18:10
2002.02.18
то ли ADO глючит, то ли...


3-56979
Максим С.
2002-01-23 13:32
2002.02.18
Нужен пример работы с Interbase на Delphi5


14-57207
McSimm
2001-12-27 16:45
2002.02.18
Мне понравилось:


14-57192
ReNoiZer
2001-12-28 09:47
2002.02.18
Народ есть каталог (в NTFS под XP), с ним можно сделать что угодно...


4-57251
Digitman
2001-11-05 13:30
2002.02.18
Какой ресурс в NT жестко ассоциирован с хэндлом со значением 4 ?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский