Form1
Form1
Form1
Text1
Label1
	Filename:
Text2
Command1
Get File Data
Command2
Form_Click
Command2_Click
FileBuffer1
OFSTRUCT[
Command1_Click
File1
Text1
Style
OF_EXISTF
Resultk
OpenFile
CrLff
cBytes
fFixedDisk
nErrCode
Reserved
szPathName
Text2
GetTime
	Reserved4
	Reserved3
	Reserved1
GetDate
	Reserved2
files
length
FileLength
HFILE_ERROR2
Command2_Click
Command1_Click
Result from open = "
Bytes = 
Fixed = 
PathN = 
Time  = 
Date  = 
File length ="
ErrCd = 
GetTime
GetDate