کد جستجو و پاک کردن کلمه در فایل متنی

[nsco_nsco]

سلام دوستان
فرض کنید یک فایل متنی هست که درون ان به عنوان مثال کلمه ((علی)) خیلی تکرار شده من می خواهم این فایل را به برنامم بدم و بگم هر جا کلمه علی را دید بیاد و اون را به کلمه فرض مثال (( حسن)) تبدیل کند ممنون می شوم کمک کنید البته خیلی خیلی سریع ممنون با تشکر فراوان از همه دوستان .

[سعید صابری]

دستور جایگزینی ReplaceStr() است بارها هم بحث شده دیگر توابع کار با متن هم بارها در سایت بحث شده

[nsco_nsco]

سلام
ممنون از پاسختون اما من چیز بدرد بخوری پیدا نکردم ممنون میشوم یاری برسانید خیلی لازمش دارم ممنون :قلب:

[سعید صابری]

شما نگفتید کجاش مشکل دارید؟

توابع کار با رشته ها بیشتر در یونیت StrUtils هستند کد زیر تمامی کلمات ali را با saeed جایگزین می کند نیاز به یافتن کلمه مورد نیز نیز نیست

Memo1.Text:=ReplaceStr(Memo1.Text,'ali','saeed');

[nsco_nsco]

سلام ممنون از کمکتون دوست عزیز ایا میشه به جای این کد کاری کرد که یک فایل بهش بدیم که این کاررا روش انجام بده و بعد یک خروجی بهمون بده یعنی فرض کنید من یک فایل txt به نام یک دارم این رو به برنامه بدم و اون یکی فایل خروجی بهم بده ممنون می شم راهنمایی کنید ممنون :قلب:

[سعید صابری]

راه های زیادی داره توابع کار با فایل و... .ولی از memo استفاده کن ساده و بی دردسر

Memo1.Lines.LoadFromFile('file');
Memo1.Text:=ReplaceStr(Memo1.Text,'ali','saeed');


Memo1.Lines.SaveToFile('file');