Ĺadny brzuch
Witam ponownie.Mam pytanie.Ponizej rysunek o co mi chodzi.
^
X|
|
|___.x1,y1
|_____________.x2,y2
|
---------------------------->
y
Widze ze punkty sa na rysunku nieprzesuniete wiec prosze przyjmijcie ze tego "_"znaczzka na wykresie nie ma.
W ostatnim numerze experta w dziale Delphi byl opisany prosty wygaszacz ekranu.Wszystko ladnie pieknie jesli kulki obracaja sie wokol srodka ekranu o stalym promieniu R.
ale ja chcialbym aby moja kulka(x2.y2)obrocila sie wokol punktu x1,y1.Przy czym jesli zmienie pozycje punktu x1,y1 ni zmieniajac pozycji punktu x2,y2 to juz nic nie wyjdzie bo promien sie zmieni.
Pytanie brzmi JAK OBLICZYC PROMIEN (ODCINEK) POMIEDZY PUNKTEM x1,y1 a x2,y2 chodzi mi oczywiscie o wzor ktory moglbym wpisac w DELPHI.
Z gory dziekuje za odpowiedzi.Naprawde bardzo mi to pomoze jesli ktos zna rozwiazanie.
cytat:Kasoul napisał:
Pytanie brzmi JAK OBLICZYC PROMIEN (ODCINEK) POMIEDZY PUNKTEM x1,y1 a x2,y2 chodzi mi oczywiscie o wzor ktory moglbym wpisac w DELPHI.
Sqrt(Sqr(x2-x1)+Sqr(y2-y1))
Nie za dobrze u Ciebie z tą matematyką... ;)
Kontakt - GG:5365367 / ICQ:245363570
(tylko w sprawach prywatnych - inne pytania proszę zadawać na Forum)
Jeśli chodzi o długość promienia(odcinka) to wzór wygląda tak:
x2 - x1, y2 - y1 (wzór na obliczanie długości wektora:))
Pozdro for All
Oxi, nie żebym od Ciebie odgapiał, bo twój post zobaczyłem dopiero po napisaniu tego.
gg: 4826295 neohacker@interia.pl
Dzieki OXi mam nadzieje ze zadziala.Zaraz sprawdze.
Jesli mozesz to powiedz jeszcze co oznacza sqrt sqr ?
Obiecuje od jutra pozadnie wziasc sie za matme...:cheesy:
cytat:Kasoul napisał:
Jesli mozesz to powiedz jeszcze co oznacza sqrt sqr ?
Sqrt - ta funkcja zwraca pierwiastek tego co podano w nawiasie.
Sqr - ta funkcja podnosi do kwadratu to co podano w nawiasie.
Kontakt - GG:5365367 / ICQ:245363570
(tylko w sprawach prywatnych - inne pytania proszę zadawać na Forum)
Bym coś powiedzial ale sie powstrzymam :!
Programować umie każdy, ale tylko nieliczni umieją włączyc komputer ...
cytat:darektbg napisał:
Bym coś powiedzial ale sie powstrzymam :!
Najlepiej powstrzymuj się od takich nic nie wnoszących komentarzy.
Kontakt - GG:5365367 / ICQ:245363570
(tylko w sprawach prywatnych - inne pytania proszę zadawać na Forum)
Wzor narazie oki ale mam problem.Umiescilem na formie 2 Shapy i zmiennym x1,y1 i x2,y2 przypisalem wartosci left i top tych shapow
Podkladam wzor r1:=Sqrt(Sqr(x2-x1)+Sqr(y2-y1))
oki liczy ale dalej musze w spinedit umiescic wartosc r1
czyli spinedit.value:=r1 i tu zaczyna sie problem, pojawia sie bowiem blad:
[Error] Unit1.pas(85): Incompatible types: 'String' and 'Real'
Domyslam sie ze typ Real mam przekonwertowac na typ String
zazwyczaj robi sie to np.IntToStr ale tutaj nie mam pojecia jak to zrobic.
P.S.
Jesli nie chcecie abym zawracal wam glowe to poprostu napiszcie to opuszcze forum.O tym ze z matematyki orlem nie jestem wiem ale wlasnie dlatego tu trafilem, aby sie nauczyc to co wyszlo mi z glowy pare lat temu...
Pozdrawiam Kasoul
Nie zawracasz głowy, bo forum (a w szczególności dział porady) jest od tego aby innym pomagać.
Co do pytania to musisz to przekonwertować przez funkcję:
spinedit.value:= FloatToStr(r1);
Pozdro for All
gg: 4826295 neohacker@interia.pl
Dzieki wielkie NeoHacker wystarczy mi STRING moge teraz zrobic z tym co zechce:))))
Biore sie teraz za obrot o ten promien puntu x2,y2 wokol punktu X1,Y1
I znow nie wyszlo... hmm jak zmodyfikowac ten wzor abym mogl obrocic punkt x2,y2 wokol x1,y1
bo podejzewam ze wyglada on:
X2:= x1+r1*sin(Pi/4-stopien obrotu);
y2:= y1+r1*cos(pi/4-stopien obrotu);
tyle ze nie dziala wiec cos tu jest zle...
Dzieki jeszcze raz za pomoc.
Pytanie kolejne z typu dziwnych.
Jak zamienic r1 aby bylo liczba calkowita np 1..2...3
a nie 1,38279387298 itp
Co do drugiego pytania to możesz zaokrąglić r1, a będzie to wyglądało tak:
var
y : integer; {ustalasz dodatkową zmienną typu całkowitego}
r1 : real; {Twoja zmienna}
begin
y := Round(r1);{funkcja Round zaokrągla liczbę r1}
end;
Teraz wypróbuj te wzory na obrót.
Pozdro for All
gg: 4826295 neohacker@interia.pl
zanotowane.pl doc.pisz.pl pdf.pisz.pl zsf.htw.pl
^
X|
|
|___.x1,y1
|_____________.x2,y2
|
---------------------------->
y
Widze ze punkty sa na rysunku nieprzesuniete wiec prosze przyjmijcie ze tego "_"znaczzka na wykresie nie ma.
W ostatnim numerze experta w dziale Delphi byl opisany prosty wygaszacz ekranu.Wszystko ladnie pieknie jesli kulki obracaja sie wokol srodka ekranu o stalym promieniu R.
ale ja chcialbym aby moja kulka(x2.y2)obrocila sie wokol punktu x1,y1.Przy czym jesli zmienie pozycje punktu x1,y1 ni zmieniajac pozycji punktu x2,y2 to juz nic nie wyjdzie bo promien sie zmieni.
Pytanie brzmi JAK OBLICZYC PROMIEN (ODCINEK) POMIEDZY PUNKTEM x1,y1 a x2,y2 chodzi mi oczywiscie o wzor ktory moglbym wpisac w DELPHI.
Z gory dziekuje za odpowiedzi.Naprawde bardzo mi to pomoze jesli ktos zna rozwiazanie.
cytat:Kasoul napisał:
Pytanie brzmi JAK OBLICZYC PROMIEN (ODCINEK) POMIEDZY PUNKTEM x1,y1 a x2,y2 chodzi mi oczywiscie o wzor ktory moglbym wpisac w DELPHI.
Sqrt(Sqr(x2-x1)+Sqr(y2-y1))
Nie za dobrze u Ciebie z tą matematyką... ;)
Kontakt - GG:5365367 / ICQ:245363570
(tylko w sprawach prywatnych - inne pytania proszę zadawać na Forum)
Jeśli chodzi o długość promienia(odcinka) to wzór wygląda tak:
x2 - x1, y2 - y1 (wzór na obliczanie długości wektora:))
Pozdro for All
Oxi, nie żebym od Ciebie odgapiał, bo twój post zobaczyłem dopiero po napisaniu tego.
gg: 4826295 neohacker@interia.pl
Dzieki OXi mam nadzieje ze zadziala.Zaraz sprawdze.
Jesli mozesz to powiedz jeszcze co oznacza sqrt sqr ?
Obiecuje od jutra pozadnie wziasc sie za matme...:cheesy:
cytat:Kasoul napisał:
Jesli mozesz to powiedz jeszcze co oznacza sqrt sqr ?
Sqrt - ta funkcja zwraca pierwiastek tego co podano w nawiasie.
Sqr - ta funkcja podnosi do kwadratu to co podano w nawiasie.
Kontakt - GG:5365367 / ICQ:245363570
(tylko w sprawach prywatnych - inne pytania proszę zadawać na Forum)
Bym coś powiedzial ale sie powstrzymam :!
Programować umie każdy, ale tylko nieliczni umieją włączyc komputer ...
cytat:darektbg napisał:
Bym coś powiedzial ale sie powstrzymam :!
Najlepiej powstrzymuj się od takich nic nie wnoszących komentarzy.
Kontakt - GG:5365367 / ICQ:245363570
(tylko w sprawach prywatnych - inne pytania proszę zadawać na Forum)
Wzor narazie oki ale mam problem.Umiescilem na formie 2 Shapy i zmiennym x1,y1 i x2,y2 przypisalem wartosci left i top tych shapow
Podkladam wzor r1:=Sqrt(Sqr(x2-x1)+Sqr(y2-y1))
oki liczy ale dalej musze w spinedit umiescic wartosc r1
czyli spinedit.value:=r1 i tu zaczyna sie problem, pojawia sie bowiem blad:
[Error] Unit1.pas(85): Incompatible types: 'String' and 'Real'
Domyslam sie ze typ Real mam przekonwertowac na typ String
zazwyczaj robi sie to np.IntToStr ale tutaj nie mam pojecia jak to zrobic.
P.S.
Jesli nie chcecie abym zawracal wam glowe to poprostu napiszcie to opuszcze forum.O tym ze z matematyki orlem nie jestem wiem ale wlasnie dlatego tu trafilem, aby sie nauczyc to co wyszlo mi z glowy pare lat temu...
Pozdrawiam Kasoul
Nie zawracasz głowy, bo forum (a w szczególności dział porady) jest od tego aby innym pomagać.
Co do pytania to musisz to przekonwertować przez funkcję:
spinedit.value:= FloatToStr(r1);
Pozdro for All
gg: 4826295 neohacker@interia.pl
Dzieki wielkie NeoHacker wystarczy mi STRING moge teraz zrobic z tym co zechce:))))
Biore sie teraz za obrot o ten promien puntu x2,y2 wokol punktu X1,Y1
I znow nie wyszlo... hmm jak zmodyfikowac ten wzor abym mogl obrocic punkt x2,y2 wokol x1,y1
bo podejzewam ze wyglada on:
X2:= x1+r1*sin(Pi/4-stopien obrotu);
y2:= y1+r1*cos(pi/4-stopien obrotu);
tyle ze nie dziala wiec cos tu jest zle...
Dzieki jeszcze raz za pomoc.
Pytanie kolejne z typu dziwnych.
Jak zamienic r1 aby bylo liczba calkowita np 1..2...3
a nie 1,38279387298 itp
Co do drugiego pytania to możesz zaokrąglić r1, a będzie to wyglądało tak:
var
y : integer; {ustalasz dodatkową zmienną typu całkowitego}
r1 : real; {Twoja zmienna}
begin
y := Round(r1);{funkcja Round zaokrągla liczbę r1}
end;
Teraz wypróbuj te wzory na obrót.
Pozdro for All
gg: 4826295 neohacker@interia.pl