Introduction: DataBinding is the most
important thing when we develop any application. It is a process to
map a value or set of values to a user interface control. We store data at
back-end on database and transfer data to and from the front-end.
Creating DataBase: We create a DataBase
for binding. Here, in my example, the DataBase name is student_record, table name is
student and Columns are Roll_No and Name. I am using SQL server. I have written code for creating this
database. Look at the below SQL statements.
create
database student_record
use student_record
create table student
(
Roll_No int primary
key,
Name varchar(20)
)
insert into
student values(1,'Alok
Pandey')
insert into
student values(2,'Satish
Kumar')
insert into student
values(3,'Amitabh
Pandey')
insert into student
values(4,'Pramod
Sharma')
insert into student
values(5,'Durgesh
Pandey')
After creating the DataBase and table we
start to a develop F# application for DataBinding. We follow the following steps
for this.
Step 1: Take a F# application. Like the below figure
Page will look like below figure.
Step 2: We go to Solution Explorer and Right Click on References. Like
below figure.
Step 3: Click on Add References. Then a pop-up window with caption Add Reference
will open as in the below figure.
Step 4: Click at .Net on Add Reference window and select
System.Windows.Forms, System.Drawing and System.Data with
holding down Ctrl key and Click on Ok.
Step 5: Write the below F# code in the Program.fs file.
//importing
namespace
open System
open
System.Windows.Forms
open
System.Drawing
open
System.Data.SqlClient
open System.Data
// cteating connection string
let constring =
@"Data Source=Server_Name;Initial
Catalog=student_record;Integrated Security=True"
//creating DataAdapter with two parameter
//one for command string and
//another for connection string
let adapter =
new SqlDataAdapter("select
* from student",constring)
//creating DataSet
let ds =
new DataSet()
//filling the DataSet
adapter.Fill(ds) |>ignore
//creating Form
let form =
new Form()
//creating DataGridView
let gridview =
new DataGridView()
//Adding DataGridView
form.Controls.Add(gridview)
//Binding DAtaGridView to DataSet
gridview.DataSource <- ds.Tables.[0]
//Showing the form
Application.Run(form)
Step 6: Run the code by pressing Ctrl+F5 key.
We note that all records are not visible in the DataGridView because the records requires
more width of DataGridView and we did not set the width of DataGridView. Now we set
if by adding new code as
let
gridview =
new DataGridView(Width=500, Height=500)
in code. Modified code is given
below.
//only let gridview = new DataGridView(Width=500, Height=500) is added in
previous code
open System
open
System.Windows.Forms
open
System.Drawing
open
System.Data.SqlClient
open System.Data
let constring =
@"Data Source=server_name;Initial
Catalog=student_record;Integrated Security=True"
let adapter =
new SqlDataAdapter("select
* from student",constring)
let ds =
new DataSet()
adapter.Fill(ds) |>ignore
let form =
new Form()
let gridview =
new DataGridView(Width=500, Height=500)
form.Controls.Add(gridview)
gridview.DataSource <- ds.Tables.[0]
Application.Run(form)
Run the application.