Как написать функцию возвращающую список строк -TWideStrings?
qpuSkl.SQL := MakeTerrSQL(qpuSkl.SQL);
------------------------------------------------------------
function MakeTerrSQL(var SQL:TWideStrings): TWideStrings;
begin
SQL.Clear;
SQL.Add('SELECT ....;');
Result := SQL;
end;
-------------------------------------------------------------
Компилятор ругается , грит нефиг пихать вар-параметр как константу!
Подскажите плз люди добры кок побороть сию напасть! ОЧЕНЬ надо!
|