Nope. I checked that if you read above. The data file should be a .DBF file but for completeness I tried reading them with an online dBase reader and it didn't recognise them.They are mostly liky DBase files (DOS), I suspect dbase (I-III). WinWorld: dBASE III Plus v1.1 (winworldpc.com) Have fun
Patience... maybe we could wait for the OPWhat is the name of the program that these files belong too?
@Peter SimpsonWhat is the name of the program that these files belong too?
@agraham Yes I have the application and can make it run. It seems you are excited by the dumper trucks, so I thought you might like this screenshotIt you have the application that creates these files, or can read them, perhaps we can get an idea of the fields which are in each record and reverse engineer some of the data.
@Jmu5667 I was wondering if using "Borland Delphi 5" then what would be the goto method for storing data? Would someone writing in Delphi use dBase or Foxpro ?They are mostly likey DBase files (DOS), I suspect dbase (I-III). / Foxpro
@Magma oh no! This is going to be hard work right?!?! (could be fun though?) Here are some Excavators for youactually will be custom made "table" (those days every table was different file...)
Private Sub Button1_Click
Dim b() As Byte = Bit.InputStreamToBytes(File.OpenInput(File.DirAssets, "R_RESO.DAT"))
Log(BytesToString(b, 16508,32, "utf8")) 'Read 15 bytes starting from 10
' RESULT 180 Excavatorer panelne)quipment
End Sub
Private Sub Button2_Click
Dim b() As Byte = File.ReadBytes(File.DirAssets, "R_RESO.DAT")
Log(BytesToString(b, 16508,32, "utf8")) 'Read 15 bytes starting from 10
' RESULT 180 Excavatorer panelne)quipment
End Sub
Private Sub Button1_Click
Dim CS As String = "ASCII"
Dim b() As Byte = Bit.InputStreamToBytes(File.OpenInput(File.DirAssets, "R_RESO.DAT"))
Log("=1=============")
'Log(BytesToString(b, 16506,1, CS)) '4F "O"
Log(BytesToString(b, 16508,13, CS)) ' "180 Excavator"
Log(BytesToString(b, 16590,4, CS)) ' "Hour"
Log("=2============")
'Log(BytesToString(b, 597260,1, CS)) '4F "O"
Log(BytesToString(b, 597262,23, CS)) ' "360 Excavator (8 Tonne)"
Log(BytesToString(b, 597344,4, CS)) ' "Hour"
Log("=3============")
'Log(BytesToString(b, 2941,1, CS)) '4F "O"
Log(BytesToString(b, 2942,24, CS)) ' "360 Excavator (13 Tonne)"
Log(BytesToString(b, 3024,4, CS)) ' "Hour"
Log("=4============")
'Log(BytesToString(b, 10692,1, CS)) '4F "O"
Log(BytesToString(b, 10694,24, CS)) ' "360 Excavator (20 Tonne)"
Log(BytesToString(b, 10776,4, CS)) ' "Hour"
Log("=5============")
'Log(BytesToString(b, 192541,1, CS)) '4F "O"
Log(BytesToString(b, 192543,24, CS)) ' "360 Excavator (40 Tonne)"
Log(BytesToString(b, 192625,4, CS)) ' "Hour"
Log("=6============")
'Log(BytesToString(b, 573681,1, CS)) '4F "O"
Log(BytesToString(b, 573683,33, CS)) ' "360 Excavator (45 Tonne) Operated"
Log(BytesToString(b, 573765,4, CS)) ' "Hour"
Log("=7============")
'Log(BytesToString(b, 574004,1, CS)) '4F "O"
Log(BytesToString(b, 574006,26, CS)) ' "Transport costs (45 Tonne)"
Log(BytesToString(b, 574088,4, CS)) ' "Item"
Log("=8============")
'Log(BytesToString(b, 442543,1, CS)) '4F "O"
Log(BytesToString(b, 442545,24, CS)) ' "Mini Excavator (3 Tonne)"
Log(BytesToString(b, 442627,4, CS)) ' "Item"
Log("=9============")
'Log(BytesToString(b, 54620,1, CS)) '4F "O"
Log(BytesToString(b, 54622,8, CS)) ' "Tractair"
Log(BytesToString(b, 54704,4, CS)) ' "Hour
Log("=10===========")
'Log(BytesToString(b, 74969,1, CS)) '4F "O"
Log(BytesToString(b, 74971,14, CS)) ' "Loading shovel"
Log(BytesToString(b, 75053,4, CS)) ' "Hour"
Log("=11===========")
'Log(BytesToString(b, 75292,1, CS)) '4F "O"
Log(BytesToString(b, 75294,15, CS)) ' "Transport costs"
Log(BytesToString(b, 75376,4, CS)) ' "Trip"
Log("=12===========")
'Log(BytesToString(b, 75615,1, CS)) '4F "O"
Log(BytesToString(b, 75617,10, CS)) ' "Dump truck"
Log(BytesToString(b, 75699,4, CS)) ' "Hour"
End Sub
It's unlikely to be anything to do with Delphi - DOS era would be Borland Pascal, Assembler, QuickBasic etc. Delphi is Windows era. I guess your ID program has made a bad guess.Would someone writing in Delphi
Indeed I have looked for export functions, sadly there is nothing useful. Even printing and OCR might not be good as those printed reports are for the summary of infomation, not the table data.Obviously you'll have checked the program has not any menu to export data as cvs, text or similar...
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?
We use cookies and similar technologies for the following purposes:
Do you accept cookies and these technologies?