Дублировать объекты на форме

[SyncM]

Добрый день
у меня вопрос

На форме есть объект Picture
в котором размещен объект image
задача в следующем
мне нужно сделать нечто подобие предпросмотра картинок
тоесть я изначально сканирую папку на наличие картинок
выставляя число ( сколько их всего ) я должен дублировать объект image в Picture. Столько раз, сколько и картинок и в каждый из них присвоить свою картинку.
Подскажите
как мне дублироваь на форме объекты такие ?
и как им присваивать значения по индексу и отследить на какой из них была нажата мышка.
спасибо

[Forlaw]

Я нечто подобное из учебной базы акцеса БОРЕЙ выдёргивал. Попробуй там посмотреть. Циклы не так сложно сделать будет..

[burik]

SyncM
сначала выставляешь у image (который в picture) свойство Index = 0
потом пишешь код "размножения":

Код: Выделить всё


For i =1 to N
    Load image(i)
    'потом перемещаешь его куда надо
    'и не забудь сделать image(i) видимым
    image(i).Visible = True
Next i


[Хакер]

Не дублировать. StretchBlt с включенным антиалиасингом рулит.

[tyomitch]

[цепляюсь к словам]

Антиалиасинг применим к рисованию линий.
Сглаживание битмапов при их масштабировании называется иначе.

[Хакер]

... со включенной фильтрацией, если так угодно.

[burik]

отследить на какой из них была нажата мышка.

Только сейчас заметил, что не до конца ответил..
в событие image_Click передается параметр Index. По нему и обращайся..

Хакер
А как включить это "сглаживание битмапов при их масштабировании" (как сказал тёмыч)?

SyncM
Если хочешь можешь последовать совету Хакера:

Код: Выделить всё


Private Declare Function StretchBlt Lib "gdi32.dll" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal hSrcWidth As Long, ByVal nSrcHeight As Long, ByVal dwRop As Long) As Long

[tyomitch]

А как включить это "сглаживание битмапов при их масштабировании" (как сказал тёмыч)?

SetStretchBltMode

[burik]

tyomitch
Ага, спасибо.. А то у меня в справочнике по Win32 Api нет такой штуки..

А для фильтрации надо что указать в параметр? HALFTONE?

[SyncM]

Спасибо вам всем огромнейшее
побольше бы в наше время таких форумов
и отзывчивых людей на них
спасибо )