Forum: Programmieren allgemein
by simonko,
5. Dez 2005
ich hab jetzt
procedure TRechteck.paint;
begin
inherited;
canvas.Rectangle(1,100,2,200);
end;
später brauch ich dann noch Fhöhe und Fbreite um das rechteck zu zeichnen. aber wenn ich jetzt
Forum: Programmieren allgemein
by simonko,
5. Dez 2005
Ich muss eine klasse TRechteck von Tgraphiccontrol ableitn. Ich soll die methode paint überschreiben
und diese soll dann dafür sorgen dass das rechteck gezeichnet wird. Weiters hat die klasse TRechteck folgende eigenschaften: fuellfarbe und Linienfarbe.
bis jetzt hab ich das hier.
TRechteck = class(TGraphicControl)
private
function GetFuellFarbe: TColor;
procedure...