çalışma anında componentleri seçmek

[Misafir]

diyelimki program da form uzerinde 10 tane edit var...

hani formu tasalarken bi noktadan mouse ile basılı tutup aşağı dogru componentleri secip mose yi bırakırsınız da hepsini secer ya...win dows masa üstünde bir den çok ögeyi secmek için kullandığımız yontem işte....o şekilde programdaki componentleri seçmek isitoyrum...


örneğin 10 tane edilt var...

bunları dediğim şekilde sececeğim mouseyi bıraktıgımda diyelim editlerin hepsinde ok yazdıracağım...

?

bununla ilgili component var diye duydum...

bilgisi olan ve yardımcı olabilecek arkadaslara teşk. ederim

[Misafir]

a:= GetLengthSid(Form1);
edit1.Text:=inttostr(a);


ya bu şekilde mouseyi tıkladığımı noktanın koordinatını aldım...şoyle yapmayı düşünüyorum...

mouseyi bıraktığım noktayı da alacğımm...

secili olan alanın top left ve width ile height degerlerini bulup formadki nesneler için top ve left degerleri bu degerler arasında kalanlara istediğim işlemi yapacğaım..


yalnız

a:= GetLengthSid(Form1);
edit1.Text:=inttostr(a);

bu metod ile mouseti tıkladığım yeri buldum...mouseyi bıraktıgım noktanın degerini alamadım...

[Misafir]

mouseyi tıkladığım anda form da tıkladığım yerin koordinatını;

mouseyi bıraktıgım anda da aformda bıraktığım noktanın koordinatını almak istiyorum...;

[feinpus]

Formun OnMouseUp OnMouseDown olaylarını kullan mousedown tıkladığın yerin değişkenine aktar mouseup ise bıraktığın yerin değişkenine değer ata.

Kolay Gelsin...

[Misafir]

olayları biliyorum.....

onmousedown da soyle bir yol izliyorum

getcursorpos(a);

tabi a Tpoint türünden...

bu degeri edit1 e aktarırken nasıl bir dönüşüm kullanmalıyım ?

[Misafir]

kendi kendime konusa konusa..sesli düşünerek çözdüm olayı....

[Misafir]

merhaba.

Kod: Tümünü seç

getcursorpos(a)

onmousemowe ya da onmousedown yordamlarında neden bunu kullanıyorsun hocam x,y parametresi var yordamların.çözsen de bi bakmanı salık veririm.

kolay gelsin.

[Misafir]

ya son olarak şunu diyim...

mouseyi tıkladığım yerde tıkladığım yerin koordinatlarını integer tipinde mouseyi bıraktığım yer bıraktıgım yerin koordinatlarını integer tipinde nasıl alabilirim...

tşk...

[Misafir]

bakınız üstteki açıklama...

[Abrak]

Form event;
Burdan başlangıcı alabilirsin;
OnMouseDown //Farede herhangi bir tuşta çalışır
MbRight sağ fare tuşu
MbLeft sol fare tuşu
MbMiddle orta fare tuşu

Burdanda Bitişi;
OnMouseUp //Basılan fare tuşu bırakıldıında bu olay meydana gelir