diff --git a/Lang/English.lng b/Lang/English.lng index 65d5212f..3b8e2e6f 100644 --- a/Lang/English.lng +++ b/Lang/English.lng @@ -490,14 +490,14 @@ Ver=1 36015=&Check for updates 36016=4.9.9.2 to 5.12 Development: 36017=http://orwelldevcpp.blogspot.com -36018=> 4.9.9.2 +36018=> 5.12 36019=Repository: 36020=Subreddit: 36021=Compilers 36022=TDM-GCC Compiler Website: 36023=<= 4.9.9.2 (old stuff) 36024=Please support Dev-C++ by making a donation: -36025=Blog: +36025=Sponsor: 37001=Edit code insert entry diff --git a/Source/main.dfm b/Source/main.dfm index 39056401..dddc8820 100644 --- a/Source/main.dfm +++ b/Source/main.dfm @@ -1628,6 +1628,7 @@ object MainForm: TMainForm end object DonateItem: TMenuItem Action = actDonate + Visible = False end end end @@ -2793,7 +2794,6 @@ object MainForm: TMainForm object actDonate: TAction Caption = 'Donate :)' ImageIndex = 41 - OnExecute = actDonateExecute end end object MessagePopup: TPopupMenu diff --git a/Source/main.pas b/Source/main.pas index 60435a31..90c152d9 100644 --- a/Source/main.pas +++ b/Source/main.pas @@ -789,7 +789,6 @@ TMainForm = class(TForm) Selected: Boolean); procedure actRunTestsExecute(Sender: TObject); procedure WMCopyData(var Message: TMessage); message WM_COPYDATA; - procedure actDonateExecute(Sender: TObject); private fPreviousHeight: integer; // stores MessageControl height to be able to restore to previous height fTools: TToolController; // tool list controller @@ -6665,13 +6664,6 @@ function TMainForm.ParseParameters(const Parameters: WideString): Integer; LocalFree(Cardinal(ParameterList)); end; -procedure TMainForm.actDonateExecute(Sender: TObject); -begin - ShellExecute(GetDesktopWindow(), 'open', - PChar('https://www.paypal.com/cgi-bin/webscr?cmd=_s-xclick&hosted_button_id=7FD675DNV8KKJ'), nil, nil, - SW_SHOWNORMAL); -end; - end.