Вниз
Скачать: 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.015 c
3-40276
Vlad2
2003-09-22 19:06
2003.10.13
Редакция в Paradox e. Проблема быстродействия.


14-40658
Милицейские протоколы
2003-09-23 22:39
2003.10.13
Вот так и работаем...


14-40579
stone
2003-09-23 11:01
2003.10.13
Парадокс в датах


4-40715
memphis
2003-08-11 13:20
2003.10.13
Защищенный режим и служба


1-40395
denis24
2003-10-01 09:43
2003.10.13
размер шрифта в ячейке stringgrida




   Наверх