Сообщение от archerix
Здравствуйте, народ
Долго бился , потом пришла в голову интересная мысль, попробовал... В общем, удивлен. Пример из хэлпа к МП:
Example
var time: integer;
text: string;
begin
time := GetCurrentTime;
text := 'Current time is ' + GetHour(time);
text := text + ':'+ GetMinute(time);
text := text + ':' + GetSecond(time);
DrawText(text, 0, 0);
Repaint;
Delay(1000); { wait 1 second before MIDlet terminates }
end.
Не работает, все время выкидывает ошибку несоответствия типов... Смотрел на него, смотрел, потом задался вопросом - чего это полное время целого типа, а часы или минуты - строка? Объявил все целым, ошибки перестало выкидывать. Что это, опечатка в хэлпе или какой глюк, никто не сталкивался?
|
function GetHour(time: integer): integer;
function GetMinute(time: integer): integer;
function GetSecond(time: integer): integer;
как видим в хелпе написано что возвращает целый тип! а
text := text + ':'+ GetMinute(time); - противоречит !
Получается или неправильно описана функция или хелп не так сделан!
...немного протестив увидел что и пример из хелпа и сови тесты показали одно что функция возвращает и целое значение и строку
Вот пример:
DrawText(Integertostring(GetSecond(time)), 0, 50); - работает
DrawText(''+ GetSecond(time), 0, 50); - тоже работает!
!!!! НО !!! DrawText(GetSecond(time), 0, 50); - Не пройдет!
так что дерзайте, чуствую таких "приколов" еще много! ИМХО...