كيف أبحث عن نص في ملف

السلام عليكم

اقتراحي

1- قم بفتح الملف المطلوب

2- قم بوضع (loop ) حلقة وتضع فيها

عملية قراءة من الملف وتقوم بقراءة نص string وتسنده مثلا الى متغير word

3- تقوم بعميلة المقارنة

if(not strcomp( word,target)then

begin

...

end

4- تقوم باغلاق الملف

تحيات

عنيزة