Цитата:
Сообщение от
RedFox
А можете тогда пример работы привести?
Загонять в блоб, код размещается в событие контрола
Код:
IF FieldName.IMPORT('', TRUE) = '' THEN
EXIT;
IF FieldName.HASVALUE THEN
IF NOT CONFIRM(Text001, TRUE, FIELDCAPTION(FieldName)) THEN
EXIT;
CurrForm.SAVERECORD;
Выгрузка из blob
Код:
IF COPYSTR(Path, STRLEN(Path), 1) <> '\' THEN
Path := Path + '\';
FileName:='FileName';
TableName.CALCFIELDS(FieldName);
IF (TableName.FieldName.HASVALUE) AND (STRLEN(Path)>0) THEN BEGIN
PathFileName:=TableName.FieldName.EXPORT(Path+FileName);