ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Конкантенация
4 сообщений из 4, страница 1 из 1
Конкантенация
    #32210446
Cnupum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cnupum
Участник
Реально ваще так сделать ??

есть переменная i
надо ее вставить в имя TImage

чтобы получилось что то типа
Image i .Picture.LoadFromFile('check1.ico');
...
Рейтинг: 0 / 0
17.07.2003, 08:31
| Ответить | Цитировать | Написать  
Конкантенация
    #32210447
Cnupum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cnupum
Участник
в итоге :

Image1.Picture.LoadFromFile('check1.ico');
Image2.Picture.LoadFromFile('check1.ico');
Image3.Picture.LoadFromFile('check1.ico');
...
Рейтинг: 0 / 0
17.07.2003, 08:32
| Ответить | Цитировать | Написать  
Конкантенация
    #32210450
SerjaTo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
SerjaTo
Участник
...
for i:=1 to N do
if FindComponent('Edit'+IntToStr(i))<>nil then
if FindComponent('Edit'+IntToStr(i)) is TEdit then
(FindComponent('Edit'+IntToStr(i)) as TEdit).Text:='Voila';
...
...
Рейтинг: 0 / 0
17.07.2003, 08:42
| Ответить | Цитировать | Написать  
Конкантенация
    #32210456
Cnupum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Cnupum
Участник
Спасибо
...
Рейтинг: 0 / 0
17.07.2003, 08:51
| Ответить | Цитировать | Написать  
4 сообщений из 4, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Конкантенация
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]