AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Delphi Vektor Format anzeigen/drucken

Vektor Format anzeigen/drucken

Ein Thema von Gruber_Hans_12345 · begonnen am 5. Nov 2007 · letzter Beitrag vom 24. Nov 2007
Antwort Antwort
Seite 1 von 10  1 23     Letzte » 
Gruber_Hans_12345

Registriert seit: 14. Aug 2004
1.356 Beiträge
 
Delphi 2007 Professional
 
#1

Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 13:34
Hallo

Ich muß mit Delphi ein (irgendeines) Vektorformat anzeigen können, dieses dann auf einen Canvas drucken können (somit auf Preview, Drcuker, PDF Export)

dazu brauche ich natürlich ein Format, das ich mit irgendwelchen tools (CorelDraw, inkscape und co) vernünftig erzeugen/konvertieren lässt und auch in delphi importieren lässt.
Es sollte Linien/kreise/freihand und co kennen, eingebettetet bilder (jpg/png) und texte

am anfang hätte ich es mit EMF/WMF probiert, da man das ja ganz gut öffnen kann in delphi, aber leider habe ich kein vernünftiges programm gefunden, das emf richtig erstellen kann (CorelDraw patzt da zb bei den Texten, die positioniert diese irgendwo - übereinander oder mit abstand, der nicht da ist)

jetzt bin ich auf der suche nach svg - sieht vom format her ganz gut aus, aber Importer/Viewer sind nicht so viele vorhanden, habe zwar einen gefunden,aber weiss nicht ob der nun gut ist oder nicht ....

Kennt wer bzw verwendet wer einen guten Importer für Vektor Grafik Format?

das ganze muß mit sourcecode verfügbar sein (darf natürlich was kosten, zwar nicht wie die sachen von leadtools (2k euro) aber "normale" preise sind ok)
für SVG habe ich die "CAD Import VCL" gefunden
Gruss Hans

2B or not 2B, that is FF
  Mit Zitat antworten Zitat
mkinzler
(Moderator)

Registriert seit: 9. Dez 2005
Ort: Heilbronn
39.804 Beiträge
 
Delphi 10.4 Sydney
 
#2

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 13:36
Nimm SVG, dann kannst du notfalls auch mit einem Texteditor editieren.
Markus Kinzler
  Mit Zitat antworten Zitat
Benutzerbild von sakura
sakura

Registriert seit: 10. Jun 2002
Ort: München
11.583 Beiträge
 
Delphi 10.4 Sydney
 
#3

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 13:38
Zitat von mkinzler:
Nimm SVG, dann kannst du notfalls auch mit einem Texteditor editieren.
Und welche gute Delphikomponente kann SVG importieren und anzeigen?

......
Daniel W.
Ich bin nicht zurück, ich tue nur so
  Mit Zitat antworten Zitat
xaromz

Registriert seit: 18. Mär 2005
1.682 Beiträge
 
Delphi 2006 Enterprise
 
#4

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 13:44
Hallo,
Zitat von sakura:
Und welche gute Delphikomponente kann SVG importieren und anzeigen?
Ich! Hier! Hier!
Ist denn in diesem Forum immer noch nicht jedem bekannt, dass ich da ein paar SVG-Komponenten im Angebot habe? Ich muss wohl mehr Werbung machen...

Oh, ich sehe gerade, Du fragst nach guten Komponenten. Ich habe aber doch nur sehr gute. (War das jetzt schon genug Werbung?)

Gruß
xaromz
I am a leaf on the wind - watch how I soar
  Mit Zitat antworten Zitat
Gruber_Hans_12345

Registriert seit: 14. Aug 2004
1.356 Beiträge
 
Delphi 2007 Professional
 
#5

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 13:49
Zitat von xaromz:
Hallo,
Zitat von sakura:
Und welche gute Delphikomponente kann SVG importieren und anzeigen?
Ich! Hier! Hier!
Ist denn in diesem Forum immer noch nicht jedem bekannt, dass ich da ein paar SVG-Komponenten im Angebot habe? Ich muss wohl mehr Werbung machen...

Oh, ich sehe gerade, Du fragst nach guten Komponenten. Ich habe aber doch nur sehr gute. (War das jetzt schon genug Werbung?)

Gruß
xaromz
vielleicht könntest einen zweiten download anbieten mit einer guten Komponente

ne, habe zwar ne weile rumgesucht, sowohl hier als auch google, aber deine nicht gefunden, werde mir mal alles downloaden und angucken

auf den ersten blick siehts gut aus, auf den zweiten blick, funktioniert bei meinem test svg mit deinem testprogramm das Zoomen nicht ...
Gruss Hans

2B or not 2B, that is FF
  Mit Zitat antworten Zitat
xaromz

Registriert seit: 18. Mär 2005
1.682 Beiträge
 
Delphi 2006 Enterprise
 
#6

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 13:51
Hallo,
Zitat von Gruber_Hans_12345:
auf den ersten blick siehts gut aus, auf den zweiten blick, funktioniert bei meinem test svg mit deinem testprogramm das Zoomen nicht ...
vergiss den Zoom. Das Demoprogramm ist schon etwas älter und hat so seine Probleme. In den Comments auf meiner Seite steht da noch was zu.

Gruß
xaromz
I am a leaf on the wind - watch how I soar
  Mit Zitat antworten Zitat
Gruber_Hans_12345

Registriert seit: 14. Aug 2004
1.356 Beiträge
 
Delphi 2007 Professional
 
#7

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 14:28
uihhh .... hmmm .... ab welcher delphi version läuft das den?

glaub das wird viel arbeit, das ganz auf d6 zu portieren .... (class in records)
Gruss Hans

2B or not 2B, that is FF
  Mit Zitat antworten Zitat
xaromz

Registriert seit: 18. Mär 2005
1.682 Beiträge
 
Delphi 2006 Enterprise
 
#8

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 14:46
Hallo,

programmiert habe ich das in Delphi 2006. Aber TBounds ist die einzige Struktur, die Record-Funktionen benutzt. Dass lässt sich auch leicht mit entsprechenden Funktionen lösen.

Gruß
xaromz
I am a leaf on the wind - watch how I soar
  Mit Zitat antworten Zitat
Gruber_Hans_12345

Registriert seit: 14. Aug 2004
1.356 Beiträge
 
Delphi 2007 Professional
 
#9

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 15:34
ok, das hab ich mal

kannst mir noch kurz sagen, wie ich nun ein SVG, das eine A4 Seite darstellen soll richtig und positionsgetreu wieder auf den drucker bringe?

habe mal so angefangen ...

Delphi-Quellcode:
    if PrintDialog1.Execute then begin
        temp := TPrinter.Create;
        //temp.PrinterIndex := PrintDialog1.
        temp.BeginDoc;

        //x := temp.Canvas.ClipRect;
        bounds.X := 0;
        bounds.Y := 0;
        bounds.Width := temp.PageWidth;
        bounds.Height := temp.PageHeight;
        
        SVGImage1.SVG.PaintTo(temp.Canvas.Handle, bounds, m, 0);
        temp.EndDoc;
        temp.Free;
    end;
(allerdings stimmt dann am ausdruck nicht wirklich was - ist viel zu klein .... )
in welchen einheiten braucht der die bounds?
zuwas kann ich der druck routine noch zusätzlich rechtecke mit angeben?
Gruss Hans

2B or not 2B, that is FF
  Mit Zitat antworten Zitat
Gruber_Hans_12345

Registriert seit: 14. Aug 2004
1.356 Beiträge
 
Delphi 2007 Professional
 
#10

Re: Vektor Format anzeigen/drucken

  Alt 5. Nov 2007, 15:52
hmmm, gibt es bei Texte irgendetwas zu beachten?

habe mit Inkscape mal ein SVG erzeugt, die Linien bekomme ich rein, aber die Texte nicht?

werde es dann mal mit CorelDraw probieren

[edit]mit Coreldraw kommend ie Texte auch mal gut an (ob die 100% passen, werde ich erst sehen, wenn ich das drucken mal im griff habe)
Gruss Hans

2B or not 2B, that is FF
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 10  1 23     Letzte » 

Themen-Optionen Thema durchsuchen
Thema durchsuchen:

Erweiterte Suche
Ansicht

Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 18:14 Uhr.
Powered by vBulletin® Copyright ©2000 - 2022, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf