Последние записи
- Прозрачность тайлсета в TPNGImage
- Как сделать VBA макрос в excel
- Поиск по столбцу 1-ого не нулевого значения (формулой в Microsoft Office Excel)
- Простановка единиц в ячейки под объектами (Microsoft Office Excel)
- Расчет затраченного времени между определенным рабочим временем (формулой в Microsoft Office Excel)
- Мигающий экран на Assembler
- VBA-макрос по копированию 10 строчек в выбранном диапазоне в Microsoft Office Excel
- Копирование только нужного диапазона в Microsoft Office Excel
- Перенос диапазона стоки в Microsoft Office Excel на другой лист по условию
- Мелодия в Pascal.ABC.Net с помощью System.Console.Beep — задержка воспроизведения звука
4th
Дек
Создание уникального ID для записи
Posted by micher under Delphi
Может кто-то подскажет способ создания уникального номера для записи?
Человек_Борща
Как вариант, реализуйте функцию, которая сама создаст уникальный номер.
function RandomX:Cardinal;
begin
Randomize;
Result:=Random;
Sleep(1);
Randomize;
Result:=Result+Random;
end;
И далее ищите этот ID в вашей таблице, если его нет, то создаете за ним запись. Если есть, то повторяете пока не будет пусто место под запись.
Похожие статьи
