paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-07-28 22:56:10 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: mode matrix: hint for targets syntax error

Browse Source 
git-svn-id: trunk@41318 -
This commit is contained in:
mattias 2013-05-20 11:30:32 +00:00
parent e64b63d9a5
commit d181c76fe3
1 changed files with 11 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
ide/frames/compiler_modematrix.pas
View File

@ -19,8 +19,6 @@
*************************************************************************** ***************************************************************************
ToDo: ToDo:
- mark target errors red
- show target errors in hint
- ide macro - ide macro
- load old build macro values into matrix - load old build macro values into matrix
- save matrix options for old build macro values - save matrix options for old build macro values
@ -560,11 +558,21 @@ var
ValueRow: TGroupedMatrixValue; ValueRow: TGroupedMatrixValue;
MacroName: string; MacroName: string;
MacroValue: string; MacroValue: string;
GroupRow: TGroupedMatrixGroup;
Targets: String;
begin begin
if aCol=Grid.ValueCol then begin if aCol=Grid.ValueCol then begin
if aRow<Grid.FixedRows then exit; if aRow<Grid.FixedRows then exit;
MatRow:=Grid.Matrix[aRow-1]; MatRow:=Grid.Matrix[aRow-1];
if MatRow is TGroupedMatrixValue then begin if MatRow is TGroupedMatrixGroup then begin
GroupRow:=TGroupedMatrixGroup(MatRow);
if GroupRow.Group<>nil then begin
// a target group
Targets:=GroupRow.Value;
if CheckBuildMatrixTargetsSyntax(Targets)<>'' then
aColor:=ErrorColor;
end;
end else if MatRow is TGroupedMatrixValue then begin
ValueRow:=TGroupedMatrixValue(MatRow); ValueRow:=TGroupedMatrixValue(MatRow);
if ValueRow.Typ=BuildMatrixOptionTypeCaption(bmotIDEMacro) then begin if ValueRow.Typ=BuildMatrixOptionTypeCaption(bmotIDEMacro) then begin
if not SplitMatrixMacro(ValueRow.Value,MacroName,MacroValue,false) then if not SplitMatrixMacro(ValueRow.Value,MacroName,MacroValue,false) then