Problem z napisaniem prostej gry - losowanie

[gregory]

Najlepiej będzie jak załączę swój projekt, bo nie wiem co może być przyczyną.

[Cyfrowy Baron]

Po pierwsze to:

Kod: Zaznacz cały

delete [] kulki;

jest nieprawidłowe.

---

Nie ma błędu w kodzie, to Ty popełniłeś błąd. Obiekt Panel 1 ma wysokość (Height) 81 a w kodzie mamy:

Kod: Zaznacz cały

kulki[i]->Top = 137;

czyli 137! Musisz więc zwiększyć wysokość obiektu Panel1, albo wyżej rysować kulki. Jeżeli kulki mają być wyśrodkowane w pionie to można to zrobić tak:

Kod: Zaznacz cały


void __fastcall TForm1::FormCreate(TObject *Sender)
{
    int left = 90;
    for(int i = 0; i < 6; i++)
    {
        kulki[i] = new TShape(this);
        kulki[i]->Parent = Panel1;
        kulki[i]->Shape = stEllipse;
        kulki[i]->Width = 58;
        kulki[i]->Height = 58;
        kulki[i]->Left = left;
        kulki[i]->Top = (Panel1->Height - kulki[i]->Height) / 2;
        left += 85;
    }
}
 

I działa

[gregory]

Po pierwsze to:

Kod: Zaznacz cały

delete [] kulki;

jest nieprawidłowe.

Dlaczego jest to nieprawidłowe? Przecież kulki to tablica? A powinno być delete kulki?

Nie ma błędu w kodzie, to Ty popełniłeś błąd. Obiekt Panel 1 ma wysokość (Height) 81 a w kodzie mamy:

Kod: Zaznacz cały

kulki[i]->Top = 137;

czyli 137! Musisz więc zwiększyć wysokość obiektu Panel1, albo wyżej rysować kulki.

Nawet nie wiedziałem, że jest jakaś zależność między wysokością panelu a wysokością obiektów TShape.
W każdym razie wielkie dzięki, męczyłem się z tym a teraz to już mogę brać się za dalszą robotę.

[polymorphism]

Dlaczego jest to nieprawidłowe?

Dlatego, że kulki to tablica statyczna, więc zwalniać jej nie możesz.

[Cyfrowy Baron]

Nawet nie wiedziałem, że jest jakaś zależność między wysokością panelu a wysokością obiektów TShape.

Z tej wypowiedzi wnioskuję, że nie rozumiesz zależności między parent - child. Nie chodzi o wysokość obiektów kulki lecz o ich pozycję Top. Obiekty kulki typu TShape mają za rodzica obiekt Panel, więc koordynaty, tutaj Top i Left muszą być określane względem obiektu Panel1 a nie GroupBox1, gdyż to Panel1 jest ich rodzicem. Koordynaty obiektu określasz zawsze względem lewego górnego rogu rodzica (Parent) i nie ma znaczenia, że ma on innego rodzica niż formularz. Gdybyś umieścił kulki na formularzu wtedy podałbyś koordynaty względem formularza, gdybyś umieścił je na GroupBox1 wtedy określiłbyś je względem GropuBox1, a ponieważ umieściłeś je na Panel1 to określasz koordynaty względem Panel1.

A teraz zastanów się, Panel1 ma wysokość (Height) 81, a Ty umieszczasz kulki na wysokości (Top) 131, czyli poniżej obszaru roboczego (widocznego) obiektu Panel1, więc one tam są, ale ponieważ znajdują się poza obszarem roboczym to ich nie widać.