المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : السلام عليكم -- مساعده فى شرط اف لو تكرمتم


بيانكى
25-12-2019, 10:29 PM
تحية طيبة الى
كل الاخوه المحترفين

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

if ListBox.DeselectItem then

Dialog.Message("انتبه","لم تختار اسم من القائمة")
end



ما لم اتمكن من اكماله هو عند ما يختار المستخدم عنصر ويضغط تعديل
اريد تخطى هذا الديالوج ولا يظهر
واشكركم جدا :abc_023::abc_023:

وليد شوكلاته
26-12-2019, 08:57 AM
السلام عليكم ورحمة الله وبركاته
اخى الحبيب اضف للمشروع Lable باسم Lable1

وضع هذا الكود فى خصائص الزر فى الحدث On Click

T = Label.GetText("Label1");
if T=='1' then
--هنا تضع الاكواد المراد تنفيذها مكان هذه الرسالة
result = Dialog.Message("Notice", "هنا تضع الاكواد المراد تنفيذها مكان هذه الرسالة", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
result = Dialog.Message("Notice", "انت لم تحدد اى عنصر", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end

وهذ الكود فى خصائص ListBox فى الحدث On Select

Label.SetText("Label1", '1');

ولكن هذا الحل على قدر معرفتى لعل احد المحترفين لديه ماهو افضل
هذا الحل الاول هناك حل اخر ويغنيك عن كل هذا وهو
==================================
الحل الثانى
تضع هذا الكود فى خصائص الصفحة فى الحدث On Show
وهو يقوم تلقائيا بتحديد العنصر الاول فى ListBox عند فتح المشرع

ListBox.SelectItem("ListBox1", 1);
يجب مراعاة تغيير ListBox1 فى الاكواد الى اسم ListBox الذى لديك
تقبل فائق احترامى

بيانكى
26-12-2019, 10:02 PM
السلام عليكم ورحمة الله وبركاته
اخى الحبيب اضف للمشروع Lable باسم Lable1

وضع هذا الكود فى خصائص الزر فى الحدث On Click

T = Label.GetText("Label1");
if T=='1' then
--هنا تضع الاكواد المراد تنفيذها مكان هذه الرسالة
result = Dialog.Message("Notice", "هنا تضع الاكواد المراد تنفيذها مكان هذه الرسالة", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
else
result = Dialog.Message("Notice", "انت لم تحدد اى عنصر", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end

وهذ الكود فى خصائص ListBox فى الحدث On Select

Label.SetText("Label1", '1');

ولكن هذا الحل على قدر معرفتى لعل احد المحترفين لديه ماهو افضل
هذا الحل الاول هناك حل اخر ويغنيك عن كل هذا وهو
==================================
الحل الثانى
تضع هذا الكود فى خصائص الصفحة فى الحدث On Show
وهو يقوم تلقائيا بتحديد العنصر الاول فى ListBox عند فتح المشرع

ListBox.SelectItem("ListBox1", 1);
يجب مراعاة تغيير ListBox1 فى الاكواد الى اسم ListBox الذى لديك
تقبل فائق احترامى


اشكرك جدا اخى الغالى وليد
لقد نجح الكود على هذا النحو

if List==ListBox.GetSelected("List_user") then

Dialog.Message("Notice", "ÚÝæÇ ÇÎÊÇÑ ÚäÕÑ ãä ÇáÞÇÆãÉ ÇæáÇ", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);

end

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

وليد شوكلاته
27-12-2019, 12:48 AM
اشكرك جدا اخى الغالى وليد
لقد نجح الكود على هذا النحو

if list==listbox.getselected("list_user") then

dialog.message("notice", "ÚÝæÇ ÇÎÊÇÑ ÚäÕÑ ãä ÇáÞÇÆãÉ ÇæáÇ", mb_ok, mb_iconinformation, mb_defbutton1);

end

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

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

بيانكى
28-12-2019, 12:38 AM
السلام عليكم ورحمة الله وبركاته
بالتوفيق ياباشا بالنسبه لسؤالك لم تصلنى الفكرة بالظبط
لو امكن تضع الكود كمثال لكى افهم بالضبط الفكره
تفبل تقديرى واحترامى


اشكرك جدا
تم الحل والمعالجة شكرا جدا

وليد شوكلاته
28-12-2019, 04:26 AM
اشكرك جدا
تم الحل والمعالجة شكرا جدا

موفق دائما اخى
ماذا لو تضع الحل حتى يستفيد منه
من يدخل الى هذا الموضوع ولك مطلق الحرية
تحياتى
:abc_001::abc_001::abc_001:

بيانكى
30-12-2019, 10:13 AM
موفق دائما اخى
ماذا لو تضع الحل حتى يستفيد منه
من يدخل الى هذا الموضوع ولك مطلق الحرية
تحياتى
:abc_001::abc_001::abc_001:

طبعا اخى الكريم لقد تم الحل بهذا الشكل



if List==ListBox.GetSelected("List_user") then

Dialog.Message("انتبة ", "اختار عنصر من القائمة اولا للتعدله", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
end