>>577
http://hp.vector.co.jp/authors/VA009712/take/delphi/kabedel.htm

にて、

Value := lstrcmp(PChar(TListItem(Item1).Caption),
PChar(TListItem(Item2).Caption));

なぜキャスト？