So ich versuchen einen Pie zu zeichnen mit der graphics32 Lib.
genauer gesagt möchte ich die Vector variante davon benutzen. die in der GR32_VectorUtils.pass zu finden ist

mit der standard "Canvas.Pie" funktioniert das einwandfrei, die ist mir aber zu zackig.
mit der Vector variante komme ich einfach nicht klar.

ich möchte den Start-Angle eingeben und mit der maus die position setzen

zusammenfalten · markieren

Delphi-Quellcode:

function GetAnglePosition(R : TRect; FBaseAngle, FMin, FMax, FPosition : Integer): TPoint;
var
  a: Double;
begin
  a:=(FBaseAngle - 90) + 360 * (FPosition /(FMax - FMin) - FMin);
  a:= pi * a / 180;
  with R do
  begin
    Result.X:= Round(Cos(a) * (Right - Left) / 2 + (Left + Right) / 2);
    Result.Y:= Round(Sin(a) * (Bottom - Top) / 2 + (Bottom + Top) / 2);
  end;
end;


var
   R: TRect;
   P1, P2: TPoint;


    P1:= GetAnglePosition(R, 0, 0, 360, 180);
    P2:= GetAnglePosition(R, 0, 0, 360, -180 + Position);
    Buffer.Canvas.Pen.Color:= $00606060;
    Buffer.Canvas.Brush.Color:= clred;
  if Position > 0 then
    Buffer.Canvas.Pie(R.Left + 5, R.Top + 5, R.Right-5, R.Bottom-5, P2.X,P2.Y,P1.X,P1.Y);

Weiss nicht wo genau Dein Problem ist, aber Du mußt mit diesem Pie() auf ein TBitmap32 zeichnen und dann von TBitmap32 auf das Canvas (mit einem Handle) übertragen.

Die GR32_VectorUtils.pas befindet sich nicht in dem normalen GR32 Paket von SourceForge, und ist auch nicht in der CHM-Doku erwähnt. Im Netz finde ich sie auch auf die Schnelle nicht. Es wäre schon ganz nett, wenn du Quellen für non-Standard Erweiterungen zumindest verlinken würdest, weil im Moment hat keiner eine Chance zu gucken was die Methoden da überhaupt an Parametern erwarten. (Zumal du ja nichtmals einen Aufruf in deinem Code illustrierst.)
Wo ist überhaupt genau das Problem? "komme ich einfach nicht klar" ist keine Fehlerbeschreibung, und hilft auch keinem auch nur im Ansatz zu verstehen was du bisher gemacht hast, und was dabei falsches passiert. Es sagt nichtmals was darüber aus womit du nicht klar kommst. Einbindung? Aufrufe? Sieht falsch aus? Zeichnet nichts? Was denn? Vor allem: In wie hängen deine Bilder mit dem Problem zusammen!? Oder wolltest du die einfach mal nur zeigen weil sie hübsch sind?

VectorUtils liegt hier mit drin. Ich glaub, es kommt aus diesem TLine32.

okay, @Medium erstens möchte ich mich entschuldigen das du mich nicht verstanden hast.
ich weiß zwar nicht welche version du benutzt aber wie Jens01 schon gesagt hat liegt die GR32_VectorUtils.pas mit in dem packet.
und ich denke ich habe versucht mit den bildern zu demonstrieren was ich bis jetzt gemacht habe und gleichzeitig was ich machen möchte.

wenn du dir die bilder anschaust habe ich den pie (in Rot) erfolgreich gezeichnet und kann den winkel auch mit der Maus/Timer ändern,
alerding mit der standardfunktion. also mit Canvas.Pie


die Pie funktion aus der GR32_VectorUtils hat ganz andere parameter den die aus der Vcl.Graphics unit.
so ich dachte einer von euch kennt sich mit der funktion aus und könnte mir bei der übersetzung weiterhelfen.

bei der standardversion sind die ränder zu zackig also kein anti aliasing.

ich versuche ein ähnliche komponenten set zu schreiben wie Abakus VCL
nur die besser aussehen und open source sind!

ich komme auch gut voran, allerdings machen einige funktionen mich wahnsinnig.
alle komponenten basieren auf graphics32.

so nach langem rumtüfteln habe ich es hingekriegt.

Zitat von Jens01:

VectorUtils liegt hier mit drin. Ich glaub, es kommt aus diesem TLine32.

In der normalen Seite für die Release-Versionen hier ist es nicht enthalten, und gehört somit nicht zum Basisumfang der GR32. Ob und wer da wann und wo welche Dinge hinzugefügt hat ist in dem Projekt äusserst undurchsichtig. Eine Suche bei Google nach dem Unitnamen hat mich auch nicht innerhalb von wenigen Minuten auf die von dir verlinkten Seiten geführt. Von daher finde ich meinen Einwand nach wie vor berechtigt. Aber freut mich, dass es jetzt klappt.

@Medium:
Wie wärs mit der Dateihistory?
http://sourceforge.net/p/graphics32/...ectorUtils.pas

EDIT: Außerdem ist das letzet Release von 2013 und die letzten Änderungen von Dezember 2015. Würde also nicht allzuviel auf die releases geben.