Bonjour,
Ancien de Delphi, n'ayant jamais pu renouveler ma Licence en Delphi, j'ai décidé de programmer en Lazarus depuis peu pour le plaisir.
J'ai un problème de déclaration d'une variable dans une unité
A la compilation, j'ai l'erreur suivante sur la première virgule : Syntax error, ")" expected but "," found
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 var CircRect : TRect; // coordonnées figure circonscrite procedure Dessine_Point(Ox,Oy,R,e : integer; aCanvas : TCanvas; aColorExt, aColorInt: Tcolor); begin CircRect := Rect( Ox - R , OY - R, OX + R, OY + R); ... end;
J'ai vérifié la définition, elle est bien compatible avec ce que je faisais en Delphi
Pouvez vous m'éclairer?Source position: classesh.inc line 2089
function Rect(
ALeft: Integer;
ATop: Integer;
ARight: Integer;
ABottom: Integer
):TRect;
Description
Rect returns a TRect record with the given top-left (ALeft,ATop) and bottom-right
(ABottom,ARight) corners filled in.
No checking is done to see whether the coordinates are valid.
See also
TRect Descibes a rectangle
Point Returns a TPoint record with the given coordinates.
SmallPoint Returns a TSmallPoint record with the given coordinates.
Bounds Returns a TRect structure with the bounding rect of the given location and size.
Documentation generated on: May 12 2018
merci
Partager