abomedian

بكل بساطة قم بربط رقم الهارد مع اسم المستخدم أو مع IP الجهاز و انتهى تاموضوع

اذا كان لدينا ما يلي : Unit Prof; Function Hello(By:TBytes):boolean; var Ol:Toverlapped; HWNd: Thandle; dwBTR,dwBr:integer; begin WriteFile(HWnd,By,dwBtr,dwBR,OL); end; و أنا أريد اتستدعاء الدالة لأكثر من نوع على سبيل المثال : unit Ok; uses prof; type ToK=reco…

لماذا لا تقوم المصفوفة الديناميكية بتغيير قيمها عند استتخدامها مع تابع الAPI ReadFile في نظام اكس بي أو عند تمريرها كوسيط دالة مثلاً الدالة: function fofo(a:pointer):boolean و يكون التمرير : var a: array of byte begin fofo(a) end وطبعا قمت باستخدام SetLength ب…

اعتقد ان الحل غير كافي السبب انني اريد تغير طول المصفوفة الى عدد قد يصل طوله الى 103172 بايت و الدالة sizeof ستعيد الربة دائماً لذلك انا بحاجة الى طريقة لادخال متتويات PO في المصفوفة الديناميكية على اعتبار ان المرسل الى المؤشر مصفوفة طوله قد يتغير من مرة الى ا…

function func(po:pointer):boolean; var Da: array of byte; begin setLength(da,sizeof(po)); here is my problem {1} ......... ............. Statements ......what ever end; اريد استدعاء الدالة السابقة على الشكل vaR bVal:boolean; sec:array [0..131072] of byte; begi…

أرجو ممن يستطيع التعامل مع المؤشرات ان يترجم هذا من الدلفي الى الفجوال pTDISKIO=^TDISKIO; TDISKIO =packed record StartSector:DWORD; // starting logical sector number Sectors:WORD; // number of sectors Buffer:DWORD; // address of read/write buffer end;

i think it is all nice to do go ahead but let it to be geat we are all ready to work with this project ... in fact iam making a file system new file system it work on linux and windows and i am ready to go in os . AboMedian