سلام
رئیس شرکت بورلند (فلیپ خان) رو یادتون هست؟ با استعداد و با پشتکار اما اکنون از او و شرکتش نامی نیست چرا؟ اما از جابز که جزء اولین‌ها بود و اخیرا مدیران فیسبوک و گوگل بسیار میشنوید چرا؟ کار شما مانند این می‌ماند که بگویید می‌خواهم زبان برنامه نویسی فارسی به نام پارس شارپ بنویسم. با همان استدلال هایی که برای اینکار آوردید. پیشنهاد میکنم شما هم عضور تیم توسعه دهنده گان همین CMSهای Open Source شوید و گامی در ارتقاء آنها بردارید ضمن آنکه برای آن ماژول‌های بومی مانند تقویم بنویسید. بروید روی شانه‌های بزرگانی که امروز هستند. این سخن انشتین را که بخاطر دارید که گفت من بر روی شانه‌های نیوتن رفتم یعنی کاری در پی کار او کردم و نظرات او را بسط دادم.
Rider 2018.1 EAP is open
// In the file program.fs. let x = 40
module Program let x = 40
module MyModule1 =
let module1Value = 100
let module1Function x =
x + 10
// MyModule2
module MyModule2 =
let module2Value = 121
let module2Function x =
x * (MyModule1.module1Function module2Value)module Arithmetic
let add x y =
x + y
let sub x y =
x - ylet result1 = Arithmetic.add 5 9
open Arithmetic let result2 = add 5 9
module Y =
let x = 1
module Z =
let z = 5module Y =
let x = 1
module Z =
let z = 5module Y =
module Z =
let z = 5module Y =
module Z =
let z = 5namespace [parent-namespaces.]identifier
namespace Model
type Car =
member this.Name = "BMW"
module SetCarName =
let CarName = "Pride"module Model.Car
module SetCarName =
let CarName = "Pride"namespace Outer
type OuterMyClass() =
member this.X(x) = x + 1
namespace Outer.Inner
type InnerMyClass() =
member this.Prop1 = "X"Outer.Inner.InnerMyClass
یک مثال از عبارات با قاعده:
type PhoneRegex = Regex< @"(?<AreaCode>^\d{3})-(?<PhoneNumber>\d{3}-\d{4}$)">
PhoneRegex.IsMatch "425-123-2345"
|> should equal true
PhoneRegex().Match("425-123-2345").CompleteMatch.Value
|> should equal "425-123-2345"
PhoneRegex().Match("425-123-2345").PhoneNumber.Value
|> should equal "123-2345"با استفاده از پنجره Package Manager Console دستور نصب زیر را اجرا کنید(آخرین نسخه این پکیج 1.8.31 و حجم آن کمتر از یک مگابایت است):
PM> Install-Package FSharpx.TypeProviders.Xaml
حال یک فایل Xaml به پروژه اضافه کنید و کد‌های زیر را در آن کپی کنید:
<Window xmlns="http://schemas.microsoft.com/winfx/2006/xaml/presentation"
xmlns:x="http://schemas.microsoft.com/winfx/2006/xaml"
Title="WPF F# Sample By Masoud Pakdel" Height="350" Width="525">
<Grid Name="MainGrid">
<StackPanel Name="StackPanel1" Margin="50">
<Button Name="Button1">Who are you?</Button>
</StackPanel>
</Grid>
</Window>open System
open System.Windows
open System.Windows.Controls
open FSharpx
type MainWindow = XAML<"MainWindow.xaml">
let loadWindow() =
let window = MainWindow()
window.Button1.Click.Add(fun _ ->
MessageBox.Show("Masoud Pakdel")
|> ignore)
window.Root
[<STAThread>]
(new Application()).Run(loadWindow())
|> ignore
[<STAThread>] (new Application()).Run(loadWindow()) |> ignore
