11-03-2009, 12:35 PM
Copy تنسخ جزء من النص
ما علملته في السرطر السابق انني انسخ 3 احرف الاولى من السطر فان وجدتها by: لا اضيف السطر بالملف
الامر يختلف حسب ما نريد عمله
إقتباس :الكلمة موجوده في بداية كل سطر تقريبا
يمكن التعديل هكذا
PHP كود :
...
if then copy(Content,1,3)<>'PL:' then Content:=copy(Content,4,length(Content));
if then copy(Content,1,3)<>'by:' then // هذا فقط
Writeln(NewFile,Content);
Until EOF(MyFile);
CloseFile(MyFile);
CloseFile(NewFile);