探していたら見つかりました

http://www.geocities.co.jp/SiliconValley-SanJose/2560/delphi4/pascal/index.htm

ありがとうございました