[cadil]

Попробовал. Не получается ... - "Запрашиваемый номер семейства не существует. Process stopped."
Какой модуль еще нужно завести? Сейчас у меня -

Код:

 Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, ExtCtrls, StdCtrls, ExtDlgs, JPEG, ComCtrls, MPlayer, Buttons, ComObj,
OleServer, Word2000, Menus, ShellAPI, IniFiles, Math;