Unit Main

Classes

TMainForm -

Functions

Types

Constants

CopyBufferLength
DefaultCaption1
DefaultCaption2
DefaultCaption3
DefaultCaption4
DefaultExt1
DefaultExt2
DefaultExt3
DefaultExt4
ScreenHeight
ScreenWidth
WM_AUTOCOPY

Variables

MainForm


Functions


Types


Constants

CopyBufferLength = 16384

DefaultCaption1 = 'Binaries'

DefaultCaption2 = 'Backups'

DefaultCaption3 = 'Pictures'

DefaultCaption4 = 'UserDef'

DefaultExt1 = 'exe,dcu,dsm,dsk'

DefaultExt2 = '~df,~dp,~pa'

DefaultExt3 = 'bmp,cur,ico'

DefaultExt4 = ''

ScreenHeight = 600

I designed my form in 800x600 mode.

ScreenWidth = 800

ToDo list 143: -Message "Start creating new dir and copying". OK. -Not enough space-message before copying. OK. -Disk full without message. OK. -Check A: and B: safe while changing drive. OK. 150: -User definable extensions OK. -Windows help file OK. -Sourcefile listbox itemIndex more convenient OK. 154: -Editable Title bar OK. -Only one program's instance OK. -Write only? Ask for removal OK. -On overwrite: show which file is newer OK.

WM_AUTOCOPY = WM_USER + 100


Variables

MainForm : TMainForm

Public-Deklarationen