Rev 8728 | Rev 8762 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed
Rev 8728 | Rev 8741 | ||
---|---|---|---|
Line 26... | Line 26... | ||
26 | CB := Clipboard, Languages, |
26 | CB := Clipboard, Languages, |
27 | ChangeLog, Scroll, |
27 | ChangeLog, Scroll, |
28 | RW, Ini, box_lib, LibImg; |
28 | RW, Ini, box_lib, LibImg; |
Line 29... | Line 29... | ||
29 | 29 | ||
30 | CONST |
30 | CONST |
Line 31... | Line 31... | ||
31 | header = "CEdit (20-may-2021)"; |
31 | header = "CEdit (24-may-2021)"; |
32 | 32 | ||
Line 33... | Line 33... | ||
33 | ShellFilter = "";(* "SH|"; *) |
33 | ShellFilter = "";(* "SH|"; *) |
Line 1285... | Line 1285... | ||
1285 | BEGIN |
1285 | BEGIN |
1286 | modified := FALSE; |
1286 | modified := FALSE; |
1287 | mainTID := K.ThreadID(); |
1287 | mainTID := K.ThreadID(); |
1288 | K.SetIPC(IPC); |
1288 | K.SetIPC(IPC); |
1289 | U.ptr2str(K.GetName(), AppPath); |
1289 | U.ptr2str(K.GetName(), AppPath); |
1290 | U.getPath(AppPath, fileName); |
1290 | (* U.getPath(AppPath, fileName); |
1291 | U.append8(fileName, "/Icons16.png"); |
1291 | U.append8(fileName, "/Icons16.png");*) |
1292 | icons := LibImg.LoadFromFile(fileName, 16, y); |
1292 | icons := LibImg.LoadFromFile("/rd/1/Icons16.png", 16, y); |
1293 | grayIcons := LibImg.LoadFromFile(fileName, 16, y); |
1293 | grayIcons := LibImg.LoadFromFile("/rd/1/Icons16.png", 16, y); |
1294 | gray(grayIcons); |
1294 | gray(grayIcons); |
1295 | iconsBackColor(icons); |
1295 | iconsBackColor(icons); |
1296 | iconsBackColor(grayIcons); |
1296 | iconsBackColor(grayIcons); |
1297 | Ini.load(AppPath); |
1297 | Ini.load(AppPath); |
1298 | K.SetEventsMask({0, 1, 2, 5, 6, 31}); |
1298 | K.SetEventsMask({0, 1, 2, 5, 6, 31}); |