Получение пути к файлу

← →
lewka © (2010-10-07 19:27) [0]

Привет!!! Подскажите почему не работает строчка label24.Caption:=ExtractFilePath(Application.ExeName);
ошибка при компиляции "Object or type required".

← →
Anatoly Podgoretsky © (2010-10-07 19:35) [1]

> lewka (07.10.2010 19:27:00) [0]

Не знает про Application

← →
lewka © (2010-10-07 19:39) [2]

код файла проекта
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.

← →
Игорь Шевченко © (2010-10-07 20:03) [3]

> library chanel;

> Application.Run;

Читать книгу по программированию в Delphi

← →
Игорь Шевченко © (2010-10-07 20:04) [4]

Рано тебе на форум для начинающих

← →
lewka © (2010-10-07 20:06) [5]

понял таким образом не получить путь у файлу. А подскажите как его можно получить ?

← →
Anatoly Podgoretsky © (2010-10-07 20:20) [6]

> lewka (07.10.2010 19:39:02) [2]

Зачем нам код проекта?

← →
Anatoly Podgoretsky © (2010-10-07 20:21) [7]

> lewka (07.10.2010 20:06:05) [5]

Application.ExeName

← →
lewka © (2010-10-07 20:27) [8]

> Anatoly Podgoretsky © (07.10.10 20:21) [7]
>
> > lewka (07.10.2010 20:06:05) [5]
>
> Application.ExeNamе

так не компилируется.

← →
Rouse_ © (2010-10-07 20:47) [9]

ParamStr(0)

← →
Anatoly Podgoretsky © (2010-10-07 21:31) [10]

> lewka (07.10.2010 20:27:08) [8]

Так исправь.

> lewka © (07.10.10 19:39) [2]

Как сочетается
library chanel;
вот с этим:
begin Application.Initialize; Application.CreateForm(TMainForm, mainForm); Application.Run; end.

???????

> Как сочетается

> вот с этим:

Вот так старики и душат в молодежи стремления к новациям. :)
А молодежь увы не знает Турбо Паскаля, где не было никакого Application. :(

в кратце объясняю на что тут мастера немекают...
библиотека - это как бы не совсем приложение... и делать то, что ты делаешь как бы не совсем корректно, мягко говоря...

А вот [9] - то что тебе нужно... но это не поможет от остальных проблем, которые безусловно возникнут в форме... с Application в инициализации проекта..

> @!!ex © (08.10.10 02:04) [13]
>
> в кратце объясняю на что тут мастера немекают...
>

Вкратце слишком коротко, с ошибками в "правильнописании" и мало полезно.

← →
_Юрий (2010-10-09 11:14) [15]

По сабжу:

label24.Caption:=ExtractFilePath(Application.ExeName);

ты предполагаешь, что Application - это глобальная переменная типа TApplication из модуля Forms.
Если бы так и было, то все бы скомпилировалось. Но тут вероятно идентификатор заслонен другим идентификатором с таким же именем и другим типом, который может быть переменной, методом, процедурой, константой, и т.д. из текущего модуля или из модулей, которые в секции uses объявлены после Forms.

В случае подобного конфликта имен можно использовать полный идентификатор - с именем модуля

label24.Caption:=ExtractFilePath(Forms.Application.ExeName);

Но лучше таких конфликтов не допускать и называть свои идентификаторы по другому, чтобы потом не было подобных проблем.

Получение пути к файлу Найти похожие ветки