if len = 0 then
Exit;
-// ���� � ������� ����:
+// Îêíî ñ ãëàâíûì ìåíþ:
g_GUI_ShowWindow(Saved_Windows[len-1]);
-// �� ������������� (��� ������ ������):
+// Íå ïåðåêëþ÷èëîñü (èëè íåêóäà äàëüøå):
if (len = 1) or (g_ActiveWindow = nil) then
Exit;
-// ���� ������ � ��������� �����:
+// Èùåì êíîïêè â îñòàëüíûõ îêíàõ:
for k := len-1 downto 1 do
begin
ok := False;
Break;
end;
- // �� �������������:
+ // Íå ïåðåêëþ÷èëîñü:
if (not ok) or
(g_ActiveWindow.Name = Saved_Windows[k]) then
Break;
SetActive(Self)
else
begin
- if FItems[FIndex][1] = #29 then // �����
+ if FItems[FIndex][1] = #29 then // Ïàïêà
begin
OpenDir(FPath+Copy(FItems[FIndex], 2, 255));
FIndex := 0;
if ( (Length(FItems[a]) > 0) and
(LowerCase(FItems[a][1]) = LowerCase(Chr(wParam))) ) or
( (Length(FItems[a]) > 1) and
- (FItems[a][1] = #29) and // �����
+ (FItems[a][1] = #29) and // Ïàïêà
(LowerCase(FItems[a][2]) = LowerCase(Chr(wParam))) ) then
begin
FIndex := a;
path := IncludeTrailingPathDelimiter(path);
path := ExpandFileName(path);
- // ��������:
+ // Êàòàëîãè:
if FDirs then
begin
if FindFirst(path+'*', faDirectory, SR) = 0 then
FindClose(SR);
end;
- // �����:
+ // Ôàéëû:
sm := FFileMask;
while sm <> '' do
begin
exit;
end;
- // ����� ����������� ����������
+ // Âðåìÿ ïðåäûäóùåãî îáíîâëåíèÿ
if flag then
begin
Time_Old := Time-(Time_Delta mod 28);
Init();
Time_Old := GetTimer();
- // ��������� ������
+ // Êîìàíäíàÿ ñòðîêà
if (ParamCount > 0) then g_Game_Process_Params();
- // ������ �����
+ // Çàïðîñ ÿçûêà
if (not gGameOn) and gAskLanguage then g_Menu_AskLanguage();
e_WriteLog('Entering the main loop', TMsgType.Notify);