Aplikasi Operasi File

unit u_pert4_AppOperasiFile;

interface

uses

  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls, Buttons, ExtCtrls, FileCtrl;

Game Sederhana bangettt....

unit main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, jpeg, ExtCtrls, StdCtrls, Menus, ComCtrls;

Tugas 2: APLIKASI OPERASI TEKS

Belajar operasi teks pada delphi sangat mudah dan sederhana..mau tau caranya cekidot gann...!

Untuk Font Style "Bold, Italic, Underline" menambahkan 1 Combobox yaitu " Combobox 4" dengan listing Program yang di Blok hijau

LISTING PROGRAM
 private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

Tugas 1 : GAME SEDERHANA (TANGKAP IKAN)

LISTING PROGRAM GAME SEDERHANA  

 private
    { Private declarations }
  public
    { Public declarations }     procedure aktif;
    procedure nonaktif;
  end;

var
  Form1: TForm1;

implementation

Attitude

Sikap positif membantu untuk mengatasi lebih mudah dengan urusan sehari-hari. Ini membawa optimisme ke dalam hidup Anda, dan membuatnya lebih mudah untuk menghindari pemikiran khawatir dan negatif. Jika Anda mengadopsi sebagai cara hidup, itu akan membawa perubahan konstruktif ke dalam hidup Anda, dan membuat mereka lebih bahagia, lebih cerah dan lebih sukses. Dengan sikap positif Anda melihat sisi terang kehidupan, menjadi optimis dan mengharapkan yang terbaik terjadi. Hal ini tentu keadaan pikiran yang sangat layak mengembangkan dan memperkuat.Sikap positif memanifestasikan dengan cara berikut:

Berpikir positif.Pemikiran konstruktif.Berpikir kreatif.Mengharapkan sukses.Optimisme.Motivasi untuk mencapai tujuan Anda.Menjadi terinspirasi.Memilih kebahagiaan.Tidak menyerah.Melihat kegagalan dan masalah sebagai berkat yang menyamar.Percaya pada diri sendiri dan pada kemampuan Anda.Menampilkan harga diri dan kepercayaan diri.Mencari solusi.Melihat peluang.Sikap positif mengarah pada kebahagiaan dan kesuksesan dan dapat mengubah seluruh hidup Anda. Jika Anda melihat sisi terang kehidupan, seluruh hidup Anda menjadi penuh dengan cahaya. Cahaya ini mempengaruhi tidak hanya Anda dan cara Anda melihat dunia, tetapi juga seluruh lingkungan dan orang di sekitar Anda. Jika cukup kuat, menjadi menular.Manfaat sikap positif:Membantu mencapai tujuan dan mencapai kesuksesan.Sukses dicapai lebih cepat dan lebih mudah.Kebahagiaan lebih.Lebih banyak energi.Lebih besar dalam kekuasaan dan kekuatan.Kemampuan untuk menginspirasi dan memotivasi diri sendiri dan orang lain.Lebih sedikit kesulitan yang dihadapi sepanjang jalan.Kemampuan untuk mengatasi kesulitan apapun.Hidup tersenyum pada Anda.Orang-orang menghormati Anda.Sikap negatif mengatakan: Anda tidak dapat mencapai kesuksesan.Sikap positif mengatakan: Anda dapat mencapai sukses.Jika Anda telah menunjukkan sikap negatif dan mengharapkan kegagalan dan kesulitan, sekarang waktu untuk mengubah cara Anda berpikir. Ini adalah waktu untuk menyingkirkan pikiran negatif dan perilaku dan menjalani hidup bahagia dan sukses. Mengapa tidak mulai hari ini? Jika Anda telah mencoba dan gagal, itu hanya berarti bahwa Anda belum mencoba cukup.Mengembangkan sikap positif yang akan membawa Anda menuju kebahagiaan dan kesuksesan:- Pilih untuk menjadi bahagia.- Lihatlah sisi terang kehidupan.- Pilih untuk menjadi dan tetap optimis.- Temukan alasan untuk tersenyum lebih sering.- Percayalah pada diri sendiri dan dalam Kekuatan Semesta.- Renungkan atas kesia-siaan berpikir negatif dan kekhawatiran.- Hubungkan diri Anda dengan orang-orang bahagia.- Baca cerita inspiratif.- Baca inspirasi kutipan.- Ulangi afirmasi yang menginspirasi dan memotivasi Anda.- Visualisasikan hanya apa yang Anda inginkan terjadi.- Belajarlah untuk menguasai pikiran Anda.- Belajar konsentrasi dan meditasi.