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

اوامر قائمة تحرير

مغلق
بدأه قهمرهم كلهم في 10 فبراير 2005 · 13 رد · 972 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم

انا ابي اعرف ماهوو الكود اللي يعمل أمر copy,delet.past

يعني اوامر قائمة تحرير في برنامج المفكره اللي تبع الويندوز

وشكرا:)

#2

تفضل هذا الرابط يبين لك كيفية التعامل مع الClipBoard

http://msdn.microsoft.com/library/default....dclasstopic.asp

#3

لا انا ابي شررح ماأبي زي كذااا

كله انجليزي بانجليزي

وشكرا لك:)

#4

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

رابط أحد المشاركات (وستجد الكثير غيرها):

/index.ph...opic=51436&st=0

Learn Japanese :>>> http://www.nouben.com/

#6

طيب وينها ؟ مالقيت شيء يفيدني دورت في هذا الرابط مالقيت شيء

وين القى مواضيع ثانيه مطروحه هنا ؟؟

انا ابي قائمة تحرير مو قاءمة ملف انا فاهمه كيف افتح ملف واحفظ بس ابي النسح اللصق والخطوط

#7
اقتباس
تمام يا زعيم

:lol: :lol: :lol:

يا كسول يا قهمرهم كلهم :lol: ، لو قرأت المشاركة التي وضعت رابطها الى الآخر لوجدت الجواب في احدى الأمثلة التي وضعتها، على كل حال تكرم عينك ها هي الأكواد:

النسخ:

Clipboard.SetDataObject(TextBox1.SelectedText)

القص:

Clipboard.SetDataObject(TextBox1.SelectedText)
TextBox1.SelectedText = ""

اللصق:

If Clipboard.GetDataObject.GetDataPresent(DataFormats.Text) = True Then
            TextBox1.SelectedText = Clipboard.GetDataObject.GetData(DataFormats.Text).ToString
        End If

Learn Japanese :>>> http://www.nouben.com/

#8

شكرا شكرا شكرا مع اني ماابعد جربت الاكووواد

بس تراني غلطانه بالنك نيك تبعي:(

مفروض قمرهم كلهم :( وانا كتبت قهمرهم كلهم ابي اعدل:(:(

وشكرا لك مرة ثانيه

اختكم قمرهم كلهم

#9

طيب ابي شرح الكود هذا مافهمته:(

الله يخليك يالخبيررررر

#10

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

بالنسبة للأكواد، أكواد تشرح نفسها بنفسها، ما هو الصعب فيها أختي العزيزة؟

ال Clipboard هو حافظة الويندوز الذي نحفظ بها النصوص (أو حتى صور والملفات) عندما نقوم بالنسخ والقص.

في النسخ، نقوم بإستدعاء SetDataObject لحافظة الويندوز حتى تقوم بنسخ النص المظلل من ال TextBox1.

والقص هو نفس الحفظ ما عدا بأننا نحذف الكلام المظلل في الصندوق TextBox1 بعد عملية الحفظ.

والنسخ شوية أصعب، أولاً نتأكد بأن المعلومات الموجودة في الحافظة هي نصوص (مش صور أو خلافه)، كما تعلمين لا نستطيع أن نضع في ال TextBox1 صورة أو أي نص منسق... وبعد أن نتأكد بأن النص هو نص عادي فإننا نقوم بإستدعاء GetDataObjec حيث تقوم الحافظة بعمل نسخة من محتوياتها وتضعها في صندوق النص.

بالطبع أنا أفترض بأنه يوجد عندك صندوق نص TextBox1 وفيه كلام، ويوجد عندم Menu فيها أزرار الحفظ والنسخ والقص...

ارجو أن أكون قد أجبت على سؤالك.

Learn Japanese :>>> http://www.nouben.com/

#11

اييييييه فهمت انا ماكنت فاهمه بالاوول Clipboard

ولا كنت فاهمه الفرررق بين بين SetDataObject و GetDataObjec

وسويتها واشتغل مععععي

شكررررا لك والله تشجعون الواحد يشاارك بهذا المنتدى وحاافز الواحد يتعلم

طيب بسأل سؤال ثاني :|

كيف احط خصااائص الخط يعني الخط نوعه حجمه؟؟ @@

#12

وينك ياااا HMS رد علي :(

علمني ابيها ضروووووري

وشكرا لك :)

#13

أختي الكريمة،

أنصحك بما يلي، لا تضعي أكثر من سؤال في المشاركة الواحدة، فأنا ظننت بأنني أجبتك ولم أعلم بأنه يوجد سؤال آخر...

اقتباس
كيف احط خصااائص الخط يعني الخط نوعه حجمه؟؟

مثلاً إن كان عندك Label1 وتريدين تغيير خطه الى مثلاً Times New Roman بحجم 16، فقط أكتب ما يلي:

Label1.Font=New Font("Times New Roman",16)

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

Label1.Font = New Font(Label1.Font.FontFamily, 16)

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

Label1.Font = New Font(Label1.Font.FontFamily, 16, FontStyle.Italic)

أما إذا أردت أن تغير الحجم الى 16 ولكن تريد الستايل أن يكون Italic و Bold فاكتب ما يلي:

Label1.Font = New Font(Label1.Font.FontFamily, 16, FontStyle.Italic Or FontStyle.Bold)

الخ... الخ... الخ...

أرجو بأن أكون قد أجبت على سؤالك

تم تعديل هذه المشاركة بواسطة HMS في 16 فبراير 2005 في 13:50

Learn Japanese :>>> http://www.nouben.com/

#14

شكرا لك واااسفه لاااني انا ماأدري

وصلت المعلووومه وشكراا :>

هذا الموضوع مغلق.

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