Получить "No." созданной записи

[Milk]

В общем, если по цепочке передавать слишком сложно, создайте кодеюнит со свойством SingleIstance = Yes. В нем две функции:

SetNo(No:code)
Value := No;

GetNo(var No:code)
No := Value;

После создания возможности вызываете первую, потом из главной формы - вторую, передавая в нее в качестве параметра переменную, куда хотите получить номер.