у меня задача ее суть даны данные, различных типов . string, integer, TdateTime и TAge (последний определен: TAge=0..2008)и их надо сохр, вывести и т.д.
написано не плохо все, но, при компиляции выдает ошибку:
[Error] UIsp.pas(232): Incompatible types: 'TAge' and 'TDateTime'
в процедуре ввода с клавиатуры, тут код выглядит след.образом:
...writeln('год');
readln(str);
FAge:=strtoDate(str);...
и
процедуре загрузки из файла:
result := GetStrValue(f,str);
if result then FAge := StrTodate(str);
И при этом ввод и загрузка времени типа TdateTime производится аналогично - только при помощи функции StrToTime, у которой синтаксис такой же. Описаны переменные обоих типов в программе одинаково.
Что делать помогите?!!!!!!!
помогите подправить, а не то мне кирдык!!Delphi7 OOP
все верно выдает компилятор, как TDateTime привести к TAge?
тут год только нужен и его перевести в integer
FAge:=strtoint(str);...
тут год только нужен и его перевести в integer
FAge:=strtoint(str);...