To see a written

Var
A: Integer;
The begin
A:=0;
If a=(a + 1) then
The begin
{do XXXXX}
end;
end;

The great god give directions, what circumstance, what's usage, would conditions set up!

CodePudding user response:

Never perform bai
If false then showmessage (" ok ");
Don't know what that purpose

CodePudding user response:

The condition be established if a=(a + 1), then the following code is no longer perform,

The fine may be shocking, annotation statements, or from your test, then run the code,

CodePudding user response:

Should be test statement, identification is

CodePudding user response:

The class procedure RemoveWarnings; The inline. The static;

The class procedure TAnyValue. RemoveWarnings;
Var
Dummy: Integer;
Value: TAnyValue;
The begin
Dummy:=0;

If the Dummy=(Dummy + 1) then
The begin
{$# IFNDEF CPUX64}
{$# IFNDEF AnyValue_HookingOff}
Value. The Padding [0] :=0;
{$ENDIF}
{$ENDIF}
Value:=Value. GetAsArrayItem (");
Value. SetAsArrayItem (' TAnyValue. Null);
end;
end;

I think may be it's no use, this is the original code,

CodePudding user response:

reference suiyunonghen reply: 3/f

statement should be test, appraisal is

Feel there should be some useful,
Seemingly and CPU are concerned,

CodePudding user response:

Look not to come out so the purpose of writing, the logical not run,

But occasionally uncertain what problem, can lead to the execution, had similar situation before, how also can not find the reason, but carried out, then the Delphi uninstall reshipment, will no longer be carried out,