AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Multimedia Canvas: "erlaubt kein Zeichnen"
Thema durchsuchen
Ansicht
Themen-Optionen

Canvas: "erlaubt kein Zeichnen"

Ein Thema von VkPenguin · begonnen am 7. Feb 2012 · letzter Beitrag vom 12. Feb 2012
Antwort Antwort
VkPenguin

Registriert seit: 23. Dez 2011
150 Beiträge
 
Delphi XE7 Architect
 
#1

AW: Canvas: "erlaubt kein Zeichen"

  Alt 8. Feb 2012, 00:08
Hm, ich muss gestehen, auch wenn ich mir sowas in Richtung "Wo nichts ist, kann man auch nichts Zeichnen" schon dachte, dennoch verstehe ich nicht ganz, was du meinst. Mein eigentliches Ziel war, das JPEG (Kann ich aber auch zum BMP umwandeln, wenn das praktischer ist) "Test.jpg" anzuzeigen. Im Internet habe diese Antwort gefunden und dann ins Testprogramm geschrieben:


Delphi-Quellcode:
...
jpg:=TJpegImage.Create;
jpg.LoadFromFile('jpg.LoadFromFile('C:\Users\Pictures\Test.jpg');');
canvas.Draw(0,0,jpg);
jpg.Free
...
Bei der "Canvas.draw"-Zeile stürzt das Programm aber ab. Muss ich vielleicht noch irgendwo die Leinwandgröße oder soetwas festlegen? Konnte in der Datenbank aber nirgends finden, dass etwas derartiges dafür nötig wäre.

@Popov:
Ahh! Jetzt wird mir das schon etwas klarer. Wenn ich das richtig verstehe muss das Bild sich auf die Leinwand zeichnen - also "BILD.LEINWAND.machetwas" - ja? (oder nein? )

Aber wie funktioniert das jetzt mit meinem JPG? Ganz so einfach funktionierts bei mir zumindest nicht, oder ich hab mich wieder irgendwo vertan.


Danke für Eure schnelle Hilfe!
  Mit Zitat antworten Zitat
Popov
(Gast)

n/a Beiträge
 
#2

AW: Canvas: "erlaubt kein Zeichen"

  Alt 8. Feb 2012, 00:15
Zuerst, sonderbar, aber auch wenn die Bitmap die Höhe und Breite 0 hat, kannst du dennoch über Canvas das Pixel 100, 100 ansprechen. D. h. die Leinwand ist da, der Zugriff ist nur etwas außerhalb der Leinwand.

Nun zum Jpeg. Nagele mich nicht fest, aber ich glaube nicht, dass Jpeg eine Canvas haben. Also zuerst Jpeg2Bmp, dann auf Bmp arbeiten, dann wieder in Jpeg.
  Mit Zitat antworten Zitat
VkPenguin

Registriert seit: 23. Dez 2011
150 Beiträge
 
Delphi XE7 Architect
 
#3

AW: Canvas: "erlaubt kein Zeichen"

  Alt 8. Feb 2012, 00:17
Ok, vielen Dank. Ich werd das JPG morgen mal konvertieren und das ganze nochmal versuchen. Kann etwas dauern, bis ich dazu Zeit gefunden habe, melde mich dann aber aufjedenfall mit dem Ergebnis!
  Mit Zitat antworten Zitat
Medium

Registriert seit: 23. Jan 2008
3.687 Beiträge
 
Delphi 2007 Enterprise
 
#4

AW: Canvas: "erlaubt kein Zeichen"

  Alt 8. Feb 2012, 00:49
Das Canvas in deinem Schnipsel da oben ist sicherlich in einer Methodes eines Formulares. Dort referenziert es implizit self.Canvas, und TForm.Canvas ist mit einer Zeichnfläche hinterlegt, wie auch TBitmap.

Wieder ein Fall, wo ich die Namenswahl von "Canvas" anprangern muss, da sie völlig irreführend ist. Alles, was "Canvas" macht ist, dir eine Palette, Farbpaste und Pinsel in die Hand zu drücken. Die Staffelei und die Leinwand (engl. Canvas) und den Keilrahmen musst du selbst besorgen. TCanvas alleine (ohne einen assoziierten DC) stellt reine Funktionalität bereit, nicht mehr.

Es macht nur Sinn, eine Instanz von TCanvas selbst zu erzeugen und verwenden, wenn man dieser nach Erstellung noch einen DC verpasst. TBitmap tut dies für dich.
"When one person suffers from a delusion, it is called insanity. When a million people suffer from a delusion, it is called religion." (Richard Dawkins)

Geändert von Medium ( 8. Feb 2012 um 02:03 Uhr)
  Mit Zitat antworten Zitat
Antwort Antwort


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 00:33 Uhr.
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz