代码大全

else

FileReadError:=True;
end
Error_Processing

Pascal

if not FileReadError InPutFile InPutError CountElementsRead then

{ do something of other }

if case

17.1.3

if if else

Pascal

if not StatusOK begin

do something

end

else begin

do something else

end;

Pascal

if StatusOK begin

do somthing else

end;

else begin