غير لون الانبوت .... كود مسلي يمكن استغلاله

[عبد الهادي بهاب]

السلام عليكم ورحمة الله وبركاته
في هذا الكود ....و ليس بكود معقد
افتح صفحة جديدة فارغة
تمام

الان في حدث On Show

tInputProperties = {};
tInputProperties.Width = 25;
tInputProperties.Height = 25;
for i=1,12 do
tInputProperties.Y = 50;
tInputProperties.X = 50+(i*30);
Page.CreateObject(OBJECT_INPUT, "Input"..i, tInputProperties);
end

for i=1,12 do
tInputProperties.Y = 100;
tInputProperties.X = 50+(i*30);
Page.CreateObject(OBJECT_INPUT, "Inpu"..i, tInputProperties);
end

Page.StartTimer(200);


وفي On Time


color = {"FFCC00","FFCCCC","3366FF","CC99FF","00FF00","000000","0000FF","000FFF","00FFFF","FFFFFF","FF0000","FFFF00","00FF00","00800","000080" };
for i=1,12 do
Input.SetProperties("Input"..i, {BackgroundColor=Math.HexColorToNumber(color[Math.Random(1, #color)])});
Input.SetProperties("Inpu"..i, {BackgroundColor=Math.HexColorToNumber(color[Math.Random(1, #color)])});
end



ثم معاينة

بالتوفيق :abc_152::abc_152:

[abohmam]

جزاك الله خيرا أخانا المحترف

بارك الله فيك وفى جهودك وافكارك المميزة

:abc_152:

[محمد كريم]

بارك الله فيك اخي الكريم