Login ProductsSalesSupportDownloadsAbout |
Home » Technical Support » Elevate Web Builder Technical Support » Incident Reports » Incident Reports Reported for Version 1.01 » View Incident Report |
Serious |
Reported By: Matthew Kogan Reported On: 5/21/2013 For: Version 1.01 Build 5 |
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;
This web page was last updated on Wednesday, March 20, 2024 at 07:22 AM | Privacy PolicySite Map © 2024 Elevate Software, Inc. All Rights Reserved Questions or comments ? E-mail us at info@elevatesoft.com |