Fungsi dalam Delphi

Pangkat: a:=2; b:=3; c:=exp(b*ln(a)); // nilai = 8 format: edkurs.text:=format(‘%25.2n’,[kurs]); keterangan: d : integer u : integer tanpa + atau – e : argumen bertipe floating point f : sama e, tetapi tidak menggunakan angka eksponen g : format antara e dan f n : floating point, tanpa angka eksponen, ada pemisah ribuan dan desimal m : floating point, format currency p : argumen harus berupa pointer, hasil 8 karakter string dalam heksa desimal s : argumen bertipe string / pchar x : integer, hasil string dalam bentuk heksa desimal pos: mencari string di string lain x:=pos(‘ab’,’abcdef’); // hasilnya x=1 delete: menghapus tanda titik while pos(‘.’,skurs)>0 do delete (skurs, pos(‘.’,skurs),1); length: panjang string if length(sjumlah)>0 then jumlah:=strtocurr(sjumlah); keypress: if key=chr(13) then gridbarangdblclick(sender);