1. Panggilan Dinamis Prosedur Tersimpan
sp_exec.parameters.clear;
sp_exec.procedureName: = 'sp_transto';
sp_exec.parameters.createParameter ('@mailid', ftstring, pdinput, 50, mailid);
sp_exec.parameters.createParameter ('@hasil', ftinteger, pdoutput, 0, rowid);
sp_exec.execproc;
2. Menampilkan menu pop-up di sudut kiri bawah tombol
var
xy: tpoint;
Mulai
xy: = btnflow.clientorigin;
xy.y: = xy.y + btnflow.height;
Windows.clienttoscreen (hwnd_desktop, xy);
mmmenu.popup (xy.x, xy.y);
3. Pesan Windows