C4C4C4;
Form1-> ListDevicesRight-> Color = 0x00C4C4C4;
Form1-> FileListRight-> Color = 0x00C4C4C4;
}
// --------------------------------------------- ------------------------------
void __ fastcall TForm1 :: ListDevicesRightEnter (TObject * Sender)
{
Form1-> LabelCurrentPathRight-> Color = 0x00E9E9E9;
Form1-> ListDevicesRight-> Color = 0x00E9E9E9;
Form1-> FileListRight-> Color = clGradientInactiveCaption;
Form1-> LabelCurrentPathLeft-> Color = 0x00C4C4C4;
Form1-> ListDevicesLeft-> Color = 0x00C4C4C4;
Form1-> FileListLeft-> Color = 0x00C4C4C4;
}
// --------------------------------------------- ------------------------------
void __ fastcall TForm1 :: bCreateDirClick (TObject * Sender)
{
FormDialogCreateDir-> Show ();
}
// --------------------------------------------- ------------------------------
void __ fastcall TForm1 :: bDeleteClick (TObject * Sender)
{
FormDialogDelete-> Show ();
FormDialogDelete-> bRecycler-> SetFocus ();
}
// --------------------------------------------- ------------------------------
void __ fastcall TForm1 :: bCopyClick (TObject * Sender)
{
CopyOrRemove (Panel, FO_COPY);
}
// --------------------------------------------- ------------------------------
void __ fastcall TForm1 :: bRemoveClick (TObject * Sender)
{
CopyOrRemove (Panel, FO_MOVE);
}
// --------------------------------------------- ------------------------------
void __ fastcall TForm1 :: FileListLeftKeyDown (TObject * Sender, WORD & Key,
TShiftState Shift)
{
switch (Key)
{
case 13: DirSel = 0;
CurrentPathLeft = HandlerOfOpen (RootDirLeft, LEFT, DirSel);
break;
case 116: CopyOrRemove (Panel, FO_COPY);
break;
case 117: CopyOrRemove (Panel, FO_MOVE);
break;
case 118: FormDialogCreateDir-> Show ();
break;
case 119: FormDialogDelete-> Show ();
FormDialogDelete-> bRecycler-> SetFocus ();
break;
}
}
// --------------------------------------------- ------------------------------
void __ fastcall TForm1 :: FileListRightKeyDown (TObject * Sender, WORD & Key,
TShiftState Shift)
{
switch (Key)
{
case 13: DirSel = 0;
CurrentPathRight = HandlerOfOpen (RootDirRight, RIGHT, DirSel);
break;
case 116: CopyOrRemove (Panel, FO_COPY);
break;
case 117: CopyOrRemove (Panel, FO_MOVE);
break;
case 118: FormDialogCreateDir-> Show ();
break;
case 119: FormDialogDelete-> Show ();
FormDialogDelete-> bRecycler-> SetFocus ();
break;
}
}
