Коллеги, подскажите в чем я не прав:

procedure TForm1.FormActivate(Sender: TObject);
var
comm:_COMMCONFIG;
begin
CommConfigDialog('COM1',NULL,comm);
end;

Все компилится, а при выполнении идет EVariantError: "invalid variant type conversion"