Re: TZF - Tz-Grid

Hi Pierre,

procedure Form1.TzGrid1ColExit(Sender: TObject);
var  where : integer;
begin
    With (sender as TTzGrid) do begin
      where := tzgrid1.SelectedIndex;
      case where of
        1 : {column 1}
        2 : {column 2}
       {etc}
      end;
    end;
end;

Hope this helps,
Marie

Pierre Wittwer wrote:
> Hi Topaz-Users
> 
> I am using Delphi 3 and Topaz 7.51
> 
> I am using a TzGrid . I want to check the input of the cells in the column
> 1.  I can use TzGridColExit - Event. But how can I know, which column I am
> leaving, when I have different columns.
> 
> Using the Event TzGrid1DrawColumnCell there are different possibilities to
> check the colums and cells, e.g.
> 
> With (sender as TTzGrid) do begin
>     if (DataCol MOD 2)=0 then begin
>       ShowMessage('test');
>    end;
> end;
> 
> Is there a similar possibility for TzGridColExit ?
> 
> Thanks for help
> 
> Pierre Wittwer
> 6370 Stans
> Switzerland

--^----------------------------------------------------------------
This email was sent to: [email protected]

EASY UNSUBSCRIBE click here: http://topica.com/u/?clvXPN.a5kvff.Z2NsZHQt
Or send an email to: [email protected]

TOPICA - Start your own email discussion group. FREE!
http://www.topica.com/partner/tag02/create/index2.html
--^----------------------------------------------------------------