17-08-2010, 11:36 PM
إقتباس :الكود تعدى المطلوب منهالكود لم يتعد المطلوب، الخلل هنا:
إقتباس :على كل المتغيرات معرفة من قبل وكلها من نوع integerInteger يزن 4 bytes
جرب تغيير نوع Buffer إلى Byte أو Char (إذا استخدمت Char اكتب 0#)
ملاحظة: المتغير result لا محل له من الإعراب.
أيضا حيز begin/end بعد OpenDialog1.Execute ولا تنسى FileClose في النهاية.
أيضا يفضل استخدام TStreamFile
بالتوفيق.