Ok Merci ! Mais sa ne marche pas avec le "Selected" et avec le "Itemindex".
Regarder ce code... :
begin
If View.Items = 'Sons' then
begin
Form10.Tables.Activepage := Form10.TabSheet1;
end;
Voicei l'erreur :
[Erreur] Options.pas(49): Types incompatibles : 'String' et 'TTreeNodes'
ALors le code d'après moi serait bon mais il doit manquer quelque chose pour le completer ... mais quoi je ne sais pas.
Merci
:)
MAsterC :)