| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Нет ли у кого-нибудь примера генератора уникальных ключей? [D7, WinXP]
turonix © (2005-09-29 02:35:00)Приветствую! Нет ли у кого случайна исходников программки генератора уникальных ключей для БД? Или ссылочку киньте. Я конечно знаю что в любой СУБД есть встроенные такие генераторы, но мне нужен именно программный.
Anatoly Podgoretsky (2005-10-01 13:05:00) [1]turonix © (30.09.05 01:40) [3]
А ты термин уникальность правильно понимаешь. Любая возрастающая последовательность уникальна.
Джо (2005-10-01 04:27:00) [2]
> [6] Джо © (01.10.05 04:26)
> Размер Guid'ов - 128 байт
Пардон, бит.
Джо (2005-10-01 04:26:00) [3]
> [5] turonix © (01.10.05 01:36)
Размер Guid'ов - 128 байт. В Access для полей такого размера существует тип данных "Числовой" с размером поля "Код репликации" (Replication ID).
turonix (2005-10-01 01:36:00) [4]Попробывал функцию CoCreateGuid (Guid). Она выдала мне уникальный ключ но сразу возник вопрос что с ним делать дальше? Как его записать в Access (в поле с атрибутом первичного ключа)? Ведь это поле имеет тип Integer, а Guid это другой тип... Что делать?
GanibalLector (2005-09-30 01:47:00) [5]2 turonix © (30.09.05 01:40) [3]
> в соседней таблице такие-же значения есть!
Хм...это уже не смешно.Вы бы книжки почитали что-ли.Например,Мартина Грабера.
turonix (2005-09-30 01:40:00) [6]Джо © (29.09.05 02:43) [1]
Спасибо большое!
GanibalLector © (29.09.05 02:46) [2]
ага! и что в этом ключе будет уникального? в соседней таблице такие-же значения есть!
GanibalLector (2005-09-29 02:46:00) [7]2 Джо © (29.09.05 02:43) [1]
МолодЦА ;)
2 turonix © (29.09.05 02:35)
> случайна исходников программки генератора уникальных ключей для БД?
Есть : I:=I+1; Чем не генератор???
Джо (2005-09-29 02:43:00) [8]
uses ActiveX;
//....
procedure TForm1.Button1Click(Sender: TObject);
var
Guid: TGUID;
begin
CoCreateGuid (Guid);
ShowMessage(GUIDToString(Guid))
end;
| |
