Andorra 2D [Ver. 0.4.5.1, 31.12.08]

[g0rmed]

geht mir auch so..alle beispiele funktioneren aber bei mir bekomm ich ne exeption.
ich hab mal genau nachgeguck, die ist (denke ich):
wenn ich ne schrift erstelle, dann kommt die exeption beim erstellen der imagelist, bei den vertices des "Font-Bildes"

Delphi-Quellcode:

constructor TAdFont.Create(AParent: TAdDraw);
begin
  inherited Create;
  FParent := AParent;
  FMeshList := TAdImageList.Create(FParent); <-- ich denke hier...
  FTexture := TAdTexture.Create(FParent);
  FCompressor := FTexture.Compressor;
  FLetterCount := 0;
  FColor := clWhite;
  FAlpha := 255;
  CreatedByList := false;
  ClearFont;
end;

Und dann hier:

Delphi-Quellcode:

procedure TAdImage.DrawMesh(DestApp: TAdDraw; DestRect,
   SourceRect: TRect; Rotation: integer; RotCenterX, RotCenterY: single;
    BlendMode: TAd2DBlendMode);
[...]
if not CompRects(SourceRect,FSrcRect) then
begin
  FSrcRect := SourceRect;
  BuildVertices; <-- hier
end;
[...]

und hier:

Delphi-Quellcode:

procedure TAdImage.BuildVertices;
[...]
       end;
     end;
     AdMesh.Vertices := Vertices;
 
     if FUseIndexBuffer then <-- hier die Exeption
     begin
[...]

Ich hoffe es liegt nicht an mir...
Edit: habe auch D2005