Icon View Incident Report

Serious Serious
Reported By: Matthew Kogan
Reported On: 5/21/2013
For: Version 1.01 Build 5
# 3796 Freeing a TRadioButton on a Form Can Cause an Error

I'm getting an error freeing a TRadioButton that I have added to a form at runtime.

Freeing the TEdit works fine, but I get the error: "NotFoundError: Node was not found" after "added TRadioButton".

procedure TForm1.Button2Click(Sender: TObject);
var
   C : TControl;
   E : TEdit;
   I : Integer;
   RB : TRadioButton;
begin
   E := TEdit.Create(nil);
   E.Parent := self;
   window.alert('added TEdit');
   for I := 0 to ControlCount - 1 do begin
      if Controls[I] is TEdit then begin
         C := Controls[I];
         C.Free;
      end;
   end;
   window.alert('freed TEdit');
   RB := TRadioButton.Create(nil);
   RB.Parent := self;
   window.alert('added TRadioButton');
   for I := 0 to ControlCount - 1 do begin
      if Controls[I] is TRadioButton then begin
         C := Controls[I];
         C.Free;
      end;
   end;
   window.alert('freed TRadioButton');
end;



Resolution Resolution
Fixed Problem on 5/21/2013 in version 1.02 build 1


Products Affected Products Affected
Elevate Web Builder
Elevate Web Builder Trial

Image