View Issue Details

Jump to NotesJump to History
IDProjectCategoryView StatusDate SubmittedLast Update
0001534JEDI VCL00 JVCL Componentspublic2004-03-25 15:062004-03-26 07:55
ReporteranonymousAssigned ToAHUser 
PrioritynormalSeveritycrashReproducibilityalways
Status resolvedResolutionfixed 
Product Version 
Target VersionFixed in Version 
Summary0001534: TJvCustomEdit.UpdateEdit needs check to see if Owner is assigned
DescriptionI am using one of the edit controls as an editor for TVirtualStringTree, when used like this the component doesnt have an editor - pressing a key causes Access Violations.
Additional InformationCan be fixed by changing the following method as shown..

procedure TJvCustomEdit.UpdateEdit;
var
  I: Integer;
begin
  if Assigned(Self.Owner) then // added to stop AV when no owner..
    for I := 0 to Self.Owner.ComponentCount - 1 do
      if Self.Owner.Components[I] is TJvCustomEdit then
        if ({(Self.Owner.Components[I].Name <> Self.Name)}
         (Self.Owner.Components[I] <> Self) and // (ahuser) this is better
        ((Self.Owner.Components[I] as TJvCustomEdit).GroupIndex <> -1) and
        ((Self.Owner.Components[I] as TJvCustomEdit).fGroupIndex = Self.FGroupIndex)) then
        (Self.Owner.Components[I] as TJvCustomEdit).Caption := '';
end;
TagsNo tags attached.

Activities

AHUser

2004-03-26 07:55

developer   ~0003478

Thanks.

Fixed in CVS

Issue History

Date Modified Username Field Change
2004-03-25 15:06 anonymous New Issue
2004-03-26 07:55 AHUser Status new => resolved
2004-03-26 07:55 AHUser Resolution open => fixed
2004-03-26 07:55 AHUser Assigned To => AHUser
2004-03-26 07:55 AHUser Note Added: 0003478