Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.11;
Скачать: CL | DM;

Вниз

TsqlDataSet +Dbexpress+Mysql   Найти похожие ветки 

 
совсем чайник   (2007-02-20 14:28) [0]

Здравствуйте проблема в следующем:
использую TSqlDataset, по параметрам настроен он правильно, т.е. поля в таблице конкретной он "видит". Но после попытки применить к нему метод edit. Он пишет ошибку "Cannot modify a read-only dataset" вот собственно и вопрос что необходимо сделать, чтобы dataset стал не read only ?


 
Reindeer Moss Eater ©   (2007-02-20 15:09) [1]

There is no built-in editing support: you can only edit the data in an SQL dataset by explicitly creating an SQL UPDATE command or by connecting the dataset to a client dataset using a provider.


 
совсем чайник   (2007-02-20 15:13) [2]

Понял, извините что сразу не уточнил в справочной информации (
тогда второй вопрос:
необходимо вставить картинку в blob поле, действую следующим образом:
if rra.image<>"" then
 begin
   fproc.q1.ParamByName("paramblob").DataType := ftBlob;
   fproc.Q1.ParamByName("paramblob").ParamType := ptInput;
   fproc.Q1.ParamByName("paramblob").LoadFromFile(rra.image,ftBlob);
   fproc.q1.SQL.Text:=fproc.q1.SQL.Text+",sepcimage="":paramblob""";
 end;
try
 fproc.q1.ExecSQL(true);
 result:=0;
except
 result:=1;

При execsql выдается ошибка, что нет параметра "paramblob" , хотя параметр с этим названием создавался в disign-time  и он абсолютно точно есть, вот собственно доказательство:
 object q1: TSQLQuery
   MaxBlobSize = -1
   Params = <
     item
       DataType = ftBlob
       Name = "paramblob"
       ParamType = ptInput
     end>


 
Reindeer Moss Eater ©   (2007-02-20 15:19) [3]

ParamCheck property (TCustomSQLDataSet)

Specifies whether the parameter list for an SQL dataset is regenerated when the SQL command changes.


 
совсем чайник   (2007-02-20 15:30) [4]

Понял, переделал, теперь верно?

if rra.image<>"" then
 begin
   fproc.q1.SQL.Text:=fproc.q1.SQL.Text+",sepcimage="":paramblob""";
   p:=tparam.Create(nil);
   p.Name:="paramblob";
   fproc.q1.Params.AddParam(p);
   fproc.q1.ParamByName("paramblob").DataType := ftBlob;
   fproc.Q1.ParamByName("paramblob").ParamType := ptInput;
   fproc.Q1.ParamByName("paramblob").LoadFromFile(rra.image,ftBlob);
 end;
try
 fproc.q1.ExecSQL(true);
 result:=0;
except
 result:=1;



Страницы: 1 вся ветка

Текущий архив: 2007.03.11;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.04 c
15-1171562699
default
2007-02-15 21:04
2007.03.11
Кто писал программы наподобие ERwin и Rational Rose


11-1150184429
DevilDevil
2006-06-13 11:40
2007.03.11
эквивалент SpinEdit? Key preview?


15-1170945949
Галинка
2007-02-08 17:45
2007.03.11
HELP!!! Кто-то шарит в CATIA V5


15-1171263289
Kolan
2007-02-12 09:54
2007.03.11
Ого, бизнес линч работает однако :)


2-1171623868
vegarulez
2007-02-16 14:04
2007.03.11
Подскажите как серийник с винта считать...