[onizuka]

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

[onizuka]

уточню, что это
-> замените на . (точку).
== на =
= на :=
&& на 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

[Nyctos Kasignete]

Сообщение от onizuka

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

Так:

Код:

if (gdFocused in State) then

Сообщение от onizuka

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

Не поняла. Надо смотреть, исходя из контекста программы. Вообще,

Сообщение от Delphi Help

Код:

property OnDrawCell: TDrawCellEvent;

Код:

TDrawCellEvent = procedure (Sender: TObject; ACol, ARow: Longint; Rect: TRect; State: TGridDrawState) of object;

Сообщение от onizuka

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

Потому что процедура эта не требует параметров. Это всё равно что void в C.

Сообщение от onizuka

ругается incompatible types

Во-первых, array — зарезервированное слово. Его нельзя использовать для наименования переменных.
Во-вторых, ничего не понятно.

Сообщение от onizuka

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

К чему косая черта в конце?