LOGIKA PROGRAM (FORM 1) unit Timer; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, ExtCtrls, StdCtrls, Menus; type TForm1 = class(TForm) MainMenu1: TMainMenu; N1: TMenuItem; Merah1: TMenuItem; Kuning1: TMenuItem; Biru1: TMenuItem; Hitam1: TMenuItem; Menu1: TMenuItem; Form21: TMenuItem; Exit1: TMenuItem; Label1: TLabel; Label2: TLabel; Timer1: TTimer; Timer2: TTimer; Hijau1: TMenuItem; procedure Timer1Timer(Sender: TObject); procedure Timer2Timer(Sender: TObject); procedure Merah1Click(Sender: TObject); procedure Kuning1Click(Sender: TObject...
Tutorial database dan sebuah tulisan random