IT NEWS PC REVUE PC FORUM FreeBSDInternet time: @184
Obsah fóra
Pravidlá  •  Kontakt  •  Prihlásenie  •  Registrácia

Súťaž o LEGO® duplo®

Vyhrajte prekvapenie pre svoje detičky! LEGO duplo 2 krát deňne do konca mesiaca www.duplo.lego.com

Spoločnosti Online s.r.o.

Ponúkame čisté spoločnosti. Obchodný register vybavíme za vás! www.spolecnostionline.cz

Zbavte sa celulitídy

Vyskúšajte novinky s Q10 od NIVEA Viditeľné výsledky už za 2 týždne. www.NIVEA.sk

Zaregistruj sa!

Tvoj názor sa ráta a oplatí! Pridaj sa a vyhraj iPad. www.marketagent.com

Všetko za 9,90€

obľúbené Topshop produkty za skvelú cenu len 9,90€! Kliknite a nakupujte. Topshop www.topshop.sk

Vlastny Styl Formulara V Delphi7

Zaslať odpoveď
AutorSpráva
KViki
Užívateľ
Užívateľ

Založený: 21.10.2008
Príspevky: 197
Bydlisko: Nitra

PríspevokZaslal: Št 12.03.09 14:37Odpovedať s citátomNávrat hore

da sa nejak spravit vlastny styl formulara ako napr.:
Zobraziť informácie o autoroviOdoslať súkromnú správuOdoslať e-mailICQ
Fico
Skúsený užívateľ
Skúsený užívateľ

Založený: 11.01.2009
Príspevky: 1052

PríspevokZaslal: Št 12.03.09 17:14Odpovedať s citátomNávrat hore

No neviem presne, ale podľa mňa to je iba o komponente TImage, pričom máš ošetrené udalosti ako OnMouseMove (napr. zosvetlenie alebo zmenenie daného image-u) OnClick atd. Ja som riešil grafické rozhrania zatiaľ iba takto, no neviem, možno existuje aj iné riešenie. V každom prípade, pomocou TImage sa to dá dosiahnúť.
Zobraziť informácie o autoroviOdoslať súkromnú správuICQ
KViki
Užívateľ
Užívateľ

Založený: 21.10.2008
Príspevky: 197
Bydlisko: Nitra

PríspevokZaslal: Št 12.03.09 23:10Odpovedať s citátomNávrat hore

hej ,.ale oble okraje alebo prerusovane ako ma napriklad winamp,.,. sa s tim nedaju robit,.,. rozumies,. ale diky,.
Zobraziť informácie o autoroviOdoslať súkromnú správuOdoslať e-mailICQ
max-m
Užívateľ
Užívateľ

Založený: 17.01.2008
Príspevky: 650
Bydlisko: Žilina

PríspevokZaslal: Št 12.03.09 23:24Odpovedať s citátomNávrat hore

co sa tyka tych oblych okrajov a "divnych" tvarov okien: ja sice pracujem s Visual Basicom, no taketo veci riesim pomocou softu WinRazor, ktory je tusim robeny aj pre Delphi (http://www.softpedia.com/get/Programming/Other-Programming-Files/WinRazor-SDK.shtml)

_________________
Mac Book Pro 15.4", CPU: Intel Core 2 Duo 2.8 GHz, RAM: 4GB DDR3, HDD: 500 GB, VGA: 512MB GDDR3, OS: Mac OS X Lion; Mobil: iPhone 3GS 16GB
Zobraziť informácie o autoroviOdoslať súkromnú správuSkypeFacebookTwitterZobraziť autorove WWW stránky
KViki
Užívateľ
Užívateľ

Založený: 21.10.2008
Príspevky: 197
Bydlisko: Nitra

PríspevokZaslal: Pi 13.03.09 12:04Odpovedať s citátomNávrat hore

no len skoda,. ze mi ten program na Viste nejde nainstalovat,.,.
Zobraziť informácie o autoroviOdoslať súkromnú správuOdoslať e-mailICQ
max-m
Užívateľ
Užívateľ

Založený: 17.01.2008
Príspevky: 650
Bydlisko: Žilina

PríspevokZaslal: Pi 13.03.09 12:12Odpovedať s citátomNávrat hore

aha...

winrazor nefrci pod vistou? hmmm, som ho pouzival uz davnejsie (na WinXP). no mozno najdes podobny nastroj (alebo rozbehas winrazora)

_________________
Mac Book Pro 15.4", CPU: Intel Core 2 Duo 2.8 GHz, RAM: 4GB DDR3, HDD: 500 GB, VGA: 512MB GDDR3, OS: Mac OS X Lion; Mobil: iPhone 3GS 16GB
Zobraziť informácie o autoroviOdoslať súkromnú správuSkypeFacebookTwitterZobraziť autorove WWW stránky
Fico
Skúsený užívateľ
Skúsený užívateľ

Založený: 11.01.2009
Príspevky: 1052

PríspevokZaslal: Pi 13.03.09 13:58Odpovedať s citátomNávrat hore


To vy si hovoríte programátori? Používať nejaké programy, ak neviete niečo sami? Zaujímavé. No ale to je vaša vec ...

Neobdĺžníkový formulár vyriešiš takto:

1.) Tento kód ti vytvorí z formulára elipsu

kód:


var
 R : HRgn;
begin
 R := CreateEllipticRgn(0, 0, Width, Height);
 SetWindowRgn(Handle, R, True);
end;



2.) Elipsu si nechcel, to len aby si videl, že aj na to sú funkcie, netreba žiadne "múdre" programy Vytvoriť takýto oblý vzhľad je trochu ťažšie, musíš totiž definovať každý bod ako prvok poľa. Potom pomocou CreatePolygonRgn vytvoríš daný vzhľad. Čím viac bodov, tým presnejšie (ale aj pomalšie - samozrejme)

kód:


var
 R : HRgn;
 Body: array[0..2] of TPoint;
begin
 Body[0]:= Point(0, 0);
 Body[1]:= Point(300, 0);
 Body[2]:= Point(100, 200);
 R := CreatePolygonRgn(Body, 3, ALTERNATE);  // 3 znamená, že pole ma 3 údaje
 SetWindowRgn(Handle, R, True);
end;



A ešte k tým prerušovným okrajom, ako má Winamp. Neviem ako si myslel to prerušovanie, ale ak tým myslíš prerušované blikanie, rieši sa to pomocou AlphaBlendValue.
Zobraziť informácie o autoroviOdoslať súkromnú správuICQ
max-m
Užívateľ
Užívateľ

Založený: 17.01.2008
Príspevky: 650
Bydlisko: Žilina

PríspevokZaslal: Pi 13.03.09 14:24Odpovedať s citátomNávrat hore

kenny8911 napísal:

To vy si hovoríte programátori? Používať nejaké programy, ak neviete niečo sami? Zaujímavé. No ale to je vaša vec ...


... ja uz len tak na okraj. snazil som sa ulahcit KVikimu pracu (netusim ako dobre ovlada Delphi). Ja som to niekedy riesil cez tento soft (winrazor) no kedze som v priebehu 5rokov vo VB dost pokrocil taketo veci uz neriesim pomocou nejakych "externych" softov ale tiez priamo kodom...

_________________
Mac Book Pro 15.4", CPU: Intel Core 2 Duo 2.8 GHz, RAM: 4GB DDR3, HDD: 500 GB, VGA: 512MB GDDR3, OS: Mac OS X Lion; Mobil: iPhone 3GS 16GB
Zobraziť informácie o autoroviOdoslať súkromnú správuSkypeFacebookTwitterZobraziť autorove WWW stránky
Fico
Skúsený užívateľ
Skúsený užívateľ

Založený: 11.01.2009
Príspevky: 1052

PríspevokZaslal: Pi 13.03.09 14:48Odpovedať s citátomNávrat hore

OK, ja sa nehádam, ja iba, že práve fórum je na to, aby sa človek naučil to, čo nevie a aby predišiel používaniu iných programov.
Zobraziť informácie o autoroviOdoslať súkromnú správuICQ
Zobraziť príspevky z predchádzajúcich:    
Zaslať odpoveď
Nemôžete pridávať nové témy do tohto fóra.
Nemôžete odpovedať na témy v tomto fóre.
Nemôžete upravovať svoje príspevky v tomto fóre.
Nemôžete mazať svoje príspevky v tomto fóre.
Nemôžete hlasovať v tomto fóre.

Powered by phpBB 2.x.x © 2005 - 2012 PCforum, webhosting by WebSupport, edited by JanoF

SEO - optimalizácia pre vyhľadávače

Freebsd