+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : كيفية النسخ (/showthread.php?tid=2614)
كيفية النسخ - rose - 30-11-2010
السلام عليكم
اذا كان عندي مجموعه من الايعازات تطبع اثناء تنفيذ البرنامج في ال(meno) فكيف استطيع ان انسخ هذه الايعازات في برنامج ثاني لتكون جزء منه حيث بأستخدام هذه الايعازات يتم تنفيذ البرنامج الثاني
كيفية النسخ - kachwahed - 30-11-2010
وعليكم السلام ورحمة الله
السؤال غير واضح
ممكن كتابة مثال؟
كيفية النسخ - rose - 01-12-2010
السلام عليكم
اخي انا في البرنامج الاول عندي هذه الايعازات للطباعه في 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;