vote

Quick quiz

Delphi Haven – Consider this unit: unit CCR; interface type SysUtils = record const EmptyStr = 'Overridden'; end; implementation end. If the constant on the record type hurts your eyes (or you still use an ancient Delphi version), use this instead – unit CCR; interface type TSysUtils = record EmptyStr: string; end; const SysUtils: TSysUtils = (EmptyStr: 'Overridden'); implementation end. Now, consider this test project: program Project1; {$APPTYPE CONSOLE} uses SysUtils, CCR; begin WriteLn('SysUtils.EmptyStr = "', SysUtils.EmptyStr, '"'); ReadLn; end. Without ...

Favorite? Off-Topic? CR @ 2010-03-09 19:03