![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Получение пути к файлу [D7, XP]
lewka © (2010-10-07 19:27:00)Привет!!! Подскажите почему не работает строчка label24.Caption:=ExtractFilePath(Application.ExeName);
ошибка при компиляции "Object or type required".
_Юрий (2010-10-09 11:14:00) [1]По сабжу:
label24.Caption:=ExtractFilePath(Application.ExeName);
ты предполагаешь, что Application - это глобальная переменная типа TApplication из модуля Forms.
Если бы так и было, то все бы скомпилировалось. Но тут вероятно идентификатор заслонен другим идентификатором с таким же именем и другим типом, который может быть переменной, методом, процедурой, константой, и т.д. из текущего модуля или из модулей, которые в секции uses объявлены после Forms.
В случае подобного конфликта имен можно использовать полный идентификатор - с именем модуля
label24.Caption:=ExtractFilePath(Forms.Application.ExeName);
Но лучше таких конфликтов не допускать и называть свои идентификаторы по другому, чтобы потом не было подобных проблем.
Германн (2010-10-08 02:28:00) [2]
> @!!ex © (08.10.10 02:04) [13]
>
> в кратце объясняю на что тут мастера немекают...
>
Вкратце слишком коротко, с ошибками в "правильнописании" и мало полезно.
@!!ex (2010-10-08 02:04:00) [3]в кратце объясняю на что тут мастера немекают...
библиотека - это как бы не совсем приложение... и делать то, что ты делаешь как бы не совсем корректно, мягко говоря...
А вот [9] - то что тебе нужно... но это не поможет от остальных проблем, которые безусловно возникнут в форме... с Application в инициализации проекта..
Германн (2010-10-08 02:03:00) [4]
> Как сочетается
> вот с этим:
Вот так старики и душат в молодежи стремления к новациям. :)
А молодежь увы не знает Турбо Паскаля, где не было никакого Application. :(
Юрий Зотов (2010-10-08 01:43:00) [5]> lewka © (07.10.10 19:39) [2]
Как сочетается
library chanel;
вот с этим:
begin
Application.Initialize;
Application.CreateForm(TMainForm, mainForm);
Application.Run;
end.
???????
Anatoly Podgoretsky (2010-10-07 21:31:00) [6]> lewka (07.10.2010 20:27:08) [8]
Так исправь.
Rouse_ (2010-10-07 20:47:00) [7]ParamStr(0)
lewka (2010-10-07 20:27:00) [8]
> Anatoly Podgoretsky © (07.10.10 20:21) [7]
>
> > lewka (07.10.2010 20:06:05) [5]
>
> Application.ExeNamе
так не компилируется.
Anatoly Podgoretsky (2010-10-07 20:21:00) [9]> lewka (07.10.2010 20:06:05) [5]
Application.ExeName
Anatoly Podgoretsky (2010-10-07 20:20:00) [10]> lewka (07.10.2010 19:39:02) [2]
Зачем нам код проекта?
lewka (2010-10-07 20:06:00) [11]понял таким образом не получить путь у файлу. А подскажите как его можно получить ?
Игорь Шевченко (2010-10-07 20:04:00) [12]Рано тебе на форум для начинающих
Игорь Шевченко (2010-10-07 20:03:00) [13]
> library chanel;
> Application.Run;
Читать книгу по программированию в Delphi
lewka (2010-10-07 19:39:00) [14]код файла проекта
library chanel;
{$E rtw}
uses
SysUtils,
Classes,
KsTLB,
forms,
main in 'main.pas',
former in 'former.pas' {MainForm};
exports
LibraryName name 'LIBRARYNAME',
LibraryId name 'LIBRARYID',
LibraryEntry name 'LIBRARYENTRY';
begin
Application.Initialize;
Application.CreateForm(TMainForm, mainForm);
Application.Run;
end.
Anatoly Podgoretsky (2010-10-07 19:35:00) [15]> lewka (07.10.2010 19:27:00) [0]
Не знает про Application