varilla
Hwndcalculator: hwnd;
Comenzar
// Encuentra la ventana de la calculadora existente
Hwndcalculator: = winprocs.findwindow (nil, '' calculadora '');
// Cierre la ventana de la calculadora existente
Si hwndcalculator <> 0 entonces entonces
SendMessage (hwndcalculator, wm_close, 0, 0);
fin;