Commit 95a2e71
committed
fix(build): TFrame.Scaled-Zugriff via TScrollingHack-ClassHack
E2003: 'Scaled' ist auf TScrollingWinControl protected, TFrame
ererbt das als protected. Direct Self.Scaled := False compiliert
nicht.
Class-Hack TScrollingHack = class(TScrollingWinControl) im
implementation-uses adden, dann TScrollingHack(Self).Scaled := False.
Standard-VCL-Idiom, gleicher Stil wie TControlHack in derselben Unit
fuer TControl.Font (war frueher mal drin).1 parent 6db00a0 commit 95a2e71
1 file changed
Lines changed: 6 additions & 1 deletion
| Original file line number | Diff line number | Diff line change | |
|---|---|---|---|
| |||
144 | 144 | | |
145 | 145 | | |
146 | 146 | | |
| 147 | + | |
| 148 | + | |
| 149 | + | |
| 150 | + | |
| 151 | + | |
147 | 152 | | |
148 | 153 | | |
149 | 154 | | |
| |||
170 | 175 | | |
171 | 176 | | |
172 | 177 | | |
173 | | - | |
| 178 | + | |
174 | 179 | | |
175 | 180 | | |
176 | 181 | | |
| |||
0 commit comments