Текущий архив: 2005.08.28;
Скачать: CL | DM;
Вниз
SetField, AppendRecord Найти похожие ветки
← →
Ирина (2005-07-14 14:40) [0]Как с помощью функций SetField и AppendRecord переносить поля из DataSet, т.е. что надо писать в скобках??
← →
Johnmen © (2005-07-14 14:42) [1]Ну если нет букварей, то хотя бы F1 работает?
← →
Val © (2005-07-14 14:55) [2]>[1] Johnmen © (14.07.05 14:42)
тсс. сейчас модно ставить делфи без хелпа ;)
← →
Johnmen © (2005-07-14 14:58) [3]>Val © (14.07.05 14:55) [2]
:)
Я тоже заметил...
← →
Ирина (2005-07-14 15:22) [4]Спасибо за помощь!
← →
ANB © (2005-07-14 15:23) [5]
> Ирина (14.07.05 15:22) [4]
- уточни задачу. А кусок хелпа запостить недолго.
← →
Ирина (2005-07-14 15:44) [6]>ANB © (14.07.05 15:23) [5]
Необходимо из одного DataSet в другую перенести запись из нескольких полей
← →
Ирина (2005-07-14 15:45) [7]>запись из нескольких полей
...состоящая из нескольких полей
← →
ANB © (2005-07-14 16:46) [8]procedure TForm2.Button1Click(Sender: TObject);
var i, n;
begin
// Не забыть, что DataSetTo должен быть открыт (Open) или открыть его здесь
n := DataSetTo.FieldCount - 1;
DataSetFrom.First; // Или Open, если он закрыт.
while (not DataSetFrom.Eof) do begin
DataSetTo.Append;
for i := 0 to n do begin
DataSetTo.FieldByName(DataSetFrom.Fields[i].FieldName).AsString
:= DataSetFrom.Fields[i].AsString;
end;
DataSetTo.Post;
DataSetFrom.Next;
end;
// Здесь можно заклозить все дейтасеты, если надо
end;
Страницы: 1 вся ветка
Текущий архив: 2005.08.28;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.041 c
