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

بسم الله الرحمن الرحيم

هذا السؤال يراودني مذ فترة ولم اعرف حلة

و في الحقيقة لا اعرف كيف اشرحه لكم او اصفه

السؤال : كيف انسخ كلمة من بين فواصل او احرف

مثال :
عندي a ) String ) و قيمته

كود :
musvc=:"[color=Red]Hello there[/color]"

محتاج اعرف طريقة انسخ جزئا ً من الـ String التي بين الفواصل " " لكن ليس هذه الطريقة

كود :
Copy(a,9,20);

لأن اذا تغير

كود :
musvc=:

او

كود :
[color=Red]Hello there[/color]

الى كلمة اطول او اصغر سوف تتخربط العملية Sad

وشكرا ً

1- يجب ان تعرف او تحدد ما هو الفاصل
2- تعرف موضع الفاصل باستخدام POS
3- تنسخ ما تريد بCOPY مستخدما موضع الفاصل السابق بPOS

مثال حي عن استعمالها في تمرين: استخراج ثوابت لكثير حدود اقل من الدرجة الثانية
http://www.delphi4arab.net/forum/showthread.php?tid=581

ان لم تفهم ضع مثال لجملة تريد النسخ منها

لم افهم ولا كلمة :confused:

هذه كلمة و اريـد استخراج الكلمة من بين الفواصل " "

كود :
Mkdir "[color=Red]C:\FILE.BAT[/color]"

و سؤال اخر هل يمكن نسخ String من مكان و حتى النهاية

مثلا ً :

إقتباس :Mkdir=C:\File.bat

يعني نسخ الكلمة من منطقة = الى الأخير

المثال 1

PHP كود :
s:='Mkdir "C:\FILE.BAT"';
S:=Copy(S,1+pos('"',s),Length(s));
S:=Copy(S,1,pos('"',s)-1); 

يجب اضافة كود التحقق من وجود " مرتين قبل استعماله

المثال 2

PHP كود :
s:='Mkdir=C:\File.bat';
S:=Copy(S,1+pos('=',s),Length(s)); 

شكرا ً اخي

musvc

محمد عبد العزيز

musvc

محمد عبد العزيز

musvc