Скачать: CL | DM;

delphi   Найти похожие ветки 

← →
lida   (2002-10-13 16:51) [0]

Помогите, пожалуйста! Пытаюсь записать из memo в поле ,объявленное Binary.
Записывает, но ругается Error creating cursor handle. Как исправить положение?
var
Form1: TForm1;
MyMemorystream: TMemoryStream;
.....
procedure TForm1.Button1Click(Sender: TObject);
begin
MyMemoryStream := TMemoryStream.Create;
Memo1.Lines.SaveToStream(MyMemoryStream);
mymemorystream.Position:=0;
mysize:=MyMemorystream.Size;
Query2.ParamByName("info").LoadFromStream(MyMemoryStream,ftTypedBinary);
MyMemoryStream.Free;
Query2.Active:=true;
end;

---

← →
passm ©   (2002-10-14 09:46) [1]

lida (13.10.02 16:51)> А текст запроса какой?

---

← →
VAleksey ©   (2002-10-14 09:57) [2]

может нужно ExecSQL ? вместо active:=true.

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.008 c