исходный код DecodeDate

[VirtUX]

Где можно найти исходный код процедуры DecodeDate и других из SysUtils?

[FeodoR]

Исходник для DecodeDate живет в /usr/share/fpcsrc/rtl/objpas/sysutils/dati.inc
В этом же каталоге много включаемых файлов для sysutils, короче говоря, надо искать в том районе.

[Maxizar]

Именно этой процедуры находится в модуле : dati.inc
Чтобы не возникало подобных воопросов в дальнейшем делаем так:
1- находим процедуру (функцию) которая нам нужна.
1.1 - тупо пишем ее название
1.2 - или находим модуль где она написана
2 - Если работаем с 1.1 то Нажимаем левый Ctrl и подводим указатель мышки (а ля гипер сслка) кликаем -> обьявление функции.
2.1 - если уже нашли обьявление то см 3.
3 - Ясно что иногда хочется позырить не тока на обьявление но и на мясо. -> ставим указатель на имя функции ->контекстное меню (права клавиша мыши) ->Найти->Перейти к процедуре.
3.1 Либо -> ставим указатель на имя функции ->Ctrl+Shift+(Стрелка вниз).

P.S Находясь уже в самой процедуре (в мясе) Ctrl+Shift+(Стрелка Вверх) Уже приведет к Обьявлению функции.
Надеюсь я вам помог, Но есть одно НО - я всегда не прав и вы не должны меня слушать

[VirtUX]

Спасибо! Я добрался до datih.inc, а вот заглянуть в dati.inc не догадался

[Vadim]

VirtUX
А Вы контекстным поиском ищите в исходниках.