|
|
| Строка 3: |
Строка 3: |
| | Delphi | | Delphi |
| | | | |
| − | <syntaxhighlight lang="Delphi">TfgAssert = class (TObject)</syntaxhighlight> | + | <code lang="Delphi">TfgAssert = class (TObject)</code> |
| − | | |
| − | == Описание ==
| |
| − | | |
| − | Класс проверки контрактов в коде библиотеке. Отвечает за выполнение базовых проверок. Работает только в DEBUG конфигурации. Во всех остальных проверки вырезаются. По умолчанию, все нарушения выводятся в системный лог устройства.
| |
| − | | |
| − | == Методы ==
| |
| − | | |
| − | {| class="wikitable sortable"
| |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">IsTrue(const AValue: [[ Boolean ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">IsFalse(const AValue: [[ Boolean ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">IsNotNil(const AValue: [[ IInterface ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">IsNotNil(const AValue: [[ TObject ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">IsNotNil(const AValue: [[ TClass ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">IsClass(const AValue: [[ TObject ]]; const AClass: [[ TClass ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">Implements(const AValue: [[ TObject ]]; const AInterface: [[ TGUID ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">InRange(const AValue: [[ Integer ]]; const ALow: [[ Integer ]]; const AHigh: [[ Integer ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">InRange(const AValue: [[ Extended ]]; const ALow: [[ Extended ]]; const AHigh: [[ Extended ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">InRange(const AValue: [[ Single ]]; const ALow: [[ Single ]]; const AHigh: [[ Single ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">StrickLessThan(const AValue: [[ Integer ]]; const AHigh: [[ Integer ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">StrickLessThan(const AValue: [[ Extended ]]; const AHigh: [[ Extended ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">StrickLessThan(const AValue: [[ Single ]]; const AHigh: [[ Single ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">StrickMoreThan(const AValue: [[ Integer ]]; const ALow: [[ Integer ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">StrickMoreThan(const AValue: [[ Extended ]]; const ALow: [[ Extended ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">StrickMoreThan(const AValue: [[ Single ]]; const ALow: [[ Single ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">LessAndEqualThan(const AValue: [[ Integer ]]; const AHigh: [[ Integer ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">LessAndEqualThan(const AValue: [[ Extended ]]; const AHigh: [[ Extended ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">LessAndEqualThan(const AValue: [[ Single ]]; const AHigh: [[ Single ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">MoreAndEqualThan(const AValue: [[ Integer ]]; const ALow: [[ Integer ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">MoreAndEqualThan(const AValue: [[ Extended ]]; const ALow: [[ Extended ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">MoreAndEqualThan(const AValue: [[ Single ]]; const ALow: [[ Single ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">AreEqual(const AValue1: [[ Integer ]]; const AValue2: [[ Integer ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">AreEqual(const AValue1: [[ Extended ]]; const AValue2: [[ Extended ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">AreEqual(const AValue1: [[ Single ]]; const AValue2: [[ Single ]]; const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |-
| |
| − | | <syntaxhighlight lang="Delphi">procedure</syntaxhighlight> || <syntaxhighlight lang="Delphi">Fail(const AMessage: [[ string ]])</syntaxhighlight>
| |
| − | | |
| − | |}
| |
| − | | |
| − | == Свойства ==
| |
| − | | |
| − | {| class="wikitable sortable"
| |
| − | |-
| |
| − | | <code>property</code> || <code>FailCallback: TAssertFailCallback</code>
| |
| − | Коллбек, который вызывается в случаях нарушения контракта.
| |
| − | |}
| |
