![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Пользователь
Регистрация: 29.04.2012
Сообщений: 16
|
![]()
Нужна помощь.
Я только начинаю осваивать программирование, так что звание «чайника» еще не претендую. Суть проблемы: есть список названий Form, и мне надо взять это название с Мемо, запихнуть его в цикл и поменять какое-нибудь свойство. Например «Top» :=200. Я понимаю что «FindComponent» нужен для уже созданых на форма компонентов, какую команду написать надо? Что то типа FindComponent(Name + ‘.Top’) := 200 – ну это грубо. Код:
Последний раз редактировалось Plankin; 27.03.2015 в 18:44. |
![]() |
![]() |
![]() |
#2 |
Тот ещё
Старожил
Регистрация: 14.11.2007
Сообщений: 2,242
|
![]()
тогда уж
FindComponent(Name).Top := 200 |
![]() |
![]() |
![]() |
#3 |
Пользователь
Регистрация: 29.04.2012
Сообщений: 16
|
![]()
Ошибку выдает.
скрин . Да и свойство надо поменять у формы, а не на компонентах в ней. Ссылка на исходник, сюда размер недает вставить. https://yadi.sk/d/y17ySCOSfZdEL Последний раз редактировалось Plankin; 27.03.2015 в 19:44. |
![]() |
![]() |
![]() |
#4 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]()
Потому что нужно приведение типов:
Код:
I'm learning to live...
|
![]() |
![]() |
![]() |
#5 |
Пользователь
Регистрация: 29.04.2012
Сообщений: 16
|
![]()
Пробывал непрокатовает.
|
![]() |
![]() |
![]() |
#6 |
Пользователь
Регистрация: 29.04.2012
Сообщений: 16
|
![]()
Попробую объяснить подробней. На Form1 лежит Memo. В нем списков названий форм
Form1 Form2 Form3 И т.д Создан цикл For i:=0 to 3 do Begin Сюда надо написать, что бы бралось название формы из линии Memo и форме менялось какое-нибудь свойство, например Top, или .Captoin := ‘Привет из Касимова!’ End; Формы уже созданы. |
![]() |
![]() |
![]() |
#7 |
Тот ещё
Старожил
Регистрация: 14.11.2007
Сообщений: 2,242
|
![]()
У Application есть, вроде, свойство Forms. (я за планшетом сейчас)
|
![]() |
![]() |
![]() |
#8 | ||
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]() Цитата:
![]() Цитата:
Код:
I'm learning to live...
|
||
![]() |
![]() |
![]() |
#9 |
Пользователь
Регистрация: 29.04.2012
Сообщений: 16
|
![]()
Я подожду пока за комп не сядешь, я там на верху кидал ссылку не архив исходника (https://yadi.sk/d/y17ySCOSfZdEL ), в нем всего 40 строк, глянь. что с ним можно зделать.
|
![]() |
![]() |
![]() |
#10 |
Пользователь
Регистрация: 29.04.2012
Сообщений: 16
|
![]()
Не то. .
Последний раз редактировалось Plankin; 27.03.2015 в 20:35. |
![]() |
![]() |
![]() |
|
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Delphi XE5-XE7 Android нужны Учебники, Уроки,Статьи, любая помощь в изучении | FomAW | Общие вопросы Delphi | 14 | 11.10.2014 01:08 |
Delphi - нужна помощь | Psi_X | Помощь студентам | 11 | 05.02.2009 14:59 |
Нужна помощь на Delphi | ВЕКО | Помощь студентам | 1 | 19.04.2008 15:48 |
Нужна помощь по Delphi | Виктория 1 | Фриланс | 5 | 25.02.2007 21:21 |