|
Вопрос # 5 755/ вопрос решён / |
|
Доброго времени суток, уважаемые эксперты!
Появилась необходимость работать сразу с несколькими десятками компонентов на форме. Тоесть на форме есть 50-100 компонентов (image)
Мне нужно пройтись в цикле по определенному диапазоне компонентов, и загрузить в них изображение, а именно от Image40 до Image59...
Нашол в нете один код для едитов, переделал под картинки но он не пашет... Может подскажыте как это реализовать?
П.С. Динамически создавать компоненты не вариант...
Ниже код который использовал я.... выдает ошибки как на скрине...
К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)
Приложение: Переключить в обычный режим- procedure TForm1.Button1Click(Sender: TObject);
-
- var i:integer;
- begin
- if opendialog1.Execute then
- for i := 40 to 59 do
- if (Components[i] is TImage) then
- (Components[i] as TImage).Picture.LoadFromFile(opendialog1.FileName);
- end;
-
Мини-форум вопроса
Всего сообщений: 3; последнее сообщение — 16 ноября 2011, 17:24; участников в обсуждении: 2.
|
DNK (статус: Студент), 16 ноября 2011, 16:56 [#1]:
Далеко не факт, что Image40 будет в свойстве Components под индексом 40. Для поиска по имени используется метод FindComponent. Это раз.
А во-вторых черным по серому же написано стандартный Image не понимает форма jpg. Или используем другой формат или другой компонент.
"Digital Networked Knight"
|
|
Шарайчук Сергей Олександрович (статус: 2-ой класс), 16 ноября 2011, 17:00 [#2]:
DNK: спасибо, попробую разобраться с FindComponent, а насчет второго... первые 1-39, при стандартном обращение Image1.Picture.LoadFromFile(opendialog1.FileName) загружают в себя и jpg и png... тогда почему с 40 по 60 не хочет грузить?
Я бы изменил мир, но Бог не дает исходники!
|
|
|
Шарайчук Сергей Олександрович (статус: 2-ой класс), 16 ноября 2011, 17:24 [#3]:
спасибо, FindComponent помогло... с jpg тоже разобрался...
Я бы изменил мир, но Бог не дает исходники!
|
16 ноября 2011, 17:24: Статус вопроса изменён на решённый (изменил автор вопроса — Шарайчук Сергей Олександрович)
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
