![]() |
In Image zeichnen
Hallo!
Ich versuche, in ein Image zu zeichnen, in das ich zuvor mit canvas.draw ein jpg geladen habe. Nun kommt eine meldung, dass ich nur in Bitmaps zeichnen kann! Muss ich jetzt das Jpg in ein Bitmap umwandeln? Wenn ja, wie mache ich das? |
Re: In Image zeichnen
Hai Caesar :stupid:
ich habe das jetzt mal mit diesem Code gemacht:
Delphi-Quellcode:
Oder meintest Du etwas ganz anderes?
procedure TForm1.Button1Click(Sender: TObject);
var jpeg : TJPEGImage; begin if (OpenPictureDialog1.Execute) then begin jpeg := TJPEGImage.Create; try jpeg.LoadFromFile(OpenPictureDialog1.FileName); Image1.Canvas.Draw(0,0,jpeg); finally jpeg.Free; end; Image1.Canvas.MoveTo(10,10); Image1.Canvas.Pen.Width := 10; Image1.Canvas.LineTo(100,100); end; end; |
Re: In Image zeichnen
Also, ich habe ohne irgendeinen Dialog ein jpg bild in Image2 geladen.
Jetzt will ich ein Rechteck mit Canvas. Retagle (oder so ähnlich) da hinein zeichnen. Sobald ich es versuche bekomme ich eine Meldung, dassich nicht in jpg's, sondern nur in bmp's zeichnen kann! und jetzt möchte ich wissen, wie ich in das jpg zeichnen kann, oder dieses in ein bmp umwandeln! |
Re: In Image zeichnen
Wie versuchst du denn da rein zu zeichnen?
Wenn du auf Image1.Canvas zeichnest müsste es doch gehen. |
Re: In Image zeichnen
Dann kommt die besagte Meldung, dass ich nur in Bitmaps, und nicht in Jpegs zeichnen kann!
Ich versuche es mit:
Delphi-Quellcode:
Form1.Image2.Canvas.Rectangle(x1,y1,x2,y2);
|
Re: In Image zeichnen
Hmm...
wenn ich das mit meinem Code oben mache geht es. Den Dialog zum öffnen habe ich nur drinnen um nicht den Pfad zum Bild tippen zu müssen. |
Re: In Image zeichnen
Hier jetzt mal der genaue Text der Meldung:
Project Project1.exe raised exception class EInvalidOperation with message 'Can only modify an image if it contais a bitmap'. Process stopped. Use Step or Run to continue. |
Re: In Image zeichnen
Hai maximus,
hast Du in dem Image schon etwas zur Entwurfszeit geladen? Wenn Ja -> Lösche es mal. |
Re: In Image zeichnen
Hab ich leider nicht!
|
Re: In Image zeichnen
Hab jetzt den Code oben nochmal ausprobiert!
Die Meldug erscheint immernoch... |
Alle Zeitangaben in WEZ +1. Es ist jetzt 19:52 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