Не понятно почему из TMemo в function появляются пустые строки

← →
vlgrig1961 (2004-05-13 08:37) [0]

Такой глюк ??? У меня Oracle 8.0.5 и Delphi 5
в Memo или RichEdit ввожу скрипт функции или процедуры
типа create procedure AAA ....
потом переношу текст из Мемо в Query.SQL и делаю
Query.ExecSQL и у меня в базу записывается после каждой
строчки скрипта пустая строка.
Почему, может кто подскажет?
Заранее спасибо.

← →
DenK_vrtz © (2004-05-13 08:49) [1]

текст процедуры и кусок кода программы в студию

← →
vlgrig1961 (2004-05-13 14:10) [2]

процедура любая

create or replace
procedure tt1
(p1 OUT NUMBER0
is
begin
p1:=10;
end;

программный код
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")),
то такая получается неприятность?

Не понятно почему из TMemo в function появляются пустые строки Найти похожие ветки