المشاركات : 35
المواضيع 14
:
: 0
الإنتساب : Oct 2010
السلام عليكم
اذا كان عندي مجموعه من الايعازات تطبع اثناء تنفيذ البرنامج في ال(meno) فكيف استطيع ان انسخ هذه الايعازات في برنامج ثاني لتكون جزء منه حيث بأستخدام هذه الايعازات يتم تنفيذ البرنامج الثاني
المشاركات : 2,293
المواضيع 157
:
: 81
الإنتساب : Dec 2008
وعليكم السلام ورحمة الله
السؤال غير واضح
ممكن كتابة مثال؟
المشاركات : 35
المواضيع 14
:
: 0
الإنتساب : Oct 2010
01-12-2010, 12:03 PM
(آخر تعديل لهذه المشاركة: 01-12-2010, 12:06 PM بواسطة TF6M.)
السلام عليكم
اخي انا في البرنامج الاول عندي هذه الايعازات للطباعه في memo
كود :
case x of
1:begin
form1.Memo1.Lines.Add(q+'if '+'number'+'<='+inttostr(round(w[x]))+' then');
testnode(a11,a12,n11,n12,q);
end;
2:begin
form1.Memo1.Lines.Add(q+'if '+'OGTT'+'<='+inttostr(round(w[x]))+' then');
testnode(a21,a22,n21,n22,q);
end;
3:begin
form1.Memo1.Lines.Add(q+'if '+'blood'+'<='+inttostr(round(w[x]))+' then');
testnode(a31,a32,n31,n32,q);
end;
الان انا أريـــد ماسوف يطبع في الmemo من قواعد استحدمه في برنامج ثاني ولكن نسخ هذه القواعد الى البرنامج الثاني يتم برمجيا
