Скачать: CL | DM;

Изменение свойств нескольких объектов   Найти похожие ветки 

← →
Artem Bakulin   (2002-06-11 20:29) [0]

У меня такая ситуация: мне надо при запуске программы прочитать из файла название кнопок и присвоить эти названия соответственно этим кнопкам. Дак вот вся трабла в том, что я не знаю как мне это сделать?

---

← →
alexdbases ©   (2002-06-11 22:23) [1]

Попробуй так
for i:=0 to ComponentCount-1 do
if Component[i] is TButton then
TButton(Component[i]).Caption := "Моё име";
Но этот пример переписывает все имена всех кнопок на "Моё име"...
Сам подумай как найти нужные кнопки...это просто.(Сравневая капшены кнопок и тд...).
Но это испоьзование RTTI для Д5...но должно работать.Просто этот стандарт меняеться из выпуска в выпуск Дельфей...ВСЁ.

---

← →
Новеньки в Делфи   (2002-06-11 23:44) [2]

можешь создать файл следующего типа:

имя_компонента1&значение#
имя_компонента2&значение#


затем в onActivate формы, открываешь файл, читаешь построчно, учитывая символы "&" и "#" разделяешь значения затем

findComponent(имя_компонента).его_свойство:=значение

только учти, что бы поменять некоторые свойства, нужно явно указать, какого типа является компонент с помощью "as" например
---файл---
btStart&Run#
---файл---

sName- имя компонента вырезаное из файла
sValue - значение компонента вырезаное из файла

---код---
(findComponent(sName) as TButton).caption:=sValue;
---код---

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.012 c