VPF::Delphi 2010 выводит лишний Warning - Форум программистов

Matematik

Дата 9.4.2010, 21:33 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1027
Регистрация: 11.3.2006

Репутация: 17
Всего: 50

Лог компилятора

Код


Checking project dependencies...
Compiling Project1.dproj (Debug configuration)
[DCC Warning] Unit1.pas(28): W1000 Symbol 'FileAge' is deprecated
[DCC Warning] Unit1.pas(28): W1000 Symbol 'FileAge' is deprecated
Success
Elapsed time: 00:00:00.8

Код

Код


procedure TForm1.FormCreate(Sender: TObject);
var dat: TDateTime;
begin
  SysUtils.FileAge(Application.ExeName, dat); // строка 28
  ShowMessage(FormatDateTime('yyyy', dat));
end;

Если убрать SysUtils. перед FileAge(, сообщение пропадает.

Что это значит?

Это сообщение отредактировал(а) Matematik - 9.4.2010, 21:34

Rennigth

Дата 9.4.2010, 21:49 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Участник Клуба
Сообщений: 1708
Регистрация: 21.6.2004
Где: Moscow

Репутация: 49
Всего: 76

В Turbo Explorer Сообщение не пропадает и c SysUtils и без. Что там в 2009 сказать не могу... А то что варнинг появляется это правильно, в справке написанож:

Цитата

The symbol is tagged (using the deprecated hint directive) as no longer current and is maintained for compatibility only. You should consider updating your source code to use another symbol, if possible.

The $WARN SYMBOL_DEPRECATED ON/OFF compiler directive turns on or off all warnings about the deprecated directive on symbols in the current unit.

Вообщем функция оставлена только для совместимости и использовать ее не стоит. Директивами можешь убрать.
В 2009 может сделали ее аналог, но в другом юните, посмотри откуда она если без SysUtils.

--------------------

(* Honesta mors turpi vita potior *)

CodeMonkey

Дата 9.4.2010, 22:32 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1839
Регистрация: 24.6.2008
Где: Россия, Тверь

Репутация: 38
Всего: 89

Цитата(Matematik @ 9.4.2010, 21:33

)

Что это значит?

Баг компилятора. Варнинго-выдавалка не видит разницы между двумя версиями FileAge при поставленном префиксе SysUtils.

Цитата(Rennigth @ 9.4.2010, 21:49

)

Что там в 2009 сказать не могу...

В D2009 две версии: старая и новая:

Код

function FileAge(const FileName: string): Integer; overload; deprecated;
function FileAge(const FileName: string; out FileDateTime: TDateTime): Boolean; overload;

Старый вариант, пришедший к наж аж из Паскаля, действительно помечен как deprecated, однако, новый (который и использует Matematik) - вполне юзабельный и проблем с ним нет. Варнинг на него выдаваться тоже не должен. А то, что он выдаётся - это глюк.

Либо отключать варнинги директивой, либо не префиксовать его.

--------------------

Опытный программист на C++ легко решает любые не существующие в Паскале проблемы.

Matematik

Дата 10.4.2010, 17:02 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1027
Регистрация: 11.3.2006

Репутация: 17
Всего: 50

Обнаружил случайно, когда правил модуль zlib http://www.base2ti.com/downloads/ под 2010 версию.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »