chart


    void deneme; 
var 
    Qry,Qry2: TClSQLiteQuery;
    
    values2:String;
    
    
{
    try 
     FRow = myform.ClSenderRow;
         values2=IntToStr(StrToInt(clProGrid.GetCellValue(2,FRow))*StrToInt(clProGrid.GetCellValue(3,FRow))*StrToInt(clProGrid.GetCellValue(6,FRow)));
        Qry = Clomosy.DBSQLiteQueryWith('SELECT SUM(cast (StokGirisMiktarı as Int ) ) AS Total FROM girislogdatabase18 WHERE ID='+QuotedStr(values2));
        Qry.OpenOrExecute;
        
        if (Qry.Found) 
        {
           
            totalSumgiris = Qry.FieldByName('Total').AsString;
            
           
            ShowMessage('ID  için Toplam Stok Giriş Miktarı: ' + IntToStr(totalSumgiris));
        }
        else
        {
            ShowMessage('Bu ID ye ait veri bulunamadı ');
        }
    except
        ShowMessage('[01] Exception Class: ' + LastExceptionClassName + ' Exception Message: ' + LastExceptionMessage);
    }
    }


totalSumgiris  değişkenine atadığım değişkeni chartta nasıl gösterebilirim

Yazar	Mesaj Konu Arama Topic Seçenekleri Yanıt Yaz Yeni Konu Oluştur Konuyu Yazdır Çeviri Konu
ismail Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 05 Ağustos 2024 Konum: konya Durum: Aktif Değil Puanlar: 25	Mesaj Seçenekleri Yanıt Yaz Alıntı ismail Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Konu: chart Gönderim Zamanı: 19 Ağustos 2024 Saat 15:37
	void deneme; var Qry,Qry2: TClSQLiteQuery; values2:String; { try FRow = myform.ClSenderRow; values2=IntToStr(StrToInt(clProGrid.GetCellValue(2,FRow))StrToInt(clProGrid.GetCellValue(3,FRow))StrToInt(clProGrid.GetCellValue(6,FRow))); Qry = Clomosy.DBSQLiteQueryWith('SELECT SUM(cast (StokGirisMiktarı as Int ) ) AS Total FROM girislogdatabase18 WHERE ID='+QuotedStr(values2)); Qry.OpenOrExecute; if (Qry.Found) { totalSumgiris = Qry.FieldByName('Total').AsString; ShowMessage('ID için Toplam Stok Giriş Miktarı: ' + IntToStr(totalSumgiris)); } else { ShowMessage('Bu ID ye ait veri bulunamadı '); } except ShowMessage('[01] Exception Class: ' + LastExceptionClassName + ' Exception Message: ' + LastExceptionMessage); } } totalSumgiris değişkenine atadığım değişkeni chartta nasıl gösterebilirim

Developer Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Forum Yöneticisi Kayıt Tarihi: 14 Haziran 2023 Durum: Aktif Değil Puanlar: 354	Mesaj Seçenekleri Yanıt Yaz Alıntı Developer Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 19 Ağustos 2024 Saat 16:08
	Merhaba İsmail, Aşağıdaki kodu inceler misin: var MyForm:TclForm; testChart : TClChart; simpleJSONStr : String; xValue:Integer; begin MyForm := TclForm.Create(Self); testChart := MyForm.AddNewChart(MyForm,'testChart','Samsoong'); xValue := 50 ; simpleJSONStr := '[{ "DeviceType": "Notebook","Percent": '+ IntToStr(xValue)+',"color":"clOrange"}]'; testChart.Charttype := clCBar; testChart.XAxisText := 'DeviceType'; testChart.ChartItemText := 'Device Sales'; testChart.ChartItemsValue := 'Percent'; testChart.ChartTitle := 'Samsoong Inc'; testChart.clLoadDataFromJSONStr(simpleJSONStr); MyForm.Run; end;

ismail Üye Profili Özel Mesaj Yolla Üye mesajı bul Arkadaş Listeme Ekle Yeni Üye Kayıt Tarihi: 05 Ağustos 2024 Konum: konya Durum: Aktif Değil Puanlar: 25	Mesaj Seçenekleri Yanıt Yaz Alıntı ismail Bu mesaj kurallara aykırıysa buradan yöneticileri bilgilendirebilirsiniz. Teşekkürler(0) Alıntı Cevapla Gönderim Zamanı: 19 Ağustos 2024 Saat 16:57
	teşekkürler