Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

"incompatible types" message on StringGrid1DrawCell event

42 views
Skip to first unread message

Dmitry Stoukov

unread,
Aug 24, 1999, 3:00:00 AM8/24/99
to
I've got this error message on this code :

procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;
Rect: TRect; State: TGridDrawState);

begin
If (State = gdSelected) then ...


end;

Why ?


Yorai Aminov (TeamB)

unread,
Aug 24, 1999, 3:00:00 AM8/24/99
to
On Tue, 24 Aug 1999 12:53:00 +1000, "Dmitry Stoukov"
<d.st...@anprod.csiro.au> wrote:

> If (State = gdSelected) then ...

TGridDrawState is a set. To test for the dgSelected state, use the in
operator:

if gdSelected in State then ...

---
Yorai Aminov (TeamB)
http://ourworld.compuserve.com/homepages/yaminov
(TeamB cannot answer questions received via email.
To contact me for any other reason remove nospam from my address)

0 new messages