Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Передача с формы на форму [D5, Win2k]


Keksss ©   (2002-11-04 14:16:00) 

Доброе время суток, Уважаемые мастера.
Объясните новичку, такую ситуевину:
у меня имеется 2 формы (MDI Child). Форма1 и Форма2. На Форме1 лежит Edit1.
Пытаюсь при нажании на кнопочку на Форме2 поместить в Edit1 на Форму1 какой-нибудь тект - ругается, с криком "Ошибка". Не могу понять в чем дело???


Keksss   (2002-11-04 19:45:00) [1]

Прошу прощения, Edit1 лежал на Panel1 ...


KSergey   (2002-11-04 15:02:00) [2]

> А точнее ((Application.FindComponent("Form1") as TForm).FindComponent("Edit1"))
> as TEdit).Text:="бла-бла";

> Keksss (04.11.02 14:41)
> > @andrew
> бальшое ПАСИБА, заработало!

Само по себе это хорошо, но хорош ли метод в данном случае? А как форму создаете?


KSergey   (2002-11-04 15:00:00) [3]

А что значит "нифига"? Прям так и пишет?
Почему кто-то для вас должен гадать что за ошибка? Вы ответ на какой вопрос хотите получить - на "нифига"? Ну тогда - нафиг. Устроит?
Какая ошибка, конкретно? На каком этапе?

PS: Запомните: на "нифига" и получите нифига ответов. И не надо потом обежаться "доктор, меня игнорируют".


Keksss   (2002-11-04 14:41:00) [4]

> @andrew
бальшое ПАСИБА, заработало!


Keksss   (2002-11-04 14:37:00) [5]

автокрит - нет. обе создаются программно.
Ошибка: access violation at address 00509134. Read of address такой_то


Skier   (2002-11-04 14:31:00) [6]

>Keksss
А у тебя form1 в Auto Create создаётся ?
И какая ошибка возникает ?


Keksss   (2002-11-04 14:28:00) [7]

и
uses Init1;
делаю


@andrew   (2002-11-04 14:28:00) [8]

А точнее ((Application.FindComponent("Form1") as TForm).FindComponent("Edit1")) as TEdit).Text:="бла-бла";


@andrew   (2002-11-04 14:25:00) [9]

А как ты обращаешься к Edit-у на форме1? Попробуй Имя Формы1 (кстати, ты его определяешь, когда создаешь форму?) точка FindComponent("Имя Edit-а") as TEdit.Text:="Твой текст".


Keksss   (2002-11-04 14:25:00) [10]

на событие TForm2.OnButton1Click баттона вешаю:
form1.edit1.text:="бла-бла-бла";

... и ни фига!


Skier   (2002-11-04 14:22:00) [11]

>Keksss

> Пытаюсь при нажании на кнопочку на Форме2 поместить в Edit1
> на Форму1 какой-нибудь тект

Как именно пытаешься ?


Наверх

Титульная страница Поиск, карта сайта Написать письмо