Changeset 468 for trunk/LocalPlayer/PVSB.pas
- Timestamp:
- Dec 3, 2023, 11:28:08 AM (6 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LocalPlayer/PVSB.pas
r447 r468 6 6 uses 7 7 {$IFDEF WINDOWS}Windows,{$ENDIF} 8 Classes, Controls, Forms, LCLIntf, LCLType, LMessages, Messages, SysUtils, 9 StdCtrls, Math; 8 Classes, LCLIntf, LCLType, LMessages, Messages, SysUtils, Math, 9 {$IFDEF DPI}Dpi.Controls, Dpi.Forms, Dpi.StdCtrls{$ELSE} 10 Controls, Forms, StdCtrls{$ENDIF}; 10 11 11 12 type … … 183 184 Inc(Count); 184 185 ScrollBar := TScrollBar.Create(Parent); 185 ScrollBar.Kind := sbVertical;186 ScrollBar.Kind := TScrollBarKind.sbVertical; 186 187 ScrollBar.Name := 'PVSB' + IntToStr(Count); 187 ScrollBar.Align := alRight;188 ScrollBar.Align := TAlign.alRight; 188 189 ScrollBar.OnChange := ScrollBarChanged; 189 190 ScrollBar.Parent := Parent;
Note:
See TracChangeset
for help on using the changeset viewer.