Forum: Multimedia
Delphi
by neo4a,
10. Mär 2009
Hier das für gestern versprochene Beispiel. Ich habe so erzeugt:
Image321.Bitmap.SaveToFile('.\test.bmp');
HTH.
--
Andreas
Forum: Multimedia
Delphi
by neo4a,
8. Mär 2009
Kann ich gerne machen, muss aber leider bis morgen warten.
--
Andreas
Forum: Multimedia
Delphi
by neo4a,
8. Mär 2009
Hallo Jürgen,
der Grau-Anteil kommt m.E. von der Hintergrund-Farbe von TImage32. Da ich ja Timage32ex verwende, das Transparenz beherrscht, klappt's vielleicht etwas besser. Du kannst die angehängte Datei einfach in Dein Graphic32-Paket mit einbinden und erhälst eine weitere Komponente.
Bitte beachte, dass die Transparenz ggf. color:=clNone erfordert.
Viel Glück.
--
Andreas
Forum: Multimedia
Delphi
by neo4a,
8. Mär 2009
@Larsi
Schau Dir bitte mein Code-Schnipsel etwas genauer an. Dort kopiere ich zunächst das Bitmap aus der Komponente, führe die Bildoperationen durch und weise sie wieder zu. Vielleicht bringt Dich dieser Ansatz weiter.
@Meflin
Hepp, Du hast Recht. Es würde mich aber stark wundern, wenn die Bildoperationen sich nicht auch mit Javascript clientseitig nachbilden ließen. Bei der...
Forum: Multimedia
Delphi
by neo4a,
7. Mär 2009
Hallo Jürgen,
sie unterscheiden sich nicht wirklich im Ergebnis und ich habe FastBlur zunächst drin gelassen, damit ... weil ich damit halt angefangen habe. Allerdings musste ich später feststellen, dass die oben vorgestellte Lösung ein Performance-Problem hat. Die Ursache war die FastBlur-Routine. Ich habe sie entfernt, nun klappt's auch mit BilleniumEffects (Smooth Alphablending...
Forum: Multimedia
Delphi
by neo4a,
6. Mär 2009
Hallo Jürgen,
vielen Dank für diese Funktion, die ich so mit eingebaut habe:
procedure TForm1.sButton2Click(Sender: TObject);
var img1,img2:TBitmap32; r:TRect;
begin
img1:=TBitmap32.Create;
img2:=TBitmap32.Create;
Forum: Multimedia
Delphi
by neo4a,
6. Mär 2009
@Jürgen,
genau die Überlegung, dass das Bild z.B. einen dicken schwarzen Rand haben kann, hat mich auf den überwiegenden Farbinhalt des Bildes gebracht. Ansonsten sähe das Überstrahlen lediglich der (halt schwarzen) Randbereiche irgendwie nur öde aus ;)
--
Andreas
Forum: Multimedia
Delphi
by neo4a,
6. Mär 2009
@Jürgen,
wie ich an den Downloadzahlen sehen kann, bin ich nicht der einzige, der sich für Deine Arbeit interessiert. Das gelungene Ergebnis muss ja jetzt "nur noch" in Delphi-Routinen abgebildet werden. Mal sehen, wie man das insbesondere auf beliebigen und nicht einfarbigen Hintergrund hinbekommt.
Danke für Deine Mühe.
--
Andreas
Forum: Multimedia
Delphi
by neo4a,
6. Mär 2009
@Sherlock
Ob nun der Randbereich oder der überwiegende Farbinhalt den Farbverlauf bestimmt, kann man ja später immer noch parametrisieren. Meine Limitation betrifft den Umgang mit den Grafikfunktionen bzw. den Einsatz geeigneter Komponenten.
--
Andreas
Forum: Multimedia
Delphi
by neo4a,
6. Mär 2009
Ich würde gern in einem meiner Privat-Projekte Bilder mit einem Glow- Effekt hinterlegen, wie man es von der Ambilight- Funktion von Philips- TV vielleicht bereits kennt. Dort wird der überwiegende Farbbereich des (TV-)Inhalts über die Ränder dynamisch überstrahlt.
Ich freue mich über Denkanstöße, die mir die 2 Probleme lösen:
Wie erzeuge ich den Überstrahl- Effekt zur Laufzeit erst einmal...