Nejdříve jedna možná nepodstatná technická - není třebaRun "Module1.Pro_Otevrit"stačíCall Module1.Pro_Otevritcompilátor tak lépe ohlídá překlepy v názvech procedur
Pokud jde o zbytek - odpovím přesně na dotaz - děláte něco špatně ;))
A protože jste šikovný, určitě na to chcete přijít sám (já ještě nevím co to je, ale věřím Vám ;) )citovat