Problème de Focus

Version imprimable

14/09/2005, 11h25
Charette

Problème de Focus

Bonjour,

j'ai une question toute bête.

J'ai un TTreeview et un TlistView. Mon TTreeview a le focus, et je cherche a le donner à mon TListview.

J'ai essayé SetFocus mais ca ne marche pas quelqu'un a une idée??

Merci
14/09/2005, 11h28
eponette

Où fais-tu le setFocus? Quand veux-tu qu'il ait le focus?

Je vous met le code le but est de sélectionné un élement.

Code:

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
procedure TF_Details_Dossier.SelectionDoc(CleDoc: integer);
var
  Item : TListItem;
begin
  LV_Documents.SetFocus;
  if LV_Documents.Items.Count <> 0 then
  begin
  //----------------------------------------------------------------------------//
  //**********************Sélection du 1er élément de la liste******************//
  //----------------------------------------------------------------------------//
    if LV_Documents.ViewStyle = vsReport then Item := LV_Documents.TopItem
    else Item := LV_Documents.GetNextItem(LV_Documents.TopItem,sdAll,[isNone]);
  //----------------------------------------------------------------------------//
  //***********Boucle permettant de chercher l'élement**************************//
  //----------------------------------------------------------------------------//
    while Item <> nil do
    begin
      //On regarde si la clé doc est la bonne
      if Item.SubItems.Strings[5] <> '' then
      begin
        if StrToInt(Item.SubItems.Strings[5]) = CleDoc then
        begin
          LV_Documents.Selected := Item;
          break;
        end;
      end;
      Item := LV_Documents.GetNextItem(Item,sdAll,[isNone]);
    end;
  end;
end;

14/09/2005, 11h45
Pedro

Salut :D
C'est bizarre ton truc ça devrait marcher...
Tu n'as pas un traitement particulier lorsque le ListView prend le focus (OnSelectItem par exemple) qui modifierait le TTreeView ou lui rendrait le focus d'une façon ou d'une autre?
14/09/2005, 11h54
Charette

Non je n'ai rien de cela.

Quand je fais le SetFocus cela me genère une exception.
Impossible de focaliser une fenêtre désactivée ou invisible

Je le fait avant de faire un ShowModal donc le problème doit venir de la

:oops:
14/09/2005, 11h59
Charette

Ca venait effectivement de la.
J'ai donc fait un Show avant et un Hide apres
Merci pour les réponse
14/09/2005, 12h00
Pedro

Ah ben dasn ces cas-là (je veux dire: avec toutes les explications) c'est tout à fait normal... Un objet invisible ne peut pas recevoir le focus... Il faut que tu te débrouilles avec le OnShow de la fiche que tu montres...
14/09/2005, 23h18
Nono40

Il faut utiliser la propriété ActiveControl de la fiche pour définir le focus avant l'affichage de la fiche.