pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

fix error create popup form - now use CreateNew constructor for this

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@1838 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
alexs75
2011-08-27 15:15:40 +00:00
parent a71bf8ca2b
commit d379826256
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
components/rx/rxpopupunit.pas
View File

@ -443,7 +443,7 @@ constructor TPopUpForm.CreatePopUp(AOwner: TComponent;
var var
PopupOrigin:TPoint; PopupOrigin:TPoint;
begin begin
inherited Create(nil); inherited CreateNew(nil);
// inherited Create(AOwner); // inherited Create(AOwner);
BorderStyle := bsNone; BorderStyle := bsNone;
Caption:='RxPopUp'; Caption:='RxPopUp';