
21.07.2011, 21:38
|
 |
Sir Richard Abramson
|
|
Регистрация: 05.04.2008
Сообщения: 5,505
Версия Delphi: XE10
Репутация: выкл
|
|
Цитата:
Сообщение от Janom
...
Код:
function ObrBool(B:Boolean):Boolean;
begin
if B then Result:=false else Result:=true;
end;
|
Зачот, парень! 
|