Canvas på button..

Tags:    delphi

Ands

Hvordan er det man laver canvas på button???

f.eks.
-Ellipse
-lineto
-osv...



2 svar postet i denne tråd vises herunder
1 indlæg har modtaget i alt 2 karma
Sorter efter stemmer Sorter efter dato
Du kan lave en TControlCanvas...
Her et eksempel, hvor der bliver lavet en TControlCanvas i knappens OnClick property:

procedure TForm1.Button1Click(Sender: TObject);
var
C : TControlCanvas;
begin
C := TControlCanvas.Create;
C.Control := Button1;
C.FillRect(Button1.ClientRect);
C.TextOut(4,4,'Min Canvas...');
C.Free;
end;

Når du klikker på knappen skulle den gerne blive hvid og der skal stå: "Min Canvas..."



Ands

Hvordan er det man laver canvas på button???

f.eks.
-Ellipse
-lineto
-osv...


Nu er jeg ikke så meget med, på græsk så når du siger Canvas mener du så style eller hvad ?

// Kasper
»http://kaspertech.dk



t