Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Kako da ulepsam svoju formu u delphi-u?

[es] :: Pascal / Delphi / Kylix :: Kako da ulepsam svoju formu u delphi-u?

[ Pregleda: 2272 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Vladica Savić
Software Developer
Toronto, Canada

Član broj: 26699
Poruke: 654



+5 Profil

icon Kako da ulepsam svoju formu u delphi-u?17.05.2004. u 14:54 - pre 213 meseci
Caos ljudi ako neko zna kako da ulepsam formu u delphi-u, pre svega mislim na njen obik javi te.
 
Odgovor na temu

Kula
Sarajevo

Član broj: 27058
Poruke: 15
*.as58.ob.bih.net.ba.



Profil

icon Re: Kako da ulepsam svoju formu u delphi-u?24.05.2004. u 01:50 - pre 213 meseci
Trazio sam nesto po netu i slucajno naletio na ovaj SC pa reko ako te zanima. Nema bas vremena za neko objasnjenje ali pregledaj SC valjda ce ti biti jasno. Kod mene radi savrseno jos malo sminke ;) i sve ce biti Cool !!!!

procedure TForm1.FormCreate(Sender: TObject);
Var
R,R2,R3 : HRgn;
P : array[0..11] of TPoint;
begin
Form1.Color:=clBlack;
Form1.Width:=240;
Form1.Height:=120;
//Creating Poligon
P[0]:=Point(0,20); { }
P[1]:=Point(0,100); { P[7] P[6] }
P[2]:=Point(20,120); { ________________ }
P[3]:=Point(220,120); {P[0,8]/ \ }
P[4]:=Point(240,100); { | | P[5] }
P[5]:=Point(240,20); { | | }
P[6]:=Point(220,0); { P[1]| | P[4] }
P[7]:=Point(20,0); { \________________/ }
P[8]:=Point(0,20); { P[2] P[3] }
R:=CreatePolygonRgn(P,9,Alternate);
//Creating Ellipse
R2:=CreateEllipticRgn(50,50,190,70);
//Creating Rectangle
R3:=CreateRectRgn(20,35,220,40);
//P[All]-Ellipse
CombineRgn(R,R,R2,RGN_DIFF);
//(P[All]-Ellipse) - Rectangle
CombineRgn(R,R,R3,RGN_DIFF);
//Turning on the transparency
SetWindowRgn(Handle,R,True);
end;
Heaven & Hell
mailto:[email protected]
 
Odgovor na temu

Crazy Mix
Nemanja Avramovic
QuadraSoft
Mladenovac

Član broj: 7103
Poruke: 331
*.telekom.yu

ICQ: 266136396
Sajt: www.quadrasoft.co.sr


Profil

icon Re: Kako da ulepsam svoju formu u delphi-u?24.05.2004. u 21:46 - pre 213 meseci
Billenium effects: http://www.billeniumsoft.com/

Ako nije ovaj url, ima na http://www.torry.net/, pa tamo... forme, pa efekti...
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: Kako da ulepsam svoju formu u delphi-u?

[ Pregleda: 2272 | Odgovora: 2 ] > FB > Twit

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.