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

Функции и процедуры с использыванием методов объектов   Найти похожие ветки 

← →
SER ©   (2002-03-01 02:43) [0]

Вопрос конечно ламерский, но помогите плиззз.
Как написать функцию, которая в своем теле использует фуикции и процедуры объекта.
Ну например... Есть несколько Edit-тов на форме. Нужно скопировать текст из них но не полностью, а произвольно несколько символов. Нужно, чтобы функция работала для любого Edit... Не писать же по 3-4 строчки для кождого, если их 10-30 штук.
Спасибо за внимание.

---

← →
[NIKEL] ©   (2002-03-01 05:34) [1]

пиши функцию в параметр которой предаётся Sender или имя объекта
и обробатывай

---

← →
Mike_Goblin ©   (2002-03-01 09:46) [2]

procedure GetText(Src:TEdit; Dest:TEdit; Index,Len:integer)
begin
Dest.Text:=Copy(Src.Text, Index, Len);
end;

---

← →
Sasha9 ©   (2002-03-01 11:24) [3]

2Mike_Goblin
только если в Scr и Dest передаётся компонент, созданный в рантайм, желательно проверить их на nil

---

← →
SER ©   (2002-03-02 00:16) [4]

Спасибо всем!

---

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

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



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