29-11-2011, 11:57 PM
02-12-2011, 09:55 PM
بارك الله فيك
لكن لم افهم هذا السطر Expr1001
لكن لم افهم هذا السطر Expr1001
كود :
Series1.XValues.ValueSource:='Expr1001';03-12-2011, 08:42 PM
و فيكم بارك الله
Expr1001 هي اسم العمود الذي استرجعنا قيمه عند الاستفسار
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 | 710-12-2011, 07:19 PM
السلام عليكم ورحمة الله وبركاته
حاولت على ربط DBCahrt مع SQLQuery في قاعدة بيانات Baradox
يظهر خطأ ؟
لكن يظهر رسالة خطأ
مرة لايوجد الجدول في القاعدة يحمل هذا الاسم
ومرة لا يوجد بارم D1
حاولت على ربط 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
11-12-2011, 11:32 PM
و عليكم السلام ورحمة الله
كود :
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;