delphi4arab منتديات دلفي للعرب
عمل تمثيل بياني حسب التاريخ باستعمال DBChart (شرح فلاشي) - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : دروس دلفي للمبتدئين (https://delphi4arab.net/forum/forumdisplay.php?fid=13)
+--- الموضوع : عمل تمثيل بياني حسب التاريخ باستعمال DBChart (شرح فلاشي) (/showthread.php?tid=3658)



عمل تمثيل بياني حسب التاريخ باستعمال DBChart (شرح فلاشي) - paix144 - 29-11-2011

السلام عليكم ورحمة الله
عمل تمثيل بياني حسب التاريخ باستعمال DBChart (شرح فلاشي)
بالتوفيق إن شاء الله


عمل تمثيل بياني حسب التاريخ باستعمال DBChart (شرح فلاشي) - mobile - 02-12-2011

بارك الله فيك
لكن لم افهم هذا السطر Expr1001

كود :
Series1.XValues.ValueSource:='Expr1001';



عمل تمثيل بياني حسب التاريخ باستعمال DBChart (شرح فلاشي) - paix144 - 03-12-2011

و فيكم بارك الله
Expr1001 هي اسم العمود الذي استرجعنا قيمه عند الاستفسار
كود :
SELECT Pseudo,[color=Red]SUM(NBR_Msg[/color][color=Red])[/color] FROM TableMembre WHERE Date BETWEEN :D1 and :D2 GROUP BY Pseudo

كود :
Pseudo | [color=Red] Expr1001[/color] paix144 | 3 kachwahed | 7



عمل تمثيل بياني حسب التاريخ باستعمال DBChart (شرح فلاشي) - abo-ghadab - 10-12-2011

السلام عليكم ورحمة الله وبركاته
حاولت على ربط DBCahrt مع SQLQuery في قاعدة بيانات Baradox
يظهر خطأ ؟
كود :
procedure TForm1.Button1Click(Sender: TObject); begin Form27.Query27.Close; form27.Query27.DatabaseName:=ExtractFilePath(Application.ExeName) + 'data'; form27.DataSource33.DataSet:=Form27.Query27; Form27.Query7.SQL.Add('select Virtage_blood,SUM(Bag_Ncount)from conjugate where date_conjugate_blood Between :D1 and :D2 Group By Virtage_blood'); Form27.Query27.Params.ParamByName('D1').Value:=MaskEdit1.Text; Form27.Query27.Params.ParamByName('D2').Value:=MaskEdit2.Text; Form27.Query27.ExecSQL; Form27.Query27.Open; Series1.dataSource:=Form27.Query27; Series1.XlabelsSource:= 'Virtage_blood'; Series1.XValues.ValueSource:='Expr1001'; Series1.YValues.ValueSource:=''; Series1.CheckDataSource; end;

لكن يظهر رسالة خطأ
مرة لايوجد الجدول في القاعدة يحمل هذا الاسم
ومرة لا يوجد بارم D1


عمل تمثيل بياني حسب التاريخ باستعمال DBChart (شرح فلاشي) - paix144 - 11-12-2011

و عليكم السلام ورحمة الله
كود :
Query1.Close; Query1.DatabaseName := GetCurrentDir + '\data'; [color=Red]DataSource2.DataSet := Query1;[/color][COLOR="Red"] Query1.ParamByName('D1').AsDate:=StrToDate(MaskEdit1.Text); Query1.ParamByName('D2').AsDate:=StrToDate(MaskEdit2.Text);[/COLOR] Query1.Open; Series1.dataSource:=Query1; Series1.XlabelsSource:= 'Virtage_blood'; Series1.XValues.ValueSource:='[color=Red]SUM OF Bag_Ncount[/color]'; Series1.YValues.ValueSource:=''; Series1.CheckDataSource;