Entwickler-Ecke :: Thema anzeigen - Cd Cover erstellen wie ?

patrick dee - Sa 21.06.03 13:50
Titel: Cd Cover erstellen wie ?

hi,

frage wie kann man ein kleines prog. basteln damit man sich selber cd cover ausdrucken kann. so mit vorderseite rückseite und die beschriftung an der seite nicht zu vergessen. habe bei torry schon mal geschaut aber nix gefunden. oder hat einer von euch so etwas schon mal gemacht ?

hoffe hier etwas hilfe zu finden oder tips wie so etwa geht.

ciao

patrick

dTrace - So 22.06.03 00:40
Titel: CD Cover

Hmm...
zeichne mit den Funktionen von Tcanvas die CD, Vorderseite- und Rückseite der Hülle nach. Schreibe dann die Funktion, womit du den Inhalt der gezeichneten CD mit Grafiken und Text füllen kannst...

dtrace 8)

fcg - So 22.06.03 01:32

hi

ich würde ersteinmal mit

Delphi-Quelltext

1:	canvas.rectangle(0,0,340,450);

ein Rechteck als Begrenzung zeichnen (Werte sind zufall).

Dann evtl mit

Delphi-Quelltext

1:	canvas.textout(100,50'Titel');

nen Tiel hinzaubern und dann evtl noch ein Bildausschnitt mit

Delphi-Quelltext

1:	canvas.copyrect(...)

oder so...

fcg

tommie-lie - So 22.06.03 12:16

Das Problem wird nur sein, den Canvas auf jedem Drucker in der gleichen Größe auszudrucken, denn bei Pixeln hängt das von der Größe ab. Da müsste man an die Auflösung vom Drucker kommen und umrechnen, damit's keine bösen Überraschungen gibt.

dTrace - So 22.06.03 12:26
Titel: CD Cover drucken

Wenn man die genaue grösse der CD usw. angiebt und auf dem Drucker Canvas ausgiebt, dann sollte die CD etc. eigentlich genau so ausgedruckt werden...oder nicht! Ich habe es selber nicht ausprobiert...aber eigentlich müsste es doch gehen!!!

Wenn es nicht klappen sollte, dann kann man folgendes probieren:

erstelle einen Screenshot von dem Formular-Inhalt bzw. nur einen bestimmten Bereich von dem Formular
diesen Screenshot als BMP speichern
diese BMP Datei drucken

fertig.

Gruss: dTrace

Moderiert von Tino: List-Tag eingefügt.

PheliX - So 22.06.03 13:08

Hi!

Ich hab mal ne function geschrieben die dir die Pixelzahl einer bestimmten cm Zahl zurückgibt:

Delphi-Quelltext

1:
2:
3:
4:
5:
6:
7:
8:

function getpix(cm:real):integer;
var ppi:Integer;
i:real;
begin
ppi:=  GetDeviceCaps(printer.Handle,LOGPIXELSX);
i:= (ppi * cm) / 2.54;
result:= round(i+0.5);
end;

Vielleicht kannst dus ja gebrauchen!

Moderiert von Tino: Code- durch Delphi-Tags ersetzt.

tommie-lie - So 22.06.03 13:47
Titel: Re: CD Cover drucken

dTrace hat folgendes geschrieben:

Eher nicht.
Begründung:
Drucker haben nicht alle die gleiche Auflösung. Druckst du bei 300dpi ist das Bildwesentlich größer, als bei 1200dpi, weil mehr Punkte (nicht Pixel!) pro Zoll gedruckt werden. Um auf 300dpi und 1200dpi das gleiche Bild zu erhalten, müsste man das Bild um den Faktor 4 strecken.

PheliX' Funktion ist da ganz brauchbar ;-)

Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2026 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!