added delphi functionality