[es] - Kako labela custom boje

mrkvojed

Član broj: 38336
Poruke: 43
*.ptt.yu.

Profil

^{21.04.2005. u 21:08 - pre 231 meseci}

To je to . Dakle. kako da mi labela ima custom boju pozadine i fonta.
Imam JEDI VCL ali ni tu nisam nasao.
Verovatno mi je promaklo.

Pozz svima

PS: Koja je razlika ako crtam .bmp ili .png . Sta je brze , manje ...
png moze da bude providno , a bmp ne - ili se varam

Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

Re: Kako labela custom boje

^{21.04.2005. u 21:54 - pre 231 meseci}

Boja pozadine = property Color
Boja fonta = property Font.Color

pa ih postavi kako zelis

Play Store

Odgovor na temu

bancika
Branislav Stojkovic

Član broj: 24844
Poruke: 631
213.244.208.*

Sajt: www.diy-fever.com

+1 Profil

Re: Kako labela custom boje

^{22.04.2005. u 02:29 - pre 231 meseci}

moze i bmp da bude providna, najlakse je da je stavis u TImage, postavis svojstvo transparent na true i onda se svi pixeli koji su obojeni kao onaj u donjem desnom uglo naprave providnim

Ride the rainbow, crack the sky

DIY gitare, pojacala i efekti www.diy-fever.com

Odgovor na temu

Vdjuric
Vladimir Djuric
student
Beograd

Član broj: 20863
Poruke: 64
*.dial.InfoSky.Net.

Sajt: www.marettasoftware.com

Profil

Re: Kako labela custom boje

^{22.04.2005. u 09:36 - pre 231 meseci}

Citat:

bancika: moze i bmp da bude providna, najlakse je da je stavis u TImage, postavis svojstvo transparent na true i onda se svi pixeli koji su obojeni kao onaj u donjem desnom uglo naprave providnim

Moram i ja da se umesam... kako iscrtati BMP, bez timage komponente (koji, naravno treba da bude transparentan - tj. jedna boja u njemu treba da bude transparentna) na canvas npr. paintboxa ? Petljao sam se svojevremeno sa ovim i nikako mi nije poslo za rukom... :(
poz

Odgovor na temu

mrkvojed

Član broj: 38336
Poruke: 43
*.ptt.yu.

Profil

Re: Kako labela custom boje

^{22.04.2005. u 16:28 - pre 231 meseci}

Citat:

da je stavis u TImage, postavis svojstvo transparent na true i onda se svi pixeli koji su obojeni kao onaj u donjem desnom uglo naprave providnim

Ovo sam probao - ali nece bre !?!
1) Na formi Timage
2) loadFromFile('... .bmp')
3) image1.Transparent := True ;
i nece.

Sta sam nocas propustio

Odgovor na temu

mrkvojed

Član broj: 38336
Poruke: 43
*.ptt.yu.

Profil

Re: Kako labela custom boje

^{22.04.2005. u 22:56 - pre 231 meseci}

Kod mene se radi o donjem LEVOM uglu. Verovatno mi je
levoruk Radovan (ime racunara)

Radi lepo.

Jos kad stavis

Code:
Form1.Brush.Style := bsClear ;

vidi se desktop !!! Lepo, fino i krasno ...

Hvala i pozdrav svima

Odgovor na temu

bancika
Branislav Stojkovic

Član broj: 24844
Poruke: 631
213.244.208.*

Sajt: www.diy-fever.com

+1 Profil

Re: Kako labela custom boje

^{23.04.2005. u 01:37 - pre 231 meseci}

izvini, moja greska, i treba levi ugao...

svojevremeno smo ja i drug pisali po rukama koja je leva a koja desna da ne dodje do zabune :lol:

a sto se tice transparentnog iscrtavanja, znam dva nacina:
1) da source canvasu posaljes poruku (ne secam se koju

)
2) da koristis pomocni TImageList, proces bi iso ovako
-postavis mu property koji kaze kako se crta na nesto transparent, ne secam se tacno, videces vec
-postavis mu dimenzije na dimenzije slike
-dodas slicicu sa maskiranom bojom koju hoces da proglasis providnom, ima par overloadovanih metoda, mozes i da napravis bitmap masku (crno providno, ostalo nije, ili obrnuto)
-i onda samo iscrtas.
to sigurno radi, probao sam pre

Ride the rainbow, crack the sky

DIY gitare, pojacala i efekti www.diy-fever.com

Odgovor na temu

mrkvojed

Član broj: 38336
Poruke: 43
*.ptt.yu.

Profil

Re: Kako labela custom boje

^{23.04.2005. u 11:52 - pre 231 meseci}

Ne osvezava mi bitmap ?

Imam Image1 preko cele forme.
U nju stavim "pozadina.bmp" sa crnim coskovima (kao da bude zaobljena).
U FormCreate kazem :
Form1.Brush.Style := bsClear ;
Image1.Picture.LoadFromFile(ExtractFilepath(application.ExeName)+'Bitmaps\pozadina.bmp');
Image1.Transparent := True ;
I to lepo radi kada se Aplikacija pokrene. ALI : cim neki prozor recimo EXPLORER
otvorim,pa minimizujem - U TIM "PROVIDNIM" REGIONIMA MI OSTANU KOMADI EXPLORERA.

'bem li mu familiju !

Probao sam repaintove i refreshove na Image1 i na Form1 al' nece pa nece ...

Pomagajte... ako moze kodom

Odgovor na temu

IgLo
Igor Lovric
Sremski Karlovci

Član broj: 19524
Poruke: 129
*.neobee.net.

Sajt: www.unicornsoft.net

Profil

Re: Kako labela custom boje

^{23.04.2005. u 12:30 - pre 231 meseci}

A da probas sa ovim:

Code:

procedure TForm1.FormCreate(Sender: TObject);
begin
  Form1.Color := clFuchsia;
  Form1.TransparentColorValue := clFuchsia;
  Form1.TransparentColor := True;
end;

Koliko se secam ovo resenje (kao i tvoje) ne radi pod Win98

Odgovor na temu

Srki_82
Srdjan Tot
Me @ My Home
Ljubljana

Član broj: 28226
Poruke: 1403
82.208.201.*

ICQ: 246436949

+10 Profil

Re: Kako labela custom boje

^{23.04.2005. u 12:44 - pre 231 meseci}

Pogledaj ovo http://dhost.info/avram/srpskisoftware/opis.php?id=5
Tako sam pravio prozore nepravilnog oblika koji rade na Win9x, WinNT, Win2000... Koristi se finkcije SetWindowReg

Play Store

Odgovor na temu

mrkvojed

Član broj: 38336
Poruke: 43
*.ptt.yu.

Profil

Re: Kako labela custom boje

^{23.04.2005. u 13:51 - pre 231 meseci}

Evo resenjnjnja !
Koji sam ja babun - bilo mi je pred nosom

Dakle za eventualne buduce citaoce :

1) Jv Forms -> JvTransparentForm
2) Active -> True , AutoSize -> True
3) za Mask izaberes .bmp (po principu levog donjeg ugla)
4) Ne mora Form1.Brush.Style := bsClear ;
5) Napravish Image1 i upucas .bmp

Toliko. Hvala svima. Pozdrav.

Odgovor na temu

Nemanja Avramović
Engineering Manager
MENU Technologies
Beograd, Srbija

Član broj: 32202
Poruke: 4391
*.yu1.net.

Sajt: https://avramovic.info

+46 Profil

Re: Kako labela custom boje

^{23.04.2005. u 19:09 - pre 231 meseci}

pa to...

uz delphi 6 dobijas dxforumlibrary koji moze da `iskroji` prozor po bitmapi i mnogo je lepo ;)

Laravel Srbija.

_{[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]}

Odgovor na temu