Моторокер
|
 Posted: Mon Mar 13, 2006 11:29 Post subject: |
 |
|
| Quote: | это же всё в цикле делается
Ничево подобного! |
Почему нет? Немного можно автоматизировать. Количество проверок будет cтолько же, сколько на форме будет компонентов разных типов. Можно также сделать цикл по формам.
| Code: | for i:= 0 to ComponentCount-1 do begin
if Components[i] is TButton then
(Components[i] as TButton).Caption:= ini.ReadString(Form1.Name, (Components[i] as TButton).Name, (Components[i] as TButton).Caption);
end; |
ini файл
| Code: | [Form1]
Button1=Текст 1
Button2=Текст 2
Button3=Текст 3 |
Как вариант для большей наглядности ini файла:
| Code: | for i:= 0 to ComponentCount-1 do begin
if Components[i] is TButton then
(Components[i] as TButton).Caption:= ini.ReadString(Form1.Name, (Components[i] as TButton).Name + '.Caption', (Components[i] as TButton).Caption);
end; |
|
|
Rules
Search
FAQ
Memberlist
Usergroups
Register
Profile
Log in to check your private messages
Log in
