Вниз
Скачать: CL | DM;

Немогу понять с декларацией   Найти похожие ветки 

← →
Bogdan   (2005-02-21 15:29) [0]

Здравствуйте, такой вопрос: почему при деклароции функции IncDay
в разделе public. Выдает сообщение Unsatisfied forward or external declaration. Декларирую из справки Cntrl+F1.


← →
Юрий Зотов ©   (2005-02-21 15:33) [1]

> Bogdan   (21.02.05 15:29)

Метод воспринят компилятором, как регулярная процедура.
Значит, что-то пропущено в коде. А в вопросе пропущен код.


← →
Семен Сорокин ©   (2005-02-21 15:35) [2]


> Выдает сообщение Unsatisfied forward or external declaration.

Отсутствует реализация.


← →
Bogdan   (2005-02-21 15:43) [3]

public
   { Public declarations }
function IncDay(const AValue: TDateTime; const ANumberOfDays: Integer = 1): TDateTime;
 end;
...........
if  RadioButton4.Checked  then
 begin
>Юрий Зотов ©   (21.02.05 15:33) [1]
> Bogdan   (21.02.05 15:29)

Метод воспринят компилятором, как регулярная процедура.
Значит, что-то пропущено в коде. А в вопросе пропущен код.

А вот и код:
with Datamodule1.Query6 do
 begin
 close;
 m1:=StrToInt(form14.Edit2.Text);
 Dat1:=IncDay(DateTime,-m1);
 sql.Text:="select distinct* from tab1 where data between :pd1 and pd2";
 Params[0].AsDateTime:=Dat1;
 Params[1].AsDateTime:=DateTime;
 open;
 end;


← →
Amoeba ©   (2005-02-21 15:46) [4]

А методом какого класса является IncDay?


← →
begin...end ©   (2005-02-21 15:47) [5]

> Bogdan   (21.02.05 15:43) [3]

А зачем вы эту функцию объявляете? Пропишите в uses модуль DateUtils - и используйте её.


← →
Юрий Зотов ©   (2005-02-21 15:48) [6]

> Bogdan   (21.02.05 15:43) [3]

А вот это самое слово "public" - оно вообще-то к чему относится?
И где код реализации IncDay? Вызов не нужен.


← →
Digitman ©   (2005-02-21 15:55) [7]


> Bogdan   (21.02.05 15:43) [3]


> А вот и код:


Богдаша, умник ты наш, когда у тебя проблемы и от тебя требуется код для анализа твоих же проблем и рекомендаций по их устранению, твоя задача - привести полный код, а не его шматки



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.023 c
14-1108394778
QuasiLamo
2005-02-14 18:26
2005.03.06
Ко мне пришло сообщение


6-1103762014
Zelius
2004-12-23 03:33
2005.03.06
Долго обрабатывается запрос


8-1100680884
BRemB
2004-11-17 11:41
2005.03.06
Формат файла TIF


1-1108928714
ionn
2005-02-20 22:45
2005.03.06
TXMLDocument. Вылетает ошибка при завершении программы


1-1108598303
wsMaximized
2005-02-17 02:58
2005.03.06
wsMaximized




   Наверх