Changeset 184 for trunk/Packages/CevoComponents/EOTButton.pas
- Timestamp:
- May 4, 2020, 10:24:23 PM (5 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Packages/CevoComponents/EOTButton.pas
r165 r184 14 14 15 15 type 16 // EndOfTurn button 16 17 TEOTButton = class(TButtonBase) 17 18 public … … 138 139 Brush.Color := $0000FF; 139 140 FrameRect(Rect(0, 0, 48, 48)) 140 end 141 end; 141 142 end; 142 143 … … 146 147 begin 147 148 FIndex := x; 148 Invalidate 149 end 149 Invalidate; 150 end; 150 151 end; 151 152 … … 158 159 Paint 159 160 except 160 end 161 end 161 end; 162 end; 162 163 end; 163 164
Note:
See TracChangeset
for help on using the changeset viewer.