Scalable Vector Graphics (SVG) in PureBasic benutzen?

STARGÅTE · **Registriert:** 01.11.2005 13:34 **Wohnort:** Glienicke

Tachchen,

Da ich seit längerem nach einer möglichkeit suche Bilder bzw. "Zeichen" in egal welcher größe in einer guten Qualität darstellen zu können, ohne dafür n "riesen" Image zu erstellen, welches dann unter "enormen" Zeitaufwand wieder kleiner gemacht wird, findet das SVG-Format bei mir immer mehr gefallen.

Nun wollte ich hier fragen ob sich damit schon mal jemand befasst hat.
Ich suche halt möglichkeiten das Format in PureBasic zu nutzen, über ein Include, DLL, Lib ....

Sodass ich dann zB eine vektorgrafik laden kann und so anzeigen lasse:

Code:

LoadSVG(1, "Stern.svg")
StartDrawing(ScreenOutput())
  DrawSVG(1, x, y, Width, Height)
StopDrawing()

Die Versuche selber so ein Format zu erstellen, scheiterten im Endeffekt an einem zu großen Rechenaufwand mit PB-Mitteln das Bild als Image zu erstellen.

Nino · **Registriert:** 13.05.2010 09:26 **Wohnort:** Berlin

Hi,

eine Antwort habe ich leider nicht. Aber ich fände es auch toll, wenn man SVG mit PureBasic benutzen könnte.

Grüße, Nino

Thorium · **Registriert:** 12.06.2005 11:15 **Wohnort:** Germany

Such mal im englischen Forum, da hat jemand vor garnicht mal so langer Zeit ein SVG include gepostet.

Morty · **Registriert:** 22.10.2004 07:20 **Wohnort:** Erfurt

Nur der Vollständigkeit halber, hier der entsprechende Link: http://www.purebasic.fr/english/viewtopic.php?f=12&t=40540

Morty

STARGÅTE · **Registriert:** 01.11.2005 13:34 **Wohnort:** Glienicke

Danke für den Link,
werde es mir mal angucken,
aber wenn ich jetzt schon sehe, wie er einen Winkel errechnet:

Code:

Procedure.F EArc_GetOrientation(xCenter.F, yCenter.F, xSource.F, ySource.F)
    Protected.F xDelta, yDelta
    Protected.F Rho, Alpha
    xDelta = xSource - xCenter
    yDelta = ySource - yCenter
    Rho = Sqr((xDelta * xDelta) + (yDelta * yDelta) )
    Alpha = ACos(xDelta / Rho)
    If yDelta > 0.
      Alpha = - Alpha
    EndIf
    ProcedureReturn Alpha
EndProcedure

hab ich noch n menge zu verbessern :lol:

Code:

Procedure.F EArc_GetOrientation2(xCenter.F, yCenter.F, xSource.F, ySource.F)
    ProcedureReturn ATan2(xSource-xCenter, yCenter-ySource)
EndProcedure

STARGÅTE · **Registriert:** 01.11.2005 13:34 **Wohnort:** Glienicke

Muss mich korrigieren.

Ich dachte nach ein paar änderungen läuft der Code, aber es kommen immer mehr Fehler,
Fehlende Variablen, Proceduren, Macros usw.

:freak:

Morty · **Registriert:** 22.10.2004 07:20 **Wohnort:** Erfurt

Hab's selber nie ausprobiert. Wenn ich's schaffe setz' ich mich heute Abend mal dran, wenn die Kids im Bett liegen

Morty

edel · **Registriert:** 28.07.2005 12:39

Du kannst noch WMF (bzw EMF) benutzen.

Morty · **Registriert:** 22.10.2004 07:20 **Wohnort:** Erfurt

Oh man, was ist das für ein Code? Da geht ja garnichts.

Ich hab jetzt angefangen und fehlende Funktionen nachgebildet. Aber nach über 40 Minuten war immer noch kein Ende in Sicht. Daher lass ich es wohl auch erstmal sein. Das war wohl eher ein Schuss in den Ofen.

Morty

STARGÅTE · **Registriert:** 01.11.2005 13:34 **Wohnort:** Glienicke

Jo, vermutlich weil er in seinem PB eigene Libs benutzt.

@edel, ein Link wäre nicht schlecht, denn die Suche wirft da n menge Mist ^^

PureBoard

Scalable Vector Graphics (SVG) in PureBasic benutzen?

Wer ist online?