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

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

Как грамотно написать? [D5]


De ©   (2006-05-03 15:08:00) 

Привет, All!
есть функция
function Func(sTextIn: WideString; var sTextOut: WideString): Integer;
в вызове используется так
...
Table2.Edit;
Func(Table1.FieldByName('_f1').AsString, Table2.FieldByName('_f1').AsString);
...

при этом выдает ошибку
Types of actual and formal var parameters must be identical
как грамотно сделать вызов


Плохиш   (2006-05-03 15:14:00) [1]


var tmp: WideString;
...
tmp := Table1.FieldByName('_f1').AsString;
Func(tmp, tmp);
Table2.Edit;
Table2.FieldByName('_f1').AsString := tmp;
...


balepa   (2006-05-03 15:11:00) [2]

function Func(sTextIn: WideString): sTextOut: WideString

Table2.FieldByName('_f1').asString = Func(Table1.FieldByName('_f1').asString)


Наверх

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