Генератор случайных чисел?

[pk]

Есть ли такой оператор в "Галактике"? Хочу использовать для присвоения штрих-кодов;) Спасибо.

[san]

в дельфи есть, в випе похоже что нет

[Alpiton]

Я использовал Excel через xl-функции

[Den]

Была dll где то...Когда писал вывод 2НДФЛ в xml формат, там во 2-й строчке в служебной инфе в структуре записи присутствовал как раз guid.

[Алексей]

Den
в 2НДФЛ случайнм образом доходы заполнялись?

[san]

кстати, действительно можно сделать длл и импортировать ф-ции в вип

rnd.pas ----------------:

Library rnd;
Uses
utils,myrnd;
Exports
randomnum name 'RANDOMNUM';
begin
Randomize;
RegisterModule('RND.DLL');
end.

myrnd.pas -------------:

unit myrnd;

interface

function RandomNum( A : word ) : word; export;

implementation

function RandomNum( A : word ) : word;
begin
RandomNum := Random( A );
end;
End.

rnd.vip -------------:

function randomnum(word):word; external 'C:\gal712\random\rnd.dll';
interface test_rnd;
create view;
handleevent
cminit:
{
message(randomnum(100));
abort;exit;
}
end;
end.

скачать можно здесь http://depositfiles.com/files/748418

[Den]

Den
в 2НДФЛ случайнм образом доходы заполнялись?

ага ...

[pk]

Всем спасибо, решил обойтись квазислучайным числом:
nrec записи * время сервера - константа.
С ув..