Прикрепить файл проекта к БД

[Ernest027]

Собственно вопрос как это сделать? БД в sql server. Знаю что для этого используется поле blob. Хочу попробовать сделать автообновление проекта таким образом. Это возможно? И как осуществить?
Спасибо.

[Аватар]

Автообновление проекта - чего это? Да еще используя blob поле. Ноу-хау, не иначе

[Ernest027]

Бред да? А как сделать автообновление? Ну я чтонибудь изменил в проекте,а пользователь зашел в проект и пошла проверка на более позднюю версию и если такая есть скачал ее автоматом. Только не через инет. Возможно такое?

[Stilet]

Возможно такое?

В базу пихать не надо. Для обновок обычно организовывают отдельный комп-сервер. У него есть либо расшаренная папка с обновками либо сервер с прослушиванием сети. Вопрос в том как ты обновки будешь складывать. БД этим лучше не напрягать.

[phomm]

У нас была такая штука - маленькая прожка, на которую вёл ярлык на рабстоле юзера, при запуске с такого ярлыка (без параметром ком. строки) она коннектилась в базу, смотрела в таблице файлов список файлов и их мд5 хеши, по этому списку пробегалась в каталоге всей клиентской проги, в т.ч. основной экзешник , читала файлы из списка, и сравнивала хеши с теми файлами что в папке, если отличаются или отсутствуют - выгружала из базы, после чего запускала основной экзешник а сама закрывалась. При запуске с нужными параметрами ком. строки она позволяла загружать файлы в базу (обычно это делали мы сами, разрабы), чтобы все юзеры при след запуске обновились.

Заливать (и читать) в базу тоже несложно, для сиквела (ms sql server) мы использовали varbinary(max) поля в таблице для самих данных и по небольшой строке для имени файла (с папкой) и для хеша. Из дельфи кода мы вызывали серверную хранимую процедуру и в неё через AdoStoredProcedure по параметрам кидали файлы
примерно так, но это немного от другого код но делает тоже самое, только для картинок, а не файлов вообще, в аплоаде заливка выполняется для текущей (в терминах класса TMy) сторедпроцедуры Sp (в этот момент это инсертящая процедура), а в чтении датасет это тоже оное же (текущая, но уже селектящая), только кинуто параметром. Вам то достаточно будет токько работы с потоками и блобполями

procedure TMy.LoadPictureToBitmap(Bitmap: TBitmap; DataSet: TDataSet; FieldName: string);
var
  MS: TStream;
begin
  try
    MS := DataSet.CreateBlobStream(DataSet.FieldByName(FieldName), bmRead);
    Bitmap.LoadFromStream(MS);
  finally
    MS.Free;
  end;
end;

procedure TMy.UploadPicture(Bmp: TBitmap; ParamName: string);
var
  DP : TParameter;
  MS: TMemoryStream;
begin
  DP := SP.Parameters.ParamByName(ParamName);
  MS := TMemoryStream.Create;
  try
    Bmp.SaveToStream(MS);
    MS.Position := 0;
    DP.LoadFromStream(MS, ftBlob);
  finally
    MS.Free();
  end;
end;

[Ernest027]

Просто я думал закидывать проект в базу,а в соседнем поле писать номер версии. При запуске проги шла бы проверка на обновление.