<:*:*:*:> کد نویسی، توضیح کد، طراحی متد (Method) زبان های مايکروسافت <:*:*:*:>

با سلام خدمت همه دوستان برنامه نویس و عزیزان پی سی.
قطعاً باید بدونید که قراره در این محل (تاپیک) چه کاری انجام بدیم!درسته... هدف من از ایجاد این تاپیک در اصل ساخت متد های مایکروسافت بود ولی دیدم که کمی به جزئیات تاپیک هم نگاه کنم و توضیحات کد و کد نویسی هم توش باشه تاپیک با شور بیشتری مورد استفاده قرار میگیره.من میخوام که تو این تاپیک ما با کمک یکدیگر یکی از متدهای Visual Studio مایکروسافت رو انتخاب کرده و اونو به صورت کامل در اینجا بزاریم!البته از متد های کوچک شروع کرده و به طرف متدهای سخت حرکت میکنیم.در ضمن دوستان می تونن که اگه جایی از کد تو برنامه نویسیشون مشکل داشتن و توضیح تیکه کد خواستن کد رو در اینجا قرار بدن تا من به همکاری دوستان بتونم براتون توضیح بدم البته اینو هم باید درنظر گرفت که دوستان پی سی زیاد هستند و من تنها نیستم.
خوب...
شاید بعضی از شما متد یادتون رفته باشه یا معنی درست اونو تو ویژوال ندونین!
واژه Method به معنی = روش، اسلوب، طريقه
باید بدونین که متد در کجا ها به کار میره پس به تیکه کد زیر توجه کنید:

(public void SQL_File_Engine(string FileName
}
Connection = @"Data Source=.\SQLEXPRESS;AttachDbFilename=""" + "|DataDirectory|" + FileName + "\";Integrated Security=True;User Instance=true;
;(Connect = newSqlConnection(Connection
{

در تیکه کد بالا SQL_File_Engine به عنوان متد به کار میره شما هر وقت تو برنامتون خواستین کد بالا رو بنویسن دیگه نیازی به کپی پیس یا نوشتن دوباره اون ندارین. فقط کافیه که متد رو صدا کنین:

;(@"\SQL_File_Engine("Main_DataBase.mdf

بسیار خوب این از توضیح متد (اگه بعضی از دوستان متوجه نشدن درخواست توضیح بیشتری کنن)
خوب...
من از متد Math.Abs شروع میکنم:
قطعاً همه شما میدونین که در محیط .NetFramework متد Math.Abs چه کاری انجام میده! متد Math.Abs یه عدد رو گرفته و قدر مطلق اون عدد رو برای شما بر میگردونه.در ریاضی:قدر مطلق هر عدد = مثبت آن عدد.
مثال:
|16|=16
|-16|=16
|0|=0
پس اگه ما به متد Abs هر عددی بدیم مثبت اون عدد رو میتونیم ببینیم میتونین با کد زیر امتحان کنین:

;(()MessageBox.Show(Math.Abs(-16).ToString

خوب حالا من به شما میگم که ماکروسافت چطوری از این متد استفاده کرده، به کد زیر دقت کنین:

(private double Abs(double value
}
(if (value < 0
}
;return -value
{
;return value
{

خوب الان باید فهمیده باشین که چطوری میشه قدر مطلق یک عدد رو بدست آورد.

توضیح کد:

یک متد که از نوع double بر میگردونه

(private double Abs(double value
}
doubleیک مقدار از نوع value
(if (value < 0
}
فقط در صورتی که مقدار valueکوچکتر از 0 یعنی منفی بود اونو مثبت میکنه.
;return -value
{
اگه عدد منفی نباشه که همونو برمیگردونه.
;return value
{

خوب دوستان باید بدونین که برای دوستانی که خیلی وقته برنامه نویسی میکنن نوشتن کد بالا کاری نداشت.توضیح دادم که ما از متدهای خیلی راحت شروع میکنیم و به متدهای سنگین میرسیم.

امیدوارم مورد استفاده قرار گرفته باشه و بگيره.قربان همه شما علي:11:.

سلام

خیلی عالیه علی اقا

ادامه بدید

سوال :

این قسمت مگه منظورش این نیست که اگه value کوچکتر از صفر بود اونا منفی برگردون

کد:

---

if (value < 0)
}
;return -value
{

---

نقل قول:

---

نوشته شده توسط persianmahdi [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سلام

خیلی عالیه علی اقا

ادامه بدید

سوال :

این قسمت مگه منظورش این نیست که اگه value کوچکتر از صفر بود اونا منفی برگردون

کد:

---

if (value < 0)
}
;return -value
{

---

---

سلام با تشکر.
درسته دوست من فرقی نمیکنه.


متد بعدی که قراره براتون تریس کنم متد Math.BigMul هست.
اول از همه توضیح بدم که این متد دو عدد را دریافت کرده و عملیات ضرب رو روی اونا انجام میده.پس فک نکنم کسی نتونه این متد رو بنویسه:
میتونید برای مشاهده جزئیات از کد زیر استفاده کنید:

کد:

---

MessageBox.Show(Math.BigMul(2,5).ToString());

---

خوب برای ساخت متد هم میتونین از کد زیر استفاده کنید:

کد:

---

private long BigMul(int a, int b)
        {
            return a * b;
  }

---

توضیح کد:

کد:

---

    که عدد صحیح 64 بیتی میباشد.long یک متد از نوع                                                                 
        private long BigMul(int a, int b)
        {
    دو متغیر a وb  که از نوع Integer  می باشد را باکارکتر * با هم ضرب میکنم و برمیگردانیم.               
            return a * b;
  }

---

متغیر a و b هر دو از نوع int میباشند:
Int یک متغیر از نوع عدد صحیح که اعداد -2147483648 تا 2147483647 میباشد.

نقل قول:

---

درسته دوست من فرقی نمیکنه

---

سلام
خب اونوقت این متدی که شما نوشتید ABS نمی شه

به خاطر این که Abs میگه اگه value منفی ( یا کوچکتر از صفر) بود اونا مثبت برگردون .

در حالی که توی این متدی که شما نوشتید میگه اگه value منفی بود (یا کوچکتر از صفر) بود اونا منفی برگردون

نقل قول:

---

نوشته شده توسط persianmahdi [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سلام
خب اونوقت این متدی که شما نوشتید ABS نمی شه

به خاطر این که Abs میگه اگه value منفی ( یا کوچکتر از صفر) بود اونا مثبت برگردون .

در حالی که توی این متدی که شما نوشتید میگه اگه value منفی بود (یا کوچکتر از صفر) بود اونا منفی برگردون

---

سلام خدمت همه.

دوست عزیز ممنون از همراهیتون.میشه کد درستشو بنویسید.ممنون.


این دفعه با متد متد Math.Max که دو عدد دریافت کرده و بزرگترین رو نمایش میده:

مشاهده:

کد:

---

MessageBox.Show(Math.Max(-10,-5).ToString());

---

خوب اینم متد:

کد:

---

        private int Max(int val1, int val2)
        {
            if (val1 > val2)
                return val1;
            return val2;
        }

---

توضیح کد:

کد:

---

متد Max از نوع int برمیگرداند و دو ورودی val1 و  val2 از نوع int دریافت میکند.
private int Max(int val1, int val2)
        {
در صورتی که val1 بزرگتر از val2 باشد
     
    if (val1 > val2)
              نمایش val1
 return val1;
در غیر این صورت نمایش val2
            return val2;
        }

---

با تشکر از همراهی دوستان:11:.

سلام

به نظرم درستش این باشه .

با 3 نوع میشه Abs را تعریف کرد که من هر سه نوع را هم میزارم .

کد:

---

public static decimal Abs(decimal nNumber)
{
 return System.Math.Abs(nNumber);
}

---

کد:

---

public static double Abs(double nNumber)
{
 return System.Math.Abs(nNumber);
}

---

کد:

---

public static int Abs(int nNumber)
{
 return System.Math.Abs(nNumber);
}

---

ممنون

نقل قول:

---

نوشته شده توسط persianmahdi [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سلام

به نظرم درستش این باشه .

با 3 نوع میشه Abs را تعریف کرد که من هر سه نوع را هم میزارم .

کد:

---

public static decimal Abs(decimal nNumber)
{
 return System.Math.Abs(nNumber);
}

---

کد:

---

public static double Abs(double nNumber)
{
 return System.Math.Abs(nNumber);
}

---

کد:

---

public static int Abs(int nNumber)
{
 return System.Math.Abs(nNumber);
}

---

ممنون

---

با سلام خدمت همه دوستان.
دوست عزیز شما منظور من رو بد متوجه شدی!!(یه بار دیگه توضیحات اولیه رو بخون).من میخوام که متد مثلاً Abs ساخته بشه نه اینکه تو متدی که ساختیم دوباره از اون استفاده کنیم.
منظور من اینه که چطوری بدون Abs بتونیم Abs بسازیم.

متد Math.Min:
این متد با توجه به متد قبلی کوچکترین عدد رو برمیگردونه:

کد:

---

        private int Min(int val1, int val2)
        {
            if (val1 > val2)
            {
                return val2;
            }
            return val1;
}

---

مشاهده:

کد:

---

MessageBox.Show(Math.Min(-10,5).ToString());

---

توضیح کد:

کد:

---

 
  یک متد از نوع int که دو ورودی val1 و val2 را دریافت میکند.
  private int Min(int val1, int val2)
        {
در صورتی که val1 بزرگتر از val2 باشد.
            if (val1 > val2)
            {
val2 را برمیگرداند و خارج میشود.
                return val2;
            }
val1 را برمیگرداند.
            return val1;
}

---

قربان شما علی:11:.

بازم سلام خدمت دوستان برنامه نویس و پی سی.
از این پس کد هر سه زبان رو براتون میزارم که کسی مشکلی نداشته باشه یعنی به سه زبان وی بی سی شارپ و سی پلاس پلاس براتون ترجمه میکنم:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] متد Math.Pow:
این متد دو ورودی را گرفته و ورودی اول را به توان ورودی دوم میرساند:

مشاهده:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

MessageBox.Show(Math.Pow(2, 8).ToString());

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic) کد:

کد:

---

MsgBox(Pow(2, 8).ToString())

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

MessageBox::Show(Math::Pow(2,8).ToString());

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] متد Math.Pow:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

private double Pow(double x, double y)
{
double RET = 1;
for (int I = 0; I < y; I++)
{
RET = RET * x;
}
return RET;
}

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic) کد:

کد:

---

Private Function Pow(ByVal x As Double, ByVal y As Double) As Double
Dim RET As Double = 1
Dim I As Integer
For I = 1 To y
RET = RET * x
Next
Pow = RET
End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

private: double Pow(double x, double y)
{
double RET = 1;
for (int I = 0; I < y; I++)
{
RET = RET * x;
}
return RET;
}

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] توضیح کد:
این متد دو ورودی از نوع double دارد و خود متد هم از نوع double برمیگرداند.

کد:

---

private double Pow(double x, double y)
{

---

یک متغیر از نوع double برای برگرداندن و محاصبات استفاده میکنیم:

کد:

---

double RET = 1;

---

یک حلقه برای که به تعداد متغیر y میچرخد و در صورتی که به y برسد خارج می شود.

کد:

---

for (int I = 0; I < y; I++)
{

---

عملیات ضرب را در x انجام داده سپس در RET میریزیم.

کد:

---

RET = RET * x;
}

---

RET را برمیگردانیم.

کد:

---

return RET;
}

---

استفاده از توابع Api در زبان های .NET

سلام خدمت همه دوستان.امروز قراره به دوستان عزیز بگم که چگونه در برنامه هاشون از توابع Api استفاده کنند.


[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] تابع CloseWindow در واقع یک ورودی از نوع هندل(Handle) پنجره گرفته و آن پنجره را Minimize میکنه اما ما فقط میخوایم با استفاده از این Api فقط پنجره فرم خودمونو Minimize کنیم:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) توضیحات:

برای سی شارپ شما ابتدا باید یک using تعریف کنید، شما ابتدا باید کد زیر رو در بالای برنامه خود زیر using های دیگر قرار دهید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

using System.Runtime.InteropServices;

---

خوب حالا کد زیر رو کپی و در یک قسمت مناسب مثل General قرار دهید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

[DllImport("User32.dll")]
internal static extern void CloseWindow(long Hwnd);

---

حالا کد زیر رو در دکمه یا جایی که میخواید با اجرای کد پنره Minimize بشه قرار بدید:
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

CloseWindow(Handle.ToInt64());

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic) توضیحات:
برای ویژوال بیسیک کد زیر رو در قسمت General قرار بدید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic) کد:

کد:

---

Private Declare Sub CloseWindow Lib "User32.dll" (ByVal Hwnd As Long)

---

حالا کد زیر رو در دکمه قرار دهید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic) کد:

کد:

---

CloseWindow(Handle)

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) توضیحات:
برای سی پلاس پلاس هم using زیر رو در قسمت General و زیر using های دیگه قرار بدید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

using namespace System::Runtime::InteropServices;

---

خوب حالا کد زیر رو کپی و در یک قسمت مناسب مثل General قرار دهید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

public:
[DllImport("USER32.DLL")]
static IntPtr CloseWindow(long HWND);

---

حالا کد زیر رو در دکمه قرار دهید:
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

CloseWindow(Handle.ToInt64());

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] توضیح کد:
کد زیر یک کامپوننت دات نت هست که به شما کمک میکنه تا با بتونین از DllImport استفاده کنید.

کد:

---

using System.Runtime.InteropServices;

---

کد زیر هم تابع CloseWindow رو در اختیار شما قرار میده تا بتونین برای Minimize کردن پنجره تون از اون استفاده کنین. این تابع که آرگومان از نوع long میگیره که نشان دهنده هندل پنجره است تا با استفاده از اون پنجره رو به حالت Minimize ببره.

کد:

---

[DllImport("User32.dll")]
internal static extern void CloseWindow(long Hwnd);

---

کد زیر رو هم حتماً میدونید... ما تابع CloseWindow رو صدا زدیم.و یه آرگومان به نام Handle به اون دادیم که این متغیر در اصل همون هندل فرم ما رو به ما برمیگردونه که چون از نوع Intptr برمیگردونه و تابع ما long میگیره ما اونو به Int64 تبدیل کردیم که همون Long هست.

کد:

---

CloseWindow(Handle.ToInt64());

---

از دوستان برنامه نویس کسی نظری نداره؟

اگه مشکلی داشتین حتماً سوال کنید.

قربان شما علی:11::40:.

سلام خدمت همه دوستان برنامه نویس گرامی امروز میخوام در مورد چگونگی تعریف و کار با متغیرها در هر زبان رو بهتون نشون بدم.

به کد زیر دقت کنید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

  // Declare variable
  int intNumber;
  // Set number, add numbers, and display results
  intNumber = 16;
  intNumber += 8;
  MessageBox.Show("Addition test... " + intNumber,
    "Integer Math");
  // Set number, subtract numbers, and display results
  intNumber = 24;
  intNumber -= 2;
  MessageBox.Show("Subtraction test... " + intNumber,
    "Integer Math");
  // Set number, multiply numbers, and display results
  intNumber = 6;
  intNumber *= 10;
  MessageBox.Show("Multiplication test... " +
    intNumber,
"Integer Math");
  // Set number, divide numbers, and display results
  intNumber = 12;
  intNumber /= 6;

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic)کد:

کد:

---

        ' Declare variable
        Dim intNumber As Integer
        ' Set number, add numbers, and display results
        intNumber = 16
        intNumber += 8
        MsgBox("Addition test... " + intNumber.ToString(), MsgBoxStyle.OkOnly, "Integer Math")
        ' Set number, subtract numbers, and display results
        intNumber = 24
        intNumber -= 2
        MsgBox("Subtraction test... " + intNumber.ToString(), MsgBoxStyle.OkOnly, "Integer Math")
        ' Set number, multiply numbers, and display results
        intNumber = 6
        intNumber *= 10
        MsgBox("Multiplication test... " + intNumber.ToString(), MsgBoxStyle.OkOnly, "Integer Math")
        ' Set number, divide numbers, and display results
        intNumber = 12
        intNumber /= 6

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

            int intNumber;
            // Set number, add numbers, and display results
            intNumber = 16;
            intNumber = intNumber + 8;
            MessageBox::Show("Addition test... " + intNumber,
              "Integer Math");
            // Set number, subtract numbers, and display results
            intNumber = 24;
            intNumber = intNumber - 2;
            MessageBox::Show("Subtraction test... " + intNumber,
              "Integer Math");
            // Set number, multiply numbers, and display results
            intNumber = 6;
            intNumber = intNumber * 10;
            MessageBox::Show("Multiplication test... " +
              intNumber, "Integer Math");
            // Set number, divide numbers, and display results
            intNumber = 12;
            intNumber = intNumber / 6;
            MessageBox::Show("Division test... " + intNumber,
              "Integer Math");

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک 6(VB6) کد:

کد:

---

  ' Declare variable
  Dim intNumber As Integer
  ' Set number, add numbers, and display results
  intNumber = 16
  intNumber = intNumber + 8
  MsgBox "Addition test... " + intNumber, "Integer Math"
  ' Set number, subtract numbers, and display results
  intNumber = 24
  intNumber = intNumber - 2
  MsgBox "Subtraction test... " + intNumber, "Integer Math"
  ' Set number, multiply numbers, and display results
  intNumber = 6
  intNumber = intNumber * 10
  MsgBox "Multiplication test... " + intNumber, "Integer Math"
  ' Set number, divide numbers, and display results
  intNumber = 12
  intNumber = intNumber / 6

---

خوب اگه یکی از زبان های بالا رو بلد باشین قطعاً میتونید متغیر ها رو به زبان های دیگه به همین سادگی تعریف کنید.ولی اگه هیچ کدومو نمیدونین من یکی از زبان ها رو براتون توضیح میدم:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) توضیح کد:
ما یک متغیر از نوع Integer یا عدد 32 بیتی تعریف میکنیم.

کد:

---

            int intNumber;

---

در خط اول کد زیر ما intNumber رو مقدار 16 میدیم و در خط دوم intNumber با 8 جمع شده سپس داخل intNumber ریخته میشه و در خط آخر هم که به صورت پیغام نمایش میدیم.

کد:

---

            intNumber = 16;
            intNumber += 8;
            MessageBox.Show("Addition test... " + intNumber,
              "Integer Math");

---

در خط اول کد زیر ما intNumber رو مقدار 24 میدیم و در خط دوم intNumber با 2 تفریق شده سپس داخل intNumber ریخته میشه و در خط آخر هم که به صورت پیغام نمایش میدیم.

کد:

---

            intNumber = 24;
            intNumber -= 2;
            MessageBox.Show("Subtraction test... " + intNumber,
              "Integer Math");

---

در خط اول کد زیر ما intNumber رو مقدار 6 میدیم و در خط دوم intNumber با 10 ضرب شده سپس داخل intNumber ریخته میشه و در خط آخر هم که به صورت پیغام نمایش میدیم.

کد:

---

            intNumber = 6;
            intNumber *= 10;
            MessageBox.Show("Multiplication test... " +
              intNumber,
          "Integer Math");

---

در خط اول کد زیر ما intNumber رو مقدار 12 میدیم و در خط دوم intNumber با 6 تقسیم شده سپس داخل intNumber ریخته میشه.

کد:

---

            intNumber = 12;
            intNumber /= 6;

---

قربان شما علی [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] .

اگر ادامه بدی بد نیست.
البته اوایلش جالب تر بود.

سلام خدمت همه برنامه نویسان.

نقل قول:

---

اگر ادامه بدی بد نیست.
البته اوایلش جالب تر بود.

---

ممنونم دوست عزیز.

به زودی به متدهای سنگین میرسیم عجله نکن.

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] چگونگی کار با دستور شرطی IF (شرط در ویژوال استادیو(Visual Studio)):


به کد زیر دقت کنید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

            int intNumber = 27;

            if (intNumber == 27)
            {
                MessageBox.Show("'intNumber' is, indeed, 27!",
                "Simple If");
            }

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic)کد:

کد:

---

        Dim intNumber As Integer = 27
        If intNumber = 27 Then
            MessageBox.Show("'intNumber' is, indeed, 27!", "Simple If")
        End If

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

                int intNumber = 27;
                if (intNumber == 27)
                {
                    MessageBox::Show("'intNumber' is, indeed, 27!",
                        "Simple If");
                }

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک 6(VB6) کد:

کد:

---

        Dim intNumber As Integer
        intNumber = 27
        If intNumber = 27 Then
            MsgBox "'intNumber' is, indeed, 27!", vbOKOnly, "Simple If"
        End If

---

خوب قطعاً با یکم دستکاری باید فهمیده باشین که شرط IF چگونه کار میکنه:27:.
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) توضیح کد:
ما یک متغیر از نوع Integer یا عدد 32 بیتی تعریف میکنیم و مقدار اونو برابر با 27 قرار میدیم.

کد:

---

int intNumber = 27;

---

در اینجا ما یک شرط و دستورات مربوطه رو گذاشتیم.

کد:

---

if (intNumber == 27)
            {

---

و به شرط گفتیم در صورتی که intNumber برابر 27 باشد کد زیر را اجرا کند که یک پیغام به ما نمایش خواهد داد:

کد:

---

MessageBox.Show("'intNumber' is, indeed, 27!",
                "Simple If");
            }

---

برای اطمینان از شرط میتونید مقدار intNumber رو تغییر بدید تا مشاهده کنید.
اجرای شرط از } تا { انجام می شود و در VB تا End IF.

با تشکر فراوان از استاد هاشمیان.

یه پیشنهاد بدم : لطفاً این چیز ها رو زیاد روش مانور نده.
چون تو کتابها خیلی بهتر و دقیق تر و ساده تر بحث شده.
همون متد های NET. رو شبیه سازی کنی (البته با تحقیق و چیدا کردن بهینه ترین راه) عالیه.
سعی هم بکن مثل VB6 کار های عزیز نشی که همش dll های ویندوز رو import کنی و بری جلو.
منظورم همون Minimize و ... ها است.

البته توجه داشته باش که چون تاپیکت پر بار ه و برام مهمه دارم نظر می دم.

این استیل نوشتنت (که رنگی می کنی و عکس می ذاری) خیلی عالیه.

و در کل ممنون.

نقل قول:

---

نوشته شده توسط dogtag [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سعی هم بکن مثل VB6 کار های عزیز نشی که همش dll های ویندوز رو import کنی و بری جلو.
منظورم همون Minimize و ... ها است.
و در کل ممنون.

---

یعنی از Dll ها و توابع API بگم یا نگم؟

تا اونجایی که امکان داره نگو.
الان تو خود NET. همین minimize وجود داره که HWND می گیره و کوچیک می کنه. دیگه نیازی نیست.
(ولی الان فکر کنم فهمیدم چرا از DLL استفاده کردی، آخه داری شبیه سازی می کنی! ببخشید)
در صورتی که 100% می دونی غیر از DLL راهی نداری، استفاده کن.

در ضمن، اگه امکانش هست واسه ++C غیر NET. ی هم کدش رو بنویس.
ممنون.

---

برای اینکه تاپیکت شلوغ نشه اینجا می گم.
من همچین کتابی نمی شناسم ولی اگر تو بخش مربوط بهش درخواست بدی، پیدا می کنند.

موفق باشی


---

مدیر عزیز و محترم، این بیشتر به همون NET. مربوط نبود؟

نقل قول:

---

نوشته شده توسط dogtag [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

تا اونجایی که امکان داره نگو.
الان تو خود NET. همین minimize وجود داره که HWND می گیره و کوچیک می کنه. دیگه نیازی نیست.
(ولی الان فکر کنم فهمیدم چرا از DLL استفاده کردی، آخه داری شبیه سازی می کنی! ببخشید)
در صورتی که 100% می دونی غیر از DLL راهی نداری، استفاده کن.

در ضمن، اگه امکانش هست واسه ++C غیر NET. ی هم کدش رو بنویس.
ممنون.

---

ممنونم از همراهیت دوست من.راستش من ++C رو بلد نیستم و کتابی هم پیدا نکردم که بتونم خوب یاد بگیرم.اگه کتابی داری که به صورت ویژوالی توضیح بده ممنون میشم بزاری(منظور از ویژوالی کار با محیط رو هم به صورت تصاویر آموزش بده).اگه کتاب داشته باشم مطمعناً میزارم.

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] متد Math.IEEERemainder (به دست آوردن باقیمانده تقسیم دو عدد):


به متد زیر دقت کنید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

        private double IEEERemainder(double x, double y)
        {
            long RET = 0;
            RET = Convert.ToInt64(x / y);
            RET *= Convert.ToInt64(y);
            RET = Convert.ToInt64(x) - RET;
            return RET;
        }

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic)کد:

کد:

---

    Private Function IEEERemainder(ByVal x As Double, ByVal y As Double) As Double
        Dim RET As Double
        RET = Convert.ToInt64(x / y)
        RET *= Convert.ToInt64(y)
        RET = Convert.ToInt64(x) - RET
        Return RET
    End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

    private: double IEEERemainder(double x, double y)
            {
                long RET = 0;
                RET = Convert::ToInt64(x / y);
                RET *= Convert::ToInt64(y);
                RET = Convert::ToInt64(x) - RET;
                return RET;
            }

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک 6(VB6) کد:

کد:

---

Private Function IEEERemainder(ByVal x As Double, ByVal y As Double) As Double
    Dim RET As Long
    RET = 0
    RET = x / y
    RET = RET * y
    RET = x - RET
    IEEERemainder = RET
End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) توضیح کد:

حالا به مثال های ریاضی زیر دقت کنید:
1 = 3 / 10
2 = 4 / 10
1 = 7 / 15
3 = 6 / 15

وقتی به متد IEEERemainder دو عدد می دهیم.این متد عدد اول را تقسیم بر عدد دوم میکند به صورت زیر:
3 = 3 / 10
2 = 4 / 10
2 = 7 / 15
2 = 6 / 15

کد:

---

            RET = Convert.ToInt64(x / y);

---

سپس جواب را در عدد دوم ضرب میکند:
9 = 3 * 3
8 = 4 * 2
14 = 7 * 2
12 = 6 * 2

کد:

---

            RET *= Convert.ToInt64(y);

---

و بعد عدد اول را از {ضرب جواب و عدد دوم} کم می کند و باقیمانده بدست میاید:

1 = 9 - 10
2 = 8 - 10
1 = 14 - 15
3 = 12 - 15

کد:

---

        RET = Convert.ToInt64(x) - RET

---

با تشکر از همه دوستان:11:.

منتقل شد........

با سلام خدمت دوستداران برنامه نویس عزیز.متد امروز PadLeft که میخوایم پیاده سازیش کنیم:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] متد PadLeft (اضافه کردن چند کاراکتر به سمت چپ - رشته ورودی):

به متد زیر دقت کنید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

        private string PadLeft(string TXT, int totalWidth, char paddingChar)
        {
            string RET = "";
            for (int I = 0; I < totalWidth - TXT.Length; I++)
            {
                RET += paddingChar;
            }
            RET += TXT;
            return RET;
        }

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic)کد:

کد:

---

    Private Function PadLeft(ByVal TXT As String, ByVal totalWidth As Integer, ByVal paddingChar As Char) As String

        Dim RET As String = ""
        For I As Integer = 1 To totalWidth - TXT.Length
            RET += paddingChar
        Next
        RET += TXT
        Return RET
    End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

    private: String^ PadLeft(String^ TXT, int totalWidth, String^ paddingChar)
            {
                String^ RET = "";
               
                for (int I = 0; I < totalWidth - TXT->Length; I++)
                {
                    RET += paddingChar;
                }
                RET += TXT;
                return RET;
            }

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک 6(VB6) کد:

کد:

---

Private Function PadLeft(TXT As String, totalWidth As Integer, paddingChar As String) As String
    Dim RET As String
    RET = ""
    Dim I As Integer
    For I = 1 To totalWidth - Len(TXT)
        RET = RET + paddingChar
    Next
    RET = RET + TXT
    PadLeft = RET
End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) توضیح کد:

متد PadLeft یک رشته می گیرد که این مقدار رشته اصلی می باشد.سپس یک مقدار از نوع عدد میگیرد که نشانگر اندازه ای که رشته اصلی است سپس یک کاراکتر میگیرد در صورتی که عدد وارد شده بزرگتر از اندازه رشته اصلی باشد کاراکتر وارد شده را به سمت چپ رشته اضافه میکند.

کد:

---

private string PadLeft(string TXT, int totalWidth, char paddingChar)
        {

---

یک رشته برای برگرداندن.

کد:

---

string RET = "";

---

این حلقه تا [اندازه رشته اصلی - عدد وارد شده] می چرخد و هر دور کاراکتر را به رشته برگشتی اضافه میکند.

کد:

---

for (int I = 0; I < totalWidth - TXT->Length; I++)
                {

---

این کد کاراکتر را به رشته برگشتی اضافه میکند.

کد:

---

RET += paddingChar;

---

و در آخر هم رشته اصلی به آخر رشته برگشتی اضافه میشود.

کد:

---

            RET += TXT;
            return RET;

---

امیدوارم واضع توضیح داده باشم.قربانتان علی:11:.

با سلام خدمت دوستداران برنامه نویس عزیز.متد امروز Math.Round هست که میخوایم پیاده سازیش کنیم:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] متد Round (گرد کردن یک عدد اعشاری):

به متد زیر دقت کنید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

private double Round(double d)
{
    if (d > (Convert.ToDouble(Convert.ToInt64(d)) + 0.5))
    {
        return (double) (Convert.ToInt64(d) + 1L);
    }
    return Convert.ToInt64(d);
}

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic)کد:

کد:

---

Private Function Round(ByVal d As Double) As Double
    If (d > (Convert.ToDouble(Convert.ToInt64(d)) + 0.5)) Then
        Return CDbl((Convert.ToInt64(d) + 1))
    End If
    Return Convert.ToInt64(d)
End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

private: Double __gc* Round(Double __gc* d)
{
    if (d > (Convert::ToDouble(Convert::ToInt64(d)) + 0.5))
    {
        return *static_cast<__box Double*>((Convert::ToInt64(d) + 1));
    }
    return Convert::ToInt64(d);
}

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک 6(VB6) کد:

کد:

---

Private Function Round(ByVal d As Double) As Long
    If d > d + 0.5 Then
        Round = d + 1
    End If
    Round = d
End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] دلفی(Delphi) کد:

کد:

---

function Form1.Round(d: Double): Double;
begin
    if (d > (Convert.ToDouble(Convert.ToInt64(d)) + 0.5)) then
        begin
            Result := ((Convert.ToInt64(d) + 1) as Double);
            exit
        end;
    begin
        Result := Convert.ToInt64(d);
        exit
    end
end;

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] آی ال (information literacy Or IL) کد:

کد:

---

.method private hidebysig instance float64 Round(float64 d) cil managed
{
    .maxstack 3
    .locals init (
        [0] float64 CS$1$0000,
        [1] bool CS$4$0001)
    L_0000: nop
    L_0001: ldarg.1
    L_0002: ldarg.1
    L_0003: call int64 [mscorlib]System.Convert::ToInt64(float64)
    L_0008: call float64 [mscorlib]System.Convert::ToDouble(int64)
    L_000d: ldc.r8 0.5
    L_0016: add
    L_0017: cgt
    L_0019: ldc.i4.0
    L_001a: ceq
    L_001c: stloc.1
    L_001d: ldloc.1
    L_001e: brtrue.s L_002e
    L_0020: nop
    L_0021: ldarg.1
    L_0022: call int64 [mscorlib]System.Convert::ToInt64(float64)
    L_0027: ldc.i4.1
    L_0028: conv.i8
    L_0029: add
    L_002a: conv.r8
    L_002b: stloc.0
    L_002c: br.s L_0038
    L_002e: ldarg.1
    L_002f: call int64 [mscorlib]System.Convert::ToInt64(float64)
    L_0034: conv.r8
    L_0035: stloc.0
    L_0036: br.s L_0038
    L_0038: ldloc.0
    L_0039: ret
}

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] کروم (Chorme) کد:

کد:

---

method Form1.Round(d: Double): Double;
begin
    if (d > (Convert.ToDouble(Convert.ToInt64(d)) + 0.5)) then
        begin
            result := ((Convert.ToInt64(d) + 1) as Double);
            exit
        end;
    begin
        result := Convert.ToInt64(d);
        exit
    end
end;

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) توضیح کد:
متد Round یک عدد اعشاری از نو Double می گیرد که این مقدار باید پردازش و گرد شود.

کد:

---

private double Round(double d)
 {

---

کد زیر برای روند کرد کامل تر بگ که متد روند در صورتی که اعشار آن بزرگتر از نیم باشد عدد بزرگتر را بدون اعشار و در در صورتی که کوچکتر یا مساوی نیم باشد خود عدد اصلی را بدون اعشار برمیگرداند.
برای مثال:
عدد 10.50 یا 10.30 یا 10.1:
این عدد اگر روند شود میشود 10.
حالا عدد 10.51 یا 10.60 یا 10.85:
این عدد اگر روند شود میشود 11.

کد:

---

  if (d > (Convert.ToDouble(Convert.ToInt64(d)) + 0.5))
    {
        return (double) (Convert.ToInt64(d) + 1L);
    }
    return Convert.ToInt64(d);
 }

---

دوستان میتوانند متد درخواستی خود را هم در این تاپیک بگویند تا برایشان ترجمه کنم.
با تشکر از همراهی شما قربان همه شما موفق و پیروز باشید.یاعلی:11:.

سلام.
چند تا سوال:
1- کروم چیه؟؟!
2- تو ++C این __gc* یعنی چی؟
3- و همچنین *static_cast<__box Double*>

ممنون

نقل قول:

---

نوشته شده توسط dogtag [ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]

سلام.
چند تا سوال:
1- کروم چیه؟؟!
2- تو ++C این __gc* یعنی چی؟
3- و همچنین *static_cast<__box Double*>

ممنون

---

سلام خسته نباشید. در مورد کروم و آی ال دارم تحقیق میکنم که ببینم چه زبان هایی هستند.
ولی دز مورد سوال دوم و سومت باید بگم که این کدها رو که اجرا کردم کمی ارور داشت.امیدوارم دیگه اینجوری نشه gc__ هم یه کلمه کلیدی هست که اکثراً برای کلاسها استفاده میشه که من اطلاعات کافی ازش ندارم.و در مورد اینا ان شاالله اگه اطلاعات کسب کردم حتماً برات میزارم:10:.

با سلام خدمت دوستان برنامه نویس عزیز.متد امروز Path.GetExtension می باشد(بازم میگم که اگه متد درخواستی داشتین بگین):

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] متد GetExtension (خواندن پسوند یک فایل):
(به دلیل نداشتن برنامه های(Delphi,IL,Chorme) طراحی متد به این زبان ها فعلاً انجام نمیشه)

به متد زیر دقت کنید:

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) کد:

کد:

---

        public static readonly char DirectorySeparatorChar = '\\';
        public static readonly char AltDirectorySeparatorChar = '/';
        public static readonly char VolumeSeparatorChar = ':';
        public static string GetExtension(string path)
        {
            if (path == null)
            {
                return null;
            }
            //CheckInvalidPathChars(path);
            int length = path.Length;
            int startIndex = length;
            while (--startIndex >= 0)
            {
                char ch = path[startIndex];
                if (ch == '.')
                {
                    if (startIndex != (length - 1))
                    {
                        return path.Substring(startIndex, length - startIndex);
                    }
                    return string.Empty;
                }
                if (((ch == DirectorySeparatorChar) || (ch == AltDirectorySeparatorChar)) || (ch == VolumeSeparatorChar))
                {
                    break;
                }
            }
            return string.Empty;
        }

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک(Visual Basic)کد:

کد:

---

    Public Shared ReadOnly AltDirectorySeparatorChar As Char = "/"
    Public Shared ReadOnly DirectorySeparatorChar As Char = "\"
    Public Shared ReadOnly VolumeSeparatorChar As Char = ":"
    Public Shared Function GetExtension(ByVal path As String) As String
        If (path Is Nothing) Then
            Return Nothing
        End If
        Dim length As Integer = path.Length
        Dim startIndex As Integer = length
        Do While (startIndex >= 0)
            Dim ch As Char = path(startIndex - 1)
            If (ch = ".") Then
                If (startIndex <> (length - 1)) Then
                    Return path.Substring(startIndex - 1, (length - startIndex) + 1)
                End If
                Return String.Empty
            End If
            If (((ch = Form1.DirectorySeparatorChar) Or (ch = Form1.AltDirectorySeparatorChar)) Or (ch = Form1.VolumeSeparatorChar)) Then
                Exit Do
            End If
            startIndex -= 1
        Loop
        Return String.Empty
    End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی پلاس پلاس(++C) کد:

کد:

---

            public: static Char AltDirectorySeparatorChar = '/';
            public: static Char  DirectorySeparatorChar = '\\';
            public: static Char  VolumeSeparatorChar = ':';
            public: static String^ GetExtension(String^ path)
                    {
                        if (path == "")
                        {
                            return "";
                        }
                        Int32 length = path->Length;
                        Int32 startIndex = length;
                        while ((--startIndex >= 0))
                        {
           
                            Char ch ;
                            ch=path[startIndex];
                            if (ch == '.')
                            {
                                if (startIndex != (length - 1))
                                {
                                    return path->Substring(startIndex, (length - startIndex));
                                }
                                return String::Empty;
                            }
                            if (((ch == Form1::DirectorySeparatorChar) || (ch == Form1::AltDirectorySeparatorChar)) || (ch == Form1::VolumeSeparatorChar))
                            {
                                break;
                            }
                        }
                        return String::Empty;
                    }

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] ویژوال بیسیک 6(VB6) کد:

کد:

---

    Dim AltDirectorySeparatorChar As String
    Dim DirectorySeparatorChar As String
    Dim VolumeSeparatorChar As String
    Private Function GetExtension(ByVal path As String) As String
        VolumeSeparatorChar = ":"
        DirectorySeparatorChar = "\"
        AltDirectorySeparatorChar = "/"
        Dim RET As String
        If (path = "") Then
            GetExtension = ""
        End If
        Dim length As Integer
        length = Len(path)
        Dim startIndex As Integer
        startIndex = length
        Do While (startIndex >= 0)
            Dim ch As String
            ch = Mid(path, startIndex, 1)
            If (ch = ".") Then
                If (startIndex <> (length - 1)) Then
                    RET = Mid(path, startIndex, (length - startIndex + 1))
                    Exit Do
                End If
                RET = ""
                Exit Do
            End If
            If (((ch = DirectorySeparatorChar) Or (ch = AltDirectorySeparatorChar)) Or (ch = VolumeSeparatorChar)) Then
                Exit Do
            End If
            startIndex = startIndex - 1
        Loop
        GetExtension = RET
    End Function

---

[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ] سی شارپ(#C) توضیح کد:
اینبار ابتدا ما سه تا متغیر کاراکتر از نوع Static و فقط خواندنی که مقدار آنها برای خروج از حلقه میباشد تعریف کردیم.

کد:

---

        public static readonly char DirectorySeparatorChar = '\\';
        public static readonly char AltDirectorySeparatorChar = '/';
        public static readonly char VolumeSeparatorChar = ':';

---

متد GetExtension یک آدرس از یک فایل را گرفته و پسوند آن فایل را بر میگرداند:

کد:

---

        public static string GetExtension(string path)
        {

---

در شرط اول این متد ما به متد گفتیم در صورتی که مقدار آدرس فایل خالی بود خالی را برگرداند و کد های دیگر اجرا نمی شود:

کد:

---

            if (path == null)
            {
                return null;
            }

---

دو متغیر تعریف کردیم که مقدار آنها را برابر با تعداد کاراکتر های آدرس ورودی قرار دادیم:

کد:

---

            int length = path.Length;
            int startIndex = length;

---

حلقه ای قرار دادیم که از startIndex (تعداد کاراکتر های آدرس) تا صفر میچرخد:

کد:

---

while (--startIndex >= 0)
            {

---

توضیحی در مورد حلقه while:
حلقه while یک شرط را میگیرد و تا زمانی که شرط غلط باشد میچرخد و اگر شرط حلقه درست باشد از حلقه خارج میشود.

یک متغیر ch از نوع char تعریف کردیم که مقدار آن کارکتر درخواستی از آدرس میباشد مثلاً اگر startIndex برابر با 4 باشد.چهارمین کاراکتر را به داخل ch میریزد:

کد:

---

char ch = path[startIndex];

---

خوب قطعاً همه شما میدانید که پسوند فایل ها با کاراکتر "." شروع میشود پس ما برای خروج از حلقه گفتیم اگر ch برابر با "." باشد.کد خروج از حلقه در اینجا همان return است که باید پسوند را به GetExtension برگرداند.

کد:

---

if (ch == '.')
                {

---

یک شرط گذاشتیم برای اینکه startIndex اولین کاراکتر ما نباشد چون در این صورت فایل مورد نظر هیچ پسوندی ندارد و ما در این صورت کاراکتر خالی را برگرداندیم و در صورتی که startIndex اولین کاراکتر ما نباشد ما پسوند فایل را بر میگردانیم.مثلاً از آدرس path آن کاراکترهایی را برمیگردانیم که از startIndex شروع می شوند و تا length - startIndex خاتمه می یابند :

کد:

---

                    if (startIndex != (length - 1))
                    {
                        return path.Substring(startIndex, length - startIndex);
                    }
                    return string.Empty;
                }

---

و در آخر هم شرطی گذاشتیم که اگر ch برابر با یکی از متغیر های(DirectorySeparatorChar ,AltDirectorySeparatorChar ,VolumeSeparatorChar) بود از حلقه خارج میشویم و کاراکتر خالی به GetExtension برگردانده میشود.

موفق و سربلند باشد.

سلام.
توضیح کد بازی منچ:

«بسم الله الرحمن الرحیم»
توضیحات کد...

کد:

---

        int TAS = 0;
        Label LBL_Nobat;
Class_Main.ClassModel Nobat = Class_Main.ClassModel.Zard;

---

متغیر TAS که از اسمش پیداست برای اینکه مقدار تاس انداخته شده در آن قرار گیرد مثلاً اگر تاس 6 یا 2 یا... بود در این متغیر ذخیره میشود که در کدهای بعدی میتوانید ببینید که چه جاهایی مقدار دهی می شود.

حتماً در محیط دیزاین (Design) فرم، لیبل هایی را مشاهده میکنید که متن انها "پرتاب تاس" و "بی حرکت می باشد" متغیر LBL_Nobat یکی از ان لیبل ها را در خود قرار میدهد که به نوبت هر بازیکن تغییر میکند مثلاً اگر نوبت بازیکن سبز باشد این برچسب همان لیبلی میشود که نوبت آن هست مثلاً Lbl_s که بعد از توضیحات کدهای بعدی متوجه میشوید که به چه درد میخورد.

ما یک Enum تعریف کردیم به نام ClassModel که با مشاهده آن میفهمید که دارای Zard,Ghermez,Sabz,Abi میباشد. به موقع توضیح میدهیم که Enum چه کار میکند.ما یک متغیر به نام Nobat تعریف کردیم که همانطور که از اسمش پیداست نشان میدهد که نوبت بازی دست چه بازیکنی است.

کد:

---


private void Form1_Load(object sender, EventArgs e)
        {
            Lbl_z.Tag = Class_Main.ClassModel.Zard;
            Lbl_a.Tag = Class_Main.ClassModel.Abi;
            Lbl_g.Tag = Class_Main.ClassModel.Ghermez;
            Lbl_s.Tag = Class_Main.ClassModel.Sabz;

            LBL_Nobat = new Label();
            foreach (Control Main_Ctl in this.Controls)
            {
                if (Main_Ctl.Name.Contains("Pic_Start"))
                {
                   
                    Class_Main M_Cls = new Class_Main((Class_Main.ClassModel)Convert.ToInt16(Main_Ctl.AccessibleName), this, Main_Ctl);
                    Main_Ctl.Tag = M_Cls;
                }
            }
}


---

رویداد Form_Load زمانی فراخوانی می شود که فرم اجرا مشود.
خاصیت Tag کنترل ها یک متغیر از نوع object است که میتوان هر چیزی را در آن قرار داد. که ما در کد بالا برای چهار تا لیبل Lbl_z, Lbl_a, Lbl_g, Lbl_s متغیر مورد نظر را در آن قرار دادیم که بعداً از آن استفاده کنیم.
کد LBL_Nobat = new Label(); برای این است که لیبل خالی نباشد که اگر خالی باشد باعث ایجاد خطا در اول بازی میشود.
حلقه زیر تمام کنترل های فرم را جستجو میکند و آن را یکی یکی در Main_Ctl میرید:

کد:

---

foreach (Control Main_Ctl in this.Controls)
            {

---

اگر کمی به کد زیر دقت کنید و به طریقه نام گذاری کنترل ها در فرم هم دقت کنید میبینید که ما در کد زیر از نام کنترل هایی که میخواهیم استفاده کنیم استفاده کرده ایم:

کد:

---

if (Main_Ctl.Name.Contains("Pic_Start"))
                {

---

متد Contains در کد بالا یک متن مثلاً "Pic_Start"را گرفته و در نام کنترل که Main_Ctl.Name جستجو میکند اگر آن متن وجود داشته باشد True بر میگرداند و شرط درست میشود.و اگر دقت کنید تمام کنترل هایی در نام آنها Pic_Start وجود دارد که بازی کن باشند.

کد:

---

                    Class_Main M_Cls = new Class_Main((Class_Main.ClassModel)Convert.ToInt16(Main_Ctl.AccessibleName), this, Main_Ctl);
Main_Ctl.Tag = M_Cls;

---

خط اول کد بالا ما کلاس اصلی خود را که ساختیم تعریف کردیم و خط زیر:

کد:

---

(Class_Main.ClassModel)Convert.ToInt16(Main_Ctl.AccessibleName)

---

ما از متغیر AccessibleName در کنترل ها استفاده کردیم اگر نگاه کنید میبینید که هر کدام یک عدد هستند...
و چون متغیر AccessibleName یک String بود ما آن را با کلاس زیر به عدد تبدیل کردیم:

کد:

---

Convert.ToInt16(

---

متغیر (Class_Main.ClassModel) در اصل عدد به دست آمده Convert.ToInt16(Main_Ctl.AccessibleName) را تبدیل به Class_Main.ClassModel میکند.
This یعنی فرم پیشفرض که کلاس ما یک فرم میخواست و ما فرم پیش فرش را به کلاس دادیم.
Main_Ctl هم همان کنترلی است که از حلقه گرفتیم. ما برای هر کنترل بازیکن یک کلاس تعریف کردیم و آن ها را با کد زیر در Tag کنترل قرار میدهیم که بعداً فراخوانی کنیم.

کد:

---

Main_Ctl.Tag = M_Cls;

---

متد زیر یک عدد میگیرد و عکس آن عدد را برمیگرداند که این عکس همان عکسی است که در تاس فرم مشاهده میکنید:

کد:

---

private Image Get_Tas_Imag(int Tas)
        {
            switch (Tas)
            {
                case 1:
                    {
                        return Mench.Properties.Resources.mench1;
                    }
                case 2:
                    {
                        return Mench.Properties.Resources.mench2;
                    }
                case 3:
                    {
                        return Mench.Properties.Resources.mench3;
                    }
                case 4:
                    {
                        return Mench.Properties.Resources.mench4;
                    }
                case 5:
                    {
                        return Mench.Properties.Resources.mench5;
                    }
                case 6:
                    {
                        return Mench.Properties.Resources.mench6;
                    }
            }
            return null;
}

---

رویداد یک رویداد کلیک است که به وسیله دکمه پرتاب تاس زده میشود:

کد:

---

        private void Btn_Tas_Click(object sender, EventArgs e)
        {
            Random MyRnd = new Random();
            TAS = MyRnd.Next(1, 7);
            Pic_Tas.Image = Get_Tas_Imag(TAS);
            Get_Comment(TAS);
            Btn_Tas.Enabled = false;
            if (TAS != 6)
            {
                if (Convert.ToInt16(Nobat) + 1 == 4)
                    Nobat = Class_Main.ClassModel.Zard;
                else
                    Nobat = (Class_Main.ClassModel)(Convert.ToInt16(Nobat) + 1);
            }
        }

---

کلاس Random برای آن است که ما یک عدد رندوم یا یک عدد تصادفی به عنوان منچ در متغیر TAS بریزیم.
کد زیر عکس را بر اساس TAS در متد Get_Tas_Imag(TAS) جستجو میکند و در Image کنترل تاس میریزد:
Pic_Tas.Image = Get_Tas_Imag(TAS);
متد زیر را بعاً توضیح خواهیم داد:

کد:

---

Get_Comment(TAS);

---

کد زیر: در صورتی که TAS ما شش نباشد نوبت عوض میشود چون اگر شش باشد نوبت عوض نمیشود و کسی که شش آورده میتواند جایزه خود را بندازد.
[CODE]if (TAS != 6)
{
if (Convert.ToInt16(Nobat) + 1 == 4)
Nobat = Class_Main.ClassModel.Zard;
else
Nobat = (Class_Main.ClassModel)(Convert.ToInt16(Nobat) + 1);
}[/CODE]
کد زیر نوبت را عوض کرده و در متغیر Nobat میریزد:
Nobat = Class_Main.ClassModel.Zard;
اگر دقت کنید ما چهار تا Enum در کلاس اصلی داریم پس ما با عدد هم میتوانیم این Enum ها را فراخوانی کنیم... مانند کد زیر:

کد:

---

(Class_Main.ClassModel)(Convert.ToInt16(Nobat) + 1);

---

این عدد باید از 0 تا 3 باشد برای همین ما شرط زیر را گذاشتیم که باعث خطا نشویم:
if (Convert.ToInt16(Nobat) + 1 == 4)
یعنی اگر Enum چهار بود نویت را به اولین Enum بده..یعنی زرد.

توضیح متید زیر:

کد:

---

void Get_Comment(int tas)
        {
            string text;
            text = "پرتاب تاس انجام شد";
            Lbl_g.Text = "ّبی حرکت";
            Lbl_a.Text = "ّبی حرکت";
            Lbl_s.Text = "ّبی حرکت";
            Lbl_z.Text = "ّبی حرکت";

            Lbl_g.ForeColor = SystemColors.ControlText;
            Lbl_a.ForeColor = SystemColors.ControlText;
            Lbl_s.ForeColor = SystemColors.ControlText;
            Lbl_z.ForeColor = SystemColors.ControlText;

            foreach (Control Main_Ctl in this.Controls)
            {
                if (Main_Ctl.Name.Contains("Pic_Start"))
                    Main_Ctl.Enabled = false;
            }

            if (Nobat == Class_Main.ClassModel.Zard)
            {
                Lbl_z.ForeColor = Color.Red;
                LBL_Nobat = Lbl_z;
                foreach (Control Main_Ctl in this.Controls)
                {
                    if (Main_Ctl.Name.Contains("Pic_Start_Zard"))
                    {
                        Main_Ctl.BringToFront();
                        Main_Ctl.Enabled = true;
                    }
                }

                if (tas == 6)
                {
                    Lbl_z.Text = "اجازه ورود";
                }
                else
                {
                    Lbl_z.Text = text;
                }
            }
            else if (Nobat == Class_Main.ClassModel.Ghermez)
            {
                Lbl_g.ForeColor = Color.Red;
                LBL_Nobat = Lbl_g;
                foreach (Control Main_Ctl in this.Controls)
                {
                    if (Main_Ctl.Name.Contains("Pic_Start_Ghermez"))
                    {
                        Main_Ctl.BringToFront();
                        Main_Ctl.Enabled = true;
                    }
                }

                if (tas == 6)
                {
                    Lbl_g.Text = "اجازه ورود";
                }
                else
                {
                    Lbl_g.Text = text;
                }
            }
            else if (Nobat == Class_Main.ClassModel.Sabz)
            {
                Lbl_s.ForeColor = Color.Red;
                LBL_Nobat = Lbl_s;
                foreach (Control Main_Ctl in this.Controls)
                {
                    if (Main_Ctl.Name.Contains("Pic_Start_Sabz"))
                    {
                        Main_Ctl.BringToFront();
                        Main_Ctl.Enabled = true;
                    }
                }

                if (tas == 6)
                {
                    Lbl_s.Text = "اجازه ورود";
                }
                else
                {
                    Lbl_s.Text = text;
                }
            }
            else if (Nobat == Class_Main.ClassModel.Abi)
            {
                Lbl_a.ForeColor = Color.Red;
                LBL_Nobat = Lbl_a;
                foreach (Control Main_Ctl in this.Controls)
                {
                    if (Main_Ctl.Name.Contains("Pic_Start_Abi"))
                    {
                        Main_Ctl.BringToFront();
                        Main_Ctl.Enabled = true;
                    }
                }
             
                if (tas == 6)
                {
                    Lbl_a.Text = "اجازه ورود";
                }
                else
                {
                    Lbl_a.Text = text;
                }
            }
}

---

این متد تاس مورد نظر را میگیردو در tas میریزد دقت کنید که دو متغیر TAS و tas با هم فرق میکنند:
v

کد:

---

oid Get_Comment(int tas)
        {

---

خط زیر که نیازی به توضیح ندارد ما در اصل متن لیبل ها را به حالت بی حرکت در آوردیم تا نوبت تاس انداختن مشخص شود:

کد:

---

            string text;
            text = "پرتاب تاس انجام شد";
            Lbl_g.Text = "ّبی حرکت";
            Lbl_a.Text = "ّبی حرکت";
            Lbl_s.Text = "ّبی حرکت";
            Lbl_z.Text = "ّبی حرکت";

---

اگر دقت کنید کسی که نوبتش میشود با رنگ قرمز در فرم دیده میشود.کد زیر همه رنگ ها را به حالت اولیه در میاورد تا در صورت نوباپت رنگ را عوض کند:

کد:

---

            Lbl_g.ForeColor = SystemColors.ControlText;
            Lbl_a.ForeColor = SystemColors.ControlText;
            Lbl_s.ForeColor = SystemColors.ControlText;
            Lbl_z.ForeColor = SystemColors.ControlText;

---

کد زیر تمام کنترل های بازی را از کار می اندازد تا کسی بی نوبت بازی نکند:

کد:

---

foreach (Control Main_Ctl in this.Controls)
            {
                if (Main_Ctl.Name.Contains("Pic_Start"))
                    Main_Ctl.Enabled = false;
            }

---

کد زیر:

کد:

---

            if (Nobat == Class_Main.ClassModel.Zard)
            {
                Lbl_z.ForeColor = Color.Red;
                LBL_Nobat = Lbl_z;
                foreach (Control Main_Ctl in this.Controls)
                {
                    if (Main_Ctl.Name.Contains("Pic_Start_Zard"))
                    {
                        Main_Ctl.BringToFront();
                        Main_Ctl.Enabled = true;
                    }
                }

                if (tas == 6)
                {
                    Lbl_z.Text = "اجازه ورود";
                }
                else
                {
                    Lbl_z.Text = text;
                }
            }

---

شرط زیر نشان میدهد در صورتی که نوبت برابر زرد باشد:

کد:

---

if (Nobat == Class_Main.ClassModel.Zard)
            {

---

رنگ لیبل زرد قرمز میشود:

کد:

---

Lbl_z.ForeColor = Color.Red;

---

لیبل زرد در لیبل نوبت قرار میگیرد:

کد:

---

LBL_Nobat = Lbl_z;

---

تمام کنترل های زرد که نوبتشان است به رو میایند و به کار می افتند:

کد:

---

foreach (Control Main_Ctl in this.Controls)
                {
                    if (Main_Ctl.Name.Contains("Pic_Start_Zard"))
                    {
                        Main_Ctl.BringToFront();
                        Main_Ctl.Enabled = true;
                    }
                }

---

با نام Pic_Start_Zard میتوان زرد ها را جستجو کرد
با کد زیر به رو میایند:

کد:

---

Main_Ctl.BringToFront();
و با کد زیر به کار میافتند:
Main_Ctl.Enabled = true;

---

در شرط زیر:

کد:

---

if (tas == 6)
                {
                    Lbl_z.Text = "اجازه ورود";
                }
                else
                {
                    Lbl_z.Text = text;
                }

---

در صورتی که تاس شش باشد متن برچسب یا لیبل زرد برابر "اجازه ورود" میشود و در غیر این صورت "تاس پرتاب شد" می شود که با کد زیر در بالاتر، در متغیر text قرار دادیم:

text = "پرتاب تاس انجام شد";
در مورد کد های دیگر هم توضی مانند بالاست فقط به جای زرد مثلاً قرمز، آبی یا سبز میشود.

کد زیر:

کد:

---

private void Pic_Start_Abi1_Click(object sender, EventArgs e)
        {
            if (LBL_Nobat.Text == "اجازه ورود" && !((Class_Main)(((PictureBox)sender).Tag)).Mojavez_Go)
            {
                Class_Main M_Cls = (Class_Main)((PictureBox)sender).Tag;
                M_Cls.Mojavez_Go = true;
                M_Cls.SET_Class_Array = 0;
                LBL_Nobat.Text = "بی حرکت";
                Btn_Tas.Enabled = true;
            }
            else if ((LBL_Nobat.Text == "پرتاب تاس انجام شد" || LBL_Nobat.Text == "اجازه ورود") && ((Class_Main)(((PictureBox)sender).Tag)).Mojavez_Go )
            {
                Class_Main M_Cls = (Class_Main)((PictureBox)sender).Tag;
                M_Cls.SET_Class_Array = TAS;
                LBL_Nobat.Text = "بی حرکت";
                Btn_Tas.Enabled = true;
            }
            if (TAS != 6)
                Btn_Tas.Enabled = true;
}

---

رویداد Pic_Start_Abi1_Click وقتی اجرا می شود که روی دکمه بازیکنی کلیک شود این رویداد شامل تمام کنترل های بازی کن میشود که زرد، قرمز، سبز و آبی میباشند.
شرط زیر زمانی اجرا میشود که متن لیبل نوبت (که توضیح داده بودیم که وقتی نوبت لیبلی باشد همان لیبل در آن قرار میگیرد) برابر "اجازه ورود" باشد و اگر یادتان باشد ما در TAG هر کنترل بازیکن یک کلاس اصلی قرار دادیم که الان از اینجا فراخوانی میکنیم:

کد:

---

if (LBL_Nobat.Text == "اجازه ورود" && !((Class_Main)(((PictureBox)sender).Tag)).Mojavez_Go)
{

---

کد زیر متغیر object به نام sender را به PictureBox تبدیل میکند....این pictureBox همان کنترلی است که رو آن کلیک شده است:

کد:

---

((PictureBox)sender).Tag

---

که ما متغیر Tag کنترلی را که روی آن کلیک شده را دریافت کردیم و با کد زیر آن را به کلاس تبدیل کردیم:

کد:

---

((Class_Main)(((PictureBox)sender).Tag)

---

علامت ! پشت این متغیر ها یعنی مخالف بودن یا True نبودن شرط.

کد زیر هم که ما کلاس را از Tag کنترل بازیکن فراخوانی کردیم و در M_Cls قرار دادیم:

کد:

---

Class_Main M_Cls = (Class_Main)((PictureBox)sender).Tag;

---

با خط زیر ما مجوز حرکت کلاس کنترل مورد نظر را True کردیم:

کد:

---

M_Cls.Mojavez_Go = true;

---

کد زیر در اصل کنترل را وادار به حرکت میکند که در کلاس اصلی توضیح میدهیم:

کد:

---

M_Cls.SET_Class_Array = TAS;

---

کدهای زیر هم که نیازی به توضیح نیست خط اول متن لیبل نوبت را تغیرر میدهد و "بی حرکت" میکند و خط دوم هم دکمه تاس را فعال میکند:

کد:

---

                LBL_Nobat.Text = "بی حرکت";
                Btn_Tas.Enabled = true;

---

خط زیر هم اگر تاس مخالف شش بود دکمه پرتاب تاس را فعال میکند:

کد:

---

            if (TAS != 6)
                Btn_Tas.Enabled = true;

---

شرط زیر برای زمانی است که نوبت باشد ولی تاس ما شش نباشد و کنترل ما مجوز حرکت داشته باشد:

کد:

---

            else if ((LBL_Nobat.Text == "پرتاب تاس انجام شد" || LBL_Nobat.Text == "اجازه ورود") && ((Class_Main)(((PictureBox)sender).Tag)).Mojavez_Go )
            {

---

توضیحات کلاس اصلی:

کد:

---

    public class Class_Main
    {

---

متغیر ها:

کد:

---

        private Form1 Frm_Main;
        ClassModel Model;
        Control[] MainCTLs;
        public int Go = 0;
        public bool Mojavez_Go = false;
        Control CTL_Asl;

---

متغیر Frm_Main در اصل همان فرم اصلی ماست که فراخوانی مشود:
کد زیر هم نشان میدهد که این کلاس برای کدام بازی کن است:

کد:

---

ClassModel Model;

---

کد زیر یک آرایه از کنترل هاست در این آرایه کنترل های فرم قرار میگیرند در اصلی این کنترل ها هم خانه های بازی هستند که بازیکن باید بر اساس این آرایه رو فرم حرکت کند:
متغیر زیر میزان حرکت کنترل را نشان میدهد:

کد:

---

public int Go = 0;

---

متغیر زیر مجوز حرکت کنترل مورد نظر است:

کد:

---

public bool Mojavez_Go = false;

---

متغیر زیر هم کنترل اصلی فرم ایت که این کلاس به آن اختصاص داده میشود:

کد:

---

Control CTL_Asl;

---

با متد زیر هم که آشنا هستید:

کد:

---

public Class_Main(ClassModel MainModel, Form1 Frm_M, Control MainCTL)
        {

---

این متد هم هنگام تعریف کلاس آرگومانهای خود را دریافت میکند که قبلاً توضیح داده شد.

با کد زیر متغیر Frm_Main برابر فرم ورودی مشود:

کد:

---

Frm_Main = Frm_M;

---

با کد زیر هم بازیکن مورد نظر را مشخص میکند و در متغیر Model میریزد:

کد:

---

Model = MainModel;

---

کد زیر هم که کنترل دریافتی را در کنترل اصلی برای استفاده میریزد:

کد:

---

CTL_Asl = MainCTL;

---

ما در خانه ها منچ برای هر بازیکن حدود 44 خانه داریم بنابر این برای آرایه خود 44 کنترل تعریف میکنیم:

کد:

---

MainCTLs = new Control[44];

---

که در زیر مقدار دهی می شوند:

کد:

---

            foreach (Control M_CTL in Frm_Main.Controls)
            {
                if (M_CTL.Name.Substring(0, 3) == "PIC")
                {
                    MainCTLs[Convert.ToInt16(M_CTL.Name.Substring(M_CTL.Name.Length - 2, 2)) - 1] = M_CTL;
                }
}

---

اگر در فرم اصلی دقت کنید میبینید که کنتذهای خانه ها اول نامشان PIC است.بنابر این ما با آنها کار داریم و اگر به آخر نام انها دقت کنید دو شماره را میبینید 00 که کد زیر این شماره ها را دریافت میکند و در آرایه به صورت مرتب قرار میدهد:

کد:

---

                    MainCTLs[Convert.ToInt16(M_CTL.Name.Substring(M_CTL.Name.Length - 2, 2)) - 1] = M_CTL;

---

به کد زیر دقت کنید:

کد:

---

            if (Model == ClassModel.Zard)
            {
                MainCTLs[40] = Frm_Main.Pic_z1;
                MainCTLs[41] = Frm_Main.Pic_z2;
                MainCTLs[42] = Frm_Main.Pic_z3;
                MainCTLs[43] = Frm_Main.Pic_z4;
            }
            else if (Model == ClassModel.Ghermez)
            {
                Control[] QCtl =new Control[44];
                int J =0;
               
                for (int i = 30; i >= -1; i++)
                {
                    if (i == 40)
                        i = 0;
                   
                    QCtl[i] = MainCTLs[J];
                    J++;
                    if (J == 40)
                        break;
                }
                QCtl[40] = Frm_Main.Pic_g1;
                QCtl[41] = Frm_Main.Pic_g2;
                QCtl[42] = Frm_Main.Pic_g3;
                QCtl[43] = Frm_Main.Pic_g4;
                MainCTLs = QCtl;
            }
            else if (Model == ClassModel.Abi)
            {
                Control[] QCtl = new Control[44];
                int J = 0;

                for (int i = 10; i >= -1; i++)
                {
                    if (i == 40)
                        i = 0;

                    QCtl[i] = MainCTLs[J];
                    J++;
                    if (J == 40)
                        break;
                }
                QCtl[40] = Frm_Main.Pic_a1;
                QCtl[41] = Frm_Main.Pic_a2;
                QCtl[42] = Frm_Main.Pic_a3;
                QCtl[43] = Frm_Main.Pic_a4;
                MainCTLs = QCtl;
            }
            else if (Model == ClassModel.Sabz)
            {
                Control[] QCtl = new Control[44];
                int J = 0;

                for (int i = 20; i >= -1; i++)
                {
                    if (i == 40)
                        i = 0;

                    QCtl[i] = MainCTLs[J];
                    J++;
                    if (J == 40)
                        break;
                }
                QCtl[40] = Frm_Main.Pic_s1;
                QCtl[41] = Frm_Main.Pic_s2;
                QCtl[42] = Frm_Main.Pic_s3;
                QCtl[43] = Frm_Main.Pic_s4;
                MainCTLs = QCtl;
            }

---

اگر خوب ببینید،می بینید که کدهای زرد با بقیه فرق میکند....چون اولین بازیکن زرد است و بازی با زرد شروع میشود بنابراین ما دیگر نیاز به مرتب سازی زرد نداشتیم و فقط چهار خانه آخر آن را قرار دادیم:
[CODE] MainCTLs[40] = Frm_Main.Pic_z1;
MainCTLs[41] = Frm_Main.Pic_z2;
MainCTLs[42] = Frm_Main.Pic_z3;
MainCTLs[43] = Frm_Main.Pic_z4;[/CODE]
و اما در مورد بازیکن های دیگر:
مثلاً کد زیر برای قرمز است:

کد:

---

            else if (Model == ClassModel.Ghermez)
            {
                Control[] QCtl =new Control[44];
                int J =0;
               
                for (int i = 30; i >= -1; i++)
                {
                    if (i == 40)
                        i = 0;
                   
                    QCtl[i] = MainCTLs[J];
                    J++;
                    if (J == 40)
                        break;
                }
                QCtl[40] = Frm_Main.Pic_g1;
                QCtl[41] = Frm_Main.Pic_g2;
                QCtl[42] = Frm_Main.Pic_g3;
                QCtl[43] = Frm_Main.Pic_g4;
                MainCTLs = QCtl;
            }

---

شرط زیر متغیر Model را مقایشه میکند ببیند که قرمز است یا خیر:

کد:

---

            else if (Model == ClassModel.Ghermez)
            {

---

ما یک آرایه دیگه تعریف کردیم برای مرتب سازی قرمز چون اگر مرتب نکنیم بازی کن های قرمز از اولین خانه زرد شروع به بازی میکنند . ما باید آنها را مرتب کنیم:

کد:

---

                Control[] QCtl =new Control[44];
                int J =0;

---

حلقه زیر را ببینید:

کد:

---

for (int i = 30; i >= -1; i++)
                {

---

این حلقه در اصل یک حلقه بی نهایت میباشد که ما بعد از اتمام خانه ها با استفاده از متغیر J و کد زیر آن را خارج میکنیم:

کد:

---

                    if (J == 40)
                        break;

---

چون اخرین خانه قرمز از 30 شروع میشود ما I را 30 قرار دادیم تا اولین خانه قرمز 30 باشد و تا آخر برود:

کد:

---

                    QCtl[i] = MainCTLs[J];

---

بعد از خروج از حلقه هم کد زیر چهار خانه پایانی را به آرایه میدهد و همه را در آرایه اصلی میریزد:

کد:

---

                QCtl[40] = Frm_Main.Pic_g1;
                QCtl[41] = Frm_Main.Pic_g2;
                QCtl[42] = Frm_Main.Pic_g3;
                QCtl[43] = Frm_Main.Pic_g4;
                MainCTLs = QCtl;

---

در مورد کدهای دیگر هم توضیحات بالا کفایت میکند.
و اما متد زیر:

کد:

---

        public int SET_Class_Array
        {
            set
            {
                SET_Class(value);
            }
        }

---

این متد همان متدی است که شما تعداد خانه هایی که باید حرکت کنید را به آن میدهید مثلاً اگر میخواهید چهار خانه به جلو بروید باید به این متغر عدد 4 بفرستید که مثالش در کدهای فرم است.

متد زیر:

کد:

---

        private void SET_Class(int Val)
        {
            if ((Go + Val) < 44 && Mojavez_Go && !Convert.ToBoolean(MainCTLs[Go + Val].Tag))
            {
                    CTL_Asl.Location = MainCTLs[Go + Val].Location;
                    MainCTLs[Go + Val].Tag = true;
                    MainCTLs[Go].Tag = false;
                    Go += Val;
            }
        }

---

متد بالا در اصل عملیات حرکت را انجام میدهد:
متغیر Val عددی است که شما به وسلیه منچ بدست میاورید و به متغیر میدهید. و Go تعداد خانه هایی است که کنترل بازی شما حرکت کرده است.
شرط زیر بررسی میکند که تعداد حرکت های رفته بیش از حد نباشد و کنترل مجوز حرکت داشته باشد(یعنی شش آورده و داخل بازی باشد) و اینکه کنترلی دیگر در آن خانه قرار نداشته باشد.چون دو کنترل در یک خانه نمیتوانند قرار گیرند:

کد:

---

            if ((Go + Val) < 44 && Mojavez_Go && !Convert.ToBoolean(MainCTLs[Go + Val].Tag))
            {

---

کد زیر کنترل را حرکت میدهد و آن را برابر با یکی ار خانه های کنترل آرایه ای میکند:

کد:

---

CTL_Asl.Location = MainCTLs[Go + Val].Location;

---

کد زیر نشان میدهد که در خانه ای که قرار داریم دیگر کنترل دیگر نباید باشد:

کد:

---

                    MainCTLs[Go + Val].Tag = true;

---

کد زیر نشان میدهد که در خانه قبلی که قرار داشتیم میتواند کنترل بازی کنی قرار گیرد زیرا دیگز آن خانه خالی شده است:

کد:

---

                    MainCTLs[Go + Val].Tag = true;

---

و در آخر هم Enum:

کد:

---

      public enum ClassModel
        {
            Zard,Ghermez,Sabz,Abi
        }

---

Enum کاربرد بسیاری برای ما داشت.که ما در برنامه خود بجای چند متغیر از یک Enum استفاده کردیم.

برای بازی کردن تاس را بیندازید اگه شش نیاوردید روی آن بازی کنی که نوبتش است کلیک کنید مثلاً وقتی نوبت شماست و شش نیاوردید رو کنترل خود کلیک کنید تا تاس فعال شود و نوبت بازیکن بعدی شود.
اگر شش آوردید آن بازیکنی که میخواهید وارد بازی کنید را کلیک کنید و برای حرکت هم همینطور.

دانلود برنامه:

کد:

---

http://forum.p30world.com/showpost.php?p=4970520&postcount=247

---

ببخشید که توضیحات کمی نا مفهوم بود.این توضیحات برای یکسال پیشه من وقت نکردم دوباره بخونمش.
موفق باشید:11:.

سلام وقت بخیر!
میخوام یه برنامه به زبان C# بنویسم که تحت شبکه کار کنه از پایگاه داده SQL استفاده میکنم
میخوام بدونم تنظیمات SQL چی باس باشه?
CONNECTION STRING چه طور باس تعریف شه؟
اصولا باس دو تا exe داشته باشم یا نه؟(یکی واسه سرور و دیگری واسه کلاینتام)

نقل قول:

---

اصولا باس دو تا exe داشته باشم یا نه؟(یکی واسه سرور و دیگری واسه کلاینتام)

---

سلام.
دوست من درسته باید دو تا برنامه یکی کلاینت و دیگری سرور که میتونی با یه جستجو پیدا کنی نمونه برنامه رو.

نقل قول:

---

CONNECTION STRING چه طور باس تعریف شه؟

---

کانکنشن که توی برنامه و دستورات sql رو توی خود sql بنویس در قسمت Stored Procedures.
lموفق باشی دوست من.