Основная часть пасьянса
Надо указывать все параметры метода, даже если некоторые из них реально и не будут использоваться — ведь компилятор об этом не знает.
После этого с помощью метода MoveCard () надо переложить по одной верхней карте из группы 0 стопок 0-3 в стопки 0-3 группы 2 (пристенок).
void TFormI::NewGame()
{ •
int i , j , p ;
TCard card;
card.Init(0,0) ;
Pack.ShuffleO;
fr'
Cycle = 5;
// инициализировать колодец:
for( i = 0; i < 5; i ++ ) for( j = 0; j < 5; j ++ )
?or( p = 0; p < PACK_TOTAL; p ++ ) Well[i][j][p].Is = false;
. // 4 стопки по 11 карт:
for( i = 0; i < 4; i ++ ) • for( j = 0; j < 11; j ++ ) AddCard(0, i, true, card);
// снятие по одной карте со стен на пристенки:
MoveCard (0,0,2,0);
MoveCard(0, 1, 2, 1) ;
MoveCard (0,2,2,2);
MoveCard(0. 3, 2, 3) ;
}
203