Discussion :

[Speed41]

Bonjour,

J'ai créé un objet contenant 3 TEdit et je voudrais en fonction de certaines actions passer d'un objet à un autre. Quand j'ai fait mes tests dans un programme j'utilisais activecontrol et ça marchait mais pas dans mon objet

Voici ce que je déclare

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
uses WinTypes, WinProcs, Messages, SysUtils, Classes, Controls,
     Forms, Graphics, Extctrls, Stdctrls;

voici un exemple de code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
procedure TForm1.jKeyDown(Sender: TObject; var Key: Word;
  Shift: TShiftState);
begin
  if (j.SelStart=length(j.Text)) and (key=39) then
     activecontrol:=m;
end;

J, M et A étant des TEdit

Voici le message d'erreur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

[Erreur] chrono_date.pas(335): Identificateur non déclaré : 'activecontrol'

Si vous avez une idée je suis preneur

Merci

[Speed41]

Il me suffitt d'utiliser la propriété TEdit.Focused ...

oups

[Speed41]

re oups SetFocus c'est vachement mieux

Quand ça ne veux pas, ça veux pas

désolé