home *** CD-ROM | disk | FTP | other *** search
-
- DEFINE FORM Back;
- PROPERTY;
- AUTOSIZE .F.,;
- HEIGHT 20,;
- LEFT 2,;
- MDI .T.,;
- MOVEABLE .T.,;
- SIZEABLE .F.,;
- SYSMENU .T.,;
- TEXT "BackUp Restore",;
- TOP 1,;
- WIDTH 65 ;
- CUSTOM ;
- cWildCard "*.dbf",;
- Action .F.
-
-
- DEFINE TEXT T1 OF Back;
- PROPERTY;
- HEIGHT 1,;
- LEFT 2,;
- TEXT "&Source File",;
- COLORPICKNORMAL "R/W",;
- TOP 1
-
- DEFINE ENTRYFIELD fileName OF Back;
- PROPERTY;
- LEFT 2,;
- TOP 2,;
- WIDTH 21
-
-
- DEFINE LISTBOX SrcFiles OF Back;
- PROPERTY;
- HEIGHT 7,;
- LEFT 2,;
- TOP 4,;
- DataSource "FILEMASK *.*",;
- WIDTH 18 ,;
- OnSelChange "UpdtFile"
- * OnGotFocus "ModUpFil"
-
-
- DEFINE TEXT DirName OF Back;
- PROPERTY;
- HEIGHT 1,;
- LEFT 24,;
- TEXT "D&irectories",;
- COLORPICKNORMAL "R/W",;
- TOP 3
-
- DEFINE LISTBOX SrcDir OF Back;
- PROPERTY;
- HEIGHT 7,;
- LEFT 24,;
- TOP 4,;
- DataSource "DIRECTORY \*.*",;
- WIDTH 13,;
- OnSelChange "UpdtFile"
-
-
- DEFINE TEXT txName9 OF Back;
- PROPERTY;
- HEIGHT 1,;
- LEFT 2,;
- TEXT "Dri&ves",;
- COLORPICKNORMAL "R/W",;
- TOP 12
-
- DEFINE COMBOBOX SrcDrive OF Back;
- PROPERTY;
- HEIGHT 4,;
- LEFT 2,;
- TOP 13,;
- DataSource "DRIVE",;
- WIDTH 11, ;
- VALUE LEFT( SET( "DIRECTORY" ), 2 )
-
-
- DEFINE TEXT DestName OF Back;
- PROPERTY;
- HEIGHT 1,;
- LEFT 45,;
- TEXT "&Dest. Directory",;
- COLORPICKNORMAL "R/W",;
- TOP 3
-
- DEFINE LISTBOX DestList OF Back;
- PROPERTY;
- HEIGHT 7,;
- LEFT 45,;
- TOP 4,;
- DataSource "DIRECTORY \*.*",;
- WIDTH 13,;
- OnSelChange "UpdtFile"
-
-
- DEFINE TEXT TDest OF Back ;
- PROPERTY ;
- HEIGHT 1,;
- LEFT 45,;
- TEXT "Des&t. Drive" ,;
- COLORPICKNORMAL "R/W",;
- TOP 12
-
- DEFINE COMBOBOX DestDrive OF Back ;
- PROPERTY ;
- Height 4,;
- Left 45,;
- TOP 13,;
- DATASOURCE "DRIVE",;
- WIDTH 11,;
- VALUE "A:"
-
- DEFINE PUSHBUTTON OkButton OF Back;
- PROPERTY;
- HEIGHT 2,;
- LEFT 35,;
- TEXT [&Ok],;
- COLORPICKNORMAL "R/G",;
- TOP 15,;
- WIDTH 10, ;
- OnClick "UpdtFile", ;
- Default .T.
-
- DEFINE PUSHBUTTON CanButton OF Back;
- PROPERTY;
- HEIGHT 2,;
- LEFT 15,;
- TEXT [&Cancel],;
- COLORPICKNORMAL "R/G",;
- TOP 15,;
- WIDTH 10, ;
- OnClick "CanHand", ;
- ProcFile "Canhand.prg"
-
-
-
-
-
-
-