Forum: Algorithmen, Datenstrukturen und Klassendesign
by rhodan,
11. Jun 2012
habs jetzt so gelöst..:
zielkoordinatex.caption := floattostr(StrtoFloat(koordinatex.text) / StrtoFloat(originalx.text) * StrtoFloat(zielx.text));
zielkoordinatey.caption := floattostr(StrtoFloat(koordinatey.text) / StrtoFloat(originaly.text) * StrtoFloat(ziely.text));
allerdings kommen da keine glatten zahlen heraus..wie kann ich das ändern damit ich exakte koordinaten habe?
Forum: Algorithmen, Datenstrukturen und Klassendesign
by rhodan,
11. Jun 2012
procedure TForm1.Button1Click(Sender: TObject);
var
originalxx :integer;
originalyy :integer;
koordinatexx:integer;
koordinateyy:integer;
zielxx:integer;
zielyy:integer;
begin
Forum: Algorithmen, Datenstrukturen und Klassendesign
by rhodan,
11. Jun 2012
ah ich habs...danke dir!
mathe war noch nie meine stärke xD
Forum: Algorithmen, Datenstrukturen und Klassendesign
by rhodan,
11. Jun 2012
hmm...ich kenne mich mehr im grafischenbereich mit delphi aus.
wie bist du auf die zahlen gekommen bzw die neue auflösung? kannst du mir eben den rechenweg beschreiben? den code schaff ich dann :D
danke!
Forum: Algorithmen, Datenstrukturen und Klassendesign
by rhodan,
11. Jun 2012
Hallo!
Bin mir nicht sicher ob die Threadecke hier richtig ist, im zweifelsfall bitte moven und sorry..
Nun zu meiner Frage..
Mir liegt ein code vor, aufgezeichnet von einem Maus-Rekorder. In dem code sind X und Y koordinaten angegeben, auf die geklickt wird. das script setzt aber eine auflösung von 1920x1080 voraus.
mein bildschirm unterstützt diese allerdings nicht. ich möchte ein...