merhabalar delphidaşlarım.
ben şu anda bi raporlama progrmaı ile uğraşmaktayım. bileşenleri sağa-sola,aşağı-yukarı ,büyültüp-küçültmek için söle güzel çalışan bi comp. ihtiyacım var. aslında ben handles diye bi bileşen var onu kullanıyom.fakat onda da bileşeni taşıdığımda bırakmak istediğimde bazı sorunlarla karşılaştım. acaba buna benzer bi comp. hakkında bilgisi olan varmı. şimdiden tşk. ederim
nesne taşıma
Forum kuralları
Forum kurallarını okuyup, uyunuz!
Forum kurallarını okuyup, uyunuz!
- recepgalip
- Üye
- Mesajlar: 60
- Kayıt: 12 Haz 2003 04:50
- Konum: Mersin/Rize
- İletişim:
nesne taşıma
ALLAH NAMINA VER.. ALLAH NAMINA AL.. ALLAH NAMINA BAŞLA.. ALLAH NAMINA İŞLE VESSELAM
SAYGILARIMLA BEN...
SAYGILARIMLA BEN...
Kod: Tümünü seç
Procedure TForm1.Button1MouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
const
sc_DragMove=$F012;
begin
ReleaseCapture;
Button1.Perform(WM_SYSCOMMAND, sc_DragMove, 0);
end;
Bu form üzerindeki tüm nesnelere yapılabilir. Sadece o nesnenin MouseDown eventine yazmak gerekir. Component bilmiyorum ama bu kod ile istediğin gibi nesneleri yerleştirebilirsin.
Kolay gelsin
Bilgi paylaşıldıkça güzeldir.
-
- Kıdemli Üye
- Mesajlar: 574
- Kayıt: 01 Şub 2004 12:29
- Konum: Erdemli - MERSİN