Raised exception class econverterror

Olá amigos

tenho um menu principal que utiliza chamada de form MDI, acontece quando faço a chamada ele dá o seguinte erro:

Raised exception class econverterror with message ´is not a valid integer value´..


procedure TFMain.ClickMenu(Sender : TObject);
var ID : Integer;
begin
ID := (Sender as TMenuItem).Tag;
case ID of

SAIR : Close;
CLIENTE : ShowChildWindow(TFCliente, TForm(FCliente), ID);

...

function TFMain.ShowChildWindow(FormClass : TFormClass; var FormObject : TForm; Module_ID : Integer) : TForm;
begin
try
....

FormObject := FormClass.Create(Self); linha que dá o erro.

No entanto estava funcionando normalmente, mas de uma hora pra outra deixou de funcionar. Se alguém puder ajudar fiacaria muito grato.

obs: utilizo o Delphi7 e Interbase 7 e windows longhorn

Atenciosamente,


Silvio Guedes.