当执行follow代码时,Path在xe2中是成形的,但在xe3中是荒谬的。
procedure TForm2.Button1Click(Sender: TObject);
var
Path : TPath;
begin
Path := TPath.Create(Self);
Path.Parent :=self;
Path.Data.Data :=
'M44.093,34.558v-2.83h12.793c4.131,0,8.301,3.841,8.301,8.969c0,4.375-2.829,7.607-6.49,8.462l8.106,8.105'+
'c5.475-3.377,9.456-9.446,9.456-16.705c0-9.971-7.978-19.658-18.804-19.658H32.697v2.262L44.093,34.558z';
end;
文档中说形状用逗号或空格分隔;您的代码既不使用也不使用。文档中没有要求在字母和以下数字之间进行任何分隔,但我看到的所有示例都至少包含一个空格,我还读到路径数据解析器更喜欢在任何负数之前使用空格。