X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fflexui%2Ffui_flexlay.pas;h=4bf7ce791a7ba5ebfe8eeec21dc212f92dc32686;hb=6107d1bd653921f093e4d2c81f2905f4e520f6d4;hp=fc6e93a46e1716382681c2b15784df259b5f1dce;hpb=4eb0c3143f39926323e44d590cae60131d11001e;p=d2df-sdl.git diff --git a/src/flexui/fui_flexlay.pas b/src/flexui/fui_flexlay.pas index fc6e93a..4bf7ce7 100644 --- a/src/flexui/fui_flexlay.pas +++ b/src/flexui/fui_flexlay.pas @@ -3,8 +3,7 @@ * * This program is free software: you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by - * the Free Software Foundation, either version 3 of the License, or - * (at your option) any later version. + * the Free Software Foundation, version 3 of the License ONLY. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of @@ -368,7 +367,7 @@ begin // if control is only one in a group, mark is as "not grouped" for gidx := 0 to 1 do begin - if (gidx = 0) then gflg := not LongWord(FlagInGroupH) else gflg := not LongWord(FlagInGroupV); + if (gidx = 0) then gflg := LongWord(not FlagInGroupH) else gflg := LongWord(not FlagInGroupV); f := 0; while (f < Length(groups[gidx])) do begin