الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

للإفادة

بدأه mohfa في 15 أغسطس 2008 · 6 رد · 769 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله و بركاته .

اليوم جلبت لكم :

Complete delphibasics.co.uk as chm file

الموقع الرسمي

بامر من الاخ العزيز عبد العزيز

Credit Given: للاخ محمود

والله برغم من ان المصدر كان من موقع اخر

ولكن كما قال الاخ عبد العزيز

اقتباس
فالاخ محمود تعب في تحميل الصفحات من الموقع وجمعها في ملف واحد مثل المرفق

Delphi Master Toolkit : يحوي الكثير من الامثلة مع الكود حمل ولن تندم ابدا رابط التحميل

الصورة :

post-36253-1218748268_thumb.jpg

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

وسوف اقوم بإذن الله بطرح بعض الاكواد

تم تعديل هذه المشاركة بواسطة mohfa في 15 أغسطس 2008 في 02:02

عزيزي :

لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .

فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم

*****

2_header.png

#2

وسوف نبداء بالاكواد .

الكود الاول هو: هل الـ PARTITION NTFS or FAT

// Usage ->   GetHardDiskPartitionType(Drive)
function GetHardDiskPartitionType(const DriveLetter: Char): string;
var
  NotUsed: DWORD;
  VolumeFlags: DWORD;
  VolumeInfo: array[0..MAX_PATH] of Char;
  VolumeSerialNumber: DWORD;
  PartitionType: array[0..32] of Char;
begin
  GetVolumeInformation(PChar(DriveLetter + ':\'),
	nil, SizeOf(VolumeInfo), @VolumeSerialNumber, NotUsed,
	VolumeFlags, PartitionType, 32);
  Result := PartitionType;
end;

مثال :

ShowMessage(GetHardDiskPartitionType('c'));

لامانة مصدر الكود هو : delphitricks.com

تم تعديل هذه المشاركة بواسطة mohfa في 15 أغسطس 2008 في 00:38

عزيزي :

لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .

فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم

*****

2_header.png

#3

كيف تجعل برنامجك يتماشى و الـ Vista

Download DelphiVistaTools

الموقع الرسمي

عزيزي :

لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .

فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم

*****

2_header.png

#4
mohfa كتب:
اليوم جلبت لكم

Complete delphibasics.co.uk

الموقع الرسمي

سبق للاخ محمود (Moudey) طرحه بالمنتدى وكان قد قام بجمع الصفحات بنفسه مثلما فعل مع موقع swissdelphicenter.ch

d4baa0.gif
#5
B.M.AbdelAziZ كتب:
سبق للاخ محمود (Moudey) طرحه بالمنتدى وكان قد قام بجمع الصفحات بنفسه مثلما فعل مع موقع swissdelphicenter.ch

اخي عبد العزيز الا نقول في الجزائر : زيادة الخير خيرين :wink:

عزيزي :

لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .

فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم

*****

2_header.png

#6

الامر "giving credit" فالاخ محمود تعب في تحميل الصفحات من الموقع وجمعها في ملف واحد مثل المرفق

d4baa0.gif
#7

تم اخي عبد العزيز :wink:

عزيزي :

لاتنسى ان تصلي على حبيبنا و شفيعنا يوم لا ينفع مال ولا بنون .

فاللهمّ صّل وسّلم على سيدي و شفيعي وحبيبي محمد عليك الف صلاة وازكى تسليم

*****

2_header.png

مواضيع مشابهة