Bonjour,
j'ai placé un comboBox dans un BDGrid avec le code qui suit.
Ce comboBox possede 3 items (tjrs les memes).
Lorsque je clique dans une celule du DBGrid, le comboBox apparait bien mais le problème est le suivant:
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 TForm5.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); begin if (gdFocused in State) then begin with ComboBox1 do begin Left := Rect.Left + DBGrid1.Left + 1; Top := Rect.Top + DBGrid1.Top + 1; Width := Rect.Right - Rect.Left; Height := Rect.Bottom - (Rect.Top+1); Visible := True; end; end end;
Comment faire pour que après avoir cliqué sur un item du comboBox sa valeur reste dans la celule du DBGid ?
André
Partager