Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.01.08;
Скачать: CL | DM;

Вниз

А как сделать Locate по полю типа GUID?   Найти похожие ветки 

 
Ega23 ©   (2005-11-14 16:55) [0]

сабж.


 
ANB ©   (2005-11-14 17:03) [1]

В одаке (оракл) можно. А что - не работает ?


 
Ega23 ©   (2005-11-14 17:11) [2]


> В одаке (оракл) можно. А что - не работает ?


Не, ты не понял. TdataSet.Locate. У меня ключевое поле - GUID.


procedure RefreshData;
var
dt:TDateTime;
begin
 With aqEventProto do
  begin
   dt:=FieldByName("DatIn").AsDateTime;
   DisableControls;
   Close;
   Open;
   Locate("DatIn", Dt, []);
   EnableControls;
  end;
end;


Сейчас спозиционировался по временному полю. Хотя это не есть правильно, ключевое поле - GUID.


 
stone ©   (2005-11-14 17:56) [3]

Почему нет?

procedure TForm1.Button1Click(Sender: TObject);
var
 MyGUID: Variant;
begin
 with ADOTable1 do
 begin
   MyGUID := FieldByName("MyID").Value;
   Close;
   Open;
   Locate("MyID", MyGUID, []);
 end;
end;


 
stone ©   (2005-11-14 17:59) [4]

таблица

CREATE TABLE [TestGUID] (
[myID] [uniqueidentifier] NOT NULL ,
CONSTRAINT [PK_TestGUID] PRIMARY KEY  CLUSTERED
(
 [myID]
)  ON [PRIMARY]
) ON [PRIMARY]
GO


 
Ega23 ©   (2005-11-14 18:17) [5]


> var
>  MyGUID: Variant;


Тьфу ты, блин!
Не подумал.
Спасибо!



Страницы: 1 вся ветка

Текущий архив: 2006.01.08;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.019 c
2-1135013622
I am
2005-12-19 20:33
2006.01.08
Чтение шрифтов


2-1135237256
oleggar
2005-12-22 10:40
2006.01.08
время


5-1120815943
hair
2005-07-08 13:45
2006.01.08
иерархический dbgrid


2-1134849282
pathfinder
2005-12-17 22:54
2006.01.08
Проблема с TThread...


2-1134854507
Костя
2005-12-18 00:21
2006.01.08
Автозагрузка