استخلاص آخر كلمة

[ثامر أبو بلقيس]

السلام عليكم
رمضان كريم
ترغب في استخلاص الكلمة الأخيرة من جملة مكتوبة بغير
اللغة العربية
قم بالتجربة التالية :
ضع أنبوت 1 و أنبوت 2
ثم زر ضمنه الكود التالي :
s = Input.GetText("Input1");

for w in string.gfind(s, "%a+") do
Input.SetText("Input2", w);
end
بعدها أكتب في الانبوت 1 و بالضغط على الزر ستستخلص الكلمة الأخيرة فقط
في الانبوت 2
سلام:abc_023:

[Haitham.2012]

شكرا لك اخي ثامر .. لكن يرجى تغيير لون الخط الخاص بالكود لأنه أبيض ولا يظهر الا اذا قمت بالتظليل .. فقد لا ينتبه له الكثير

تحياتي

[النصل القاطع]

شكرا لك اخي ثامر .. لكن يرجى تغيير لون الخط الخاص بالكود لأنه أبيض ولا يظهر الا اذا قمت بالتظليل .. فقد لا ينتبه له الكثير

تحياتي
تم التعديل

[رعد الحواسيب]

جزاك الله خيرا :abc_051:

ما الحل مع اللغة العربية ؟

[أبو يوسف]

جزاك الله خيرا أخانا ثامر وبارك الله فيك

[ثامر أبو بلقيس]

شكرا لك اخي ثامر .. لكن يرجى تغيير لون الخط الخاص بالكود لأنه أبيض ولا يظهر الا اذا قمت بالتظليل .. فقد لا ينتبه له الكثير

تحياتي

بارك الله فيك استاذ هيثم .. لم أنتبه

جزاك الله خيرا :abc_051:

ما الحل مع اللغة العربية ؟
أضيف ملاحظة أخي رعد و هي يمكنك التحكم في الأرقام
مع الكلمات " غير العربية " بتغير حرف واحد في المعادلة السابقة
في السطر الثاني غير%a+ بـ %w+ ستدرج بهذا التغير التحكم بالأرقام كذلك أنّ وصلت لطريقة تخص اللغة العربية
سأضعها و اذ توفرت لأحد الزملاء ربما سيفيد بها

جزاك الله خيرا أخانا ثامر وبارك الله فيك

مرور عطر أستاذي أبويوسف

[أبو صخر]

وفقك الله وأثابك ونفع بك

[ثامر أبو بلقيس]

وفقك الله وأثابك ونفع بك

شكرا استاذي الكريم على الرد الطيب :abc_152:

[azizsoft]

بسم الله الرحمن الرحيم

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

رمضان كريم

[ثامر أبو بلقيس]

بسم الله الرحمن الرحيم

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

رمضان كريم

مرور عطر استاذي الكريم
:abc_022:

[أبو فارس]

شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .

[ثامر أبو بلقيس]

جزاك الله خيرا :abc_051:

ما الحل مع اللغة العربية ؟

السلام عليكم قد نعوض الطرح ليدعم العربية بالكود التالي
sSeparator = " ";
tWords = {};
nEntries = 1;
nEntriesStart = 1;
sOutput = "";
nSeparator = 0;
sInput = Input.GetText("Input1");
nInputLength = String.Length(sInput);
nSeparator = String.ReverseFind(sInput, sSeparator, false);
sWord = String.Right(sInput, (nInputLength-nSeparator));
result = Dialog.Message("Notice", sWord);

سلام :abc_023: