| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Объектное ориентирование [D7, XP]
kop © (2005-11-23 13:11:00)Создаю в отдельном юните функцию заполнения Edit. Затем хочу вызвать ее на двух различных формах - прога вылетает!!! Неужели мне надо создавать две одинаковые функции для заполнения Edit'ов разных форм??
Digitman (2005-11-23 14:10:00) [21]
> kop (23.11.05 14:00) [9]
и долго ты еще из пустого в порожнее переливать будешь ?
от тебя требуется КОД !
тот самый, в котором ты самразобраться не можешь, и по поводу которого ты тут хнычешь ..
Думкин (2005-11-23 14:08:00) [22]> kop (23.11.05 14:00) [9]
Ты говоришь, что вылетает. Заставить прогу вылетать - не так просто. Поведай все-таки, как ты дошел до жизни такой.
А если будешь продолжать наставать на телепатировании - то ...сам подумай.
Tonich (2005-11-23 14:06:00) [23]ну вот то о чем я говорил тебе впринципе написали в [8]
осталось только оформить это в отдельную процедуру и все ))
да и если я тебе правильно понял то в каждый эдит идет свой текст ? тохда для определения какой именно эдит сейчас будит заполняться , можно использовать его имя или свойство Tagвот
kop (2005-11-23 14:00:00) [24]
> и для начала бы, ты сказал точно что тебе надо, а то в каждом
> посте всплывают какие то новости
Я разрабатываю Электронный экзаменатор на основе XML-документа. Там вообщем много чего есть, долго описывать...То про что я говорю: есть форма с эдитами и чекбоксами, на нее накладываются вопросы и ответы из XML. При их изменении вызываю функцию Wite. Когда мне надо создать новый вопрос (т.е. вопрос и ответы), я открываю другую форму с тем же количеством эдитов и боксов, заполняю необходимое их количество и выхожу, причем функция опять же Write по логике должна записывать содержимое нового вопроса в XML. Вот про что я
Ega23 (2005-11-23 13:52:00) [25]
procedure SetEditText(aEdit:TEdit);
begin
aEdit.Text:='sjdgfknsrkg[pcvmk[bok';
end;
procedure TForm1.Button1Click(Sender : TObject)
var
i:Integer;
begin
for i:=0 to ComponentCount-1 do
if (Components[i] is TEdit) then SetEditText(TEdit(Components[i]));
end;
?
Digitman (2005-11-23 13:30:00) [26]
> Создаю в отдельном юните функцию заполнения Edit.
вот и давай приводи сюда эту самую ф-цию !!!
Tonich (2005-11-23 13:29:00) [27]ну хорошо , передавай тогда как параметр указатель на форму, а потом просто пробегайся по компонентам этой формы, проверяя в это в ремя что за компонент, если это эдит значить заполнять так.. если это бокс значить иначе...
и для начала бы, ты сказал точно что тебе надо, а то в каждом посте всплывают какие то новости
clickmaker (2005-11-23 13:28:00) [28]
> на двух разных формах 7(!!)эдитов и 7 checkbox'ов?? получается
> будет 14 переменных?
не-а. 28, раз 2 формы
kop (2005-11-23 13:26:00) [29]
> так блин передавай в функцию как парамерт тот эдит который
> ты хочешь заполнить
а если мне надо этой функцией заполнять на двух разных формах 7(!!)эдитов и 7 checkbox'ов?? получается будет 14 переменных?
Думкин (2005-11-23 13:25:00) [30]17 строка.
Tonich (2005-11-23 13:20:00) [31]так блин передавай в функцию как парамерт тот эдит который ты хочешь заполнить
???????
clickmaker (2005-11-23 13:14:00) [32]
> Неужели мне надо создавать две одинаковые функции для заполнения
> Edit'ов разных форм??
ну канешна. А кому щас лехко?
| |
Страницы: 