Create Sample.pas