![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Не понятно почему из TMemo в function появляются пустые строки [D5]
vlgrig1961 © (2004-05-14 08:35:00)Такой глюк ??? У меня Oracle 8.0.5 и Delphi 5
в Memo или RichEdit ввожу скрипт функции или процедуры
типа
create or replace
procedure tt1
(p1 OUT NUMBER0
is
begin
p1:=10;
end;
потом переношу текст из Мемо в Query.SQL и делаю
Query.ExecSQL и у меня в базу записывается после каждой
строчки скрипта пустая строка.
программный код
var SQLScript: TQuery;
reScript: TRichEdit;
SQLScript.SQL.Clear;
SQLScript.SQL.Text:='';
SQLScript.SQL.Add(reScript.Text);
SQLScript.ExecSQL;
при наборе любого текста в Memo, Query после каждой
строчки вставляет пустую строку (#13#10)
Если считываю из базы созданную ранее оракловскими способами
любую процедурку, и записываю ее обратно, то все нормально,
а если набираю сам или загружаю из файла
(reScript.Lines.LoadFromFile('ff.txt')),
то такая получается неприятность?
Почему, может кто подскажет?
Заранее спасибо
Anatoly Podgoretsky (2004-05-14 08:48:00) [1]SQLScript.SQL.Text := reScript.Text;