إعـــــــلان

**عبود عبود عبود عبود** · 02-04-2013, 04:31 PM

بالنسبة لــــ الأول :

كود:

--
-- Get a list of the available drives.
drives = Drive.Enumerate();
-- Determine if an error occurred.
error = Application.GetLastError();
-- If an error occurred, display the error message.
-- If no error occurred, display the available drives in a dialog.
if (error ~= 0) then
    Dialog.Message("Error", _tblErrorMessages[error], MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
  else
    if drives~=nil then
      for i, s in pairs(drives) do
         ComboBox.AddItem("ComboBox1", s, s);
      end
      ComboBox.SetUpdate("ComboBox1", true);
    end
end

بالنسبــة لـــ الثانى :

كود:

--
text = Input.GetText("Input1")
Ntext = ""..text.."\\";
Input.SetText("Input1", Ntext)

أو أن يكتب هذا السطر للمتغير Ntext هكذا :

كود:

Ntext = text.."\\";

أو أن يكتب هذا السطر للمتغير Ntext هكذا :

كود:

Ntext = text..'\\';

أو بالطريقة التى ذكرتها لك سابقا أيهما أسهل إستعملها فكلاهما صحيح ولكن الإختلاف فى الطريقة للتطبيق فقط .

بالنسبــة لــــ الثالث :

كود:

--
text = Input.GetText("Input1")
if text~="" then
  result = String.Length(text);
  Ntext = String.Left(text, result-1);
  Input.SetText("Input1", Ntext)
end

**القنـاص المصرى القنـاص المصرى** · 02-04-2013, 09:22 PM

المشاركة الأصلية بواسطة عبود عبود مشاهدة المشاركة

بالنسبة لــــ الأول :

كود:

--
-- Get a list of the available drives.
drives = Drive.Enumerate();
-- Determine if an error occurred.
error = Application.GetLastError();
-- If an error occurred, display the error message.
-- If no error occurred, display the available drives in a dialog.
if (error ~= 0) then
    Dialog.Message("Error", _tblErrorMessages[error], MB_OK, MB_ICONEXCLAMATION, MB_DEFBUTTON1);
  else
    if drives~=nil then
      for i, s in pairs(drives) do
         ComboBox.AddItem("ComboBox1", s, s);
      end
      ComboBox.SetUpdate("ComboBox1", true);
    end
end

بالنسبــة لـــ الثانى :

كود:

--
text = Input.GetText("Input1")
Ntext = ""..text.."\\";
Input.SetText("Input1", Ntext)

أو أن يكتب هذا السطر للمتغير Ntext هكذا :

كود:

Ntext = text.."\\";

أو أن يكتب هذا السطر للمتغير Ntext هكذا :

كود:

Ntext = text..'\\';

أو بالطريقة التى ذكرتها لك سابقا أيهما أسهل إستعملها فكلاهما صحيح ولكن الإختلاف فى الطريقة للتطبيق فقط .

بالنسبــة لــــ الثالث :

كود:

--
text = Input.GetText("Input1")
if text~="" then
  result = String.Length(text);
  Ntext = String.Left(text, result-1);
  Input.SetText("Input1", Ntext)
end

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

ولكن المشكلة الثانية لازالت موجودة

**عبود عبود عبود عبود** · 02-04-2013, 11:08 PM

أمامك ساعتين من الآن لتضع لى كودك الذى يظهر فية المشكلة حتى أحدد أين الخطأ

سأكون فى الشغل غدا أمامك ساعتين من وقت هذه المشاركة

**النصل القاطع النصل القاطع** · 03-04-2013, 09:31 AM

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

أنت تريد دمج متغير (لا يهمنا نوعه) مع ثابت نصى

كود PHP:


Ntext = text.."\\";

هذه هى الطريقة
لاحظ \\
لم يتم هنا تكرار للعلامة
لكن سبقنا العلامة \ و هى علامة خاصة بعلامة تمرير العلامات الخاصة و هى ثابته دائما و هى \
أتمنى أن تكون الفكرة وصلتك هذه المرة

إعـــــــلان

3 استفسارات مهمة جدا ارجو المساعدة (( المتغيرات - Drive - القيم النصية ))

3 استفسارات مهمة جدا ارجو المساعدة (( المتغيرات - Drive - القيم النصية ))

تعليق

تعليق

تعليق

تعليق

مواضيع تهمك