21 Apr 2013

Statement Pengaturan tata letak Pada Turbo Pascal

# ClrScr [prosedur]. Perintah ini digunakan untuk membersihkan layar.
sintaks: ClrScr; [Clear screen]

# GotoXY[prosedur]. Untuk menempatkan posisi kursor pada layar.
Sintaks: GotoXY(X, Y: Byte);
Keterangan : X = sumbu X (posisi horisontal)
Y = sumbu Y (posisi vertikal)

# DelLine [prosedur]. Untuk menghapus sebuah baris pada posisi kursor dan menaikkan baris-baris dibawahnya.
Sintaks: DelLine;

# InsLine [prosedur]. Untuk menyisipkan sebuah baris pada posisi kursor dan menggeser kebawah tampilan-tampilan baris dibawahnya.
Sintaks: InsLine;

# Delay [prosedur]. Untuk menghentikan sejenak proses program.
Sintaks: Delay (MS: Word);


Keterangan : variable MS = ukuran waktu dalam milisecond.


Contoh :
Program Layar;
Uses Crt;
Var x : Char;
Begin
ClrScr;
GotoXY(35,10);Writeln (‘I Love Dinda');
Write (tunggu sebentar...!!');
Delay (5000);
InsLine;
GotoXY (35,11);Writeln ('Bayi sehatku');
GotoXY(01,13);Writeln ('Tekan Enter !');
Delay(1000);
GotoXY(15,12);
DelLine;
Read(x);
End.
Hasilnya adalah :
I Love Dinda
Bayi sehatku
tunggu sebentar...!!
Tekan Enter !

Tidak ada komentar:

Posting Komentar

Silahkan berkomentar

Terima kasih atas kunjungan Anda

Saya Bukan blogger sukses dan bukan ahli SEO.
Saya sedang meneliti dan mencoba berbagi tips, trik, dan cara tentang seo dan blog dan yang berhubungan dengan hal tersebut.
Jika ada kesalahan informasi dalam konten, mohon sampaikan agar secepatnya saya perbaiki.
Beberapa artikel mengenai makalah, laporan, pascal merupakan curhatan dari tugas kuliah saya dahulu.
Copyright 2014, Rezkyjoe. Designed By Seo Blogger Templates