admin/expertcad
1
0
Fork 0
mirror of http://gitlab.expertsoft.com.ua/git/expertcad synced 2026-01-11 22:45:39 +02:00
Code Issues Packages Projects Releases Wiki Activity

1

Browse Source
This commit is contained in:
ShevaIV 2025-05-12 10:29:21 +03:00
parent 5d5efaee01
commit 5f23d02674
1 changed files with 1 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
SRC/ExpertGM.dpr
View File

@ -637,6 +637,7 @@ var
Req: string; Req: string;
TimeStr: string; TimeStr: string;
begin begin
Randomize;
Randomize; Randomize;
TimeStr := DateTimeToStr(Now); TimeStr := DateTimeToStr(Now);
while Pos(':', TimeStr) > 0 do while Pos(':', TimeStr) > 0 do