Autor Beitrag
Born-to-Frag
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1094

Win XP SP2, Win 2000 SP4
Delphi 7, 2k5
BeitragVerfasst: Do 11.10.07 21:41 
Moin,

also ich habe ein JPG in das TImage geladen. Dieses ist proportional gestreckt.
Jetzt würde ich gerne bei einem Klick auf das Image mir die Koordinate von diesem Bild (also nicht vom TImage) ausgeben lassen.
Im Prinzip funktioniert das so:
ausblenden Delphi-Quelltext
1:
2:
  X1 := Round(X * (Image.Picture.Width/Image.Width));
  Y1 := Round(Y * (Image.Picture.Height/Image.Height));

Dort habe ich nur das Problem, dass das Bild ja Proportional gestreckt ist, und wenn es beispielsweise mit der Width bis zum Anschlag der Image.Width gestreckt ist, es für die Height nicht der Fall dein muss und ich deswegen falsche Koordinaten herrausbekommen würde.

Gibt es da eine einfache möglichkeit oder muss ich vorher das Image umständlich (im Beispiel die Height) verkleinern?


greetz

_________________
Theorie ist wenn man alles weiß, aber nichts funktioniert. Praxis ist wenn alles funktioniert, aber niemand weiß warum.
Microsoft vereint Theorie und Praxis: Nichts funktioniert und niemand weiß warum.
JayEff
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2971

Windows Vista Ultimate
D7 Enterprise
BeitragVerfasst: Do 11.10.07 23:44 
Nun, du brauchst ja nur an der Seite, bei der Bild und Imagerand bündig sind, den Streckfaktor berechnen und dann mit diesem die Koordinate auf der anderen Achse bestimmen, oder?

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.
Born-to-Frag Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1094

Win XP SP2, Win 2000 SP4
Delphi 7, 2k5
BeitragVerfasst: Do 11.10.07 23:53 
Das geschieht doch in meinem Beispiel oben. Wenn das Image an einer Seite aber Größer ist als das Bild (wegen den Seitenverhältnisen) ist der Steckfaktor falsch..
Oder wie meinst du soll ich das berechnen?


greetz

_________________
Theorie ist wenn man alles weiß, aber nichts funktioniert. Praxis ist wenn alles funktioniert, aber niemand weiß warum.
Microsoft vereint Theorie und Praxis: Nichts funktioniert und niemand weiß warum.
JayEff
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2971

Windows Vista Ultimate
D7 Enterprise
BeitragVerfasst: Fr 12.10.07 00:03 
Du berechnest den Streckfaktor für beide Seiten. Ich sagte, nur für die Seite, an der Bild und Imagerand bündig sind. Lesen bildet! :les:

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.
Born-to-Frag Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 1094

Win XP SP2, Win 2000 SP4
Delphi 7, 2k5
BeitragVerfasst: Fr 12.10.07 00:51 
Sorry, hab ich überlesen :oops:
Hat super geklappt! Dank dir JayEff =)


greetz

_________________
Theorie ist wenn man alles weiß, aber nichts funktioniert. Praxis ist wenn alles funktioniert, aber niemand weiß warum.
Microsoft vereint Theorie und Praxis: Nichts funktioniert und niemand weiß warum.
JayEff
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starofftopic star
Beiträge: 2971

Windows Vista Ultimate
D7 Enterprise
BeitragVerfasst: Fr 12.10.07 01:25 
Freut mich, immer wieder gern ;)

PS: Markierst du die Topic bitte noch als "Erledigt" ? Da müsst's unten nen Link mit nem großen "HIER" haben :)

_________________
>+++[>+++[>++++++++<-]<-]<++++[>++++[>>>+++++++<<<-]<-]<<++
[>++[>++[>>++++<<-]<-]<-]>>>>>++++++++++++++++++.+++++++.>++.-.<<.>>--.<+++++..<+.