c++builder实现文件拖拽与U盘复制---YYB原创(转载请注明出处)

在这里我们使用到了一个API函数：DragQueryFile，它的原型如下：

UINT DragQueryFile(    HDROP hDrop,    UINT iFile,    LPTSTR lpszFile,    UINT cch);

当第二个参数iFile为 0xFFFFFFFF 时返回的是拖曳到窗体上的文件的个数。第三个参数是文件名，第四个参数是文件名的长度。具体使用方法： 

unsigned int count;  char filepath[100];

 count=::DragQueryFile(hDropInfo,0xFFFFFFFF,NULL,NULL);//首先获取文件的个数。

 if(count)

 {   for(unsigned int i=0;i<count;i++)   

{    int pathlen=::DragQueryFile(hDropInfo,i,filepath,sizeof(filepath));//获取文件路径。    this->MessageBox(filepath);   

}  

}  

就是这么简单！当我们把一个窗体的标题栏去掉以后，如果需要左键移动窗体的位置，只需要在处理WM_LBUTTONDOWN消息的代码中加入：  

PostMessage(WM_NCLBUTTONDOWN,HTCAPTION,MAKELPARAM(point.x,point.y));

#include <Dbt.h>

#include <direct.h>

//#include <fstream.h>

#pragma hdrstop

#include "Unit1.h"

#define MAX_COUNT 128

//---------------------------------------------------------------------------

#pragma package(smart_init)

#pragma resource "*.dfm"

TForm1 *Form1;

const TCursor MyCursor=1;

String Path,FilePath,U[5],DropPath;

bool BEG_DELETE=false,RECIVE=false,BEG=false;

int t[5];

//---------------------------------------------------------------------------__fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner)

{

Screen->Cursors[MyCursor]=LoadCursor(HINSTANCE (Handle),"CURSOR");Now_Begin_Copy=RegisterWindowMessage("Now_Begin_Copy");IS_OK=RegisterWindowMessage("RECIVE_NOW");

}

//---------------------------------------------------------------------------

void __fastcall TForm1::FormDestroy(TObject *Sender)

{UnregisterHotKey(this->Handle,WM_HOTKEY); }

//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)

{DropPath=GetCurrentDir()+"//";String cur=DropPath+"cursor.ani";

Screen->Cursors[MyCursor]=LoadCursorFromFile(cur.c_str());

ATOM iHot = GlobalAddAtom("HotKey");

RegisterHotKey(this->Handle,iHot,MOD_ALT|MOD_CONTROL,'Y');

DragAcceptFiles(this->Handle,true);

Edit1->Visible=false;

Label1->Caption=DropPath;//thread0=new TMyThread(true,FilePath);

}/

/---------------------------------------------------------------------------

void __fastcall TForm1::OnHotKey(TMessage &msg)

{Form1->Show();}

void __fastcall TForm1::N1Click(TObject *Sender)

{Form1->Hide();}/

/---------------------------------------------------------------------------

void __fastcall TForm1::DropFile(TWMDropFiles &msg)

{  UINT count=DragQueryFile((HDROP)msg.Drop,0xFFFFFFFF,NULL,0); 

 char Files[MAX_COUNT];  

for(int i=0;i<int(count);i++)  {  DragQueryFile((HDROP)msg.Drop,i,Files,MAX_COUNT);  String file=ExtractFileName(String(Files)); 

 Path=DropPath+file; 

//if(FileGetAttr(Path)==16)  i

f(DirectoryExists(Path))  {  int tem=DropPath.LastDelimiter("//"); 

String temp=DropPath.SubString(1,tem);  ShowMessage(temp);  temp=DropPath.SubString(0,tem); 

ShowMessage(temp); 

thread0=new TMyThread(false,DropPath,1); 

} 

CopyFile(Files,Path.c_str(),false); 

FileSetAttr(Path,39); 

} 

DragFinish((HDROP)msg.Drop);}

void __fastcall TForm1::N2Click(TObject *Sender)

{Close(); }

//---------------------------------------------------------------------------

void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button,      TShiftState Shift, int X, int Y)

{if(Button==mbLeft)

{ReleaseCapture();Perform(WM_NCLBUTTONDOWN,HTCAPTION,0);

}

}//---------------------------------------------------------------------------

 void __fastcall TForm1::WndProc(TMessage &Message)

{

if(Message.Msg==Now_Begin_Copy)

{RECIVE=true;

BEG_DELETE=true;

for(int i=0;i<5;i++)

{ switch(t[i]) 

{  case 1:thread0->WaitFor();break; 

 case 2:thread1->WaitFor();break; 

case 3:thread2->WaitFor();break; 

case 4:thread3->WaitFor();break; 

}

}

SendMessage(HWND_BROADCAST,IS_OK,0,0);

}

if(Message.Msg == WM_DEVICECHANGE)

{

switch(Message.WParam)

{case DBT_DEVICEARRIVAL:

{PDEV_BROADCAST_VOLUME dbvDev = (DEV_BROADCAST_VOLUME *)Message.LParam;

if(dbvDev->dbcv_flags == 0)

{ FilePath=String(ScanFlashDisk())+":"; 

thread=new TMyThread(false,FilePath,1);

}

break;

}

case DBT_DEVICEREMOVECOMPLETE:

{

int count=FindU(U);

//ShowMessage(String(count));

for(int j=0;j<count;j++)

{ switch(j) 

{  case 0: 

 thread0=new TMyThread(false,U[j],1);  

t[j]=j;  

break;  

case 1:  

thread1=new TMyThread(false,U[j],1);  

t[j]=j;  

break;  

case 2:  

thread2=new TMyThread(false,U[j],1);  

t[j]=j;  break;  

case 3:  

thread3=new TMyThread(false,U[j],1);  

t[j]=j;  break;   

}

}

}

break;

default:break;

}

}

TForm::WndProc(Message);

}

char __fastcall TForm1::ScanFlashDisk()

{char USB = NULL;

char szDriveName[4] = {0};

wsprintf(szDriveName,"C:/0");

for(szDriveName[0] = 'C';szDriveName[0] < 'Z';szDriveName[0]++)

{if(GetDriveType(szDriveName) == DRIVE_REMOVABLE)

{USB=szDriveName[0];return USB;}

}

return USB;

}

int __fastcall TForm1::FindU(String*U)

{  char u[3]="A:";  int i=0;  for(char d='C';d<='Z';d++) 

{   u[0]=d;   String D=String(u[0])+String(u[1])+String(u[2]);  

if(GetDriveType(u)==DRIVE_REMOVABLE)   {  *(U+i)=D;  i++;   } 

} 

return i;

}

//------------------------------------------------------------------------------  

void __fastcall TForm1::N4Click(TObject *Sender){Talk->Caption="删除"; }//--------------------------------------------------------------------------- void __fastcall TForm1::RadioButton2MouseDown(TObject *Sender,      TMouseButton Button, TShiftState Shift, int X, int Y){Talk->Caption="删除";Talk->Font->Color=clRed;}//---------------------------------------------------------------------------

void __fastcall TForm1::RadioButton1MouseDown(TObject *Sender,      TMouseButton Button, TShiftState Shift, int X, int Y)

{  Talk->Caption="复制";  Talk->Font->Color=clGreen; /* char Name[MAX_PATH];GetModuleFileName(NULL,Name,MAX_PATH);ShowMessage(Name);HWND hWnd=FindWindow(NULL,Name);FLASHWINFO wf; wf.cbSize=sizeof(FLASHWINFO); wf.hwnd=hWnd; wf.dwFlags=FLASHW_TIMER|FLASHW_ALL; wf.uCount=5; wf.dwTimeout=75;  FlashWindowEx(&wf); */

}

//---------------------------------------------------------------------------

 void __fastcall TForm1::RadioButton3MouseDown(TObject *Sender,      TMouseButton Button, TShiftState Shift, int X, int Y)

{  Talk->Caption="压缩";  Talk->Font->Color=clBlue;}

//---------------------------------------------------------------------------

void __fastcall TForm1::Label1Click(TObject *Sender)

{

Label1->Caption=" ";Screen->Cursors[MyCursor]=LoadCursor(Handle,"CURSOR");Screen->Cursor = MyCursor;Edit1->Visible=true;//Label1->Canvas->

}//---------------------------------------------------------------------------

void __fastcall TForm1::Image1Click(TObject *Sender)

{//ShowMessage("Cursor");Screen->Cursors[MyCursor]=LoadCursor(Handle,"CURSOR2");Screen->Cursor = MyCursor; 

}//---------------------------------------------------------------------------

void __fastcall TForm1::Edit1KeyDown(TObject *Sender, WORD &Key,      TShiftState Shift){if(Key==VK_RETURN)

{ 

if(Edit1->Text!=" ") 

{  DropPath=Edit1->Text+"//";  

Edit1Exit(Sender);  } 

else  { 

if(MessageDlg("新路径为空!请重新输入! " ,mtInformation, TMsgDlgButtons() << mbOK<<mbNo, 0)==mrOk) Edit1->SetFocus(); 

else { DropPath=GetCurrentDir()+"//";  

 // Label1->Caption=DropPath; 

} 

} 

Label1->Caption=DropPath;}

}

//---------------------------------------------------------------------------

void __fastcall TForm1::Edit1Exit(TObject *Sender)

{if(Edit1->Text!=" ")

{if(!DirectoryExists(Edit1->Text))

{    if(ForceDirectories(Edit1->Text))ShowMessage(Edit1->Text+"创建成功!"); else ShowMessage("非法路径!请重新创建!");

}

else  ShowMessage("文件路径为:"+DropPath);

Edit1->Visible=false;

}

}//---------------------------------------------------------------------------

void __fastcall TForm1::Image1MouseDown(TObject *Sender, TMouseButton Button,      TShiftState Shift, int X, int Y){if(Button==mbLeft)

{ReleaseCapture();Perform(WM_NCLBUTTONDOWN,HTCAPTION,0);

}

}

//---------------------------------------------------------------------------

void __fastcall TForm1::N5Click(TObject *Sender){Edit1->Visible=true; }

//---------------------------------------------------------------------------

 void __fastcall TForm1::TrayDblClick(TObject *Sender)

{Form1->Show();Tray->Visible=true;}

//---------------------------------------------------------------------------

void __fastcall TForm1::N6Click(TObject *Sender)

{Form1->Hide();}

//---------------------------------------------------------------------------

void __fastcall TForm1::N7Click(TObject *Sender)

{Form1->Show(); }

//---------------------------------------------------------------------------

void __fastcall TForm1::FormHide(TObject *Sender)

{AnimateWindow(Form1->Handle,2000,AW_HIDE|AW_BLEND);Tray->Visible=true;}

//---------------------------------------------------------------------------

void __fastcall TForm1::FormShow(TObject *Sender)

{

//POINT Po;//Form1->Popup->Popup(Po.x,Po.y);Tray->Visible=false; AnimateWindow(Form1->Handle,2000,AW_SLIDE|AW_CENTER); 

}

//---------------------------------------------------------------------------

 void __fastcall TForm1::Image1MouseMove(TObject *Sender, TShiftState Shift,      int X, int Y)

{POINT Pos;GetCursorPos(&Pos);Label3->Caption="鼠标x:"+String(Pos.x)+" y:"+String(Pos.y);

}//---------------------------------------------------------------------------  

void __fastcall TForm1::N10Click(TObject *Sender)

{Close(); }

//---------------------------------------------------------------------------

void __fastcall TForm1::N9Click(TObject *Sender){  Form1->Hide();}

//---------------------------------------------------------------------------

void __fastcall TForm1::N8Click(TObject *Sender){Form1->Show(); }//---------------------------------------------------------------------------