[Sky.NET]

Код:

[DCC Warning] Unit1.pas(211): W1002 Symbol 'FileSetAttr' is specific to a platform
[DCC Warning] Unit1.pas(211): W1002 Symbol 'faHidden' is specific to a platform
[DCC Warning] Unit1.pas(213): W1002 Symbol 'FileSetAttr' is specific to a platform
[DCC Warning] Unit1.pas(1106): W1002 Symbol 'FileGetAttr' is specific to a platform

Как избавиться от этих сообщений?

Код:

[DCC Warning] Unit1.pas(1007): W1000 Symbol 'Time' is deprecated
[DCC Warning] Unit1.pas(1007): W1002 Symbol 'Time' is specific to a platform
[DCC Warning] Unit1.pas(1010): W1000 Symbol 'Time' is deprecated
[DCC Warning] Unit1.pas(1010): W1002 Symbol 'Time' is specific to a platform
[DCC Warning] Unit1.pas(1016): W1000 Symbol 'Time' is deprecated
[DCC Warning] Unit1.pas(1016): W1002 Symbol 'Time' is specific to a platform

PHP код:

Time: TDateTime;
SearchRec: TSearchRec;
...
Isc.Time := SearchRec.~Time; 


Чем ему SearchRec.Time не понравился? Что не так в считывании времени из файла?

Код:

  
[DCC Warning] Unit1.pas(425): W1058 Implicit string cast with potential data loss from 'TCaption' to 'RawByteString'
[DCC Warning] Unit1.pas(721): W1058 Implicit string cast with potential data loss from 'TCaption' to 'RawByteString'
[DCC Warning] Unit1.pas(788): W1058 Implicit string cast with potential data loss from 'TCaption' to 'RawByteString'
[DCC Warning] Unit1.pas(843): W1058 Implicit string cast with potential data loss from 'TCaption' to 'RawByteString'
[DCC Warning] Unit1.pas(1026): W1058 Implicit string cast with potential data loss from 'TCaption' to 'RawByteString'

PHP код:

MTMP.Lines.LoadFromFile(EDir.Text + FLinks[J].HTM);
MTMP.Text := UTF8ToString(MTMP.Text~); 


Код:

[DCC Warning] Unit1.pas(478): W1058 Implicit string cast with potential data loss from 'string' to 'RawByteString'

PHP код:

FHTM[J].Title := UTF8ToString(Copy(S, p1, p2 - p1)~) + ' [' + IntToStr(J) + ']'; 


А тут что? UTF8ToAnsi - тоже самое...

Как избавиться от этих предупреждений?
Всё, конечно, работает, но предупреждения мозолят глаза =)
P.S.
~ - Это куда встаёт курсор, указывая ошибку.