View Issue Details

IDProjectCategoryView StatusLast Update
0000097JEDI VCL00 JVCL Componentspublic2002-06-05 09:25
Reportergrenzi_rAssigned Touser72 
PrioritynormalSeveritycrashReproducibilityalways
Status closedResolutionfixed 
Product Version 
Target VersionFixed in Version 
Summary0000097: TJvAddPrinter causes a REBOOT
DescriptionWhen I executed this dialog an AV appeared and I had to reboot
my Windows!! But if I call this dialog manually via the start menu
everything works fine!
It doesn´t work on XP either (But my girl friend doesn´t have not to
reboot her PC because it is XP :-)

The problems described can be seen in the example application which is at the yahoo group (http://groups.yahoo.com/group/JVCL-Developers/files/SampleApplication_Beta_2.zip)
My configuration: Delphi 5 German professional with SP1 installed.
OS: Win 95b.
TagsNo tags attached.

Activities

user72

2002-06-02 16:04

  ~0000064

This is due to the code below:

function ItemIDListCreate(const Allocator: IMalloc; const Size: Integer): PItemIDList;
begin
  Result := Allocator.Alloc(Size);
  if Result <> nil then
    FillChar(Result, Size, 0);
end;

should be:

function ItemIDListCreate(const Allocator: IMalloc; const Size: Integer): PItemIDList;
begin
  Result := Allocator.Alloc(Size);
  if Result <> nil then
    FillChar(Result^, Size, 0);
end;

Issue History

Date Modified Username Field Change