Форум: "Начинающим";
Текущий архив: 2011.01.02;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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]

Так исправь.

---

← →
Юрий Зотов ©   (2010-10-08 01:43) [11]

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

Как сочетается
library chanel;
вот с этим:

begin
 Application.Initialize;
 Application.CreateForm(TMainForm, mainForm);
 Application.Run;
end.

???????

---

← →
Германн ©   (2010-10-08 02:03) [12]

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


> вот с этим:

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

---

← →
@!!ex ©   (2010-10-08 02:04) [13]

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

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

---

← →
Германн ©   (2010-10-08 02:28) [14]

> @!!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);

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

---

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

Форум: "Начинающим";
Текущий архив: 2011.01.02;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.48 MB
Время: 0.003 c