I want to disable a specific warning (W1035) in my code, since I think that the compiler is wrong about this warning:
function TfrmNagScreen.Run: TOption;
begin
You can use a neat trick to fool the compiler. Define a library function as so:
procedure Abort(var X);
begin
SysUtils.Abort;
end;
You can then write your function as:
if ShowModal = mrOk then
Result := TOption(rdgAction.EditValue)
else
Abort(Result)
The compiler thinks you've written to Result since it's a var parameter and it stops bleating.