Bonjour, afin de proposer dans plusieurs langues mon appli, je charges les captions, ... depuis un fichier ini au OnCreate de chaque fiche. Je rencontre des difficultés quant aux combobox :
merci pour tout aideif FileIni.SectionExists('TComboBox')
then For i:=0 To nom_fiche.ComponentCount-1 Do
If nom_fiche.Components[i] Is TComboBox
Then begin
TComboBox(nom_fiche.Components[i]).Clear;
for j:=0 to TComboBox(nom_fiche.Components[i]).Tag-1
do TComboBox(nom_fiche.Components[i]).Items.Add(// Strings. ad :=
FileIni.ReadString('TComboBox',nom_fiche.Components[i].Name+'[j]','non traduit'));
end;
Seb
Partager