Crystal Report

Tampilan Toolbox sebelum anda registerkan Crystal Report Control.

Jika melihat gambar diatas maka tidak ada : Crystal Report Control
Untuk memunculkannya :
Klik Kanan Pada ToolBox

Kemudian Klik Choose Item
(mohon sabar karena proses choose item biasanya sedikit lama)

Jika sudah muncul silahkan Klik COM Components
Klik Browse
Kemudian cari pada Drive C:\WINDOWS\SYSTEM32
Cari : crysctl32.ocx

Klik Open

Maka akan muncul : Crystal Report Control
Kemudian Klik OK

Silahkan Cek pada ToolBox VB Net anda, maka akan muncul Crystal Report Control yang penggunaannya sama dengan VB 6.0

http://mesran.net/

Program Penjualan Menggunakan Array (Turbo Pascal)

Sintak Program :

Program kasir_Array;
Uses Wincrt;
Type Kasir = record
     no_trans, tgl, nama, nm_brg : String[10];
     kd_brg, jml : byte;
     hrg, tot : real;
     End;
Var
   Data : Array [1..100] of Kasir;
   Ul : Char;
   i,n, x : Integer;
   jml_penjualan : real;
Begin
     Repeat
     Clrscr;
     i:=i+1;
     Writeln('          MUSLIHUDIN TECHNOLOGY         ');
     Writeln('  Jl.RE Martadinata no.202 Tasikmalaya  ');
     Writeln('========================================');
     Writeln;
     writeln('             Form Transaksi             ');
     writeln;
     Writeln('Data Ke-',i);
     Writeln;
     Write('No Transaksi : ');Readln(Data[i].no_trans);
     Write('Tanggal      : ');Readln(Data[i].tgl);
     Write('Nama Pembeli : ');Readln(Data[i].nama);
     Write('Kode Barang  : ');Readln(Data[i].kd_brg);
      if Data[i].kd_brg  = 1 then
        begin
        Data[i].nm_brg  :='Processor Core i3';
        Data[i].hrg     :=1131000;
        end
     else if Data[i].kd_brg = 2 then
        begin
        Data[i].nm_brg  :='Printer';
        Data[i].hrg     :=500000;
        end
     else if Data[i].kd_brg = 3 then
        begin
        Data[i].nm_brg  :='Harddisk';
        Data[i].hrg     :=700000;
        end
     else if Data[i].kd_brg = 4 then
        begin
        Data[i].nm_brg  :='Flash Disk';
        Data[i].hrg     :=100000;
        end
     else if Data[i].kd_brg = 5 then
        begin
        Data[i].nm_brg  :='Mouse';
        Data[i].hrg     :=125000;
        end
     else if Data[i].kd_brg = 6 then
        begin
        Data[i].nm_brg  :='VGA Nvidia';
        Data[i].hrg     :=400000;
        end
     else if Data[i].kd_brg = 7 then
        begin
        Data[i].nm_brg  := 'Memory DDR3';
        Data[i].hrg     := 235000;
        end
     else if data[i].kd_brg = 8 then
        begin
        data[i].nm_brg  := 'Monitor';
        data[i].hrg     := 750000;
        end;
     Writeln('Nama Barang  : ',Data[i].nm_brg);
     Writeln('Harga        : ',Data[i].hrg:0:0);
     Write  ('Jumlah Beli  : ');Readln(Data[i].jml);
     Data[i].tot:=Data[i].jml*Data[i].hrg;
     writeln('Total Bayar  : ',Data[i].tot:0:0);
     Writeln;
     write('Tambah Data (Y/T) : ');readln(Ul);
     until upcase (Ul) <> 'Y';
      n:=i;
     Clrscr;
     gotoxy(1,1);Write('============================ MUSLIHUDIN TECHNOLOGY =============================');
     gotoxy(1,2);Write('=========================================================================');
     gotoxy(1,3);write('|No.Tran |Tanggal |Nama Pembeli |Nama Barang  |Harga      |Jumlah |Total       |');
     gotoxy(1,4);Write('=========================================================================');
     For x := 1 to n do
     begin
     gotoxy(1,x+4);write('|');
     gotoxy(2,x+4);write(x);
     gotoxy(10,x+4);write('|');
     gotoxy(11,x+4);write(data[x].tgl);
     gotoxy(19,x+4);write('|');
     gotoxy(20,x+4);write(data[x].nama);
     gotoxy(33,x+4);write('|');
     gotoxy(34,x+4);write(data[x].nm_brg);
     gotoxy(47,x+4);write('|');
     gotoxy(48,x+4);write(data[x].hrg:0:0);
     gotoxy(59,x+4);write('|');
     gotoxy(60,x+4);write(data[x].jml);
     gotoxy(67,x+4);write('|');
     gotoxy(68,x+4);write(data[x].tot:0:0);
     gotoxy(80,x+4);write('|');
 
     jml_penjualan:=jml_penjualan+Data[x].tot;
     end;
     Write('================================================================================');
     Writeln('Jumlah Transaksi : ', i);
     Writeln('Jumlah Penjualan : Rp.',jml_penjualan:0:0); 

End.

Gambar Program :

http://mesran.net/

Contoh program c++ membuat segitia bintang dengan 3 variable

#include<iostream.h>

#include<conio.h>
void main()
{
clrscr();
int n,a,b;
cout<<"masukkan angka";cin>>n;
for(a=0;a<=n;a++)
{
for(b=0;b<=a;b++)
{
cout<<" ";
}
for(b=a;b<=n;b++)
{
cout<<"*";
}
for(b=a;b<n;b++)
{
cout<<"*";
}
cout<<endl;
}
getch ();
}

output segitiga :
  ****
   ***
    **
     *
Penjelasan :
coding di atas adalah contoh program c++ untuk menampilkan bintang segitiga dengan model kebawah, input misal nya adalah 3 maka hasil nya seperti di atas.
terdapat 2 library yaitu #include<iostream.h> #include<conio.h>
fungsi void main adalah untuk membuat blok program utama nya, clrscr adalah untuk membersihkan layar sebelum nya

http://mesran.net/

Workshop Volume Kubus

Berhubung workshop android sudah dilakukan nah, untuk berikutnya saya akan membahas beberapa dan banyak contoh program android yang dasar. Khususnya perhitungan perhitungan sederhana. Tujuannya mengenal IDE Android serta bahasa Java nya.

Silahkan membuat project baru dengan cara : Ctrl+N, pilih Android Application Project dan silahkan isi seperti gambar dibawah ini :

Rubah sesuai dengan tampilan diatas.
Click NEXT

 Click NEXT

 Click NEXT

 Click NEXT

Rubah Activity Name dan Layout Name

Click FINISH, dan tampilannya akan nampak seperti berikut ini .

Untuk menjalankan program Android menghitung Volume Kubus, lihat gambar dibawah ini :
Click Kanan Hitung Volume Kubus | Run As | Android Application

Hasilnya seperti berikut ini :



















Nah berikutnya kita akan memodifikasi program XML pada Layout. Click activity_hitung_volume_kubus.xml

Program akan terlihat seperti berikut ini :

<RelativeLayout xmlns:android="http://schemas.android.com/apk/res/android"
    xmlns:tools="http://schemas.android.com/tools"
    android:layout_width="match_parent"
    android:layout_height="match_parent"
    tools:context=".HItungVolumeKubus" >

    <TextView
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:layout_centerHorizontal="true"
        android:layout_centerVertical="true"
        android:text="@string/hello_world" />

</RelativeLayout>

Hapus program tersebut : Ctrl+A  tekan DEL, sehingga layout menjadi KOSONG. seperti gambar berikut : Click Graphical Layout

 Tampilan Graphical Layout kosong, kemudian tambahkan LinearLayout dengan cara, CLICK dan TAHAN LinearLayout, DRAG ke arah yang kosong di tengah tampilan diatas tersebut, sehingga menjadi seperti gambar berikut ini.

Kemudian kita lanjutkan untuk menambah UI yang lain, TextView, EditText dan Button, ikutin arahan gambar di bawah ini : (jika tampilan terlalu kecil click ZOOM + seperti di gambar atas tersebut dan tampilan akan menjadi besar)

 Click Form Widgets, Click dan Drag TextView ke Layout, sehingga muncul TextView1

 Click Text Fields, Click PlainText atau EditText (abc) dan Drag ke bawah TextView1

 Click Form Widgets, Click dan Drag Button ke bawah EditText

Click dan Drag TextView ke bawah Button

 Terakhir Click dan Drag EditText ke bawah TextView

 Kemudian click activiry_hitung_volume_kubus.xml, dan lihat xml akan menjadi seperti dibawah ini :
<LinearLayout xmlns:android="http://schemas.android.com/apk/res/android"
    android:layout_width="fill_parent"
    android:layout_height="fill_parent"
    android:orientation="vertical" >

    <TextView
        android:id="@+id/textView1"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:text="TextView" />

    <EditText
        android:id="@+id/editText1"
        android:layout_width="match_parent"
        android:layout_height="wrap_content"
        android:ems="10" >

        <requestFocus />
    </EditText>

    <Button
        android:id="@+id/button1"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:text="Button" />

    <TextView
        android:id="@+id/textView2"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:text="TextView" />

    <EditText
        android:id="@+id/editText2"
        android:layout_width="match_parent"
        android:layout_height="wrap_content"
        android:ems="10" />

</LinearLayout>

Pada XML diatas, yang perlu di rubah yaitu, ID dari EditText, begitu juga untuk Buttonnya yang dirubah ID dan TEXT, sedangkan TextView yang dirubah hanya Text nya saja, seperti berikut :

<TextView
        android:id="@+id/textView1"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:text="TextView" />

yang dirubah : android:text="TextView"    --> menjadi android:text="Sisi Kubus", untuk ID nggak perlu dirubah.

untuk EditText:

<EditText
        android:id="@+id/editText1"
        android:layout_width="match_parent"
        android:layout_height="wrap_content"
        android:ems="10" >

yang dirubah android:id="@+id/editText1" dirubah  android:id="@+id/esisi", ID menjadi esisi. NOTES, untuk @+id JANGAN ANDA HAPUS, karna itu menunjukkan ID ke R.java


Untuk Button seperti berikut :
<Button
        android:id="@+id/button1"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:text="Button" />

yang dirubah android:id="@+id/button1" menjadi android:id="@+id/btnhitung"
yang dirubah android:text="Button" menjadi android:text="Hitung Volume".

sooo, jangan lupa ID dan Text nya yaa.

Kemudian lihat dari program xml yang sudah dirubah ID dan Text nya, seperti berikut ini :

<LinearLayout xmlns:android="http://schemas.android.com/apk/res/android"
    android:layout_width="fill_parent"
    android:layout_height="fill_parent"
    android:orientation="vertical" >

    <TextView
        android:id="@+id/textView1"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:text="Sisi Kubus" />

    <EditText
        android:id="@+id/esisi"
        android:layout_width="match_parent"
        android:layout_height="wrap_content"
        android:ems="10" >

        <requestFocus />
    </EditText>

    <Button
        android:id="@+id/btnhitung"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:text="Hitung Volume" />

    <TextView
        android:id="@+id/textView2"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:text="Volume Kubus" />

    <EditText
        android:id="@+id/evolume"
        android:layout_width="match_parent"
        android:layout_height="wrap_content"
        android:ems="10" />

</LinearLayout>

Yang perlu dirubah yang tulisan BOLD saja.

dan kemudian lihat layout activiry_hitung_volume_kubus.xml.

 Jalankan program tersebut.

Berikutnya kita akan memodifikasi file javanya : HitungVolumeKubus.java, lokasi file tersebut berada di src, seperti gambar dibawah ini :

Double click file HitungVolumeKubus.java, sehingga akan nampak progam seperti berikut ini :
Program HitungVolumeKubus.java

package com.example.hitungvolkubus;

import android.os.Bundle;
import android.app.Activity;
import android.view.Menu;

public class HItungVolumeKubus extends Activity {

    @Override
    protected void onCreate(Bundle savedInstanceState) {
        super.onCreate(savedInstanceState);
        setContentView(R.layout.activity_hitung_volume_kubus);
    }

    @Override
    public boolean onCreateOptionsMenu(Menu menu) {
        // Inflate the menu; this adds items to the action bar if it is present.
        getMenuInflater().inflate(R.menu.activity_hitung_volume_kubus, menu);
        return true;
    }

}

Modifikasi seperti berikut ini :

package com.example.hitungvolkubus;

import android.os.Bundle;
import android.app.Activity;
import android.view.View;
import android.view.View.OnClickListener;
import android.widget.EditText;
import android.widget.Button;
public class HItungVolumeKubus extends Activity implements OnClickListener{
    private Button bHitung ;
    private EditText eSisi, eVolume ;

    @Override
    protected void onCreate(Bundle savedInstanceState) {
        super.onCreate(savedInstanceState);
        setContentView(R.layout.activity_hitung_volume_kubus);
        eSisi = (EditText) findViewById(R.id.esisi) ;
        eVolume = (EditText) findViewById(R.id.evolume) ;
        bHitung = (Button) findViewById(R.id.btnhitung) ;
        bHitung.setOnClickListener(this);
    }


    public void onClick(View v){
        try{
            int sisi= Integer.parseInt(eSisi.getText().toString()) ;
            double luas = sisi * sisi * sisi ;
       
            eVolume.setText(String.valueOf(luas)) ;
        }catch (Exception e) {
            e.printStackTrace() ;
        }
    }
}

yang ditambah yang tulisan tebal.  Yang perlu diingat program Java ini Case Sensitive, huruf besar atau kecil berpengaruh.

Apabila selesai memodifikasi program HitungVolumeKubus.java, dan tak ada error, maka coba jalan dan hasilnya seperti berikut ini.

Silahkan download program android menghitung Volume Kubus Menggunakan OnClickListener berikut ini : file program android OnCLickListener.

Program Android Membuat Menu Menggunakan ListView

Written By handika on jumat, 13 Maret 2015 | 00.42mesran.blogspot.com

Pada postingan berikut ini saya akan memberikan bahan untuk membuat menu dengan menggunakan UI Listview. Berikut program android membuat menu menggunakan ListView
.
Silahkan membuat Project Baru, dan rubah nama project seperti berikut ini :

Application Name : MenuListview
Project Name : MenuListview
Package Name : com.example.menulistview
Minimum Requered SDK : Android 2.3.3
Target SDK : Android 2.3.3
Compile With : Android 2.3.3
Theme : None
Activity Name : MainActivity
Laout Name : activity_main
Navigation Type : None


Pada layout xml program pada : activity_main.xml

<RelativeLayout xmlns:android="http://schemas.android.com/apk/res/android"
    xmlns:tools="http://schemas.android.com/tools"
    android:layout_width="match_parent"
    android:layout_height="match_parent"
    tools:context=".MainActivity" >

    <TextView
        android:id="@+id/textView1"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:layout_alignParentLeft="true"
        android:layout_alignParentTop="true"
        android:layout_marginLeft="21dp"
        android:layout_marginTop="16dp"
        android:text="Menu Perhitungan"
        android:textAppearance="?android:attr/textAppearanceLarge" />

    <ListView
        android:id="@+id/lsmenu"
        android:layout_width="match_parent"
        android:layout_height="wrap_content"
        android:layout_alignLeft="@+id/textView1"
        android:layout_below="@+id/textView1" >
    </ListView>

</RelativeLayout>

Untuk program pada MainActivity.java, silahkan di modifikasi seperti berikut ini :

package com.example.menulistview;

import android.os.Bundle;
import android.app.Activity;
import android.widget.ArrayAdapter;
import android.widget.ListView;

public class MainActivity extends Activity{
    private ListView lsmenu ;
    private String[] menu={"Menu 1","Menu 2","Menu 3","Menu 4","Menu 5"} ;
  
    @Override
    protected void onCreate(Bundle savedInstanceState) {
        super.onCreate(savedInstanceState);
        setContentView(R.layout.activity_main);
      
        lsmenu = (ListView) findViewById(R.id.lsmenu) ;
        ArrayAdapter<String> adapter =  new ArrayAdapter<String>(this,android.R.layout.simple_list_item_1,menu);
        lsmenu.setAdapter(adapter) ;
              
    }
}

Silahkan anda jalankan program android membuat menu menggunakan ListView

Sekarang, silahkan anda modifikasi pada bagian ini :
private String[] menu={"Menu 1","Menu 2","Menu 3","Menu 4","Menu 5"} ;

diganti dengan perintah dibawah ini :

private String[] menu={"Luas Persegi Panjang","Luas Segitiga","Luas Lingkaran","Volume Kubus","Keluar"} ;

Silahkan jalankan kembali :

Mengubah Backgroud Layout XML dan Merubah Warna UI pada Pemrograman Android

Written By Mesran on Minggu, 01 Maret 2015 | 23.52

Untuk merubah warna Text pada UI di Layout XML pada pemrograman android cukup dengan menambahkan perintah :

android:textColor="#F03000"

pada :

<TextView
        android:id="@+id/textView1"
        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:layout_alignParentLeft="true"
        android:layout_alignParentTop="true"
        android:layout_marginLeft="20dp"
        android:layout_marginTop="24dp"
        android:text="Menghitung Volume Kubus"
        android:textAppearance="?android:attr/textAppearanceMedium" />
Sehingga :

<TextView
        android:id="@+id/textView1"
        android:textColor="#F03000"        android:layout_width="wrap_content"
        android:layout_height="wrap_content"
        android:layout_alignParentLeft="true"
        android:layout_alignParentTop="true"
        android:layout_marginLeft="20dp"
        android:layout_marginTop="24dp"
        android:text="Menghitung Volume Kubus"
        android:textAppearance="?android:attr/textAppearanceMedium" />

Sedangkan untuk menampilkan latar/gambar background pada Layout XML dengan cara :

1. Siapkan dahulu latar gambar background di folder pada gambar di bawah ini :

Cari tempat program anda tersimpan, dan letakkan gambar pada folder drawable-mdpi.

2. Setelah di copy ke folder tersebut, kembali ke program android dan click pada bagian gambar tersebut di bawah ini :

Sudah muncul background.png, pastikan filenya berekstensi *.png

3. Kemudian terakhir tambahkan perintah tersebut dibawah ini :

<RelativeLayout xmlns:android="http://schemas.android.com/apk/res/android"
    xmlns:tools="http://schemas.android.com/tools"
    android:layout_width="match_parent"
    android:layout_height="match_parent"
    tools:context=".MainVolKubus"
    android:background="@drawable/background" >

Perintah yang tebal tersebut anda tambahkan pada RelativeLayout diatas.

Kemudian click Graphical, apakah background sudah terlihat?
Lihat Hasil program nya :

Silahkan download program Mengubah Backgroud Layout XML dan Merubah Warna UI pada Pemrograman Android disini :Mengubah Backgroud Layout XML dan Merubah Warna UI pada Pemrograman Android

Menghitung Nilai Semester Menggunakan C++/Pascal

Written By Mesran on Selasa, 26 Maret 2013 | 20.12

Program berikut merupakan program untuk menghitung nilai semester menggunakan C++/Pascal.

Berikut perintah pada bahasa C++ :

#include "iostream.h"
void main(){     int nmid, nuas ;
     double nsem ;

     cout << "Menghitung Nilai Semester \n---------------------------\n" ;
     cout << "Input Nilai Mid : " ; cin >>nmid ;
     cout << "Input Nilai UAS : " ; cin >>nuas ;

     nsem = 0.4 * nmid + 0.6 * nuas ;

     cout << "Ouput Nilai Semester : " << nsem ;
}

Berikut program pada bahasa Pascal :

uses crt ;
var
        nmid, nuas      : integer ;
        nsem            : real ;

begin
     clrscr ;
     writeln('Menghitung Nilai Semester') ;
     writeln('--------------------------') ;
     write ('Input Nilai Mid  : ') ; readln (nmid) ;
     write ('Input Nilai Uas  : ') ; readln (nuas) ;
     nsem := 0.4 * nmid + 0.6 * nuas ;
     writeln('Output Nilai Semester : ', nsem:4:1) ;
     readln ;
end. 

Demikianlah program tersebut semoga berhasil, karna program tersebut sangat mudah banget :)

stay on http://mesran.net/