Discussion :

[chamamo]

j'ai une fenetre à moment donné quand je clique sur un bouton une fenetre FindDialog sort pour faire une recherche d'un mot, mais pour pouvoir voir l'emplacement du mot je doit cliquer sur la fenetre principale, j'ai deja essayer le refresh ça n'a pas marché

il n'y pas un moyen pour me basculer du FindDialog vers ma fenetre sans passer par la souris??

[DjmSoftware]

bonjour, en uilisant la méthode SetFocus du conteneur dans lequel tu recherche ton texte
exemple tiré de l'aide

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
27
28
29
30
31
32
33
34
35
36
37
38
 
void __fastcall TForm1::btn2Click(TObject *Sender)
{
    dlgFind1->Position = Point(redt1->Left + redt1->Width, redt1->Top);
    dlgFind1->Execute();
}
//---------------------------------------------------------------------------
void __fastcall TForm1::dlgFind1Find(TObject *Sender)
{
  redt1->SetFocus();
   int FoundAt, StartPos, ToEnd;
  //commence la recherche après la sélection en cours
  // s'il y en a une
  // sinon, commence au début du texte
  if (redt1->SelLength)
    StartPos = redt1->SelStart + redt1->SelLength;
  else
 
    StartPos = 0;
 
  // ToEnd indique la longueur entre StartPos
  // et la fin du texte du contrôle éditeur de texte enrichi
 
  ToEnd = redt1->Text.Length() - StartPos;
 
  FoundAt = redt1->FindText(dlgFind1->FindText, StartPos, ToEnd, TSearchTypes()<< stMatchCase);
  if (FoundAt != -1)
  {
    redt1->SelStart = FoundAt;
    redt1->SelLength = dlgFind1->FindText.Length();
  }
  else
  {
   MessageBox(Handle, "Texte non trouvé", "Avertissement", MB_OK + MB_ICONWARNING);
   dlgFind1->CloseDialog();
  }
 
}

cordialement