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

سلام الله عليكم

كيف يمكنني قراءة ملف نصي عبر خادم (server) في الحالات التالية:

1- كون هذا الملف في حالة إستعمال (كتابة أو تعديل )
2- قراءة الملف بعد مدة زمنية إذا كانت الحالة الأولى
3-قراءة الملف بدون إجراء أي تعديل

وهذا لتجنب السقوط في مشكل التداخل Smile

.

شكرا

تحتاج لصلاحيات معينة
هناك عدة طرق (برمجية)
يمكن ان تستخدم Try و Execpt

كود :
var
  f: TextFile;
begin
  FileMode := fmOpenRead;
  AssignFile(f, '\\server\someshare\file.txt');
  try
    // تتعامل مع الملف وتقراء ما تريد
  finally
    CloseFile(f);
  end;
end;

يمكن ان تستخدم IOResult
يمكن استخدام دوال Api وGetLastError
...

لؤي

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