DELPHI drag file instance