Testing build #189

[rejetto]

download @ www.dovedove.it/hfs/hfs189.exe

what's new
+ log toolbar: button to copy to editor only matched lines
+ default template editor is notepad++ (if installed) instead of notepad
- UTF-8 support broken in build #188 http://www.rejetto.com/forum/index.php?topic=6001.msg1035602#msg1035602
- problem with default template editor (notepad) and Vista http://www.rejetto.com/forum/index.php?topic=6001.msg1035615#msg1035615
- graphical glitches introduced in build #188

[Mars]

1) i have an DDE error when i choice wordpad.exe as default editor
    image dde error.png

2) when choose winword or excel  as default editor( for test only), another error is detected
  image office.png

Morality: do not use a product interpreting data as html text (excepted notepad++)

[Pit]

In Build 189 i have at download no entries under IP, Filename und no visible %graph in the downloadwindow (current connections).
When i'am go back to Build 188 all this works. correctly.

[Mars]

Pit new default values are

            Text = 'IP address'
            Text = 'File'
            Text = 'Status'
            Text = 'Speed'
            Text = 'Time left'
            Text = 'Progress'
          

[Mars]

Modified version of hfs that integrate this function, can every body test and report, specially with system as Vista, win2003Server, Win2000,  Win98 ....
(Please do not report with WIN XP system)

procedure TmainFrm.Edit1Click(Sender: TObject);

  function getDefaultTextEditor():string;
  var editor:string;
  begin
  //search the openas default program for .txt extension
  editor:=lowercase(loadregistry('Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.txt','application',HKEY_CURRENT_USER));
  //If the value does not exist, then load  contents
  //of default 'Open Command' value for the same extension
  if editor='' then
    begin
    editor:=loadregistry('.txt','',HKEY_CLASSES_ROOT);
    editor:=lowercase(loadregistry(editor+'\shell\Open\command','',HKEY_CLASSES_ROOT));
    editor:=chop('.exe',editor);
    while pos('\',editor)>0 do chop('\',editor);
    editor:=editor+'.exe';
    end;
  //path of editor is automatic with windows XP by associate an extension with a program file
  result:=editor;
  end;

begin
if not fileExists(tplFilename) then
  begin
  tplFilename:=TPL_FILE;
  saveFile(tplFilename, defaultTpl);
  end;
exec(or_([
  tplEditor,
  getDefaultTextEditor(),
  loadregistry('SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\notepad++.exe', '', HKEY_LOCAL_MACHINE),
  'notepad.exe'
]), '"'+tplFilename+'"');
end;

When changing external template, you can see it now in the external editor

procedure TmainFrm.Changefile1Click(Sender: TObject);
begin
tplImport:=selectFile(tplFilename, 'Change template file', 'Template file|*.tpl', [ofPathMustExist, ofCreatePrompt]);
Edit1Click(edit1);
end;

[TSG]

In Build 189 i have at download no entries under IP, Filename und no visible %graph in the downloadwindow (current connections).
And change file for the .tpl file didn´t work.
now i'am go back to Build 188 and all this works. correctly.

You are correct Pit. Rejetto must have missed a variable. But I really like the columns like that, it looks much better. Even the layout is better thought.

And attached I have made a better suited icon for the slider. It is smaller and vertical center. If you would like I will edit the original icon, so it has opacity, I can't tell if its a gif or a png.

[rejetto]

editor:=lowercase(loadregistry('Software\Microsoft\Windows\CurrentVersion\Explorer\FileExts\.txt','application',HKEY_CURRENT_USER));

thanks for trying mars, but at such registry key, i have "pspad.exe" (correct) with no path, and it is not enough, because the containing folder of the program is not in the "path" enviroment variable.
i guess the path must be found somewhere else.