![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
В таблице столбец [RW_ReceivedData].[LogicalName]
Имеет вот такие данные 0x0001600502FF,0x0001600602FF. В DBGridEh они не отображаются правильно. Как вывести верные данные + ещё выполнить поиск, используя 0x0001600502FF,0x0001600602FF Последний раз редактировалось yuoras, 04.01.2015 в 15:18. |
|
#2
|
||||
|
||||
|
Видимо преобразовать в строку, используя вычисляемое поле.
|
|
#3
|
|||
|
|||
|
Был бы ,Вам очень благодарен за пример
|
|
#4
|
|||
|
|||
|
Мысли есть , не хватает знаний
Последний раз редактировалось yuoras, 05.01.2015 в 17:50. |
|
#5
|
||||
|
||||
|
IntToHex в цикле по количеству байт в поле
|
| Этот пользователь сказал Спасибо NumLock за это полезное сообщение: | ||
yuoras (05.01.2015)
| ||
|
#6
|
|||
|
|||
|
Спасибо , нет знаний на такие процедуры.
Может на примеры натолкнёте ?, буду по аналогии разбираться |
|
#7
|
||||
|
||||
|
Вообще все это примерно так выглядит:
Код:
procedure TForm28.Button1Click(Sender: TObject);
Var
B: TBytes;
i: Integer;
begin
SetLength(B, 6);
for i := 0 to Length(B) - 1
do B[i] := Random(255);
ClientDataSet1.Append;
ClientDataSet1.FieldByName('Data').AsBytes := B;
ClientDataSet1.Post;
end;
procedure TForm28.ClientDataSet1CalcFields(DataSet: TDataSet);
Var
B: TBytes;
S: String;
i: Integer;
begin
B := DataSet.FieldByName('Data').AsBytes;
S := '';
for i := 0 to Length(B) - 1
do S := S + IntToHex(B[i], 2);
DataSet.FieldByName('Res').AsString := S;
end;Последний раз редактировалось Страдалецъ, 06.01.2015 в 01:55. |
|
#8
|
|||
|
|||
|
Спасибо за помощь.
Тип колонки в MSSQL 2005 (binary(6)Не NULL) [LogicalName] в базе штук шесть всего, это своеобразный идентификатор (классификатор)определённых параметров Последний раз редактировалось yuoras, 06.01.2015 в 10:57. |