اظهار معلومات على spSkinStatusPanel

[TS-DELPHI]

السلام عليكم الاخوة اعضاء المنتدى ...
من لديه معلومة حول كيفية اظهار معلومات على spSkinStatusPanel ،بحيث اذا اردنا مثلا حساب مجموع مبلغ سلع معينة اظهرها على spSkinStatusPanel ... افيدوني جزاكم الله خيراً

[onexite]

جوابا لسؤالك

spSkinStatusPanel1.caption:=IntToStr(30000)

[TS-DELPHI]

جوابا لسؤالك

شكراً على الرد ...للتوضيح اود اظهار معلومات من جدول في قاعدة بيانات كأن يكون لدي مثلا طلبة في تخصصات معينة اود وضع عدد الطلبة في كل تخصص على حدى

[onexite]

شكراً على الرد ...للتوضيح اود اظهار معلومات من جدول في قاعدة بيانات كأن يكون لدي مثلا طلبة في تخصصات معينة اود وضع عدد الطلبة في كل تخصص على حدى

بدل 3000 ضع فنكيسيون تحسب ماتريد

PHP كود :

function TForm1._Som: Integer;
var
i,som:integer;
begin
  Result:=0;
  som:=0;
  sStatusBar1.Panels[0].Text:='Montant total : '+IntToStr(som)+' DA';
  if((tbl1.RecordCount=0) and (tbl1.State <> dsInsert))
  then exit;
tbl1.First;

for i:=0 to tbl1.RecordCount-1  do begin
som:=som+tbl1.FieldByName('Som').AsInteger;
tbl1.Next;
end;
sStatusBar1.Panels[0].Text:='Montant total : '+IntToStr(som)+' DA';
Result:=som;
end;