Results 1 to 5 of 5

Hybrid View

Previous Post Previous Post   Next Post Next Post
  1. #1
    Registered User
    Join Date: Aug:2006
    Location:
    Posts: 4,052

    drag & drop windows

    freepascal lcl [lazarus component library] - .
    /, explorer ( ) .
    (c, vb), , dll , "drop" .

  2. #2
    Bombera's Avatar
    Join Date: Jul:2001
    Location: 4EVA
    Posts: 13,833
    - WS_EX_ACCEPTFILES ( DragAcceptFiles, ) WM_DROPFILES. . - :
    http://www.catch22.net/tuts/ OLE Drag and Drop . , .

    P.S. , , .
    Last edited by Bombera; 24th February 2007 at 15:11.
    EVGA X299 FTW K|i9-7960X@4.7|4x8 Patriot Viper Steel 4000|GTX 1660 Ti|970 EVO 1 TB|Seasonic Focus GX-1000|Xigmatek Elysium|
    Rampage IV Extreme BE|E5-1680v2@4.7|4x4 HyperX 1866|Cougar Aqua 240|GTX 1050 Ti|970 EVO 1/4 TB|CM 850 SilentPro|HAF-X|

  3. #3
    Registered User
    Join Date: Aug:2006
    Location:
    Posts: 4,052
    , . , , DragAcceptFiles - .

    ---
    , dragacceptfiles , lazarus
    ---

    , - . file.x, app.exe. explorer / file.x ? (app.exe file.x files.foo ?)


    -------------


    , , . , ...




    ,

    DragQueryPoint(hDrop, Info.Point); - , POINT 2- , LPOINT.

    workaround, ..
    Code:
      LPOINT = record
      x,y : longint;
      end; 
      ....
      TempSol: LPOINT;
      TempSol.x := Info.Point.x;
      TempSol.y := Info.Point.y;
      DragQueryPoint(hDrop, TempSol);
    - LPOINT, LPOINT


    [ lpoint http://msdn.microsoft.com/library/de...tangl_0tiq.asp
    ms DragQueryPoint
    Code:
    BOOL DragQueryPoint(      
        HDROP hDrop,
        LPPOINT lppt
    );
    lppt
    Address of a POINT structure that the function fills with the coordinates of the mouse pointer at the time the file was dropped.]
    Last edited by solar_sea; 24th February 2007 at 19:52.

  4. #4
    Bombera's Avatar
    Join Date: Jul:2001
    Location: 4EVA
    Posts: 13,833
    LPPOINT POINT . . ^ , @ . . :
    DragQueryPoint(hDrop, ^TempSol);
    , HDROP . . 2 P-. LPPOINT LPOINT.LP long pointer(32 ), long pointer POINT , .
    EVGA X299 FTW K|i9-7960X@4.7|4x8 Patriot Viper Steel 4000|GTX 1660 Ti|970 EVO 1 TB|Seasonic Focus GX-1000|Xigmatek Elysium|
    Rampage IV Extreme BE|E5-1680v2@4.7|4x4 HyperX 1866|Cougar Aqua 240|GTX 1050 Ti|970 EVO 1/4 TB|CM 850 SilentPro|HAF-X|

  5. #5
    Registered User
    Join Date: Aug:2006
    Location:
    Posts: 4,052
    , '' , @ .
    @Info.Point , - 2- @ .

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  

Copyright © 1999-2011 . .
iskamPC.com | mobility.BG | Bloody's Techblog | | 3D Vision Blog |