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

Вниз

Компонент и TApplication   Найти похожие ветки 

 
SergeyVP ©   (2002-03-12 05:28) [0]

Делаю компонент (потомок TLabel), у которого Caption, при помещении его на форму, присваивается значени иcполнимого файла программы (exe). Делаю так:

constructor TMyLabel.Create(AOwner: TComponent);
begin
inherited;
Caption:= Application.ExeName;
end;


При Install component компилятор ругается на Application и это естественно.
Можно ли сделать то что я хочу и как?


 
Виктор Щербаков ©   (2002-03-12 09:40) [1]

Как ругается? Всё должно работать, но в дизайне в Label будет отображаться delphi32.exe c путем.


 
Sasha9 ©   (2002-03-12 11:09) [2]

может ты забыл включить Forms в Uses


 
SergeyVP ©   (2002-03-13 03:14) [3]

Точно!
Не поставил Forms в Uses.
Теперь все работает, НО при запуске программы (даже без Delphi) отображается путь к delphi32.exe!
Почему?


 
EugeneT ©   (2002-03-13 07:54) [4]

Потому, что ехе-файл строится с уже полученным при создании в designe-time значением Caption компонента, т.е. "...\delphi32.exe". Я думаю, желаемый результат будет при создании этого компонента в run-time.


 
iva ©   (2002-03-13 07:57) [5]

попробуй использовать
if not (csDesigning in ComponentState) then


 
SergeyVP ©   (2002-03-13 10:37) [6]

Всем спасибо за помощь :)



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

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

Наверх




Память: 0.47 MB
Время: 0.008 c
1-80592
Hermit
2002-03-06 10:04
2002.03.25
Ищется дискета к книге


1-80498
Abzetdin
2002-03-09 21:33
2002.03.25
Как создать в Delphi нестандартный тип? Например ..


1-80468
Volk
2002-03-12 11:02
2002.03.25
VCL где он?


3-80452
KIR
2002-02-28 03:46
2002.03.25
Query, как источник данных для FastReport вкого DataSet a


1-80500
DimaIv
2002-03-12 08:54
2002.03.25
В папке на ряду с другими файлами проекта находится файл