Search results for query: *

Thanks, I'm initializing for each new file after counting lines and the resetting to 0 when through. Seems to work well. Bob

It turns out I had an button named "exit" on the form that conflicted with the exit function. It's usually something simple isn't it? Still don't know why Seek won't work with 'TextFile' types but Reset is doing the trick for now. Thanks Bob

Reset closes and then open the file at the beginning. I didn't see any need to go through that but using Seek as shown in help would not work. Help indicates that it will work with any kind of file so... Anyway, I ended up having to use Reset and I've commented out the if IOResult code so...

3 syntax errors just don't make any sense to me <--------1st one-------------> Error: Statement expected but expression of type TButton found at the exit statement in: // open the input file AssignFile(inF, hypackFileEdit.Text); Reset(inF); if IOResult <> 0 then begin...

You guys are the best! Thanks. Bob

I'm putting a bunch of info labels in a standard group box. Some of the labels are titles for subsequent data and I have them blue bold and a size bigger. I'd like to make the title of the group box blue bold and a size bigger too. However, when I do, all the contents of the group box are...

I have a bunch of files to process, each will have a different number of items to deal with. define some dynamic arrays var array1, array2, array3: array of double; open the first file and scan through it to determine how many data items to process allocate memory for each array...

Thanks, this is just what I needed. I downloaded the thing to try and you are right, the prices is right if it does as advertised. Bob

I need to allow my users to examine the first few lines of a text file and indicate by selecting with the mouse which column positions in the file define what fields for input parsing. I can do this with Tmemo and SelStart and SelLength but why re-invent the wheel? Has anyone seen a component...

Steve, thanks but what I need is to do a 4 byte conversion 'in place' that 16 bit word swaps then byte swaps within those two words so I go from 0123 byte order to 3210 byte order. Found function EndianLong(L : longint) : longint; begin result := swap(L shr 16) or (longint(swap(L...

I'm converting binary data in two programs. Had everything working OK until I found that all the binary data needs to be in Big endian byte order. So... Situation 1: the input data is Intel standard IEEE reals. I need to output same as BIG endian IEEE reals Situation 2: the input data is...

problem solved. The help file for SelectDirectory show that it is in the QDialogs unit. A search on the web showed that it is in the FileUtils unit. Works fine now, problem solved. Bob

Apparently QDialogs.dcu is not included in the 'personal' edition of Delphi 7. It wasn't installed in the lib directory anyway. Can someone show me how, in lieu of having access to Qdialogs, to do what the QDialogs 'SelectDirectory' procedure does? I want my user to select (with option to...

I have two text csv files. in file one, field 2 is hh:mm:ss.ss and I will convert that to seconds since midnight and want to find the closest matching value in the second csv file in which field 4 is seconds since midnight. I will then co-mingle the two lines, compute a few delta values and...

Thanks, gents. Sometimes I just need to discuss things to make the mental connection with my problem. Bob

I have a binary file that is a a bunch of consequtive type x = record header: array[1..256] of byte; data: array[1..10000] of single; end The spec calls for a text string of data to appear at the same location of the header in each of these records. We'll it doesn't. It may move around...