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

Вниз

GetCurrentRecord(PChar), обратное преобразование   Найти похожие ветки 

 
XAdmin   (2005-01-09 10:01) [0]

Есть данные в виде Pchar полученные с помощью метода GetCurrentRecord (возвращает запись целиком).
var
 P: PChar;
begin
 GetMem(P, FIBDataSet.RecordSize);
 FIBDataSet.GetCurrentRecord(P)

Как из переменной P выделить конкретные поля?


 
sniknik ©   (2005-01-09 12:28) [1]

элементарно... расчитываеш по размерам полей до записи начало поля и копируеш кусок равный размеру поля, преобразовываеш к нужному типу (если есть нужда)... обламываешся с полями типа текст, блов, и  аналогичными. ;о)) бо нет в них данных, в рекордсете.
копируеш (выделяеш) так move(P[расчитаная точка начала записи], буфер приемник, размер записи)
в общем все так же как и сам копмонент делает.

чем не подходит fieldbyname(?)/fields[?] ???


 
DSKalugin ©   (2005-01-10 15:14) [2]

Все гениальное просто

var Nafiga: Variant;
  fi,fc:Byte;
begin
fc:=Table666.FieldCount-1;
//объявляю переменную для хранения значений полей записи
Nafiga:=VarArrayCreate([0,fc], varVariant);
//копирую запись в переменную
for fi:=0 to fc do Nafiga[fi]:=Table666.fields[fi].Value;
//обратное действие
Table666.Insert/Edit;
for fi:=0 to fc do Table666.fields[fi].Value:=Nafiga[fi];
Table666.Post;
end;



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

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

Наверх




Память: 0.47 MB
Время: 0.026 c
4-1103276228
pavel_guzhanov
2004-12-17 12:37
2005.02.06
Удаление записи в реестре удаленного компьютера


1-1106271780
Viktop
2005-01-21 04:43
2005.02.06
Кодировка?


3-1103900005
qmikle
2004-12-24 17:53
2005.02.06
копирование *.gdb по алиасу BDE


14-1105709784
*Pavel
2005-01-14 16:36
2005.02.06
Из "Искры" возгорелось пламя :(


14-1105705208
Ega23
2005-01-14 15:20
2005.02.06
Пятничные задачки