Glass Effect in a Delphi Console Application