qrakis

Informuję uprzejmie, że gdy wchodzę na forum to fora, w których są nowe tematy/posty nie są zaznaczone (strzałka w kółeczku nie jest czerwona). Chociaż czasami oznaczenie jest.

Od razu mówię, że nie korzystam z "Wyloguj".

Napisałem jeszcze jedno demko. Tym razem w Delphi, więc jest bardziej przyjazne.

Demo: wielokat.zip.

Proszę o dodanie lub zamianę załącznika w artykule.

// dodane

Zróbcie FAQ do każdego działu albo do 3/4 z pytaniami i masą linków gdzie co można znaleźć w necie.

Propozycja dobra. Ale równie dobrze sam mógłbyś się zająć zebraniem linków.

Dobrze by było, żebyś zamieścił małe, najprostsze demko, wtedy dodam.

Specjalnie musiałem TP ściągać ;-). Ale proszę bardzo: wielokaty.zip (plik .pas i .exe).

Mam tylko nadzieję, że plik zostanie przeniesiony na serwer Unit1, bo teraz jest na przestrzeni webparku.

Sprawa jest bardzo prosta.

Ogólne wzory na x i y wyglądają tak:

x = R * cos((PI/2 + 2*PI*k) / n)

y = R * sin((PI/2 + 2*PI*k) / n)

Gdzie:

n - liczba wierzchołków

R - promień okręgu, w który wpisany jest wielokąt

k - n kolejnych liczb naturalnych (najlepiej od 0 do n-1)

PI - liczba PI = 3,1415926535897932384626433832795

Oczywiście aby otrzymać wielokąt należy najpierw ustalić n, czyli liczbę wierzchołków. Następnie obliczyć x i y dla n kolejnych liczb k. Na koniec natomiast wyrysować wielokąt łączac ze sobą kolejne wierzchołki.

Demo: wielokaty (.pas/.exe)