tclChart -zoom özelliği


   merhaba, aşşağıda belirttiğim  satırı çalıştırdım ama işe yaramıyor. 
amacım chart grafiğini küçültüp  büyütebilmek. 
  Qry.OpenOrExecute;
      if (Qry.Found)
      {
        Chart1.Align = alNone;
        Chart1.Position.X = 0;
        Chart1.Position.Y = 0;
        Chart1.Width = (panel6.Width * 3);
        Chart1.Height = panel6.Height;
        Chart1.Margins.Left = 5;
        Chart1.Margins.Right = 5;
        Chart1.Margins.Top = 10;
        Chart1.Margins.Bottom = 5;
        Chart1.Charttype = clCBar;
        Chart1.XAxisText = 'urun';
        Chart1.ChartItemText = 'urun';
        Chart1.ChartItemsValue = 'toplamCiro';
        Chart1.SetInteractionPanning(True);	   <-------
        Chart1.SetInteractionScaleMode(1);       <-------
        Chart1.clLoadDataFromDataSet(Qry);     
      }
      Qry.Close;

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
kenan Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 01 Temmuz 2025 Durum: Aktif Değil Puanlar: 17	Mesaj Seçenekleri Yanıt Yaz Alıntı kenan Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: tclChart -zoom özelliği Gönderim Zamanı: 24 Temmuz 2025 Saat 15:52
	merhaba, aşşağıda belirttiğim satırı çalıştırdım ama işe yaramıyor. amacım chart grafiğini küçültüp büyütebilmek. Qry.OpenOrExecute; if (Qry.Found) { Chart1.Align = alNone; Chart1.Position.X = 0; Chart1.Position.Y = 0; Chart1.Width = (panel6.Width * 3); Chart1.Height = panel6.Height; Chart1.Margins.Left = 5; Chart1.Margins.Right = 5; Chart1.Margins.Top = 10; Chart1.Margins.Bottom = 5; Chart1.Charttype = clCBar; Chart1.XAxisText = 'urun'; Chart1.ChartItemText = 'urun'; Chart1.ChartItemsValue = 'toplamCiro'; Chart1.SetInteractionPanning(True); <------- Chart1.SetInteractionScaleMode(1); <------- Chart1.clLoadDataFromDataSet(Qry); } Qry.Close;

Emr.Erkmn Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Moderatör Kayıt Tarihi: 28 Şubat 2025 Durum: Aktif Değil Puanlar: 146	Mesaj Seçenekleri Yanıt Yaz Alıntı Emr.Erkmn Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 24 Temmuz 2025 Saat 18:11
	Merhaba Kenan, Aşağıda yazdığım kodu projende dener misin? Chart1 = istatistikForm.AddNewChart(HorzScrollBox1, 'Chart1', 'Ürün Satış Grafiği'); Chart1.Align = alNone; Chart1.Position.X = 0; Chart1.Position.Y = 0; Chart1.Width = (panel6.Width * 3); Chart1.Height = panel6.Height; Chart1.Margins.Left = 5; Chart1.Margins.Right = 5; Chart1.Margins.Top = 10; Chart1.Margins.Bottom = 5; Chart1.Charttype = clCBar; Chart1.XAxisText = 'urun'; Chart1.ChartItemText = 'urun'; Chart1.ChartItemsValue = 'toplamCiro'; Chart1.SetInteractionPanning(True); Chart1.SetInteractionScaleMode(2); Chart1.ChartTitle = 'Ürün Bazında Toplam Ciro'; Chart1.clLoadDataFromDataSet(Qry);