|
|
 | Panel
Fra : Henning Madsen |
Dato : 02-09-07 19:38 |
|
Er det mugligt at tegne på et panel,
ligesom på Formen eller en Image
Image1.Canvas.Pen.Color := clGreen;
Image1.Canvas.Brush.Color := clGreen;
Image1.Canvas.Rectangle(0,20,20,40);
m.v.h.
Henning
| |
 Uffe Kousgaard (03-09-2007)
| Kommentar
Fra : Uffe Kousgaard |
Dato : 03-09-07 09:34 |
|
Nej, TPanel har ikke en canvas.
"Henning Madsen" <hkjeldm@mail.dk> wrote in message
news:46db00b5$0$22901$edfadb0f@dread12.news.tele.dk...
> Er det mugligt at tegne på et panel,
> ligesom på Formen eller en Image
>
> Image1.Canvas.Pen.Color := clGreen;
> Image1.Canvas.Brush.Color := clGreen;
> Image1.Canvas.Rectangle(0,20,20,40);
>
> m.v.h.
> Henning
>
>
| |
Konrad (01-10-2007)
| Kommentar
Fra : Konrad |
Dato : 01-10-07 20:08 |
|
Uffe Kousgaard wrote:
> Nej, TPanel har ikke en canvas.
TCustomPanel(panel).canvas
....
| |
nic@aub.dk (20-09-2007)
| Kommentar
Fra : nic@aub.dk |
Dato : 20-09-07 13:19 |
|
Jo, TPanel har en canvas. Det er bare en protected som derfor ikke kan
ses.
Tricket er at nedarve fra TPanel:
type
TPanel2=class(TPanel)
end;
Nu kan man typecaste ethvert panel til TPanel2 klassen, og derved
skrive til canvas
TPanel2(panel).Canvas.Pixels[0, 0]:=clBlack;
/Nic
On 3 Sep., 10:33, "Uffe Kousgaard" <o...@no.no> wrote:
> Nej, TPanel har ikke en canvas.
>
> "Henning Madsen" <hkje...@mail.dk> wrote in message
>
> news:46db00b5$0$22901$edfadb0f@dread12.news.tele.dk...
>
> > Er det mugligt at tegne på et panel,
> > ligesom på Formen eller en Image
>
> > Image1.Canvas.Pen.Color := clGreen;
> > Image1.Canvas.Brush.Color := clGreen;
> > Image1.Canvas.Rectangle(0,20,20,40);
>
> > m.v.h.
> > Henning
| |
|
|