home *** CD-ROM | disk | FTP | other *** search
/ PC World Komputer 1998 May / Pcwk5b98.iso / Borland / Cplus45 / BC45 / EXPERT.PAK / CDRAGDRP.OWL < prev    next >
Text File  |  1995-08-29  |  460b  |  25 lines
  1. ##--BEGIN-- @OPT_APPL_DRAGDROP
  2. // Drag / Drop support:
  3. TFileDrop::TFileDrop (char* fileName, TPoint& p, bool inClient, TModule*)
  4. {
  5.     char    exePath[MAXPATH];
  6.     
  7.     exePath[0] = 0;
  8.     FileName = strcpy(new char[strlen(fileName) + 1], fileName);
  9.     Point = p;
  10.     InClientArea = inClient;
  11. }
  12.  
  13. TFileDrop::~TFileDrop ()
  14. {
  15.     delete FileName;
  16. }
  17.  
  18. const char *TFileDrop::WhoAmI ()
  19. {
  20.   return FileName;
  21. }
  22.  
  23.  
  24. ##--END-- @OPT_APPL_DRAGDROP
  25.