Wie kan mij vertellen hoe het volgende kan (Delphi8/WinForms):
Code:
AGPen:=Pen.Create(Color.Black,20);
with AGPen do
begin
//LineJoin:=LineJoin.Round; // werkt niet ; compiler errormelding:
//record, object or class type expected
StartCap:=LineCap.Round;
EndCap:=LineCap.Round;
end;
AGPen.LineJoin:=LineJoin.Round; //dit werkt wel (is eigenlijk hetzelfde)
Zowel LineCap als LineJoin zijn enumerations.
StartCap en EndCap werkt wel binnen de with ... do structuur, maar LineJoin niet.
Voluit geschreven (laatste regel van de code) wekt het wel, terwijl dat toch hetzelfde is als met with ... do.
vrie
Bookmarks