|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
21.12.2006, 02:11 | #1 |
Регистрация: 21.12.2006
Сообщений: 5
|
Передача "адреса" элемента формы
Всем доброй ночи!
Заголовок получился не очень, но не хотелось делать его слишком длинным. Я хотел узнать, можно ли передавать в процедуру "адрес элемента формы, куда надо возвращать результат? К примеру, есть процедура a(b:string;c:integer;d:???); где d переменная, куда (в какой элемент формы и в какую форму) будет посылаться работа процедуры. Надеюсь, объяснил понятно, я не программист, это так, для себя. Заранее спасибо! Последний раз редактировалось varied; 21.12.2006 в 03:03. Причина: корректирование |
21.12.2006, 03:32 | #2 |
Программист и
Участник клуба
Регистрация: 29.10.2006
Сообщений: 1,265
|
Я думаю Form1.memo1.text можно за место d использовать надеюсь ты это имел ввиду, если не так извени.
|
21.12.2006, 04:16 | #3 |
Регистрация: 21.12.2006
Сообщений: 5
|
Спасибо за отклик!
Наверное, я плохо объяснил или не так понял. К примеру, при нажатии кнопки запускается процедура a('stroka',25,form1.memo.text); Как внутри процедуры я узнаю, что записывать надо в form1.memo.text? И ещё раз спасибо! Только что пришло в голову, может просто обозначить var d:string, тогда обращаясь к d, будут менятся значения элементов формы? Просто сейчас не могу проверить, нахожусь не дома. Последний раз редактировалось varied; 21.12.2006 в 04:26. |
21.12.2006, 08:13 | #4 |
Форумчанин
Регистрация: 03.11.2006
Сообщений: 321
|
Может проще в глобальных переменных объявить переменную типа string и через неё, в случае, если переменная не является пустой строкой, выводить именно в поле memo.
|
21.12.2006, 14:59 | #5 |
Регистрация: 21.12.2006
Сообщений: 5
|
Я, видимо, опять всё не так сказал, в процедуру может передоваться "адрес" любого элемента, к примеру, button1.caption, edti1.text radiobutton1.caption ну и так далее.
И опять спасибо! |
21.12.2006, 15:45 | #6 |
Студент
Форумчанин
Регистрация: 10.11.2006
Сообщений: 196
|
Может так: d: string;
//пусть d='Button1', тогда можно так: (FindComponent(d) as TButton).Caption:='Hello World!!!!'
Visita Interiorem Terrae Rectificando Operae Lapidem...
Последний раз редактировалось Сильванович Михаил; 21.12.2006 в 15:48. |
21.12.2006, 16:38 | #7 | |
Форумчанин
Регистрация: 20.12.2006
Сообщений: 135
|
Ты про это???
Цитата:
writeln('Hello Dude!!!');
|
|
21.12.2006, 18:16 | #8 |
Андрей
Форумчанин
Регистрация: 21.11.2006
Сообщений: 457
|
Я думаю имелось ввиду что-то типа этого:
Код:
ICQ: 5311314
[SIGPIC][/SIGPIC] Последний раз редактировалось AVer; 21.12.2006 в 18:29. |
21.12.2006, 18:26 | #9 | |
Регистрация: 21.12.2006
Сообщений: 5
|
Цитата:
Нашёл в справке про FindComponent, получается, что надо писать TButton(FindComponent(d)).Caption:= 'Hello World!!!!'; У меня 6 делфи, может в других и так как вы написали, но у меня не пошёл ниодин из вариантов (Undeclared identifier), там надо подключать какой-то юнит? Почти, но в том-то и дело, что может быть много вариантов: button1.Caption:=edit1.Text; button3.Caption:=edit6.Text; button2.Caption:=edit8.Text; button8.Caption:=edit2.Text; а процедуру хотелось бы иметь одну. Вообще меня интересовало, как передать процедуре компонент, куда будет передаваться работа (к примеру процедура проходит с edit1 по edit10 и проверяет, что в них, ну и меняет значения полей text, не суть зачем, это просто пример, но процедуре можно передать только один компонент, то есть в вызвавшей части будет цикл), но и знать из какого компонента брать текст было бы неплохо, хотя, по сути это одно и тоже. Да, это и имелось ввиду. Краткость явно не моя сестра... Последний раз редактировалось varied; 21.12.2006 в 18:35. |
|
21.12.2006, 20:35 | #10 | |
Форумчанин
Регистрация: 10.11.2006
Сообщений: 189
|
Цитата:
Код:
|
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Поиск элемента | ЭД4-0014 | Помощь студентам | 12 | 05.06.2008 21:47 |
Передача данных из формы в родительское окно | OSKiller | JavaScript, Ajax | 1 | 29.01.2008 23:34 |
создание элемента | Романнн | Общие вопросы Delphi | 6 | 13.12.2007 21:07 |
Вставка элемента в SelectDirectory | mrandrey | Общие вопросы Delphi | 1 | 31.05.2007 20:25 |