![]() |
|
|
|
|
#1
|
|||
|
|||
|
Привет всем .
Есть Scrollbox и на нем много Timage . Timage создаются динамически в программе и называются im1 , im2 , im50 и тд . Также у каждому Timage в hint пишется определенное слово , а точнее название файла с изображением которое загрузили в данный Timage . Вот теперь вопрос - Как сделать чтобы Scrollbox прокрутился к Timage с нужным мне hint'ом ? |
|
#2
|
||||
|
||||
|
Ищешь TImage с нужным хинтом, а потом делаешь ScrollBox.ScrollInView(твой_найденый_TImage);
|
|
#3
|
|||
|
|||
|
Подскажи плз как найти Timage с нужным хинтом .
Спасибо. |
|
#4
|
|||
|
|||
|
Попробовал так -
Код:
var
i:integer;
begin
for i:=0 to all_im do
if TImage(FindComponent('im'+inttostr(i))).Hint = im_now then
scrollbox1.ScrollInView(TImage(FindComponent('im'+inttostr(i))));Компилится норм , в программе выскакивает ошибка на строке Код:
if TImage(FindComponent('im'+inttostr(i))).Hint = im_now then |
|
#5
|
|||
|
|||
|
Вообщем проблему ту решил ( была с all_im )
Но тут другая проблема - не находит он Timage . Ошибок не выскакивает . |
|
#6
|
||||
|
||||
|
А владелец (Owner) объектов TImage у тебя случаем не TScrollBox? Если ДА то на форме ты их и не найдешь....
|