Страница 1 из 1
Генератор случайных чисел?
Добавлено: 30 мар 2007, 18:42
pk
Есть ли такой оператор в "Галактике"? Хочу использовать для присвоения штрих-кодов;) Спасибо.
Добавлено: 02 апр 2007, 12:51
san
в дельфи есть, в випе похоже что нет
Добавлено: 04 апр 2007, 06:00
Alpiton
Я использовал Excel через xl-функции
Добавлено: 04 апр 2007, 09:31
Den
Была dll где то...Когда писал вывод 2НДФЛ в xml формат, там во 2-й строчке в служебной инфе в структуре записи присутствовал как раз guid.
Добавлено: 04 апр 2007, 09:59
Алексей
Den
в 2НДФЛ случайнм образом доходы заполнялись?

Добавлено: 04 апр 2007, 10:05
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
Добавлено: 04 апр 2007, 11:10
Den
Алексей писал(а):Den
в 2НДФЛ случайнм образом доходы заполнялись?


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