form2 avec editx et form1 avec tlistview1Résolu

Question

Bonsoir
 
sur ma form1 j'ai une tlistview1 avec 4 colonnes quand je clique sur ajouter un boutton que j ai mi a coter de ma liste il affiche une form2 avec 4 edit et un bouton valider et quand je clique sur valider j'aimerai que les info de mes edits soive dans la listview form1

Cordialement

cs_walidlam · Accepted Answer

salut!!!
mettez un BitBtn sur form2 ..
dans l'inspecteur d'objets la propriété modalresult=MrOk
sur le button de form1 coller ce code
procedure TForm1.Button1Click(Sender: TObject);
var MaList :TListItem;
begin
with FORM2  do begin
if (showmodal=mrOk) THEN BEGIN
MaList := ListView1.Items.Insert(1);
MaList.Caption :=edit1.Text;
MaList.SubItems.Add(edit2.Text);
MaList.SubItems.Add(Edit3.Text);
MaList.SubItems.Add(Edit4.Text);  end;//end if
 end; //end with
end;

@+

cs_cantador · Answer

@walidlam :

est-tu bien sûr que ton code donne le résultat escompté par eclems ?

attention à ne pas confondre vitesse et précipitation..

cantador

cs_walidlam · Answer

salut!!
@cantador

bein je suis pas sur si j'ai compris l&#8217;idée ...
mais ce code est un petit exemple pour débuter 
c'est lui qui va optimisé le code selon ses besoins je pense 


@+

eclems · Answer

Bonjour

Merci "walidlam" pour ce bout de code c'est tout à fait ce dont j'avais besoin maintenant reste plus qu'à ladapter plus apronfondit 


Cordialement

cs_walidlam · Answer

salut!!


 j'espère avoir pu t'aider, n'hésites pas dans le cas contraire 
bon courage 
bon continuation

@+

Form2 avec editx et form1 avec tlistview1

5 réponses

Votre réponse

Discussions similaires