Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];




Вниз

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


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]

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




Форум: "Основная";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.03.18;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.029 c
1-57379           Kozhanov              2002-03-01 11:44  2002.03.18  
Про Handle...


14-57491          Igor_thief            2002-01-30 16:50  2002.03.18  
Компоненты


3-57304           Стас                  2002-02-19 11:42  2002.03.18  
Btrieve+Delphi


1-57378           ruslan_as             2002-03-01 13:52  2002.03.18  
Проверка на корректный ввод чисел


3-57334           AlexOb                2002-02-19 12:02  2002.03.18  
Как конвертнуть Paradox -> MySQL ?