Ario.Paxaz Posted March 17, 2017 Share Posted March 17, 2017 Hi I use below Code,for create UniPopupMenu in UniDbGrid in Runtime,But don't work.what's my error? procedure TMainForm.UniDBGrid1CellContextClick(Column: TUniDBGridColumn; X,Y: Integer); Var MyUniPopupMenu:TUniPopupMenu; i: SmallInt; MI: TuniMenuItem; AGrid:TUniDBGrid; Aagrid:TComponent; begin Aagrid:=Column.Grid; AGrid:=FindComponent(Aagrid.Name) as tunidbgrid; MyUniPopupMenu:=TUniPopupMenu.Create(AGrid); MyUniPopupMenu.Popup(X,Y); For i := 0 To 3 do Begin MI := TuniMenuItem.Create(AGrid); MI.Name := AGrid.Name + 'MI' + IntToStr(i); MI.Caption:='s'+IntToStr(i); MyUniPopupMenu.Items.Add(MI); End; end; Best Regards. Quote Link to comment Share on other sites More sharing options...
Sherzod Posted March 17, 2017 Share Posted March 17, 2017 Hi, Which build are you using? Best regards. Quote Link to comment Share on other sites More sharing options...
Ario.Paxaz Posted March 18, 2017 Author Share Posted March 18, 2017 Hi I compiled on 1346,and my friend compiled by 1363. Best Regards. Quote Link to comment Share on other sites More sharing options...
Administrators Farshad Mohajeri Posted March 18, 2017 Administrators Share Posted March 18, 2017 Hi I compiled on 1346,and my friend compiled by 1363. Best Regards. Your account will be suspended for using pirated copy of uniGUI. We do not tolerate software piracy to any extent. No matter if you are willing to buy in a near future or not. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.