AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Thema durchsuchen
Ansicht
Themen-Optionen

image

Offene Frage von "LEE1"
Ein Thema von LEE1 · begonnen am 2. Okt 2009 · letzter Beitrag vom 3. Okt 2009
Antwort Antwort
Seite 3 von 5     123 45      
Benutzerbild von Die Muhkuh
Die Muhkuh

Registriert seit: 21. Aug 2003
7.332 Beiträge
 
Delphi 2009 Professional
 
#21

Re: image

  Alt 2. Okt 2009, 21:18
Einfach auf alle Ignorieren drücken.
  Mit Zitat antworten Zitat
LEE1

Registriert seit: 30. Sep 2009
58 Beiträge
 
Delphi 7 Personal
 
#22

Re: image

  Alt 2. Okt 2009, 21:31
danke^^
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

Registriert seit: 29. Mai 2002
37.621 Beiträge
 
Delphi 2006 Professional
 
#23

Re: image

  Alt 2. Okt 2009, 21:35
Und bitte gib deinem Thread das nächste mal einen aussagekräftigen Titel.
Michael
Ein Teil meines Codes würde euch verunsichern.
  Mit Zitat antworten Zitat
Benutzerbild von alleinherrscher
alleinherrscher

Registriert seit: 8. Jul 2004
Ort: Aachen
797 Beiträge
 
Delphi XE2 Professional
 
#24

Re: image

  Alt 2. Okt 2009, 21:37
Man benutzt die Procedure ganz einfach:

1) Da du jetzt ja die GR32 installiert hast, kannst du ein TImage32 anstelle eines TImage auf dein Formular ziehen. (Das hat jetzt sagen wir mal den namen Image321)

2) Erstelle eine Prozedur, die ein TBitmap32 einliest aus irgendwelchen Dateien von dir, also z.B.

Delphi-Quellcode:
procedure TForm1.ButtonClick(Sender:TObject);
var aBmp32:TBitmap32;
begin

aBmp32:=TBitmap32.create; //erstmal das Objekt erstellen
aBmp32.loadfromfile('dateiname.bmp');
3) Rufe jetzt die PaintCover Procedur auf:

Delphi-Quellcode:

procedure PaintCover(DestBitmap:TBitmap32;x,y,width,height:integer;perspectiv:single;angle:integer;picture:TBitmap32);
DestBitmap ist das Bitmap, wo die Procedur das perspektivische Bild hinzeichnen soll. x,y,width und height sind die Positionsangaben in DestBitmap für das perspektivische Bild.

Perspectiv ist ein Wert zwischen 0 und 1, der festlegt wie stark perspektivisch das Bild dargestellt werden soll (also die Tiefenwirkung)

angle ist der Winkel zwischen 0 und 90 grad.

d.h. in unserem Beispiel könntest du die PaintCover funktion so aufrufen:

PaintCover(Image321.Bitmap,0,0,50,50,0.5,30,aBmp32); Und dann sollte eigentlich schon was zu sehen sein....
„Software wird schneller langsamer als Hardware schneller wird. “ (Niklaus Wirth, 1995)

Mein Netzwerktool: Lan.FS
  Mit Zitat antworten Zitat
LEE1

Registriert seit: 30. Sep 2009
58 Beiträge
 
Delphi 7 Personal
 
#25

Re: image

  Alt 2. Okt 2009, 21:45
jetz kommt das
Miniaturansicht angehängter Grafiken
unbenannt_871.png  
  Mit Zitat antworten Zitat
Benutzerbild von alleinherrscher
alleinherrscher

Registriert seit: 8. Jul 2004
Ort: Aachen
797 Beiträge
 
Delphi XE2 Professional
 
#26

Re: image

  Alt 2. Okt 2009, 21:46
Jetzt kommt das "Debuggen" kann sein, dass Gr32 da auf n Error läuft, weil du auf Pixel zugreifen willst, die außerhalb deines Images liegen (also wenn das beispielsweise nur 30x30 Pixel groß ist, und wir aber eine Width und Height von 50 in PaintCover angegeben haben)
„Software wird schneller langsamer als Hardware schneller wird. “ (Niklaus Wirth, 1995)

Mein Netzwerktool: Lan.FS
  Mit Zitat antworten Zitat
Benutzerbild von alleinherrscher
alleinherrscher

Registriert seit: 8. Jul 2004
Ort: Aachen
797 Beiträge
 
Delphi XE2 Professional
 
#27

Re: image

  Alt 2. Okt 2009, 21:47
---oh man bin ich ein schussel heute abend --- *verurteilt im Sinne der Anklage wegen einem überflüssigen post*
„Software wird schneller langsamer als Hardware schneller wird. “ (Niklaus Wirth, 1995)

Mein Netzwerktool: Lan.FS
  Mit Zitat antworten Zitat
LEE1

Registriert seit: 30. Sep 2009
58 Beiträge
 
Delphi 7 Personal
 
#28

Re: image

  Alt 2. Okt 2009, 22:11
ja das is logisch doch mein image is größer als 50 un es kommt trotzdem
  Mit Zitat antworten Zitat
Namenloser

Registriert seit: 7. Jun 2006
Ort: Karlsruhe
3.724 Beiträge
 
FreePascal / Lazarus
 
#29

Re: image

  Alt 2. Okt 2009, 22:51
Wollte nur mal kurz darauf hinweisen, dass die GR32 schon sehr leistungsfähige Transformations-Funktionen eingebaut haben. Von Skalierung über Drehung bis zu freier Verformung ist eigentlich alles damit möglich. Es gibt dazu auch eine Demo.
  Mit Zitat antworten Zitat
Benutzerbild von alleinherrscher
alleinherrscher

Registriert seit: 8. Jul 2004
Ort: Aachen
797 Beiträge
 
Delphi XE2 Professional
 
#30

Re: image

  Alt 3. Okt 2009, 11:18
@LEE1: Ohne SourceCode Einblicke wird das etwas schwierig mit dem Helfen, glaub ich...
„Software wird schneller langsamer als Hardware schneller wird. “ (Niklaus Wirth, 1995)

Mein Netzwerktool: Lan.FS
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 3 von 5     123 45      


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