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

كيف أعمل مفكرة عن طريق القجوال بيسك

بدأه مبرمجة مسلمة في 20 مايو 2009 · 16 رد · 1,075 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

جربت سابقا تطبيق درس لعمل مفكرة ولكنني لم أنجح في تطبيق طريقة الحفظ ولا الفتح أما جديد وإغلاق فقد عرفت تطبيقها

شيء لآخر وهو كيف أستطيع وضع زر في الصفحة بحيث أستطيع أن أنتقل إلى صفحة تالية مع الاحتفاظ بالمكتوب في الصفحة السابقة

أي أن الزر بمثابة زر التالي الذي ينقلني لصفحة جديدة بها نفس الصفحة السابقة في الشكل والحجم والمكان لكنها فارغة مما كتب في الفورم السابق مع الاحتفاظ بالذي كتب قبلا >>>مشابه للملاحظة الموجودة في نظام فستا

أرجو منكم إفادتي وإن لم يكن كلامي واضحا فأخبروني حتى أحاول أن اوضح أكثر

تم تعديل هذه المشاركة بواسطة مبرمجة مسلمة في 20 مايو 2009 في 17:58

#2

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

اقتباس
ولكنني لم أنجح في تطبيق طريقة الحفظ ولا الفتح

ما هو الكود الذي استعملتيه؟

اقتباس
شيء لآخر وهو كيف أستطيع وضع زر في الصفحة بحيث أستطيع أن أنتقل إلى صفحة تالية مع الاحتفاظ بالمكتوب في الصفحة السابقة

أي أن الزر بمثابة زر التالي الذي ينقلني لصفحة جديدة بها نفس الصفحة السابقة في الشكل والحجم والمكان لكنها فارغة مما كتب في الفورم السابق مع الاحتفاظ بالذي كتب قبلا

في المرفقات مثال يمكنك فيه عمل التالي والسابق.

طبعاً هنا يمكنك عمله مرة واحدة فقط، أما إذا أردت عمله عدداً غير محدود من المرات، فيجب أن تستعملي "مصفوفة ديناميكية"، لا أظنك قد درستيها بعد، لكن إذا أردت يمكنني عمل مثال لك باستخدام مصفوفة ديناميكية وعدد غير محدود من التالي والسابق.

بالتوفيق

Textbox.rar

هذه الجملة خاطئة  :wacko: 


#3

شكرا لك أخي

لدي طلب هو هل يمكنك شرح الأكواد التي وضعتها في البرنامج حتى أفهم بالضبط

ما عرفته أنك عرفت متغير نصي بتكست قديم وتكست جديد لكنني أحتاج لتوضيح أكثر للأكواد إن كان ممكن

بالنسبة لسؤالك عن المصفوفة الديناميكية

نعم ما أريده هو المصفوفة الديناميكية بحيث أستطيع الضغط على التالي بعدد غير محدود أما السابق فأريده أن يكون محدودا بحيث أنني لو عدت أقف على أول صفحة

وهل سيبقى الكلام موجودا بعد عمل البرنامج

أقصد بأنني لو قمت بعمل البرنامج وتنفيذ البرنامج وبعدها دخلت عليه وكتبت كلاما في الصفحة الاولى ثم انتقلت إلى الثانية وكتبت كلاما آخر وبعدها خرجت من البرنامج هل يبقى ما كتبت ؟؟>>>أعتذر على الإطالة

تم تعديل هذه المشاركة بواسطة مبرمجة مسلمة في 21 مايو 2009 في 09:58

#4

وهذا هو الدرس الذي طبقته بالنسبة لحفظ وفتح وإغلاق الحفظ هو الذي لا يتنفذ سواء أثناء اختبار المشروع وحتى بعد أن نفذت البرنامج وعملت له سيت أب

موجود في المرفقات

_____.rar

#5

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

يوجد في المرفقات كتاب جميل جدا هو كتاب " الإستخدامات المتقدمة في VB6 " للأستاذ : الصقر الجارح

أتمنى أني قد أضفت شيئا من الفائدة ,

http://h1.ripway.com/MoHand/vb6-2.zip

تحياااااتي ,,

للصداقة البرمجية

pro-vb6@hotmail.com

#6

حسناً، بالنسبة لكود الحفظ، فهناك أخطاء بسيطة:

If sens = 0 Then Exit Sub

طبعاً، بفضل هذا الكود فلن يحدث الإجراء أبداً، لأن المتغير sens متغير محلي في الإجراء save_Click ، أي أن قيمته ستكون صفراً دائماً كلما بدأنا الإجراء، وبالتالي فالشرط الموجود في الكود أعلاه صحيح دائماً، وسيؤدي إلى الخروج من الإجراء وعدم تنفيذ الأوامر. الحل إما بإزالة هذا السطر من الكود، أو توضيح لماذا قمت بكتابته، لكي نجد حلاً أفضل للمشكلة.

وهناك شيء آخر:

Editor.SaveFile Com.FileName

يجب أن يكون:

Editor.SaveFile Com.FileName, rtfText

ما دمت تطبعين في ملف نصي من نوع txt فيجب كتابة rtfText.

بالنسبة للمصفوفة الديناميكية، سأعملها اليوم بإذن الله، لكن هل أنت متأكدة أنك تريدين أن تجعلي الكلام يظل بعد إغلاق البرنامج وإعادة فتحه؟ هو ممكن لكنه قد يسبب ألماً في الرأس الآن بالنسبة لك، على كل حال سأعمله وأوضحه لك بإذن الله.

بالنسبة لشرح كود البرنامج الذي أرفقته لك، لا أظنه معقداً، فقط عندما ننتقل إلى النص الثاني نحفظ القيمة القديمة في متغير، ونضع القيمة الجديدة، وعندما ننتقل إلى النص الأول نقوم بالعكس، ونقوم بضبط خاصية Enabled لكي لا يتمكن المستخدم من نقر زر السابق عندما يكون في أول مربع نص، ولا من نقر زر التالي عندما يكون في النص الثاني.

بالتوفيق

----------

وشكراً للأخ أبي فهيد على الكتاب المميز فعلاً :)

تم تعديل هذه المشاركة بواسطة Abboodd في 21 مايو 2009 في 18:21

هذه الجملة خاطئة  :wacko: 


#7

شكرا للأخ أبو فهيد على الكتاب قمت بتحميله وأسأل الله ان أستفيد منه

وشكرا للأخ Abboodd

لقد قمت بتغيير كود الحفظ وقد حلت المشكلة ولله الحمد

وأنتظر المصفوفة الديناميكية وجزاك الله خيرا

#8

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

في المرفقات مثال، قمت فيه بعمل عدد غير محدود من التالي، أما السابق، فيمكن الضغط عليه حتى نصل إلى العنصر الأول.

بالنسبة لاستعادة ما تمت كتابته بعد إعادة تشغيل البرنامج:

عند إغلاق البرنامج يتم إنشاء ملفات نصية في مجلد اسمه Texts موجود في مجلد المشروع، وفي هذه الملفات النصية يتم حفظ قيم عناصر المصفوفة، وعند إعادة فتح البرنامج تتم القراءة من هذه الملفات وتعبئة عناصر المصفوفة.

إذا أردت الاستزادة عن كيفية التعامل مع الملفات في فيجوال بيسك، فاقرأي هذا الدرس المميز:

شرح التعامل مع الملفات

إذا احتجت أي شيء أساعدك بإذن الله

بالتوفيق

Text_manipulating.rar

تم تعديل هذه المشاركة بواسطة Abboodd في 22 مايو 2009 في 16:18

هذه الجملة خاطئة  :wacko: 


#9

أشكرك أخى Abboodd على جهودك

لا أعرف كيف أشكرك

سأحاول الإستفادة من العرض الذى أعطيتني إياه جزى الله صانعته خيرا وشكرا على الملف التوضيحي والذي سأحاول أن أوجع رأسي بمحاولة فهمه والتمكن منه بإذن الله تعالى

وإذا تسمح لي بسؤال يخص المفكرة أيضا >>>يمكنك أن تعتذر عن إجابته معللا إعتذارك بانه هناك طرق أخرى للحفظ والفتح والإغلاق وهى التى قمت مشكورا بتصحيحا لي في بداية المشكلة

أنا سألت فقط لأفهم سبب عدم تنفيذ البرنامج لأزداد خبرة في الفجوال مع العلم أنني لن أنزعج إن لم تجب على سؤالي

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

استطعت أن أطبق النسخ واللصق والقص وكذلك الجديد ولكن بالنسبة للإغلاق أو الخروج والفتح والحفظ والمعلومات التى فى هليب كل هذه تعطيني إشارة خطأ ويشير فى الحفظ والفتح إلى كلمة intfile أما السطر الأساسى الذى يحوي على Private Sub فيشير عليه بالأصفر على الرغم من انني طبقت كل الخطوات بالتحديد

وشكرا وعذرا على الإزعاج

#10

سأحاول مساعدتك بإذن الله، لكن قد لا تكون المساعدة سريعة جداً، فهذه أيام امتحانات، وأنا بحاجة إلى الوقت... وإلى الدعاء من فضلك :)

على كل حال، حاولي إعادة تطبيق المثال في الكتاب، واحفظيه، أو ضعي رسالة الخطأ، فهي مهمة جداً في تسهيل معرفة سبب الخطأ.

بالتوفيق

هذه الجملة خاطئة  :wacko: 


#11

جزاك الله خيرا خذ وقتك وأنا مستعدة لأن أنتظر وفقك الله

#12

تفضلي أختي، عملته على السريع، مع تغييرات طفيفة (يعني في بعض التسميات، بسبب اختلاف الأذواق بيني وبينه...)

بالتوفيق

Notepad.rar

هذه الجملة خاطئة  :wacko: 


#13

فقط ملحوظة صغيرة أختي، وأرجو أن تعملي بها:

اتركي ما تدرسينه الآن فوراً، وانتقلي مباشرة إلى أحد الخيارين: Visual Basic.Net أو Delphi.

بما أنك ما زلت مبتدئة فلن تخسري كثيراً بالانتقال، وستسفيدين، من لغات أقوى بكثير من لغة فيجوال بيسك 6، والتي هي النسخة الأخيرة من عشر سنين تقريباً، أما اللغات الأخرى فهي أقوى، أحدث، مدعومة بشكل كبير، تعمل على أكثر من نظام تشغيل، وفي بعض الأحيان تكون أسهل....

لن أعد لك كثيراً من الميزات، لكن بتعلمك فيجوال بيسك 6، فقد تكونين تضرين نفسك أكثر من أن تفيديها، نصيحة، انتقلي إلى فيجوال بيسك دوت نيت أو ديلفي، وابتعدي عن هذه اللغة...

هذه نصيحة، وهي الأفضل لك بإذن المولى، وأرجو أن تطبقيها...

بالتوفيق.

هذه الجملة خاطئة  :wacko: 


#14

شكرا لك على ملف النوت باد

وبالنسبة لاقتراحك فى الانتقال

فأنا حاليا أبحث عن الفروق بين اللغتين وسأرى على أي منهما سأرسو

وجزاك الله خيرا

تم تعديل هذه المشاركة بواسطة مبرمجة مسلمة في 23 مايو 2009 في 10:55

#15
اقتباس
فأنا حاليا أبحث عن الفروق بين اللغتين وسأرى على أي منهما سأرسو

أذا كنت تبحثين عن الفروق بين Visual Basic 6 و Visual Basic.Net فأنا أنصحك وبشدة أن ترسي على الثانية.

ويجب أن تلاحظي أني أستخدم الأولى، وعندما تجدين شخصاً يستخدم الأولى وينصحك بالثانية، فهذا دليل قوي جداً على قوة الثانية، ولست الوحيد الذي ينصح بذلك، العضو mrx_Ta7ady قرأت أيضاً له نصيحة بذلك، وخبير فيجوال بيسك المشهور "تركي العسيري" كتب مقالة إني ذكرتك والذكرى مؤرقة ورغيد الطيب انتقل إلى دوت نيت، وبنت اليمن، وعدد كبير جداً من الأعضاء المشهورين والمخضرمين، في المنتدى وخارجه.

وفي النهاية القرار قرارك، ومالي إلا النصيحة.

بالتوفيق :)

هذه الجملة خاطئة  :wacko: 


#16

لقد انتقلت بالفعل للفجوال بيسك دوت نت شكرا لك على النصيحة

#17

الحمد لله.

بالتوفيق أختي، وأرجو أن أجدك وقد أصبحت مشرفة لقسم دوت نيت.

بالتوفيق

هذه الجملة خاطئة  :wacko: 


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