Postingan

Menampilkan postingan dari Desember, 2018

Contoh Pembuatan Aplikasi Rekord Delphi Console

Gambar
Pemrograman Dasar - Rekord Mr. Berry Prima, S. Kom Rekord merupakan type data terstruktur yang digunakan untuk menyimpan sejumlah data dengan type data yang berbeda dalam suatu tempat yang  merupakan konsep dasar dari DataBase. Deklarasi Rekord antara lain : Type Pengenal : Record NamaField1 : typedata; NamaField2 : typedata; ... NamaField(n) : typedata; program ProjectTestRecord; {$APPTYPE CONSOLE} uses   Windows,   Messages,   SysUtils; const maks=3; type   data_mhs = record      nim : string[10];      nama_mhs : string[25];      nilai_mhs : string[25]; end; var   mhs : array[1..maks] of data_mhs;   nmr, nama : string[25];   i, n, nilai : Integer;   pilihan, cek : char;   procedure ClrScr;     var       hStdOut: HWND;       ScreenBufInfo: TConsoleScreenBufferInfo;       Coord1: TCoord;       z: Integer;     begin       hStdOut := GetStdHandle(STD_OUTPUT_HANDLE);       GetConsoleScreenBufferInfo(hStdOut, ScreenBufInfo);       for z