1。ストアドプロシージャの動的コール
sp_exec.parameters.clear;
sp_exec.procedurename：= 'sp_transto';
sp_exec.parameters.createparameter（ '@mailid'、ftstring、pdinput、50、mailid）;
sp_exec.parameters.createparameter（ '@result'、ftinteger、pdoutput、0、rowid）;
sp_exec.execproc;
2。ボタンの左下隅にポップアップメニューを表示します
var
xy：tpoint;
始める
xy：= btnflow.clientorigin;
xy.y：= xy.y + btnflow.height;
windows.clientToscreen（hwnd_desktop、xy）;
mmmenu.popup（xy.x、xy.y）;
3。Windowsメッセージ