delphi4arab منتديات دلفي للعرب

نسخة كاملة : في حالة ربط جدول بأخر
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
الصفحات : 1 2
اخي Rover
مشكور وإذا سمت لي اود لو شرحت لي هذا الكود
كود :
IF FieldValues['RB_SB_CurrValue'] = Null Then GetStr:='' Else GetStr:= FieldValues['RB_SB_CurrValue'];
وخاصة إضافتك لكلمة _CurrValue
ماذا تعني هذه وما دورها
chehrour كتب :حولت في البرنامج وقمت بما يلي :

احذف كل كود BitBtn1Click ماعدا table1.Post; ]تصبح كمايلي:

PHP كود :
procedure TForm1.BitBtn1Click(Sender: TObject);
begin

    table1
.Post;

end; 

واضقت Table1BeforePost تصبح كمايلي

PHP كود :
procedure TForm1.Table1BeforePost(DataSet: TDataSet);
VAR 
a:string[3];
begin          
table2
.Locate('RB_CD',table1RB_CD.Value,[loCaseInsensitive]);
table1RB_SB.Value:=table2RB_SB.Value;
a:='SP'+FloatToStr(table1SP.Value);
table1MT_SP.Value:=table2.FieldValues[a];
end; 

مشكور أخي chehrour

اللهم زيدنا علما
بارك الله فيكم جميعًا وجعل الله كل اعمالكم في ميزان حسناتكم
أخي Chehrour
لقد الفت انتباهي بوجود هذان الملفان
PDOXUSRS.LCK
PARADOX.LCK
ما ضرورة وجودهما وكيف ينشئان
وفي حالة ما إذا كنت استعمل قاعدة البيانات ABSOLUTE
ما هي الملفات المعوضة عن هذه
السلام عليكم اخي medreg كذلك اعرف كيف اتت هذه الملفات ربما الاخوة يفيدونا
اما فيما يخص استعمال قاعدة البيانات ABSOLUTE
فادهب الى الرابط التالي

http://www.startimes2.com/f.aspx?t=15008650
الصفحات : 1 2