Помогите с синтаксисом, как код Builder в дельфи записать?

← →
yammi © (2009-03-30 18:57) [0]

Всем привет! Я плохо программирую и не могу найти встроенный русский хелп для делфи и билдера (там ещё есть 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;
Редактировать/Удалить сообщение

← →
Джо © (2009-03-30 20:10) [1]

-> замените на . (точку).
== на =
= на :=
&& на AND
|| на OR

← →
yammi © (2009-03-30 20:27) [2]

это я знаю, спасибо.... ) много уже переделал, тут другой вопрос

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

← →
Б (2009-03-30 20:37) [3]

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

If State.Contains(gdFocused) then DrawGrid1.Canvas.DrawFocusRect(Rect);

> Drawgrid.OndrawCell; - без параметров?

Это же свойство.

> DrawGrid1.Repaint(); - почему тут пустые скобки?..

Можно их убрать, а можно и оставить.
Сделано это для того, чтобы переход C-шных программистов был менее болезненым. ;)

← →
yammi © (2009-03-30 20:39) [4]

Спасибо за реакцию, буд стараться) и хелп уже нашёл нормальный :)

← →
Джо © (2009-03-30 20:41) [5]

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

if (gdFocused in State) then

← →
Б (2009-03-30 20:46) [6]

> хелп уже нашёл нормальный :)

Будь добр, скинь ссылку. ;)

← →
yammi © (2009-03-30 20:47) [7]

If State.Contains(gdFocused) then DrawGrid1.Canvas.DrawFocusRect(Rect);
ругается "Record, object or class type required"

Drawgrid1.Ondrawcell; - так ругается "Not Enough actual parameters"

← →
yammi © (2009-03-30 20:49) [8]

http://www.google.ru/search?q=delphi+%D1%80%D1%83%D1%81%D1%81%D0%BA%D0%B8%D0%B9+%D1%85%D0%B5%D0%BB%D0%BF&hl=ru&client=firefox-a&rls=org.mozilla:ru:official&hs=8df&newwindow=1&start=0&sa=N

http://rl-team.net/compbook/1146201978-russkijj-help-dlja-delphi-7.html
http://www.mycomp.ru/page.aspx?t=6006&p=1

← →
yammi © (2009-03-30 20:51) [9]

> > if (State.Contains(gdFocused)) // как это в дельфи
> написать?
>
> if (gdFocused in State) then

спасибо, а что это вообще?

← →
Б (2009-03-30 20:53) [10]

> спасибо, а что это вообще?

State указывает состояние компонента.
gdFocused - компонент в фокусе.

← →
KilkennyCat © (2009-03-30 22:21) [11]

> > Drawgrid.OndrawCell; - без параметров?
>
> Это же свойство.

Свойство?!

← →
KilkennyCat © (2009-03-30 22:24) [12]

> DrawGrid1.Repaint(); - почему тут пустые скобки?..

Правило синтаксиса С для процедур и функций.

> yammi © (30.03.09 20:47) [7]

> Drawgrid1.Ondrawcell; - так ругается "Not Enough actual
> parameters"

Потому что не свойство. Процедура (события) , соответсвенно, onDrawCell(Sender: TObject; ACol, ARow: Integer; Rect: TRect; State: TGridDrawState);

А если снова будет вопрос, почему там без параметров, а тут с параметрами, то возникает вопрос, а не из генофонда ли в приложение попытка писать?

← →
Б (2009-03-30 22:39) [15]

> KilkennyCat ©

> Свойство?!

Ой, да. Это обработчик.
Ему можно присвоить такой же обработчик другого объекта. (Деллигилирование).

> KilkennyCat (30.03.2009 22:24:12) [12]

В Си нет процедур.

Помогите с синтаксисом, как код Builder в дельфи записать? Найти похожие ветки