Вниз
Скачать: CL | DM;

FileGetAttr and FileSetAttr   Найти похожие ветки 

 
Oleg_K ©   (2003-10-01 13:37) [0]

Уважаемые программёры !

немогу понять чего с меня требует компилятор при следующем коде:

var
f: string;
i: integer;
begin
f:="Test.txt";
if FileExists(f) then
begin
i:=FileGetAttr(f);
if i<>faReadOnly then FileSetAttr(F,faReadOnly);
end;
end;

Выдает следующие предупреждения:
[Warning] Unit1.pas(33): Symbol "FileGetAttr" is specific to a platform
[Warning] Unit1.pas(34): Symbol "faReadOnly" is specific to a platform
[Warning] Unit1.pas(34): Symbol "FileSetAttr" is specific to a platform
[Warning] Unit1.pas(34): Symbol "faReadOnly" is specific to a platform


 
Плохиш_   (2003-10-01 13:41) [1]

Ничего он от тебе не требует :-)


 
Oleg_K ©   (2003-10-01 13:49) [2]

Всетаки, предупреждает однако ! , только о чем? (причем все работает !)


 
clickmaker ©   (2003-10-01 14:13) [3]

Ну он говорит, что типа функция специфична для платформы (win32 в данном случае). Поэтому если ты пишешь кросс-платформенное приложение (и для винды и для униха, например), то с этой ф-ей можешь круто влететь


 
Oleg_K ©   (2003-10-01 14:18) [4]

Ндаааа.... а в хелпе Delphi есть пример, он тоже самое выдает,
так и должно быть чтоли? Я что-то делаю незаконное чтоли?


 
ZEE ©   (2003-10-01 14:19) [5]

да смотри сам - это ж [Warning] а не [Error] - и решай обращать внимание или нет...


 
Плохиш_   (2003-10-01 14:24) [6]

2Oleg_K

Если тебе не нравится перевод clickmaker © (01.10.03 14:13) [3], то возми словарь и сам переведи.

Может в орещник? ;-)


 
han_malign ©   (2003-10-01 14:26) [7]

- в начале модуля:
{$IFDEF VER150}//для D7, для D6, помоему, VER140
{$WARN SYMBOL_PLATFORM OFF}//твой случай
{$WARN UNSAFE_TYPE OFF}//pointer,pchar, et cetera
{$WARN UNSAFE_CAST OFF}//прямое приведение типов (скажем LongWord(i))
{$WARN UNSAFE_CODE OFF}//asm
{$ENDIF}


 
Oleg_K ©   (2003-10-02 07:24) [8]

так-то будет спокойнее!
интересно, и много таких Warning у Delphi?
везде отрубать?/разумеется с умом!



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.016 c
11-40330
Frakt
2003-02-01 15:42
2003.10.13
NetUserAdd


9-40221
сергей
2003-04-09 15:58
2003.10.13
прорисовка файла


4-40746
arous
2003-08-05 00:12
2003.10.13
Сеансы WinXP


14-40652
Digitman
2003-09-23 16:15
2003.10.13
Любопытная (и неприятная) проблема с DLL и run-time packages


14-40580
gn
2003-09-22 16:12
2003.10.13
ВСЁ КЕРНЕЛ ПАНИК




   Наверх