R. A. Yusupov C++ Builderda masalalar va topshiriqlar samarqand 2018 yil

return;

}

if ((Pole[col][row]>=100) && (Pole[col][row]<200)){

// katak ochilgan – rasmni qo’yish

// Pole[col,row] =- rasmlar nomeri + 100,

// bu yerda 100 - признак того, что клетка открыта

// определим положение картинки в Pictures

src = Bounds((Pole[col][row]-100 )*WK,0,WK,HK);

// formadagi rasmlar (kataklar) koordinatalari

dst = Bounds(x,y,HK-2,WK-2);

// katakka rasmni chiqarish

Form1->Canvas->CopyRect(dst,Pictures->Canvas,src);

// katak konturini qayta chizish

Canvas->Pen->Color = clBlack;

Canvas->Brush->Style = bsClear;

Canvas->Rectangle(x,y,x+WK-2,y+HK-2);

return;

}

if ((Pole[col][row]>=0) && (Pole[col][row]<100))

// katak yopiq, faqat konturni chizish

{

Canvas->Brush->Color = clBtnFace;

Canvas->Pen->Color = clBlack;

Canvas->Rectangle(x,y,x+WK-2,y+HK-2);

}

#ifdef DEBUG

// eslatma – rasmlar nomerlari

Canvas->Font->Color = clBlack;

Canvas->TextOut(x+15,y+15, IntToStr(Pole[col][row]));

#endif

}

// sichqoncha tugmasini bosish

void __fastcall TForm1::FormMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift, int X, int Y)

{