mirror of
https://github.com/KolibriOS/kolibrios.git
synced 2024-12-15 19:33:59 +03:00
09b3721183
git-svn-id: svn://kolibrios.org@3883 a494cfbc-eb01-0410-851d-a64ba20cac60
60 lines
1.3 KiB
C
60 lines
1.3 KiB
C
//Leency 2008-2013
|
|
|
|
|
|
byte copy_from[4096], cut_active=0;
|
|
enum {NOCUT, CUT};
|
|
#define WIN_W 300
|
|
#define WIN_H 50
|
|
|
|
|
|
void Copy(dword pcth, char cut)
|
|
{
|
|
strcpy(#copy_from, pcth);
|
|
cut_active = cut;
|
|
}
|
|
|
|
void copyf_Action(dword filename) {
|
|
DefineAndDrawWindow(Form.left+Form.width-200,Form.top+90,WIN_W,GetSkinHeight()+WIN_H-1,0x34,col_work,T_PASTE_WINDOW);
|
|
WriteText(5,8, 0x80, 0, T_PASTE_WINDOW_TEXT);
|
|
DrawBar(5, 26, WIN_W-10, 10, col_work);
|
|
WriteText(5,26, 0x80, 0, filename);
|
|
//pause(20);
|
|
}
|
|
|
|
|
|
void Paste()
|
|
{
|
|
char copy_to[4096], copy_rezult;
|
|
|
|
if (!copy_from) ExitProcess();
|
|
strcpy(#copy_to, #path);
|
|
strcat(#copy_to, #copy_from+strrchr(#copy_from,'/'));
|
|
if (!strcmp(#copy_from,#copy_to))
|
|
{
|
|
strcpy(#copy_to, #path);
|
|
strcat(#copy_to, "new_");
|
|
strcat(#copy_to, #copy_from+strrchr(#copy_from,'/'));
|
|
}
|
|
if (strstr(#copy_to, #copy_from))
|
|
{
|
|
notify("Copy directory into itself is a bad idea...");
|
|
ExitProcess();
|
|
}
|
|
if (copy_rezult = copyf(#copy_from,#copy_to))
|
|
{
|
|
Write_Error(copy_rezult);
|
|
}
|
|
else if (cut_active)
|
|
{
|
|
strcpy(#file_path, #copy_from);
|
|
Del_File(true);
|
|
copy_from=NULL;
|
|
cut_active=false;
|
|
}
|
|
ActivateWindow(GetProcessSlot(Form.ID));
|
|
SendWindowMessage(evKey, 54);
|
|
SelectFile(#copy_to+strrchr(#copy_to,'/'));
|
|
pause(20);
|
|
ExitProcess();
|
|
}
|