var
Hwndcalculator: hwnd;
Beginnen
// Ermitteln Sie das vorhandene Taschenrechnerfenster
HwndCalculator: = WinProcs.findwindow (nil, '' rechner '');
// Schließen Sie das vorhandene Taschenrechnerfenster
Wenn hwndcalculator <> 0 dann dann
SendMessage (hwndcalculator, wm_close, 0, 0);
Ende;