Page 1 of 1

trying to use an old version of findfile.

PostPosted: September 24th, 2010, 8:12 pm
by ulao
I have some delphi code written in delphi 2006. Seems I had issues with the findfile version I had ( unknown ). So I garbed the latest and now I'm really confused.

It looks like ThhFindFile is now TFindFile and I had a ThhFindFile .filter and can no longer find this. I'd like to use the latest findfile as I think my other copy has a bug. Can anyone help me in converting over.

Re: trying to use an old version of findfile.

PostPosted: September 24th, 2010, 10:29 pm
by Kambiz
I don't know about ThhFindFile. Maybe someone decided to publish his/her modified version of TFindFile under new name ThhFindFile.

Re: trying to use an old version of findfile.

PostPosted: September 25th, 2010, 3:34 am
by ulao
no, this was actually download from the net. It included the FindFile.txt dcr, dcu, and pas only. I overwrote it with the new version so its gone now, but I looked at the credits and it didnt have a 3rd part note. Not to say it was not modified but I know I downloaded it from a site hosting findfile in 2007.

Here is some of the code I have
Find := ThhFindFile.Create(nil);

...

Find.Directory := LstDirs[i];
Find.Filter := '*.zip';
Find.Recurse := False;
Find.Sorted := True;
Find.Execute;


I'm not sure on all of these but .Filter does not exist.


Also it looks like TFindFileW has more of the procedures I need. Maybe filters = filter? However I can not use it because TntClasses.dcu is missing and I can not find this file.

Re: trying to use an old version of findfile.

PostPosted: September 25th, 2010, 11:53 am
by Kambiz
According to the partial code you've posted, ThhFindFile is totally a different component, not mine.

Please read readme.html file to find out how to use TFindFile.

By the way, TFindFileW is just Unicode version of TFindFile and needs TNT Unicode Controls.

Re: trying to use an old version of findfile.

PostPosted: September 26th, 2010, 2:06 am
by ulao
Ok, found it

http://quickplay.sourceforge.net/extra/ThhFindFile.zip

must have been a modded version.