Forum: Multimedia
Delphi
by San,
5. Jan 2005
vielen Dank Birzenbae!!! :cheers:
jetzt klappt das speichern!!! :bounce2: :bounce1: :bouncing4: :hello:
Liebe Grüße
San
PS: noch ein kleiner Hinweis, in der 2. Zeile des 3. Quelltextes hast du aus versehen PaintBox.Height anstatt PaintBox1.Height geschrieben.
Forum: Multimedia
Delphi
by San,
5. Jan 2005
also, ich habe eine paintbox, in die in meinem programm eben etwas gezeichnet wird. wenn diese bild dann fertig gezeichnet ist, würde ich es gerne speichern.
also eigentlich möchte ich "nur" den inhalt einer paintbox speichern
Forum: Multimedia
Delphi
by San,
5. Jan 2005
verstehe das im moment alles nicht so wirklich, da ich mich mit delphi noch nicht so gut auskenne und vorallem nicht mit bitmaps.
kann mir das nicht vielleicht jemand in eine einfache ButtonClick procedure oder so schreiben?
damit wäre mir glaube ich am meißten geholfen, da ich sonst bestimmt nur immer neue probleme hätte, weil ich selbst einfache sachen nicht hinbekommen würde.
Forum: Multimedia
Delphi
by San,
4. Jan 2005
versteh nich ganz, was du meinst.
wenn ichdie bitmap variable im private teil,anstatt in der prozedure selber deklariere und meine procedure sonst so lasse (kann ich das?), dann bekomme ich immer noch den fehler von inkompatiblen typen. das speichern ist ja auch im moment nich mehr mein problem, sonder das TBitmap mit Inhalt zu füllen.
Forum: Multimedia
Delphi
by San,
4. Jan 2005
brauche ne paintbox in meinem programm, da sie schnell immer wieder neu gezeichnet werden muss...
und das wäre mit nem image ja nicht möglich, oder?
Forum: Multimedia
Delphi
by San,
4. Jan 2005
aber wenn ich eben anstatt bitmap (ist eigentlich klar, dass es dann weiß bleibt :wall: ) paintbox1 einsetze bekomme ich die fehlermeldug mit den inkompatiblen typen.
wie kann ich das denn umgehen? das verstehe ich eben nicht, eben auch nicht, warum das so nicht geht. der inhalt ist doch sowohl im bitmapm als auch in der paintbox graphisch und das programm wird doch nur aufgefordert, eben...
Forum: Multimedia
Delphi
by San,
4. Jan 2005
procedure TForm1.Speichern(Sender: TObject);
var
Bitmap: TBitmap;
begin
Bitmap:= TBitmap.Create; //erstellt eine Bitmap
Bitmap.PixelFormat:= pf32bit; //Bitmap erhält eine Bittiefe von 32 Bit (hohe Qualität)
Bitmap.Height:= PaintBox1.Height; //Höhe der Bitmap ist gleich der Höhe der Paintbox
Bitmap.Width:= Paintbox1.Width; //Breite der Bitmap ist gleich der Breite der Paintbox
Forum: Multimedia
Delphi
by San,
4. Jan 2005
danke für deine schnelle antwort.
wenn man PaintBox1 anstatt Bitmap verwendet, kommt di Fehlermeldung
soundU.pas(142): Inkompatible Typen: 'TGraphic' und 'TPaintBox'
habe den savedialog auch per savedialog1.execute aufgerufen, aber hat trotzdem nicht geklappt.
edit: habe das gerade nochmal den code von hansklok verwendet und daort dann den savedialog eingesetzt, dann hat es doch...
Forum: Multimedia
Delphi
by San,
4. Jan 2005
Hallo,
habe auch versucht das Bild einer Paintbox in ein Bitmap zu zeichnen und dieses dann abzuspeichern. Habe schon verschiedene Methoden probiert, aber keine hat funktioniert.
Habe es jetzt auch einmal mit dem Code von hansklok probiert. Damit erhielt ich keine Fehlermeldung (musste nur heigth in height umändern) und es wurde auch etwas gespeichert. Allerdings wurde dabei der Inhalt...