C# мисоллар

-расм. Бинар файлга ёзиш ва ундан ўқиб олиш Кейинги қадамда уларни 4.10-расм

Download 0,91 Mb.

bet	41/52
Sana	24.02.2022
Hajmi	0,91 Mb.
	#215341

1 ... 37 38 39 40 41 42 43 44 ... 52

Bog'liq
C# windows app form

4.10 листинг. Бинар файлга ёзиш ва ундан ўқиб олиш

4.10-расм. Бинар файлга ёзиш ва ундан ўқиб олиш
Кейинги қадамда уларни 4.10-расмда келтирилгани каби жойлаштирамиз. Дастур коди 4.10-листингда келтирилган.

4.10 листинг. Бинар файлга ёзиш ва ундан ўқиб олиш

// Бинар файлга ёзиш ва ундан ўқиб олиш дастури
using System;
using System.Windows.Forms;

namespace ReadWriteBin

{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void Form1_Load(object sender, EventArgs e)
{
this.Text = "Талаба узлаштириши";
label1.Text = "Тартиб раками"; label2.Text = "Фамилия И.О.";
label3.Text = "Уртача балл";
textBox1.Clear();
textBox2.Clear();
textBox3.Clear();
button1.Text = "Укиш";
button2.Text = "Саклаш";
}
private void button1_Click(object sender, EventArgs e)
{
// БИНАРНОГО ФАЙЛДАН УКИШ
// Агар бундай файл мавжуд булмаса
if (System.IO.File.Exists(@"D:\student.usp") == false) return;
// Reader потогини хосил килиш
var Reader = new System.IO.BinaryReader(
System.IO.File.OpenRead(@"D:\student.usp"));
try
{
var ID = Reader.ReadInt32();
var FIO = Reader.ReadString();
var Ball = Reader.ReadSingle();
textBox1.Text = Convert.ToString(ID);
textBox2.Text = Convert.ToString(FIO);
textBox3.Text = Convert.ToString(Ball);
}
finally { Reader.Close(); }
}
private void button2_Click(object sender, EventArgs e)
{
// БИНАРНОГО ФАЙЛГА ЁЗИШ
// Файлга байтларни ёзиш учун Writer потогини хосил киламиз
var Writer = new System.IO.BinaryWriter(
System.IO.File.Open(@"D:\student.usp",
System.IO.FileMode.Create));
try
{
var ID = Convert.ToInt32(textBox1.Text);
var FIO = Convert.ToString(textBox2.Text);
// баллда бутун ва каср сонни ажратиш учун
// нукта ва вергулдан фойдаланишга рухсат бериш:
textBox3.Text = textBox3.Text.Replace(".", ",");
var Ball = Convert.ToSingle(textBox3.Text);
Writer.Write(ID);
Writer.Write(FIO);
Writer.Write(Ball);
}
finally { Writer.Close(); }
}
}
}

Форма биринчи маротаба ишга туширилганда форма элементларининг инициализацияси амалга оширилган:

Download 0,91 Mb.

Do'stlaringiz bilan baham:

1 ... 37 38 39 40 41 42 43 44 ... 52