أريد ان أعرف مسار مستكشف ويندوز الحالي وذلك عند حدث معين
لا أقصد مسار الملف التنفيذي الذي انفذه انما مسار مستكشف ويندوز
ولكم الشكر
أريد ان أعرف مسار مستكشف ويندوز الحالي وذلك عند حدث معين
لا أقصد مسار الملف التنفيذي الذي انفذه انما مسار مستكشف ويندوز
ولكم الشكر
وين الخبراء؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
procedure TForm1.Button1Click(Sender: TObject); var PWindowsDir: array [0..255] of Char; begin GetWindowsDirectory(PWindowsDir,255); Label1.Caption:=StrPas(PWindowsDir); end;
always google it
http://www.greatis.com/delphicb/tips/lib/s...ifo-windir.html
راكان الحنيطي
Be Open Source

شكرا أخي راكان هذه المعلومة أعرفها لكن ربما لم أعرف أن أعبر عن السوال كما يجب
ما أريده هو :
في لحظة ما مستخدم الكمبيوتر الان موجود في
d:\my program\acdsee
أريد أن أعرف هذا المسار
ok???
Arabic in not active so i will type in english
please for god
please for god
please for god
please for god
answer me
there are no experience?????????????????????????????
السلام عليكم,
يمكن أن تستعمل دالة API التالية لتعطيك المسار الحالي :
DWORD GetCurrentDirectory( DWORD nBufferLength, // size, in characters, of directory buffer LPTSTR lpBuffer // pointer to buffer for current directory )
البارامتر الثاني هو بافر الذي سيستقبل المسار المطلوب.
والبارامتر الأول هو طول البافر ويجب على هذا الأخيلر أن يكون كافيا ليتحمل جملة المسار كاملة.
إلى اللقاء.
السلام عليكم ،،،
هذ الكود يبين لك طريقة استخدام دالة الأخ chik
procedure TForm1.Button1Click(Sender: TObject); var buffer:array[0..MAX_PATH-1] of Char; begin GetCurrentDirectory(SizeOf(buffer),buffer); label1.Caption:=string(buffer); end;
تم تعديل هذه المشاركة بواسطة أبو محمـد في 26 نوفمبر 2004 في 22:38
السلام عليكم ،،
عند التنفيذ سيعطيك المسار الذي يوجد عليه الملف التنفيذي ،
حسب ما فهمته منك تريد معرفة المسار الذي يوجد عليه المستكشف حاليا ، من الممكن أن يكون المستخدم فاتح أكثر من مسكشف أي مستكشف في هذه الحالة تريد .
أشكرك أخchik وأشكرك أخ أبو محمد على جهودكما لكن لو جربتو المثال سوف تجدون أنه يعطي مسار الملف التنفيذي لملف الدلفي الذي أكتب الكود بداخله
أي C:\Program Files\Borland\Delphi6\Projects
وأنا أعرف هذه الدالة واخرى أيضا من أجل نفس الغرض
رجاء تفهموني ......
أريد دالة تعطي مسار المستكشف في لحظة أنا أحددها
أذكركم أن البرنامج يعمل خلفيا
وبالنسبة لأبو محمد خفي عنك أنه في لحظة معينة يكون مستكشف واحد فقط لا غير هو المفتوح تمااااااااااااام
أسألكم بالله تلاقولي حل
عفوا
في لحظة معينة يكون مستكشف واحد فقط لا غير هو المفعل وليس المفتوح
السلام عليكم
من كم يوم وانا اتابع الموضوع لعلي افهم السؤال بالضبط
انا اعرف انك لا تريد مسار البرنامج ... ولكن ما ذا تقصد بالمستكشف ؟
هل تقصد الأكسبلورر وان كان هو ما تقصد فأعتقد المسار واحد للكل
سواء فتحت واحد ولا عشرة ... المسار نفسة ولن يتغير
وضح اكثر لماذا تريد معرفة المسار وماذا تريد ان تفعل بالمستكشف
وان شاء الله اخوي عصام الأخوان هنا سيجدون الحل لك .
تحياااااااااااتي
أشكرك أخي
لا أدري هل أنا لا أعرف التعبير أم ماذا؟؟؟؟؟
1- أنا عندي برنامج مخفي أي فيه الكود application.showmainform:=false
2- الان البرنامج شغال
3- أحدهم يسثخدم الكمبيوتر
4- أنا محدد بعد تشغيل الكمبيوتر بساعة (أو بعد تشغيل برنامجي )لان برنامجي في الـ start up يعمل أريد أن أعرف ما هو المسار المفعل حاليا
مثلا
E:\NET WORK\MCSE Windows 2000 Directory Services Infrastructure\setup
هذا المسار الذي اريده فقط لا غير الرجاء مساعدتي
ولكم جزيل الشكر
الى الان اخ عاصم لم تجب على .... مسار ماذا الذي تريد ان تعرف اذا كان المستكشف مفعل ؟
انت تقول المستكشف والمستكشف مسارة واحدة لأي نسخة مفعلة او غير مفعلة
ربما انك تقصد العنوان المفتوح في المستكشف الـــ URL
فإن كان كذالك فتستطيع من خلال الريجستري :
uses Registry;
...
// Get default page
procedure TForm1.Button1Click(Sender: TObject);
begin
with TRegistry.Create do
begin
RootKey:=HKEY_CURRENT_USER;
if OpenKey('Software\Microsoft\Internet Explorer\Main', TRUE) then
ShowMessage(ReadString('Start Page'))
else
MessageDlg('Registry read error', mtError, [mbOk], 0);
CloseKey;
end;
end;وان كان غيرذالك فنرجو ان تتحملنا وتوضح اكثر .... : )
تم تعديل هذه المشاركة بواسطة 02/11/2004 في 29 نوفمبر 2004 في 18:11
مشاااااااااان الله افهموا علي
شو دخل النترنت وصفحة بدايتهاstart page بالوندوز
المثال بمشاركتي واااااااااااضح جدا
عند استخدام شخص ما الكمبيوتر أو عندما الكمبيوتر يكون شغال تكون النافذة المفعلة هي مثلا على سبيل المثال لا الحصر:
سطح المكتب - لوحة التحكم - صفحة انترنت أونلاين أوأوفلاين لا يهم - برنامج من البرامج - ملف من الملفات لا تهمني ما لاحقته wav,doc,ra,inf
كل ما سبق لا يهمني
ما يهمني إن كانت النافذة المفعلة أي Active هي مسار لمجلد ما مثل أي مسار كـ D:\Documents and Settings\Administrator\Application Data
وأنا طبعا محدد مثلا بعد 10 دقائق من تشغيل برنامجي الذي به الكود الميمون
الذي ستتكرمون به علي بعد 10 دقائق أفحص ::::
هل النافذة الفعالة هي مسار مجلد ما فإن كان كذلك فأريد هذا المسااااااااااااااااااااااااااااار
لايهم أي مجلد
أنا سألت زملائي ما عرفو الحل لذا ايميلي e_alzuabi@hotmail.com
لذا الرجاءبعد موافقة المشرف أنا من دمشق فالذي يرضى يحادثني هاتفيا يرسل لي موافقة على الايميل وأرسل له رقمي لأني والله مليت من الكتابة
ليس من كثرتها إنما ماحدا عميفهم علي
سامحوني رجاء
لو توضح اكثر وتشرح مرة ثانية يا اخ عصام
.
.
.
.
.
.
.
.
.
.
.
.
.
ههههههههههههه امزح معاك .... وصلت الفكرة و اتضح طلبك
لكن للأسف انا لا اعرف الجواب ... لكن سوف ابحث لك .... : )
معقول ماحدا بيعرف ؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟؟
أنا لاأعرف ماهو الحل ..
لكن أنصحك بالبحث في كتب ويندوز API . لقد أضفت حديثا كتاب The Tomes of Delphi Win32 Core API Windows 2000 Edition.pdf
أنصحك بالبحث فيه عن شيء مفيد ..
ملاحظة مشكلتك مع ويندوز , لو تعرف أن تابع Api ما في أي لغه برمجة يستطيع القيام بذلك لساعدناك وحولناه لدلفي .
شكرا عروة
أنا أبحث عن الكتاب لكن دخلت العديد من المواقع لم أجد منه مجانا فقط حوالي
56 $$$$$$$$$$$$$$$$$$
فعلى راحتك إذا لقيتو بطريقك بس حط اللينك لحتى اسحبه
لقد وضعته في مجموعه الكتب , هنا :
شكرا جزيلا عزيزي عروة
عميغلبك معي!!!
هذا الموضوع مغلق.