Hi Nigel,
Thanks for your elaborate answer.
Regarding the time for the upgrade, I don't think we are ready with it. We were forced to use a really old Delphi version because of a component that was no longer available for newer versions so we could not keep up with the times. I think the last ImageEN version we used was 8.6.0.
I just declared a value for the labels and then got the next access violation at 'if ImageEnViewCurr.IO.Params.Filename <> IEFolderMView.SelectedFilename'
ImageEnViewCurr.IO.Params.Filename is an inaccessible value (SelectedFilename is empty) when I use a breakpoint.
procedure TFmain.tmrUpdatePreviewTimer(Sender: TObject);
begin
tmrUpdatePreview.Enabled := False;
if ImageEnViewCurr.IO.Params.Filename <> IEFolderMView.SelectedFilename then
begin
if IEFolderMView.SelectedFilename = '' then
//ImageEnViewCurr.ClearAll;
//ImageEnViewCurr.update;
else
begin
if DoLoadImageFromMView = true then
begin
//IEFolderMView.MIO.LoadFromFile(IEFolderMView.SelectedFilename);
ImageEnViewCurr.IO.LoadFromFile(IEFolderMView.SelectedFilename);
ImageStatusbarCurr.Panels[0].Text := OpenImageEnDialog1.FileName;
ImageStatusbarCurr.panels[0].Width:= trunc(canvas.textwidth(OpenImageEnDialog1.FileName) * 1.25);
ImageStatusbarCurr.Update;
end;
end;
end;
end;
I must say that (irregularly) when I run the program for about a 100 times I get a popup that says that things do not have a corresponding component like:
Field Fmain.FlipVertical does not have a corresponding component. Remove declaration?
FlipVertical is:
FlipVertical: TImageEnViewFlipVertical
So it does that for like a 100 ImageEn declarations. And then it doesn't for a while. Then every time till it stops for a while.
The project you made available works flawlessly. I went through each component in the uses clause and added those that were in your project to our project (only 3 or 4 were not there) but apparently that didn't make any difference. When I installed the new ImageEN I needed to add a number of them that were not in the old project to get things "working", meaning compiling without error.
TImageEnFolderMView is on the form (we have about 9, one huge and about 8 small ones that don't use ImageEN) and I added the latest ielib64.dll (IELib 64bit, 8.1.6.0, 3,197 KB) to the project folder.
If I don't "break" at the first access violation but continue it stops at a next ImageEn thing, something about rulers[gripwidth].