История изменений
Исправление LINUX-ORG-RU, (текущая версия) :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
if (Screen.width and lt > cScreenWidth) or (Screen.PixelsPerInch ~= cPixelsPerInch) then
MForm.scaled = TRUE;
MForm.height = MForm.height * screen.Height / cScreenHeight;
MForm.width = MForm.width * screen.width / cScreenWidth;
MForm.ScaleBy(screen.width, cScreenWidth);
end
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height
Дальше сам, тут переписывание лоб в лоб, пойди почитай про синтаксис луа, и по наитию получится переписать всё на полуавтомате, не глядя и во сне. А тебе и так и так придётся, раз ковыряешься.
Исправление LINUX-ORG-RU, :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
if (Screen.width and lt > cScreenWidth) or (Screen.PixelsPerInch ~= cPixelsPerInch) then
MForm.scaled = TRUE;
MForm.height = MForm.height * screen.Height / cScreenHeight;
MForm.width = MForm.width * screen.width / cScreenWidth;
MForm.ScaleBy(screen.width, cScreenWidth);
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height
Дальше сам, тут переписывание лоб в лоб, пойди почитай про синтаксис луа, и по наитию получится переписать всё на полуавтомате, не глядя и во сне. А тебе и так и так придётся, раз ковыряешься.
Исправление LINUX-ORG-RU, :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
if (Screen.width > 0 and lt > cScreenWidth) or (Screen.PixelsPerInch ~= cPixelsPerInch) then
MForm.scaled = TRUE;
MForm.height = MForm.height * screen.Height / cScreenHeight;
MForm.width = MForm.width * screen.width / cScreenWidth;
MForm.ScaleBy(screen.width, cScreenWidth);
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height
Дальше сам, тут переписывание лоб в лоб, пойди почитай про синтаксис луа, и по наитию получится переписать всё на полуавтомате, не глядя и во сне. А тебе и так и так придётся, раз ковыряешься.
Исправление LINUX-ORG-RU, :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
if (Screen.width and lt > cScreenWidth) or (Screen.PixelsPerInch ~= cPixelsPerInch) then
MForm.scaled = TRUE;
MForm.height = MForm.height * screen.Height / cScreenHeight;
MForm.width = MForm.width * screen.width / cScreenWidth;
MForm.ScaleBy(screen.width, cScreenWidth);
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height
Дальше сам, тут переписывание лоб в лоб, пойди почитай про синтаксис луа, и по наитию получится переписать всё на полуавтомате, не глядя и во сне. А тебе и так и так придётся, раз ковыряешься.
Исправление LINUX-ORG-RU, :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
if (Screen.width and lt > cScreenWidth) or (Screen.PixelsPerInch ~= cPixelsPerInch) then
MForm.scaled = TRUE;
MForm.height = MForm.height * screen.Height / cScreenHeight;
MForm.width = MForm.width * screen.width / cScreenWidth;
MForm.ScaleBy(screen.width, cScreenWidth);
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height
Дальше сам, тут переписывание лоб в лоб, пойди почитай про синтаксис луа, и по наитию получится переписать всё на полуавтомате, не глядя и во сне. А тебе и так и так придётся, раз ковыряешься.
Исправление LINUX-ORG-RU, :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height
Дальше сам, тут переписывание лоб в лоб, пойди почитай про синтаксис луа, и по наитию получится переписать всё на полуавтомате, не глядя и во сне. А тебе и так и так придётся, раз ковыряешься.
Исправление LINUX-ORG-RU, :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
форума cyberforum
в самой операционной системе windows
Ой чё ща буит, но ты сам виноват :) Хоть бы отредактировал, готовься
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height
Дальше сам, тут переписывание лоб в лоб, пойди почитай про синтаксис луа, и по наитию получится переписать всё на полуавтомате, не глядя и во сне. А тебе и так и так придётся, раз ковыряешься.
Исправление LINUX-ORG-RU, :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
форума cyberforum
в самой операционной системе windows
Ой чё ща буит, но ты сам виноват :) Хоть бы отредактировал, готовься
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height
Дальше сам, тут переписывание лоб в лоб, пойди почитай про синтаксис луа, и по наитию получится переписать всё на полуавтомате, не глядя и во сне.
Исходная версия LINUX-ORG-RU, :
Ты спидраннер чтоль? Обычно они читенжин использую для поиска точек фиксации спидран таймера.
форума cyberforum
в самой операционной системе windows
Ой чё ща буит, но ты сам виноват :) Хоть бы отредактировал, готовься
if (Screen.PixelsPerInch ~= cPixelsPerInch) then
for i = MForm.ControlCount - 1, 0, -1 do
TFooClass(MForm.Controls[i]).Font.Height = (MForm.Font.Height / cFontHeight) *
TFooClass(MForm.Controls[i]).Font.Height;
end
end
Вот это меняй или не меняй на своё, я всю эту хрень первый раз вижу
TFooClass(MForm.Controls[i]).Font.Height