• 🔥 Бесплатный курс от Академии Кодебай: «Анализ защищенности веб-приложений»

    🛡 Научитесь находить и использовать уязвимости веб-приложений.
    🧠 Изучите SQLi, XSS, CSRF, IDOR и другие типовые атаки на практике.
    🧪 Погрузитесь в реальные лаборатории и взломайте свой первый сайт!
    🚀 Подходит новичкам — никаких сложных предварительных знаний не требуется.

    Доступ открыт прямо сейчас Записаться бесплатно

команды

  • Автор темы Автор темы jungl3
  • Дата начала Дата начала
J

jungl3

Объясните пожалуйста , что значат следующие команды :

...
inherited Create;
...
dx:=Round(IntPower(-1,Random(9))); dy:=Round(IntPower(-1,Random(9)));
...


...
xx:=10+Random(Form_Main.ClientWidth-20);
yy:=10+Random(Form_Main.ClientHeight-20);
....
 
Код:
...
inherited Create; //вызываем родительский конструктор
...
dx:=Round(IntPower(-1,Random(9))); //dx = округлить_до_целого((-1) в степени (случайное число от 0 до 9))
dy:=Round(IntPower(-1,Random(9))); //аналогично
...
xx:=10+Random(Form_Main.ClientWidth-20); //xx = случайная координата в пределах клиентской области окна, исключая 10 писк. по краям
yy:=10+Random(Form_Main.ClientHeight-20); //то же самое, только по вертикали
....
 
Это мой 1-й пост поэтому плюс поставить не смогу , но потом сделаю это обязательно . А пока просто спасибо.
 
Мы в соцсетях:

Взломай свой первый сервер и прокачай скилл — Начни игру на HackerLab