Esempio n. 1
0
        //Prosedur BukaDokumen membuka sebuah file dan memuatnya
        //ke kotak teks
        private void BukaDokumen()
        {
            StreamReader FileMasukan; //Variabel Object

            if (openFileDialog1.ShowDialog() == DialogResult.OK)
            {
                //Membaca nama file
                strNamaFile = openFileDialog1.FileName;
                try
                {
                    //Membuka file
                    FileMasukan = File.OpenText(strNamaFile);
                    //Membaca isi file dan menempatkannya pada kotak teks
                    teksDokumen.Text = FileMasukan.ReadToEnd();
                    //Menutup file
                    FileMasukan.Close();
                    //Memperbarui variabel blnApaBerubah
                    blnApaBerubah = false;
                }
                catch
                {
                    //Pesan error karena error pembukaan file
                    MessageBox.Show("Error pembukaan file.");
                }
            }
        }
Esempio n. 2
0
        private void tombolBaca_Click(object sender, EventArgs e)
        {
            //Variabel-variabel lokal
            StreamReader FileMasukan;   //Variabel Object
            string       strMasukan;    //Untuk memuat sebaris masukan

            try
            {
                //Membuka file
                FileMasukan = File.OpenText(strNAMAFILE);

                //Membersihkan kotak list
                kotakList.Items.Clear();

                //Membaca isi file
                while (FileMasukan.EndOfStream == false)
                {
                    //Membaca sebaris dari file
                    strMasukan = FileMasukan.ReadLine();
                    //Menampilkan sebaris masukan pada kotak list
                    kotakList.Items.Add(strMasukan);
                }
                //Menutup file
                FileMasukan.Close();
            }
            catch {
                //Pesan error untuk error pembukaan file
                MessageBox.Show(strNAMAFILE + " tidak dapat dibuka");
            }
        }