delphi and bug fix