Тема
:
Changing Objects on the Fly (COOF)
Показать сообщение отдельно
14.03.2006, 12:17
#
35
ablievn_imported
Участник
18
/
10
(
1
)
Регистрация: 07.02.2005
таким:
WHILE (lFile.READ(lChar) > 0) DO BEGIN
lVariant := lChar;
lAdoRS.Fields.Item('BLOB').AppendChunk(lVariant);
END;
lAdoRS.Update;
ablievn_imported
Посмотреть профиль
Отправить личное сообщение для ablievn_imported
Найти ещё сообщения от ablievn_imported