Changeset 531 for trunk/Log.pas
- Timestamp:
- Mar 27, 2024, 12:31:14 PM (8 months ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/Log.pas
r468 r531 73 73 if List.Lines.Count = MaxLines then 74 74 List.Lines.Delete(0); 75 List.Lines.Add( char(48 + Turn div 100 mod 10) +76 char(48 + Turn div 10 mod 10) + char(48 + Turn mod 10) + ' ' + Text);75 List.Lines.Add(Char(48 + Turn div 100 mod 10) + 76 Char(48 + Turn div 10 mod 10) + Char(48 + Turn mod 10) + ' ' + Text); 77 77 PostMessage(List.Handle, WM_VSCROLL, SB_BOTTOM, 0); 78 78 Update;
Note:
See TracChangeset
for help on using the changeset viewer.