Using the same code in D3, i've nothing but problems executing
certain methods like
TPicture.LoadFromFile(...);
TPicture.Free;
TBitmap.Canvas.FillRect(...);
Looks like i'm missing something about D3.
How can i get that to work in both D2/D3 ?
Here some code:
//-------------------------------------------------------------
constuctor TPopulateImageListThread.Create(...);
begin
inherited Create(false);
FreeOnTerminate := true;
FPicture := TPicture.Create;
FFiles := TStringList.Create;
FFiles.Assign(...);
FImageList := TImageList.Create;
...
end;
destuctor TPopulateImageListThread.Destroy;
begin
...
FFiles.Free;
FPicture.Free; <- Crashes in D3
FImageList.Free;
inherited Destroy;
end;
procedure TPopulateImageListThread.Execute;
var
i: Integer;
begin
for i := 0 to FFiles.Count -1 do
begin
try
FPicture.LoadFromFile(FFiles.Strings[i]); <- Crashes in D3
...
except
end;
...
end;
end;
//-------------------------------------------------------------
Thanks in advance
Heinz Schiffmann
Dale McGary
Heinz Schiffmann wrote in message <355C7639...@mail.augustanet.de>...
many thanks for that hint - the 3.02 update solved the problem.
Heinz Schiffmann
Heinz Schiffmann wrote in message <35693F2A...@mail.augustanet.de>...
Check the file date/time of your Delphi EXE, the time part encodes the
version.
Peter Below (TeamB) 10011...@compuserve.com)