Autor |
Beitrag |
zarekon
Hält's aus hier
Beiträge: 5
|
Verfasst: Mo 10.03.08 22:16
Hallo, ich habe für die Schule (klasse 13) die Aufgabe mit Hilfe von Delphi ein Osterbild zu zeichen/programmieren. Soll ein farbiges Bild sein mit Ostereiern ner Wiese und natürlich nem Hasen... gibt ja im Internet ne Menge Bilder in dieser Richtung, aber wie kann ich die in Delphie umsetzen? Hab nicht viel Ahnung davon... Gibts ne Möglichkeit ein Bmp. oder gif. oder so in Delphie zu Konvertieren? wäre schön wenn ihr mir helfen könnt!
Danke
Einloggen, um Attachments anzusehen!
|
|
Popov
      
Beiträge: 1655
Erhaltene Danke: 13
WinXP Prof.
Bei Kleinigkeiten D3Pro, bei größeren Sachen D6Pro oder D7
|
Verfasst: Mo 10.03.08 22:31
Da du keine Ahnung hast, würde ich mich erst gar nicht auf Jpg oder Gif einlassen, sondern alles schon vorher in Bmp konvertieren. Zu Not kann man das mit den Windows Paint konvertieren. Danach einfach mit Bmp arbeiten. Bei Bmp hat Delphi keine Probleme, erst wenn du Gif und Jpg nutzt mußt du es intern konvertieren. Zwar könnte ich dir sagen wie das geht, aber wozu? Du kannst genauso mit Bmp arbeiten.
_________________ Popov
|
|
Yogu
      
Beiträge: 2598
Erhaltene Danke: 156
Ubuntu 13.04, Win 7
C# (VS 2013)
|
Verfasst: Mo 10.03.08 22:39
Hallo und  im Delphi-Fourm, zarekon!
Wenn ich dich richtig verstanden habe, willst du ein Bild in Delphi anzeigen lassen. Aber eins ist mir noch nicht so ganz klar: Willst du das Bild mit Delphi-code selber zeichnen, oder ein auf der Festplatte gespeichertes Bild in deinem Delphi-Programm anzeigen lassen?
1. Bild von Festplatte laden und anzeigen
Füge eine Image-Komponente in dein Formular ein. Du findest sie auf der "Zusätzlich"-Seite. Dann kannst du im Objektinspektor die Eigenschaft Picture suchen und doppelklicken. Mit den Buttons in diesem Dialogfeld kannst du dir dann ein Bild in die Komponente laden. Wenn du ein anderes Bildformat wie BMP verwendest, dann solltest du dieses erst in BMP umwandeln, wie Popov schon sagte.
2. Bild in Delphi erstellen
Das ist sehr viel komplizierter. Ich hoffe, dass du das nicht machen musst. Wenn es doch so wäre, kann ich dir immer noch etwas darüber sagen.
Grüße,
Yogu
|
|
Blackheart666
      
Beiträge: 2195
XP
D3Prof, D6Pers.
|
Verfasst: Mo 10.03.08 22:49
Man fragt sich hier ob das alles mit rechten Dingen zugeht, oder einem hier nur etwas vom Osterhasen erzählt wird. 
_________________ Blackheart666
Der Irrsinn ist bei Einzelnen etwas Seltenes, - aber bei Gruppen, Parteien, Völkern, Zeiten die Regel. (Friedrich Nietzsche)
|
|
ub60
      
Beiträge: 764
Erhaltene Danke: 127
|
Verfasst: Mo 10.03.08 23:26
Ich nehme mal an, Dein Lehrer meint so was (siehe unten).
Mit Deinem Bild hab ich mir mal die Mühe gemacht und angefangen.
Delphi-Quelltext 1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24:
| with Image1.Canvas do begin Brush.Color:=clRed; Ellipse(260,120,380,300); Brush.Color:=RGB(212,145,2); Rectangle(260,270,380,320); Brush.Color:=RGB(200,140,2); Ellipse(290-25,320-25,290+25,320+25); Ellipse(350-25,320-25,350+25,320+25); Brush.Color:=clMaroon; Ellipse(290-5,320-5,290+5,320+5); Ellipse(350-5,320-5,350+5,320+5); Pen.Color:=RGB(200,140,2); Pen.Width:=5; MoveTo(180,230); LineTo(260,290); Pen.Color:=clBlack; Pen.Width:=2; PolyBezier([Point(180,55),Point(210,70),Point(230,70),Point(265,40)]); PolyBezier([Point(180,55),Point(200,30),Point(240,35),Point(265,40)]); PolyBezier([Point(165,65),Point(210,85),Point(220,90),Point(285,35)]); PolyBezier([Point(155,40),Point(180,55),Point(200,0),Point(285,35)]); PolyBezier([Point(160,25),Point(180,5),Point(210,0),Point(255,27)]); end; |
Der Rest ist nur Fleißarbeit  .
Viel Spaß!
ub60
Einloggen, um Attachments anzusehen!
|
|
zarekon 
Hält's aus hier
Beiträge: 5
|
Verfasst: Do 13.03.08 17:13
vielen vielen dank für eure antworen!!!
das was ub60 geschrieben hat ist genau das was ich meinte!
ich werde mich dann mal ransetzen und das bild weiter bearbeiten/ programmieren.
leider wurde uns in der schule bloß die aufgabe gegeben ohne eine vorgabe welche befehle man wie auführen kann... naja
also nochmal vielen dank
zarekon 
|
|
ub60
      
Beiträge: 764
Erhaltene Danke: 127
|
Verfasst: Do 13.03.08 18:45
zarekon hat folgendes geschrieben: | ich werde mich dann mal ransetzen und das bild weiter bearbeiten/ programmieren.
|
Es wäre schön, wenn Du dann mal Dein fertiges Ergebnis posten könntest.
So als Osterüberraschung.
ub60
|
|
zarekon 
Hält's aus hier
Beiträge: 5
|
Verfasst: Fr 14.03.08 19:49
ja klar hab nur ein problem, welche datei denn???
(hab einen ganzen haufen im ordner...)
danke zarekon
|
|
ub60
      
Beiträge: 764
Erhaltene Danke: 127
|
Verfasst: Fr 14.03.08 20:23
Am Besten 2 Dateien:
1. ein Screenshot als PNG-Datei, da wissen alle, was sie laden,
2. eine ZIP-Datei, in die Du die Dateien mit den Endungen DPR, PAS, DFM und RES packst. (Auf die RES-Datei kannst Du zur Not verzichten.)
ub60
|
|
zarekon 
Hält's aus hier
Beiträge: 5
|
Verfasst: Fr 14.03.08 21:43
leider habe ich das programm nicht auf diesem rechner also kann
ich keinen screenshot machen aber vielleicht krieg ich das programm
ja noch irgendwo her...
naja aber die restlichen dateien habe ich gezippt und werde sie jetzt
reinstellen ("download ostern.zip")
vielen dank nochmal für eure hilfe
zarekon
Einloggen, um Attachments anzusehen!
|
|
blackdevile
Hält's aus hier
Beiträge: 8
|
Verfasst: Di 18.03.08 09:28
Ich persönlich finde das gut gelungen, war so frei und habe für die anderen nen Screnni angehängt.
Greetz
Chris
Einloggen, um Attachments anzusehen!
|
|
Yogu
      
Beiträge: 2598
Erhaltene Danke: 156
Ubuntu 13.04, Win 7
C# (VS 2013)
|
Verfasst: Di 18.03.08 12:09
Hallo zarekon,
Bitte markiere dieses Topic noch als "beantwortet", dass die anderen auch sehen, dass es hier kein Problem mehr gibt. Klicke dazu einfach im ersten Post Auf  .
Grüße,
Yogu
|
|
zarekon 
Hält's aus hier
Beiträge: 5
|
Verfasst: Mi 19.03.08 20:16
danke für den screenshot aber du hast nur das eine Bild genommen, das andere, mit osterhase und wagen, ist viel viel schöner!
wäre nett wenn du das auch noch machen könntest
danke zarekon
|
|
ub60
      
Beiträge: 764
Erhaltene Danke: 127
|
Verfasst: Mi 19.03.08 21:12
Da ich Dich ja angehalten hatte, die Resultate hier reinzustellen, will ich auch mal das Bild hochladen.
ub60
Einloggen, um Attachments anzusehen!
|
|
|