19-03-2016, 10:29 PM
20-03-2016, 08:34 AM
ومن أين تأتي بالبيانات؟
إستعمل StringGrid في حالتك
إستعمل StringGrid في حالتك
04-04-2016, 11:23 AM
شكرا اخي لكن هل من متال على ذلك
04-04-2016, 11:49 AM
أولا ضع edit1
ثم button
وعند الضغط على الزر button ضع هذا الكود
somme هو اسم العمود الذي تريد جمعه
ثم button
وعند الضغط على الزر button ضع هذا الكود
كود :
var Majmou3: Currency;
RecordPlace: TBookmark ;
begin
(* Majmoo3 *)
RecordPlace := adotable1.GetBookmark;
Majmou3:=0;
adotable1.Active:=true;
adotable1.First;
while not adotable1.Eof Do
begin
Majmou3:= Majmou3+adotable1.FieldByName('Somme').AsCurrency;
adotable1.Next;
end;
edit1.text:=CurrToStr(Majmou3);
end;05-04-2016, 06:40 AM
لكنني ما زلت اواجه باعتراض
Missing connection or connectionstring
Missing connection or connectionstring
05-04-2016, 08:43 AM
05-04-2016, 12:19 PM
إذا كنت تستعمل قاعدة بيانات مثلا acces استعمل هذا المرفق ربما يكون في ما تريد
(05-04-2016, 12:19 PM)ع الحليم كتب : [ -> ]إذا كنت تستعمل قاعدة بيانات مثلا acces استعمل هذا المرفق ربما يكون في ما تريد
05-04-2016, 05:35 PM
فعلا هذا ما نبحث عنه
شكرا جزيلا
شكرا جزيلا