+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : دلفي للعرب - القسم العام (https://delphi4arab.net/forum/forumdisplay.php?fid=10)
+--- الموضوع : ماذا ان باسكال ودلفي كان هكذا (/showthread.php?tid=7585)
الصفحات:
1
2
ماذا ان باسكال ودلفي كان هكذا - Delphi4Us - 08-03-2016
هناك اشياء دائما اقول لو انها كذا او كذا ، ومن ايام الدلفي سبعة كنت اقول لو ان دلفي كان فيه كذا وكذا لكان افضل حتى ظهر دلفي 2007 اي بيئة التطوير وكانت كما اردت .
وتمنيت ان يتعامل مع الصور بشتى انواعها مثل PNG دون الحاجة الى مكونات خارجية وكان ذلك كذلك .
كما تمنيت من وقت قريب بهذا المنتدى ان كان بالامكان فعل التالي:
كود :
Var i:Intger;
Edit1.text := i.asString ;وكان لي موضوع حول هذا ومحاولات مع الاخ كاش ون وتحقق ذلك مع دلفي EX7
وتمنيت لو بالامكان ربط اي مكون بقاعدة البيانات او ربطها مع بعضها .
وتحقق ذلك مع LiveBinding
وتمنيت لو ان يكون هناك مكونات للتعامل مع شكل البرنامج في بيئة التطوير نفسها وتحقق ذلك في Appearance
ودائما وكلما اتصور شيئا يتحقق ولا اعرف لماذا .
وكنت دائما اقول لو ان مايكروسوفت تقوم بكذا ويحدث .
حتى انتابتني شكوك وهلاوس بعيدة عن الحقيقة ، ووصلت الى قناعة ان ما تفكر فيه يفكر فيه غيرك .
وانني وهولاء المطورين نفكر بنفس الاسلوب فقط هم لهم القدرة على تحقيق ذلك في هذه الشركات وانا لا يمكنني هذا .
والان راودتني اشياء مع باسكال واقول لو ان فيه كذا او كذا واردت ان اطرحها قبل ان تحدث لعلكم تشاركوني هذه الهلاوس والشكوك فربما المشترى الجديد يفعل شيئا كهذا .
تصوروا معي لو ان الاجراءات تكون بهذا الشكل :
كود :
procedure TFrmMain.Panel1Click(Sender: TObject);
{
}
او مثل
procedure TFrmMain.Panel1Click(Sender: TObject);
end subويمكننا ان نعرف المتغيرات باي مكان كما بالشكل التالي
كود :
procedure TFrmMain.Panel1Click(Sender: TObject);
{
var i:Integer;
}كود :
procedure TFrmMain.Panel1Click(Sender: TObject);
{
var i:Integer;
for i :=0 to 100
{
// do anything
}
}كود :
procedure TFrmMain.Panel1Click(Sender: TObject);
{
if i=1 then
{
}
}كود :
Try
Begin
end
finally
begin
endبالتاكيد ستقولون ليتها كانت بالشكل التالي:
كود :
try
finally
end;هذا تماما ما اقوله الان عن الاجراءات والمتغيرات .
[size=small]مع انني اتمنى ان اكتبها كما بالشكل التالي:[/size]
كود :
try
end try
finally
end;بدل من كتابتها كما بالشكل التالي:
كود :
try
try
except on E: Exception do
end;
finally
end;[size=small]بمجرد ان تكتب[/size]
كود :
Action:=[size=small]وبمجرد كتابة يساوي يظهر قائمة تحتوي على المطلوب مثل [/size]
كود :
caFree;كما تمنيت عند النقر على اي مكون بزر الفأرة الايمن ان تجد ارسال الى الخلف او احظار الى الامام في القائمة الرئيسية وليس في القائمة الفرعية كنترول
وكذلك قص ونسخ ولصق في القائمة الرئيسية وليس في القائمة الفرعية تنقيح .
كما تمنيت ان يكون يكون هناك شئ يميز عبارات If المتداخلية وكذلك for عن بعضها ووجدت مكون مكونات Cnpack التي ادت الغرض ولكن دلفي ايضا تنبه الى هذا الامر وتحقق هذا فيه .
ولا اعرف ربما هناك اشياء اخرى نسيتها .
وارجوا المشاركة بكل من له شئ يتمنى ان يكون بشكل ما فربما تتحقق كل امنياتكم هنا .
![[صورة: 4n_Xqz_Bc_F.jpg]](http://s9.postimg.org/rvdc0cswf/4n_Xqz_Bc_F.jpg)
RE: ماذا ان باسكال ودلفي كان هكذا - لؤي - 08-03-2016
السلام علكبم
هناك إحتياجات تقوم كل شركة بتحصيلها من زيائن مطورين هواة قتعمل على تجسيدها قدر الإمكان الغاية منها تطوير وتحسين البرنامج و رفع قيمتها ماديا ولكن ليس كل ما يشتهبه المرء يدركه
RE: ماذا ان باسكال ودلفي كان هكذا - Agmcz - 08-03-2016
السلام عليكم
وما الفرق إن كانت كذا أو كذا أو أحببت أو لم تحب
كل محرر ومميزاته
يمكن تتحق كل أمنياتك لكن تتغير هيكلة محرر دلفي خصوصا
PHP كود :
begin
end;
RE: ماذا ان باسكال ودلفي كان هكذا - Delphi4Us - 09-03-2016
وعليكم السلام
(08-03-2016, 09:53 PM)Agmcz كتب : السلام عليكم
وما الفرق إن كانت كذا أو كذا أو أحببت أو لم تحب
كل محرر ومميزاته
يمكن تتحق كل أمنياتك لكن تتغير هيكلة محرر دلفي خصوصا
PHP كود :begin
end;
هناك فرق بالنسبة لي .
عندما اقود مركبة دراع التعشيق لها اوتوماتيك ليس مثل عندما تكون عادية .
اجل هناك فرق بين ان تكتب المتغير العددي متبوعا بنقطة فتحصل على ToString بدل من ان تكتبها IntToStr
كما ان مقروئية الكود والشيفرة ستكون اسهل
انظر الى وحدة بها خمسة الالاف اجراء او سطر برمجي وانت تتصفحها ستكون عبارة Begin وكذلك End كثيرة الى درجة مربكة
مثل خطوط الاسود والابيض لقطيع حمير وحش هائجة في بعضها .
كما انني عندما اريد تعريف متغير في اجراء كبير اضطر الى الصعود الى بداية الوحدة او بداية الاجراء لانشاء متغير والعودة بعد ذلك الى المكان الذي كنت اكتب فيه .
بدل من ان اعرفه باي مكان اريد واستمر في الكتابة .
كل هذه الاشياء مزعجة .
انا اتحدث عن ان دلفي لغة ممتازة ولا احب تركها للغة اخرى ولكن من الجيد اقتناص كل ما هو جيد بمحررات الكود الاخرى او نقاط القوة في البيئات الاخرى و تنفيذها مع الدلفي .
محرر الكودفي بيئة الدوت نت مثلا مريح جدا ،حتى علق احدهم ذات مرة قائلاً ( انه يعلم الكسل )
RE: ماذا ان باسكال ودلفي كان هكذا - Agmcz - 09-03-2016
أنا أيضا أحب أن يكون المحرر متطور
وأعجبني تحوdل من Int إلى Str دون لجوء لإستعمال IntToStr
أما عن تعريف متغيرات لوكال في أي مكان في الإجراء أرى أن تبقى كما هي أفضل
أما عن Begin End كل أحلامك ممكن أن تتحقق عدا هذا أعتقد أنه لن يحقق.
إقتباس :انظر الى وحدة بها خمسة الالاف اجراء او سطر برمجي وانت تتصفحها ستكون عبارة Begin وكذلك End كثيرة الى درجة مربكةنفس شيء سيكون مع {} شخصيا لا أحب هذه الأقواس ولا أتمنى أن يتم إستخدامها.
مثل خطوط الاسود والابيض لقطيع حمير وحش هائجة في بعضها .
RE: ماذا ان باسكال ودلفي كان هكذا - Delphi4Us - 10-03-2016
إقتباس :أنا أيضا أحب أن يكون المحرر متطور
وأعجبني تحوdل من Int إلى Str دون لجوء لإستعمال IntToStr
لو لم يتم فعل ذلك وطرحت الفكرة للنقاش لكنت قلت لا احبذ هذا الا بعد ان جربت ذلك
إقتباس :أما عن تعريف المتغيرات لوكانت في أي مكان في الإجراء أرى أن تبقى كما هي أفضل
هل رأيت مع انه ليس لديك سبب منطقي على ذلك وانما هو التصدي لكل ما هو جديد فقط
ولا الومك انها نزعة طبيعية في النفس البشرية اي محاربة كل شئ جديد
إقتباس :نفس شيء سيكون مع {} شخصيا لا أحب هذه الأقواس ولا أتمنى أن يتم إستخدامها.
كود :
procedure TFrmMain.Panel1Click(Sender: TObject);
if i > x
else
end;
end ;
procedure TFrmMain.Panel1Click(Sender: TObject);
begin
if i >x
begin
end else begin
end;
end;كلا يا صديقي ليست نفس الشئ
لاحظ انك رفظت كل ما لم يتم تنفيذه في الحقيقة وايديت فقط الشئ الذي تم تنفيذه في دلفي
RE: ماذا ان باسكال ودلفي كان هكذا - Agmcz - 10-03-2016
إقتباس :لو لم يتم فعل ذلك وطرحت الفكرة للنقاش لكنت قلت لا احبذ هذا الا بعد ان جربت ذلكلا ليس فكرة طرحتها أنت أو غيرك فقط أن يكون شيء يتقبله العقل.
إقتباس :هل رأيت مع انه ليس لديك سبب منطقي على ذلك وانما هو التصدي لكل ما هو جديد فقطوهل أنت لديك سبب منطقي ليتم تعريف المتغيرات في أي مكان في الإجراء
ولا الومك انها نزعة طبيعية في النفس البشرية اي محاربة كل شئ جديد
عدا ماذكرته إجراء طويل ولا تحب الصعود إلى الفوق هل في رأيك هذا سبب منطقي؟؟؟
إقتباس :procedure TFrmMain.Panel1Click(Sender: TObject);لقذ قلتها وسأعيدها لن يتغير ماذكرته أيضا try
if i > x
else
end;
end ;
procedure TFrmMain.Panel1Click(Sender: TObject);
begin
if i >x
begin
end else begin
end;
end;
منذ أن ظهرت هذه اللغة وكتابة الكود بنفس التنسيق هل في رأيك الأمر بسيط للتغيير
أنا أعيد لك أصحوا عن الحلم.
RE: ماذا ان باسكال ودلفي كان هكذا - Delphi4Us - 10-03-2016
إقتباس :وهل أنت لديك سبب منطقي ليتم تعريف المتغيرات في أي مكان في الإجراء
عدا ماذكرته إجراء طويل ولا تحب الصعود إلى الفوق هل في رأيك هذا سبب منطقي؟؟؟
حسنا يا صديقي هذا هو الغرض من الموضوع النقاش فيه .
لي تعقيب بسيط .
طالما ان تجاوز خمسة الالاف سطر برمجي والصعود الى بداية الاجراء لتعريف متغير شئ طبيعي .
لماذا اذا كتابة IntToStr ليست شئ طبيعي والافضل هو ToString
مع ان كل ما يتطلبه الامر هو بضع نقرات على الفأرة
وانت رأيت ان هذا منطقي وطبيعي واعجبك هذا التحول
يا صديقي ما اقوله منطقي تماما .
محرر الكود ظهر للوجود لمساعدة المبرمج في كتابة الكود .
ولو لم يتطور لبقينا نكتب في محررات النصوص
فكل ما يريح المبرمج هو مطلوب وتعريف المتغيرات بمكان محدد تعيقني كمبرمج .
وانظر الى اي وحدة مليئة بالاجراءات ولاحظ عبارة Begin الكثيرة
ليس ظروري الاقواس ولكن هذه العبارة مكررة اكثر من اللازم بشكل لا داعي له .
ولو راجعت المثال السابق ونظرت للمختصر الذي اراه مناسب لرايت انني اتحدث بشكل منطقي
اما ان يتغير او لا يتغير فهذا ما سيتبثه الوقت فقط
وليس سهلا التغيير هذا صحيح .
ولكنه ليس صعباً .
كل ما يتطلبه هو تعديل عدة اسطر برمجية .
ومعالج لتحويل المشاريع القديمة الى التنسيق الجديد فقط .
انظر للتغيرات التي طرأت على دلفي في خلال عدة سنوات .
لقد تغير كلياً
RE: ماذا ان باسكال ودلفي كان هكذا - Agmcz - 10-03-2016
إقتباس :طالما ان تجاوز خمسة الالاف سطر برمجي والصعود الى بداية الاجراء لتعريف متغير شئ طبيعي .ألا يوجد في يسار المحرر treeview تمكنك من التنقل بين الإجراءات بكل سهولة؟
أما عن تكرار begin end أرى أنها منطقية جدا هكذا
على غرار إستخدامها في بداية ونهاية كل إجراء
ما دام تم إستخدامها فهناك عدة أوامر ستنفذ لشرط ما.
سأكتفي إلا هنا السلام عليكم.
RE: ماذا ان باسكال ودلفي كان هكذا - Delphi4Us - 10-03-2016
إقتباس :لماذا تريدني ان امسك اذني اليمنى بيدي اليسرى ...!إقتباس :ألا يوجد في يسار المحرر treeview تمكنك من التنقل بين الإجراءات بكل سهولة؟
اتركني اعرف المتغير بأي مكان وانتهى الامر
وعليكم السلام