![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Из Delphi создаю Access файл, создаю в нем таблицу с Blob (Ole) полем и пытаюсь положить в это поле файлы. Но все они обрезаются до 32 kb. Как установить нужный размер поля?
Вот на всякий случай используемый код: var DBEngine, Workspace: Variant; db, td, recordset, recordset_f: Variant; const dbLangGeneral = ';LANGID=0x0409;CP=1252;COUNTRY=0'; begin DBEngine := CreateOleObject('DAO.DBEngine.36'); Workspace := DBEngine.Workspaces[0]; Workspace.CreateDatabase('test', dbLangGeneral, EmptyParam); db := DBEngine.OpenDatabase('test'); td := db.CreateTableDef('tbl1', 0, '', ''); td.Fields.Append(td.CreateField('fld1',arrMDBTypes [ftBlob])); .... |