[Delphi] Zaokrąglenie formy i komponentów

0

witam wszystkich na forum i czytających tego posta[cya] [cya] . mam problemik. W jaki sposób mogę zaokraglić rogi formy i innych komponentów. Wiem, że to już padło na forum ale niemoge naleźć rozwiąnia, wyszukiwarka nie znajduje tego zagadnienia.
Z góry dzięki za pomoc. [cya] [cya] :d

0

W komponentach jest chyba CoolForm on zaokrągla formę.

0

W komponentach jest chyba CoolForm on zaokrągla formę.

A NIE MA jakiegoś sposobu nie wymagającego instalacji komponentów.

0

Spróbuj tak:

SetWindowRgn(Handle,CreateEllipticRgn(0, 0, Width, Height), True);

:-)

0

Spróbuj tak:

SetWindowRgn(Handle,CreateEllipticRgn(0, 0, Width, Height), True);

TO działa ale robi mi z formy elipsę a ja chciałbym uzyskać taki efekt jak np. w gg gdzie są lekko zaokrąglone rogi. Ale i tak dzięki może coś innego wykombinuję [cya] [cya]

0

Zamiast CreateEliptic... daj CreateRoundRectRgn :).

0

Zamiast CreateEliptic... daj CreateRoundRectRgn :).

to dziwne ale niechce mi pójść ;-( ;-( ;-( ;-( zamiast tego wyskakuje:[Fatal Error] Project2.dpr(5): Could not compile used unit 'Unit1.pas'
Co jest nie tak ???

0

Heh ... Ale nie przecztałeś widocznie do końca tego co cichciał powiedzieć kompil. :-D Brakowało dwóch parametrów wpisz tak:
SetWindowRgn(Handle,CreateRoundRectRgn(0,0,Width,Height,70,70),True);

;-)

0

Heh ... Ale nie przecztałeś widocznie do końca tego co cichciał powiedzieć kompil.

Zauwarzyłbym to gdybym programował w Delphi przynajmniej kilka miechów a ja dopiero się tym zajmuję na powarznie od 6 tygodni.

Proszę powiedz mi jak to dostować dybym naprzykład chciał tak prekształcić np. przycisk lub inny komponent ??

1

Eh... Proste :
np. Button1
Wpisujesz :
SetWindowRgn(Button1.Handle,CreateRoundRectRgn(0,0,Width,Height,70,70),True);

:-)

0

Pochwalony!
Aby zmienić wygląd jakichś komponentów, w pierwszym parametrze procedury SetWindowRGN musisz podać uchwyt - nazwa komponentu który chcesz pozaokrąglać, oraz .handle, co oznacza właśnie ten uchwyt :)

0

Dzięki Rudy [cya] [cya] [cya]
Dziękuję także pozostałym za rozwiązanie mojego prroblemu.
Właśnie teraz wpadłem na świetny pomysł :)

1 użytkowników online, w tym zalogowanych: 0, gości: 1