[Delphi] Fungsi

MODUL 6 FUNGSI

SASARAN
1. Pemahaman penggunaan kata cadangan function
2. Pemahaman penggunaan parameter dalam function

TUGAS PENDAHULUAN
1. Apakah yang dimaksud dengan penggunaan function tanpa parameter ?
2. Apakah yang dimaksud dengan penggunaan parameter dalam fungtion ?
3. Sebutkan yang ada ketahui fungsi-fungsi bawaan dari Delphi ?

MATERI PRAKTIKUM
Sama halnya dengan procedure fungsi seringkali digunakan untuk menangani
penulisan listing program secara berulang ulang, dengan dibuatnya suatu fungsi
maka penulisan listing rogram yang berulang-ulang tersebut bisa ditulis satu kali
dan disimpan dalam suatu fungsi tertentu dan pemanggilan hanya cukup nama
fungsinya saja. Sedangkan perbedaan fungsi dengan procedure adalah kalau
fungsi nilai yang dikirimkan balik berada pada nama fungsinya.

Bentuk Umum :

Fungtion Nama_fungsi(parameter) : Type
Variabel Lokal;
Begin
Badan Fungsi
End;

Parameter berupa ungkapan pendefinisian variable seperti
(var1:type_1;var2:type_2;var4,var5:type_3) dan sipat dari paramer pada fungsi
sama dengan procedure
Variabel Lokal, berisi daftar variable yang hanya digunakan dalam fungsi itu
sendiri.

Badan Fungsi, berupa program inti dari fungsi tersebut yang diapit oleh begin dan
end.

Contoh :

function IntToBin(Value: LongInt; Digits: Integer): String;
var
i: Integer;
begin
Result:='';
for i:=Digits downto 0 do
if Value and (1 shl i)<>0 then
Result:=Result + '1'
Modul Delphi @2004, Patah Herwanto. STMIK-IM 24
else
Result:=Result + '0';
end;

Untuk file lengkapnya silahkan download disini

Related Articel:

Posted in: MK-Pemrograman Delphi