Вверх ↑
Разработчик
Ответов: 26163
Рейтинг: 2127
#1: 2006-10-19 17:21:54 ЛС | профиль | цитата
Galkov, я пробовал. Вот результат компиляции приведенного примера
Build start...
Generated code
Create project...
Command line: dcc32.exe "D:\Program Files\HiAsm\Elements\Delphi\code\_Project1.dpr" "-UD:\Program Files\HiAsm\." -Q "-ED:\Program Files\HiAsm\
Borland Delphi Version 12.0 Copyright (c) 1983,98 Inprise Corporation

D:\Program Files\HiAsm\Elements\Delphi\code\TCP.pas(82) Warning: Return value of function 'MWnd' might be undefined

D:\Program Files\HiAsm\Elements\Delphi\code\TCP.pas(117) Warning: Return value of function 'ListenFunc' might be undefined

D:\Program Files\HiAsm\Elements\Delphi\code\TCP.pas(122) Warning: Return value of function 'ReadFunc' might be undefined

D:\Program Files\HiAsm\Elements\Delphi\code\TCP.pas(16) Hint: Private symbol 'FHandle' declared but never used

D:\Program Files\HiAsm\Elements\Delphi\code\hiTCP_Server.pas(119) Hint: Variable 'dt' is declared but never used in 'THITCP_Server._OnRes'

D:\Program Files\HiAsm\Elements\Delphi\code\hiTCP_Server.pas(218) Warning: Comparing signed and unsigned types - widened both operands

D:\Program Files\HiAsm\Elements\Delphi\code\hiTCP_Server.pas(228) Warning: Return value of function 'THITCP_Server.Count' might be undefined
4887 lines, 0.05 seconds, 47640 bytes code, 2321 bytes data.
Compress code
End build

карма: 22

0