IDE: fix a potential crash in FPDOC options dialog

git-svn-id: trunk@33207 -
This commit is contained in:
juha 2011-11-01 21:28:53 +00:00
parent 9cee7a46ed
commit 04679166cb

View File

@ -98,7 +98,8 @@ end;
procedure TFpDocOptionsFrame.LazDocDeletePathButtonClick(Sender: TObject);
begin
LazDocListBox.Items.Delete(LazDocListBox.ItemIndex);
if LazDocListBox.ItemIndex >= 0 then
LazDocListBox.Items.Delete(LazDocListBox.ItemIndex);
end;
class function TFpDocOptionsFrame.SupportedOptionsClass: TAbstractIDEOptionsClass;