TIcon同士の比較をするには？

ぱん 2005-07-19 08:44:01 No: 16423

Ticon同士で、データがおなじかどうかを比較する方法を探しています。

if iconA = iconB then beep;

このような感じです。色々とやってみても、うまく比較できませんでした。
どうぞ宜しくお願いします。

平蔵 2005-07-19 17:58:36 No: 16424

var
iconA:TIcon;
finfo:TSHFileInfo;
だとして、
iconA := TIcon.Create;
ShGetFileInfoでアイコンを取得してから
iconA.Handle := finfo.hIcon;
なら比較することができます。

もしかして 2005-07-19 18:27:49 No: 16425

if iconA.handle = iconB.handle then beep;
ならどうなんでしょう？