TImage - Bitmap - Farbe verändert sich

[Minz]

Hi,

also ich benutze 3 TImages übereinander.

Das eine soll mir als Hintergrund dienen, eins als Vordergrund und eins dazwischen.

Wenn ich jetzt was auf einem Image male, wird plötzlich alles weiß!

Woran liegt das?

Gruß Minz

[Matze]

Das ist bei mir auch so, wenn du nur darauf "malst", dann würde ich an deiner Stelle die PaintBox nehmen.

[Minz]

Wo zur Hölle ist eine PaintBox :mrgreen:

steht da auch ein Cavas zur Verfügung? Ich benutze nämlich auch TextOut

[Matze]

Steht alles zur Verfügung (Register: System oder so ähnlich ;) )

[Gandalfus]

Zitat:

Zitat von Minz

also ich benutze 3 TImages übereinander.

Was soll das den bringen? Zeichne doch einfach das bild das du gerade haben willst direkt auf das Formular oder in eine Paintbox.

[Minz]

Ich will dir ja nicht zu nahe treten, aber nur weil du nicht weißt was das bringen soll, kann es unter Umständen trotzdem sinnvoll sein. Das musst du schon mir überlassen.

Ansonsten ist gegen das Aufzeigen von Alternativen nichts einzuwenden! Ganz im Gegenteil bin ich dankbar dafür. Das mit der Paintbox habe ich bereits aufgegriffen (siehe weiter oben)

[Matze]

Funktioniert das jetzt mit einer PaintBox, oder gibt's immer noch Probleme?

[Minz]

liegt der Paintbox auch ein TBitmap zugrunde auf das man zugreifen kann?
Wegen der Transparenz...

[Matze]

Ein Bitmap kann man in eine PaintBox nicht laden, sorry.

[Minz]

dann hab ich ein Problem mit der Tranzparenz :D

ansonsten funktionierts, ohne das die Farben durcheinandergewürfelt werden. Aber so bringts mir nix!

[Gandalfus]

Zitat:

Zitat von Matze

Ein Bitmap kann man in eine PaintBox nicht laden, sorry.

Ich will dir ja nicht zu nahe treten, aber nur weil du nicht weißt wie das gehen soll, kann es unter Umständen trotzdem möglich sein.

Delphi-Quellcode:

Paintbox1.canvas.draw();

Edit: Ups hab Minz mit Matze verwechselt

Zitat:

Ansonsten ist gegen das Aufzeigen von Alternativen nichts einzuwenden!

also nochmal: Zeichne doch einfach das bild das du gerade haben willst direkt auf das Formular oder in eine Paintbox.
Ist das etwa keien Altanative?

sorry wenn ich das so deutlich sage aber nur Anfänger benutzen TImage. Sobald man sich einwenig mit Canvas auskennt wird TImage überflüssig.

Ich wollte dir nur helfen und eine bessere altenative Vorschlagen aber wenn du nicht dazulernen willst...

mfg

[Minz]

OMG, dann sag mir mal bitte was ich mache.

Wenn du das gemacht hast, kannst du mir mit deinen Weisheiten kommen.

Und was wäre dagegen einzuwenden, wenn ich Anfänger bin?

Bei dir hört sich das so abfällig an...

aber wenn ich nicht dazulernen will ... tsss OMG

Wenn du lesen könntest hättest du mehrmals das Wort Transparenz lesen können, wie glaubst du wohl soll ich mit nur einer Einheit wie dem Canvas von Form1 eine Transparenz erzeugen???? Da muss wohl was zweites her gell? Aber du bist ja sooo schlau.

Ich wäre dir dankbar wenn du entweder ein bissel mehr auf die ganz am Anfang gestellte Thematik eingehen würdest, als anderen deine Idee aufzudrängen, die reichlich wenig mit mit dem eigentlich Thema zu tun hat. Danke!!!!

[Gandalfus]

Zitat:

Zitat von Minz

dann hab ich ein Problem mit der Tranzparenz :D

ansonsten funktionierts, ohne das die Farben durcheinandergewürfelt werden. Aber so bringts mir nix!

Delphi-Quellcode:

var
  blabla: TBitmap;
...
  blabla := TBitmap.create;
...

  blabla.transparentcolor := clred;
  blabla.Transparent
  blabla.draw;

[Gandalfus]

ich hab nichts gegen Anfänger sonst wäre ich wohl kaum in diesem Forum und würde versuchen dir zuhelfen. Wäre nett wen du das entsprechen würdigen würdest und mich nicht noch beleidigen würdest.

[Minz]

Dann erklär mir den Satz:

Zitat:

sorry wenn ich das so deutlich sage aber nur Anfänger benutzen TImage. Sobald man sich einwenig mit Canvas auskennt wird TImage überflüssig.

Wenn das nicht abfällig ist...ansonsten lass mich, den Anfänger, doch TImage benutzen und hilf mir dabei.

Und Hilfe weiß ich auch zu schätzen, wenns denn Hilfe ist!

[Gandalfus]

das hab ich nur als REaktion auf deinen Beitrag geschrieben hättest du mich einfach gefargt wär das kein Problem gewesen.
Du hast doch mein code oben gelesen?

[Stanlay Hanks]

Hi. Auch wenn das jetzt off Topic ist: Ich glaube nicht, dass hier irgendwer irgendwen abwerten oder beleidigen wollte, weil er Anfänger ist oder ein TImage benutzt. Also lasst diese Diskussion doch einfach und kommt wieder zum Thema zurück, weil ich glaube, dass der Thread sons irgendwann geschlossen wird. :wink: Und das will ja wohl keiner, oder? :wink:

Man liest sich, Stanlay :hi:

[Minz]

Wäre mir am liebsten, wenn wir den schließen, und ich einen sauberen neuen Thread öffnen kann.

Gott wie ich das hasse.

[Gandalfus]

Formulier doch nochmal was du machen willst.

[Minz]

Also wie gesagt: ich habe 3 Images übereinander.

Ich kann natürlich auch form1.canvas nehmen und zwei Images.

Auf dem untersten Image soll der Hintergrund dargestellt werden (wechselnde Bilder oder Muster)

Die beiden darüberliegenden Images sollen mir als transparente Zeichenflächen dienen.
Das heißt der Hintergrund soll immer durchscheinen.
Dazu hatte ich vor, den beiden oberen Images eine transparente Farbe zuzuweisen.
Dann sollen verschiedene Grafiken auf die beiden oberen Images kopiert werden, mit der transparenten Hintergrundfarbe, so dass der Hintergrund immer zu sehen ist. Also in der Art von Sprites.

Nur leider wird plötzlich beim Malen alles weiß, bzw. wurde. Inzwischen liegt leider der Hintergrund nicht mehr als unterstes sondern scheint die anderen Images zu überdecken. Irgendwo hab ich mal ne Prozedur gehabt, um diese Reihenfolge zu ändern.

Soviel dazu...und nu :?:

[Gandalfus]

Zitat:

Zitat von Minz

Also wie gesagt: ich habe 3 Images übereinander.

Hmm ich draf doch wohl eien Alternative vorschlagen

Zitat:

Ich kann natürlich auch form1.canvas nehmen und zwei Images.

Hmm ich glaube nicht das du dir meien Beiträge durchgelesen hast.

Zitat:

Auf dem untersten Image soll der Hintergrund dargestellt werden (wechselnde Bilder oder Muster)

Bewegung und TIMage sind etwas unglücklich das ist jetzt nicht abwertend gemeind. Mein erstes Spiel bestand auch aus TImages und das ist noch nicht so lange her.

Zitat:

Die beiden darüberliegenden Images sollen mir als transparente Zeichenflächen dienen.
Das heißt der Hintergrund soll immer durchscheinen.
Dazu hatte ich vor, den beiden oberen Images eine transparente Farbe zuzuweisen.
Dann sollen verschiedene Grafiken auf die beiden oberen Images kopiert werden, mit der transparenten Hintergrundfarbe, so dass der Hintergrund immer zu sehen ist. Also in der Art von Sprites.

Hier mein Vorschlag:

Delphi-Quellcode:

var
   Hintergrundbild: TBitmap;
   Bild1: TBitmap;

oncreate:
  Hintergrundbild := TBitmap.craete;
  Hintergrundbild.witdh := gewünschtebreite;
  Hintergrundbild.height:= gewünschtehöhe;
  Bild1:= TBitmap.craete;
  Bild1.witdh := gewünschtebreite;
  Bild1.height:= gewünschtehöhe;
  
  //So könnte man die beiden Bilder mit "leben" füllen
  //Bild in TImage laden(wird hier nur als Speicher benutzt)
  //und dann Bild1.canvas.draw(0,0,Image1.picture.bitmap);
  //oder z.: Bild1.loadfromfile('c:\test.bmp);
  

zeichen:
  Form.canvas.draw(0,0,Hintergrund);
  Bild1.transparentcolr := transparentefarbe;//transparentzeichnen
  Bild1.transparent := true;
  Form.canvas.draw(0,0,Bild1);

[Minz]

Habe das ganze mit einer sauberen Anwendung und zwei Images nochmal gemacht. Funktioniert einwandfrei.

Mein Problem mit dem Weißzeichnen lag daran das ich brush.color für textout benutzt habe. Dafür gibt es Font.Color.

Habe keine Farbprobleme mehr, aber danke für deinen Code.

Deinem Beispiel folgend kann ich natürlich auch Bitmaps verwenden und auf Form1 darstellen.

Sinn und Zweck meiner Images soll sein, dass ich z.B. Beschriftungen oder andere Sachen einfach auf Knopfdruck ein und ausblenden kann.
Ich will da nix hinundher kopieren müssen.

Ich habe deine Beiträge schon durchgelesen, lassen wir einfach solche Unterstellungen ok? Wie gesagt will ich nichts hinundher kopieren, sondern ich will mehrere Images übereinander. Viele Wege führen nach Rom. Ich denke nicht, dass es DEN richtigen gibt.

[Gandalfus]

Hmm ich Versuch jetzt halt immer eien möglichst elegante Lösung zufinden. Ich kann mich aber auch noch daran errinern wie es als Anfänger war. Da war man froh wenn das Programm lief.

[Minz]

jo so ist das, bin auch froh wenns läuft.

Und da viel hinunherzukopieren machts einfach unübersichtlicher.

Mal abgesehen davon, habe ich ein Schachprogramm geschrieben, Chatprogramm, Datenbankanwendungen etc., daher würde ich mich eigentlich weniger als Anfänger bezeichnen, was du sogerne in den Fordergrund stellst :wink: , nur weil ich mich mit den beknackten Bitmaps nicht so auskenne!!

[Gandalfus]

Das Anfänger bezieht sich auf den Grafikbereich.

[Minz]

des ist akzeptabel :mrgreen: