قواعد المشاركة في المنتدى

(أخبار التكنولوجيا) الموضوع:4 مكونات ضرورية عند كتابة رسالة الماجستير في البحرين بواسطة: (منة إجادة) :: (قسم الاعلانات) الموضوع:افضل معارض اثاث غرف نوم ، شركة فورنيدو للاثاث ، افضل الاسعار فى مصر 01270001597 بواسطة: (مليكة سمير) :: (قسم الاعلانات) الموضوع:محلات اثاث فى مدينة نصر - تراست جروب للاثاث - التوصيل لجميع محافظات مصر 01210044703 بواسطة: (marsel emad) :: (قسم الاعلانات) الموضوع:شركة تنظيف منازل بالشارقة 0501175141 الامين بواسطة: (امل بكير) :: (قسم الاعلانات) الموضوع:غرف نوم 2021 ، شركة فورنيدو للاثاث ، افضل سعر فى مصر 01270001596 بواسطة: (مليكة سمير) :: (قسم الاعلانات) الموضوع:محلات اثاث فى مصر - تراست جروب للاثاث - التوصيل لجميع محافظات مصر 01210044703 بواسطة: (marsel emad) :: (قسم الاعلانات) الموضوع:محل اثاث غرف نوم.شركة هيفين هوم للاثاث والمطابخ . افضل سعر اثاث فى مصر . 01122267552 بواسطة: (مارلين سامي) :: (قسم الاعلانات) الموضوع:شركة مكافحة حشرات بعجمان 0563412624 الماهر بواسطة: (امل بكير) :: (قسم الاعلانات) الموضوع:ارخص شركات لاند سكيب بدبى 0501931819 بيلارز بواسطة: (zena fathy) :: (قسم الاعلانات) الموضوع:سعر غرف نوم ، شركة فورنيدو للاثاث ، افضل سعر فى مصر 01270001596 بواسطة: (مليكة سمير) :: (قسم الاعلانات) الموضوع:أرخص شركات لنقل الاثاث بالرياض 0560387770 فرسان العرب بواسطة: (zena fathy) :: (قسم الاعلانات) الموضوع:معرض اثاث التجمع الخامس - تراست جروب للاثاث - التوصيل لاى مكان داخل مصر 01117172647 بواسطة: (marsel emad) :: (قسم الاعلانات) الموضوع:معارض غرف نوم. شركة هيفين هوم للاثاث والمطابخ . افضل سعر اثاث فى مصر . 01122267552 بواسطة: (مارلين سامي) :: (قسم الاعلانات) الموضوع:معرض غرف نوم ، شركة فورنيدو للاثاث ، افضل الاسعار فى مصر 01270001597 بواسطة: (مليكة سمير) :: (قسم الاعلانات) الموضوع:معرض اثاث الرحاب - تراست جروب للاثاث - ضمان 5 سنين 01117172647 بواسطة: (marsel emad) :: (قسم الاعلانات) الموضوع:احدث غرف نوم مودرن 2021 ، شركة فورنيدو للاثاث ، افضل سعر فى مصر 01270001596 بواسطة: (مليكة سمير) :: (قسم الاعلانات) الموضوع:اثاث منزلى المعادى.شركة هيفين هوم للاثاث والمطابخ . التوصيل لاى مكان داخل مصر . 01275599927 بواسطة: (مارلين سامي) :: (قسم الاعلانات) الموضوع:معرض اثاث القاهرة الجديدة - تراست جروب للاثاث - ضمان 5 سنين 01210044703 بواسطة: (marsel emad) :: (قسم الاعلانات) الموضوع:سعر غرف نوم 2021 ، شركة فورنيدو للاثاث ، افضل الاسعار فى مصر 01270001597 بواسطة: (مليكة سمير) :: (قسم الاعلانات) الموضوع:شركات غرف نوم.شركة هيفين هوم للاثاث والمطابخ . افضل سعر اثاث فى مصر . 01122267552 بواسطة: (مارلين سامي)

المواضيع المثبته: (Oracle قسم قواعد البيانات أوراكل) الموضوع:Oracle Online Documentation .. best resource of Info about Oracle بواسطة: (adnan_som) :: (منتدى أنظمة الشبكات وأمنها) الموضوع:امن المعلومات وامن الشبكات بواسطة: (khaled helal) :: (منتدى Microsoft Excel) الموضوع:شرح الفيجوال بيزيك للمتوسطين vba بواسطة: (hs889) :: (منتدى الكتب و المقالات) الموضوع:هل فكرت يوما أن تستغني عن شريط أوامر الأكسيس ؟ بواسطة: (alasomed) :: (منتدى برمجة الجرافكس) الموضوع:الجزء الثانى من دروس تعلم GDI بواسطة: (alaa gomaa) :: (منتدى C و C) الموضوع:برنامج من سيربح المليون بواسطة: (مصطفي البارودي) :: (منتدى Microsoft Excel) الموضوع:أكواد جاهزة للإستخدام في اكسل ( ماكروات ) بواسطة: (junkbki) :: (منتدى أجاكس(Asynchronous JavaScript and XML)) الموضوع:نبذة مختصرة عن تعريف تقنية أجاكس بواسطة: (عبدالله جابر شقليه) :: (منتدى الكتب الالكترونية) الموضوع:كتاب لبرامج مصممة بالفيجوال مع أكوادها (الجزء الثاني) بواسطة: (First Star) :: (منتدى مبرمجي Microsoft Visual VB.NET) الموضوع:دورة في LINQ To DataSet بواسطة: (jbsa) :: (منتدى مبرمجي ASP.NET) الموضوع:طريقة تحويل ملفات الفيديو إلى Flv وإلتقاط الصور مثل Youtube بواسطة: (عبدالله جابر شقليه) :: (منتدى الكتب و المقالات) الموضوع:دروس متفرقة خفيفة بواسطة: (أبو أفنان) :: (Oracle قسم قواعد البيانات أوراكل) الموضوع:DECODE SQL STATMENT بواسطة: (mshaqalaih) :: (قسم التعاميم والشكاوي) الموضوع:ماسنجر المحيط العربي بواسطة: (يوسف جميل جادالله) :: (منتدى ADO.NET العام) الموضوع:الطريقة السهلة لربط سي شارب بقاعدة بيانات اكسيس بواسطة: (kal7hos) :: (منتدى مبرمجي ASP.NET) الموضوع:كيفية عرض المنتديات والأقسام والمواضيع بواسطة: (عبدالله جابر شقليه) :: (منتدى برمجة التقارير) الموضوع:اصنع تقريرك في اقل من دقيقه واستغني عن الكريستال ريبورت بواسطة: (mero_make) :: (منتدى Microsoft Visual Basic) الموضوع:الدليل الأسرع لأبرز المواضيع بواسطة: (HnHn) :: (منتدى مبرمجي Microsoft Visual C#.NET) الموضوع:مكتبة الدوت نيت بواسطة: (fmo_82) :: (منتدى البرامج) الموضوع:7 اسطوانات لتعليم شهاده ICDL بالصوت والصوره بواسطة: (مستشفى الكمبيوتر)

عدد الصفحات : 3  « < 1  2  3   > » إضافة رد إضافة موضوع جديد

> أحفظ برامجك الديلفاوية من أذي العابثين باستخدام رقم الهارد (محترفين)
Bookmark and Share
تقييم الموضوع Label معدل التقيم:0
مشاركةالخميس,27/رمضان/1427 هـ,08:06 صباحاً
المشاركة #11

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 4
سجل في:الخميس,20/رمضان/1427 هـ,04:32 مساءً
الدولة:ليبيا
رقم العضوية: 14126



 اقتباس
البرنامج يعمل على ايجاد رقم الهارد و نوعه و يقوم بتحويله الاحرف الى ارقام و يجرى بعض العمليات الحسابيه بحيث ان الزبون يقوم بإعطاء رقم الهارد الى صاحب البرنامج بحيث يأخذ الرقم المقابل و فلى هذه الحاله اذا الزبون عمل فورمات او حتى قام بإعدة تقسيم الهارد<br>ان الرقم لا يتغير<br>اما processor ID يبقى ثابت فى بعض الاجزه عن تجربه



السلام عليكم ورحمة الله وبركاته
أخي لقد انزلت البرنامج وشغلته ولم استطع التعامل معه
الرجاء ان تضع شرح كيفية استخدامه بالخطة
واكون لك شاكرا فضلك


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالخميس,27/رمضان/1427 هـ,08:30 صباحاً
المشاركة #12

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 4
سجل في:الخميس,20/رمضان/1427 هـ,04:32 مساءً
الدولة:ليبيا
رقم العضوية: 14126




السلام عليكم ورحمة الله وبركاته
كل عام والجميع بخير بمناسبة قرب حلول عيد الفطر المبارك اعاده على اعضاء المنتدى الأعزاء و على الأمى الإسلامية بالخير والرقي والنماء
عزيزي HADYABADY لقد انزلت البرنامج عدة مرات وبعد التنزيل احاول فك الضغط فيظهر لي خطأ ولا يستطيع فك ضغطه فما هو السبب الرجاء معالجة المشكلة واكون لك شاكرا لك المعروف.


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالأحد,30/رمضان/1427 هـ,03:44 صباحاً
المشاركة #13

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: أعضاء الشرف
المشاركات: 67
سجل في:الخميس,10/جمادى الأولى/1426 هـ,05:18 صباحاً
الدولة:سوريا
رقم العضوية: 3658



السلام عليكم ورحمة الله
تم تعديل المشاركة وإصلاح الخلل

ولكم مباركتي بعيد الفطر السعيد


--------------------

إشترك في المجموعة السورية


aJJI IJI aJI IJ
محمد رسول الله

للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالجمعة,06/رجب/1428 هـ,04:34 مساءً
المشاركة #14

مشرف لمنتدى الوورد - منتدى البرامج
الرتبة في المنتدى:ملازم أول

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 255
سجل في:الجمعة,11/ذو القعدة/1427 هـ,01:38 مساءً
الدولة:سوريا
رقم العضوية: 16069



ممتاز أخي ماهذا ياقلبي
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالسبت,18/رمضان/1428 هـ,07:15 صباحاً
المشاركة #15

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 4
سجل في:الخميس,09/رمضان/1428 هـ,05:20 صباحاً
الدولة:سوريا
رقم العضوية: 34192



مشكور أخي الكريم على البرنامج الحلو وجاري التحميل والتجريب


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالسبت,23/شوال/1428 هـ,07:15 صباحاً
المشاركة #16

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 5
سجل في:السبت,16/شوال/1428 هـ,02:25 مساءً
الدولة:مصر
رقم العضوية: 35849



شكرا لكم جميعاً اخواني على المعلومات الرائعة
ولكن هل يمكن استخدام كل ذالك مع processor ID , motherbourd ID
وشكرا....


--------------------
الحمدلله والصلاة والسلام على رسول الله وعلى آله وصحبه أجمعين

madaalaa@yahoo.com
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالأحد,24/شوال/1428 هـ,09:30 مساءً
المشاركة #17

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 4
سجل في:الأحد,24/شوال/1428 هـ,09:25 مساءً
الدولة:الأردن
رقم العضوية: 36611




الحمدلله والصلاة والسلام على رسول الله وعلى آله وصحبه أجمعين
ان الله ولي التوفيق جزاك الله كل خير .


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالخميس,23/محرم/1429 هـ,05:21 صباحاً
المشاركة #18

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 6
سجل في:الأحد,17/شوال/1428 هـ,06:06 صباحاً
الدولة:السودان
رقم العضوية: 35907



هذا الكود يعطي رقم الهارديسك الحقيقي
 كود
function GetIdeSerialNumber0():string;
const IDENTIFY_BUFFER_SIZE = 512;
type
TIDERegs = packed record
bFeaturesReg : BYTE; // Used for specifying SMART "commands".
bSectorCountReg : BYTE; // IDE sector count register
bSectorNumberReg : BYTE; // IDE sector number register
bCylLowReg : BYTE; // IDE low order cylinder value
bCylHighReg : BYTE; // IDE high order cylinder value
bDriveHeadReg : BYTE; // IDE drive/head register
bCommandReg : BYTE; // Actual IDE command.
bReserved : BYTE; // reserved for future use. Must be zero.
end;
TSendCmdInParams = packed record
cBufferSize : DWORD;
irDriveRegs : TIDERegs;
bDriveNumber : BYTE;
bReserved : Array[0..2] of Byte;
dwReserved : Array[0..3] of DWORD;
bBuffer : Array[0..0] of Byte; // Input buffer.
end;
TIdSector = packed record
wGenConfig : Word;
wNumCyls : Word;
wReserved : Word;
wNumHeads : Word;
wBytesPerTrack : Word;
wBytesPerSector : Word;
wSectorsPerTrack : Word;
wVendorUnique : Array[0..2] of Word;
sSerialNumber : Array[0..19] of CHAR;
wBufferType : Word;
wBufferSize : Word;
wECCSize : Word;
sFirmwareRev : Array[0..7] of Char;
sModelNumber : Array[0..39] of Char;
wMoreVendorUnique : Word;
wDoubleWordIO : Word;
wCapabilities : Word;
wReserved1 : Word;
wPIOTiming : Word;
wDMATiming : Word;
wBS : Word;
wNumCurrentCyls : Word;
wNumCurrentHeads : Word;
wNumCurrentSectorsPerTrack : Word;
ulCurrentSectorCapacity : DWORD;
wMultSectorStuff : Word;
ulTotalAddressableSectors : DWORD;
wSingleWordDMA : Word;
wMultiWordDMA : Word;
bReserved : Array[0..127] of BYTE;
end;
PIdSector = ^TIdSector;
TDriverStatus = packed record
bDriverError : Byte;
bIDEStatus : Byte;
bReserved : Array[0..1] of Byte;
dwReserved : Array[0..1] of DWORD;
end;
TSendCmdOutParams = packed record
cBufferSize : DWORD;
DriverStatus : TDriverStatus;
bBuffer : Array[0..0] of BYTE;
end;
var
hDevice : THandle;
cbBytesReturned : DWORD;
ptr : PChar;
SCIP : TSendCmdInParams;
aIdOutCmd : Array [0..(SizeOf(TSendCmdOutParams)+IDENTIFY_BUFFER_SIZE-1)-1] of Byte;
IdOutCmd : TSendCmdOutParams absolute aIdOutCmd;

procedure ChangeByteOrder( var Data; Size : Integer );
var ptr : PChar;
i : Integer;
c : Char;
begin
ptr := @Data;
for i := 0 to (Size shr 1)-1 do
begin
c := ptr^;
ptr^ := (ptr+1)^;
(ptr+1)^ := c;
Inc(ptr,2);
end;
end;
begin
Result := ''; // return empty string on error
if SysUtils.Win32Platform=VER_PLATFORM_WIN32_NT then // Windows NT, Windows 2000


begin
//íãßä ÊÛíÑ PhysicalDrive0 Çáì PhysicalDrive1 Çæ PhysicalDrive2
hDevice := CreateFile( '\\.\PhysicalDrive0', GENERIC_READ or GENERIC_WRITE,
FILE_SHARE_READ or FILE_SHARE_WRITE, nil, OPEN_EXISTING, 0, 0 );
end
else // Version Windows 95 OSR2, Windows 98
hDevice := CreateFile( '\\.\SMARTVSD', 0, 0, nil, CREATE_NEW, 0, 0 );
if hDevice=INVALID_HANDLE_VALUE then Exit;
try
FillChar(SCIP,SizeOf(TSendCmdInParams)-1,#0);
FillChar(aIdOutCmd,SizeOf(aIdOutCmd),#0);
cbBytesReturned := 0;
with SCIP do
begin
cBufferSize := IDENTIFY_BUFFER_SIZE;
bDriveNumber := 0;
with irDriveRegs do
begin
bSectorCountReg := 1;
bSectorNumberReg := 1;
bDriveHeadReg := $A0;
bCommandReg := $EC;
end;
end;
if not DeviceIoControl(hDevice, $0007c088, @SCIP, SizeOf(TSendCmdInParams)-1,
@aIdOutCmd, SizeOf(aIdOutCmd), cbBytesReturned, nil ) then Exit;
finally
CloseHandle(hDevice);
end;
with PIdSector(@IdOutCmd.bBuffer)^ do
begin
ChangeByteOrder(sSerialNumber, SizeOf(sSerialNumber) );
(PChar(@sSerialNumber)+SizeOf(sSerialNumber))^ := #0;
Result := PChar(@sSerialNumber);
end;
end;


ولاظهار رقم الهارديسك في edit اقوم بكتابة هذا الكود في Button
 كود
Edit1.Text:=GetIdeSerialNumber0;


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالثلاثاء,02/ربيع الثاني/1429 هـ,07:37 مساءً
المشاركة #19

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 3
سجل في:الثلاثاء,02/ربيع الثاني/1429 هـ,07:32 مساءً
الدولة:السعودية
رقم العضوية: 51055



تسلم اخوي الله يبارك فيك


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة
مشاركةالأحد,29/شعبان/1429 هـ,12:41 صباحاً
المشاركة #20

الرتبة في المنتدى:رقيب

أيقونة المجموعة

المجموعة: الأعضاء
المشاركات: 4
سجل في:السبت,02/شوال/1428 هـ,01:45 مساءً
الدولة:السعودية
رقم العضوية: 34794



مشكووووووووووووور وبارك الله فيك


--------------------
للأعلىأبلغ المشرف عن هذه المشاركة
لتعقيب على هذه المشاركة مباشرة

    

عدد المتصفحين لهذا المنتدى «1»: (الضيوف «1» - المتخفون «0»)
الأعضاء «0»: .

عدد الصفحات : 3  « < 1  2  3   > » إضافة رد جديد إضافة موضوع جديد



 
الوقت الأن:اليوم,01:53 مساءً بتوقيت القدس المحتلة

Powered By arabmoheet v3.1

منتديات المحيط العربي  -  راسلنا  -   أعلى
X   رسالة المنتدى
(سوف يتم اغلاق هذه النافذة بعد 2 ثانية)
X   رسالة المنتدى
(سوف يتم اغلاق هذه النافذة بعد 2 ثانية)