mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-04-26 12:03:51 +02:00
IDE: mode matrix: fixed changing type of last row
git-svn-id: trunk@41578 -
This commit is contained in:
parent
26525d735a
commit
f68f6c159f
@ -24,7 +24,6 @@
|
||||
Options frame for build mode matrix options.
|
||||
|
||||
ToDo:
|
||||
- bug: change type in last row does not work
|
||||
- undo: combine changes while editing a cell
|
||||
}
|
||||
unit Compiler_ModeMatrix;
|
||||
|
@ -1044,7 +1044,7 @@ var
|
||||
NewType: String;
|
||||
begin
|
||||
Item:=Sender as TMenuItem;
|
||||
if fTypePopupMenuRow>=Matrix.RowCount then exit;
|
||||
if (fTypePopupMenuRow<=0) or (fTypePopupMenuRow>Matrix.RowCount) then exit;
|
||||
if Matrix.Rows[fTypePopupMenuRow-1] is TGroupedMatrixValue then begin
|
||||
ValueRow:=TGroupedMatrixValue(Matrix[fTypePopupMenuRow-1]);
|
||||
NewType:=TypeColumn.PickList.Names[Item.MenuIndex];
|
||||
|
@ -272,7 +272,7 @@ end;
|
||||
------------------------------------------------------------------------------}
|
||||
procedure TMenuItem.DoClicked(var msg);
|
||||
begin
|
||||
// CheckChildrenHandles; <- This is already called when menuitem is created.
|
||||
// CheckChildrenHandles; <- This is already called when menuitem is created.
|
||||
if not (csDesigning in ComponentState) then
|
||||
begin
|
||||
InitiateActions;
|
||||
|
Loading…
Reference in New Issue
Block a user