Discussion :

[PDelph7]

bonjours

Je veut editer dans les cellules d'une listview ( lorsque je clique avec la souris sur une cellule ,je veut que cette derniere me donne la main d'enter mes données dedons) comment je peut le faire

merci

[aityahia]

j'ai réussi a te faire sa c'est pas parfait mais sa marche.

tu insert dans une fenêtre une liste Box et un TEdit invisible Tu met c'est BorderStyle a BsNone

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
16
17
18
19
20
21
22
23
24
25
26
procedure TForm1.ListBox1DblClick(Sender: TObject);
begin
if ListBox1.ItemIndex<>-1 Then
begin
 Edit1.Top:=ListBox1.Top+(ListBox1.ItemIndex*ListBox1.ItemHeight)+2;
 Edit1.Left :=ListBox1.Left+2;
 Edit1.Width := ListBox1.Width-4;
 Edit1.Text:= ListBox1.Items[ListBox1.ItemIndex];
 Edit1.Show;
end;
end;
 
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
case Key Of
 VK_RETURN :Begin ListBox1.Items[ListBox1.ItemIndex]:=EDit1.Text;Edit1.Hide end;
 VK_ESCAPE :Begin Edit1.Hide end;
 
end;
end;
 
procedure TForm1.Edit1Exit(Sender: TObject);
begin
Edit1.Hide;
end;

Pièce jointe 15181

[PDelph7]

Bonjour
merci pour ta rédaction mais ce que je veut moi c'est d'editer dans les colonne des listView (Mode report) pas listBox

merci

[aityahia]

désolé j'ai mal lit votre post , dans la liste view la fonction est prise en charge par ce dernier un simple double clique sur l'item
.

[PDelph7]

merci
...desolé pour ce retard de consultation .
mais ce que tu ma donnée est valable pour la premiere colonne (par defaut avec double clique) ;alors que mon probleme c'est d'editer les autres clonnes

merci

[aityahia]

comme vos colonne reste défini c'est tous a a fais possible soit en affichant une fenêtre avec le détails en showmodal ou on suivant le même principe que j'ai utilisé pour le TlistBox.