• 15 апреля стартует «Курс «SQL-injection Master» ©» от команды The Codeby

    За 3 месяца вы пройдете путь от начальных навыков работы с SQL-запросами к базам данных до продвинутых техник. Научитесь находить уязвимости связанные с базами данных, и внедрять произвольный SQL-код в уязвимые приложения.

    На последнюю неделю приходится экзамен, где нужно будет показать свои навыки, взломав ряд уязвимых учебных сайтов, и добыть флаги. Успешно сдавшие экзамен получат сертификат.

    Запись на курс до 25 апреля. Получить промодоступ ...

Помогите с синтаксисом

  • Автор темы yammi
  • Дата начала
Статус
Закрыто для дальнейших ответов.
Y

yammi

Всем привет! Я плохо программирую и не могу найти встроенный русский хелп для делфи и билдера (там ещё есть delphi и builder примеры для разных комманд, но только builder показывается..)...

Надо из билдера в дельфи код переделать, вот эти 3 места не знаю как записать на дельфи, помогите, пожалуйста)


if (State.Contains(gdFocused))
DrawGrid1->Canvas->DrawFocusRect(Rect);



DrawGrid1->OnDrawCell;
DrawGrid1->Repaint();


if (array[X][Y]==2&&(ProvLife(X,Y)<2||ProvLife(X,Y)>3)) /
array[X][Y]=3;
if (array[X][Y]==0&&ProvLife(X,Y)==3)
array[X][Y]=1;
 
Y

yammi

уточню, что это
-> замените на . (точку).
== на =
= на :=
&& на AND
|| на OR
я знаю, проблема в другом...



if (State.Contains(gdFocused)) // как это в дельфи написать?
DrawGrid1->Canvas->DrawFocusRect(Rect);

Drawgrid.OndrawCell; - без параметров?
DrawGrid1.Repaint(); - почему тут пустые скобки?..

if (array[X][Y]==2&&(ProvLife(X,Y)<2||ProvLife(X,Y)>3)) /
array[X][Y]=3;
if (array[X][Y]==0&&ProvLife(X,Y)==3)
array[X][Y]=1;

if (arr[X,Y]=2) and ((ProvLife(X,Y)<2) or (ProvLife(X,Y)>3)) then arr[X,Y]:=3;
if (arr[X,Y]=0) and (ProvLife(X,Y)=3) then arr[X,Y]:=1;

- ругается incompatible types
 
E

etc

Вам жеж на другом форуме помогли ...
 
Статус
Закрыто для дальнейших ответов.
Мы в соцсетях:

Обучение наступательной кибербезопасности в игровой форме. Начать игру!