Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.09.17;
Скачать: CL | DM;

Вниз

Присвоить знач. при OnCreate form1, form2.label1.Text:=’12’(ошибк   Найти похожие ветки 

 
XTD ©   (2006-08-24 14:33) [0]

Нужно при загрузке form1, присвоить значение label1.Text:=’знач’ из form2.
Мой код:
procedure TForm1.FormCreate(Sender: TObject);
begin
  Form2.label1.Text:=’Знач’;//ОШИБКА
end;
Вылетает ошибка :
…исключение класса EAccessViolation с сообщением ‘Access violation at address 004885DE in module ‘Project1.exe’. Read of address 00000304’. …

В чем моя ошибка???


 
Сергей М. ©   (2006-08-24 14:36) [1]


> В чем моя ошибка?


В том что Форма2 на этот момент не существует.


 
XTD ©   (2006-08-24 14:40) [2]

Так как мне тогда присвоить значение? Каким методом?


 
Сергей М. ©   (2006-08-24 14:41) [3]


> XTD ©   (24.08.06 14:40) [2]


Ты с дуба упал ?)

Как можно обратиться к несуществующему объекту ?)


 
StriderMan ©   (2006-08-24 14:43) [4]

> Form2.label1.Text:=’Знач’;

убери Form2.

класс сам прекрасно о себе все знает


 
XTD ©   (2006-08-24 14:45) [5]

Да я понял свою ошибку! Как мне быть, посоветуй...


 
Fay ©   (2006-08-24 14:45) [6]

> класс сам прекрасно о себе все знает
Какой класс?


 
StriderMan ©   (2006-08-24 14:46) [7]

а, пардон, тут две формы...

присваивай не в конструкторе.
или в конструкторе TForm2


 
Fay ©   (2006-08-24 14:47) [8]

XTD ©   (24.08.06 14:45) [5]
Предполагается, что переменная Form2 указывает на экземпляр какого-то класса (видимо TForm2). Было бы очень некисло создать этот экземпляр.


 
XTD ©   (2006-08-24 14:48) [9]

Понял. Спасибо всем!



Страницы: 1 вся ветка

Текущий архив: 2006.09.17;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.032 c
2-1156506003
Alral
2006-08-25 15:40
2006.09.17
Разбитие строки.


15-1156842507
ToTo
2006-08-29 13:08
2006.09.17
Интернет поиск


1-1154508723
IGray
2006-08-02 12:52
2006.09.17
Ищу компонент - ресайзовый уголок (как в TScrollBar)


1-1154964112
partizan
2006-08-07 19:21
2006.09.17
Структура данных, вроде АВЛ-дерева


6-1146644798
Chaser
2006-05-03 12:26
2006.09.17
Зависание при "IdTCPClient.ReadInteger(true)"