Discussion :

[Konutse k. Mawuko]

Salut
J'utilise Oracle 9i et D7.
J' aimerais récuperer le numero de chaque enrégistrement.J'ai essayé cette méthode :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
procedure TFrm_Agence.DBGrid1DrawColumnCell(Sender: TObject;
          const Rect: TRect; DataCol: Integer; Column: TColumn;
          State: TGridDrawState);
var grille:tdbgrid;
    i :integer;
begin
  grille:= (sender as tdbgrid);
  if  (grille.DataSource.DataSet.RecNo mod 2) =0 then
      grille.Canvas.Brush.Color := clskyblue
  else grille.Canvas.Brush.Color:= clwhite;
  if state = [gdfocused] then
     grille.DefaultDrawColumnCell(rect,datacol,column,state);
 
end;

Mais à chaque fois qu'il exite un enrégistrement,il me transmet -1 et 0 s'il en exite pas. Que faire?

[anapurna]

salut

le recno n'est pas implemente pour un tdataset

@+ Phil