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

Вниз

Обращиение к глобальным переменным из процедуры   Найти похожие ветки 

 
Norfolk ©   (2006-02-12 23:55) [0]

Знаю, что глупый и простой вопрос, но всё же сам в ступоре и не могу решить. Как правильно обращаться из процедуры к глобальным переменным и объектам (конкретно нужен TStatusBar).
Что делал: описывал процедуру после implementation, например так:
procedure IncStatusBar;
begin
  StatusBar1.Panels[0].Text := "Текст" + IntToStr(Chislo);
end;

ругается, пишет, что не знает такой переменной StatusBar1. Хоть убей не помню, как правильно описывать процедуру.


 
McSimm ©   (2006-02-13 00:00) [1]

StatusBar1 не является глобальной переменной, а является членом экземпляра класса, вероятнее всего это экземпляр TForm.
Обращаться к ней можно через указатель на экземляр класса

ThisIsMyForm.StatusBar1.

Если же вы обращаетесь к члену класса из метода этого же класса, то в этом случае можно оращаться напрямую

procedure TMyForm.IncStatusBar;
begin
 StatusBar1.Panels.....


 
Norfolk ©   (2006-02-13 00:04) [2]

Большое спасибо за ответ!


 
Германн ©   (2006-02-13 02:46) [3]

2 McSimm ©
Впечатление такое, что McSimm только что из Нидерландов. :)))


 
Германн ©   (2006-02-13 02:51) [4]

2 McSimm
Максим! Справедливости ради стоит поместить сей топик в "Орешник".
Не претендую на помещение в вышеуказанный моих сообщений. Их и так там есть!


 
McSimm ©   (2006-02-13 10:40) [5]


> Германн ©

не пойму, что не так ?



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

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

Наверх




Память: 0.48 MB
Время: 0.056 c
15-1138855004
TUser
2006-02-02 07:36
2006.02.26
В круге первом


2-1139303057
ЕХХХ
2006-02-07 12:04
2006.02.26
Операции со временем


1-1138140989
Volf_555
2006-01-25 01:16
2006.02.26
Как в TIniFile удалить целый раздел, а не отдельный параметр?


2-1139672589
FormExplorer
2006-02-11 18:43
2006.02.26
Чем отличается автосоздание форм от создания вручную?


1-1138110919
Aleksandr.
2006-01-24 16:55
2006.02.26
Есть какие-то проблемы с запуском программ из сервайса?