Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Мусор в поле TEXT (Sybase) [D3, Sybase 6.0]


half_litre ©   (2004-05-14 10:00:00) 

Связка Delphi 3+BDE+ODBC+Sybase 6.0
var   PC    : PChar;
     Q     : TQuery;
 .........
 PC:=MEMO1.Lines.GetText;
 .........
 Q.SQL.Add('INSERT INTO Table1 (TEXTField)
            VALUES (:MemoValues)');
 ParamByName('MemoValues').AsString:='';
 ParamByName('MemoValues').DataType:=ftMemo;
 ParamByName('MemoValues').SetData(PC);
 .........
 В итоге в конец поле добавляется мусор (не всегда,
 закономерности не нашел). При работе с Informix такое
 прокатывало на ура.

 Может кто сталкивался. Зарание спасибо.


Курдль   (2004-05-14 10:37:00) [1]

Спасибо! В Минске хорошее пиво, но злые пограничники! :)))


half_litre   (2004-05-14 10:35:00) [2]

:))))))
Вроде работает. Курдль, в Минске тебя ждет пиво.


Курдль   (2004-05-14 10:29:00) [3]


> закономерности не нашел). При работе с Informix такое
>  прокатывало на ура.

Мне не кажется, что такой метод записи данных в базу заслуживает "Ура": ParamByName('MemoValues').SetData(PC);
А что мешает сразу писать
ParamByName('MemoValues').AsString:=MEMO1.Lines.Text;


half_litre   (2004-05-14 10:13:00) [4]

Как вариант можно и отпустить животину. :))
Но еще проще перейти на Delphi + ODBC + SQL DataBase.
И все же как бороться с мусором в данной ситуации


Курдль   (2004-05-14 10:06:00) [5]

Не знаю.
В связке Delphi 6 + SQLDirect + ODBC + Sybase 8.2 ничего подобного не наблюдалось...
Иожет не мучать животину и отказаться от BDE?


Наверх

Титульная страница Поиск, карта сайта Написать письмо