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

TImage i crtanje, transparent

[es] :: Pascal / Delphi / Kylix :: TImage i crtanje, transparent

[ Pregleda: 927 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

FranjoZG
Franjo Popović
Programer
Zagreb

Član broj: 328819
Poruke: 298
*.adsl.net.t-com.hr.



+4 Profil

icon TImage i crtanje, transparent19.06.2019. u 10:37 - pre 58 meseci
Na formu postavimi TImage. Transparent := true;
Dok ne crtam po njemu - proziran je.
Nakon što nacrtam bilo što na njemu, pozadina TImage postaje bijela.
Code:

Image1.Canvas.MoveTo(0,0);
Image1.Canvas.LineTo(100,100); 


Što napraviti da i nakon crtanja po Image-u ustane proziran.

Ili možda druga ideja umjesto crtanja po Image-u? Trebam na formi napraviti dijagram gdje je dosta povezivanja sa strelicama između "kućica". Za strelice sam mislio upotrijebiti TImage.
 
Odgovor na temu

savkic
Igor Savkić

Moderator
Član broj: 92186
Poruke: 2739



+92 Profil

icon Re: TImage i crtanje, transparent19.06.2019. u 13:12 - pre 58 meseci
> Dok ne crtam po njemu - proziran je.
> Nakon što nacrtam bilo što na njemu, pozadina TImage postaje bijela.

Da li si postavio Transparent na True? Nisam probao sa crtanjem po canvasu ali radi kad se ucita TBitmap sa belom pozadinom.

 
Odgovor na temu

FranjoZG
Franjo Popović
Programer
Zagreb

Član broj: 328819
Poruke: 298
*.adsl.net.t-com.hr.



+4 Profil

icon Re: TImage i crtanje, transparent19.06.2019. u 13:36 - pre 58 meseci
Da, postavio sam Transparent := true

Kada učitam bitmap sliku, transparent je ok, ali ako crtam, automatski se pozadina postavi na bijelo.

Probao sam se igrati sa kaslom nasljednikom TGraphicControl. Ona ne postavlja pozadinu u bijelo, ali mi se ne da slagati cijelu klasu kad mi je TImage OK. Samo da nađem način kako da ostane transparentan.
 
Odgovor na temu

Rapaic Rajko
Bgd

Član broj: 4105
Poruke: 810
31.223.145.*



+62 Profil

icon Re: TImage i crtanje, transparent21.06.2019. u 14:14 - pre 58 meseci
Pogledaj TBitmap.Transparent i TBitmap.TransparentColor, i kako se postavlja ovo drugo (automatski/rucno).
Ti si svojim crtanjem (pixel(0, 0)) upravo 'pregazio' tekuci TransparentColor ili vec nesto slicno, zato i gubitak transparencije (?)

Pozz

P.S. U help-u D7 ima ovo detaljno objasnjeno.
 
Odgovor na temu

Milan Milosevic

Član broj: 67
Poruke: 932
172.68.51.*



+31 Profil

icon Re: TImage i crtanje, transparent23.06.2019. u 04:56 - pre 58 meseci
Koristi TPaintBox


Code:

procedure TForm1.PaintBox1Paint(Sender: TObject);
begin
     PaintBox1.Canvas.MoveTo(0,0);
   PaintBox1.Canvas.LineTo(100,100);
end;
 
Odgovor na temu

[es] :: Pascal / Delphi / Kylix :: TImage i crtanje, transparent

[ Pregleda: 927 | Odgovora: 4 ] > FB > Twit

Postavi temu Odgovori

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