Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

stringlist и создание модальной формы [D6, Win2k]

denis24 © (2005-02-25 15:59:00)
Уважаемые мастера ,подскажите кто знает..
В событии на жития кнопки создаю стринглист
Потом забиваю его.
Затем создаю модальную форму через свой конструктов ,в котором передаю этой форме значения этого стринглист.
Потом пытаюсь уничтожить его и выдает acces violation
procedure Tform1.BitBtnF2Click(Sender: TObject); . try temp_list:=Tstringlist.create; . . form2:=Tform2.Create1(self,temp_list); try form2.ShowModal; finally form2.Free; end; finally temp_list.free; end;
Ниже конструктор form2
constructor Tform2.Create1(aOwner: TComponent;const words:StringList); begin inherited Create(AOwner); words1:=TStringList.Create; words1:=words; end;

denis24 (2005-02-25 16:36:00) [1]
Да телепортируем.
words1.assign(words);
помогло
спасибо

denis24 (2005-02-25 16:33:00) [2]
Да телепортируем.
words1.assign(words);
помогло
спасибо

Александр Иванов (2005-02-25 16:28:00) [3]
reonid © (25.02.05 16:25) [6]
Я пытался указать на неточность, которую видно, а что у автора происходит за кадром один аллах знает :)

reonid (2005-02-25 16:25:00) [4]
2Александр Иванов © (25.02.05 16:17) [4]
В этом случае нужно НЕ уничтожать words1 в
деструкторе Tform2, что автор, по всей видимости, делает.

icWasya (2005-02-25 16:23:00) [5]
опять телепатируем!! может имелось ввиду это
constructor Tform2.Create1(aOwner: TComponent;const words:StringList); begin inherited Create(AOwner); words1:=TStringList.Create; words1.assign(words);end;//!!!!!!!!

и вообще - указывайте где и как объявлены переменные/процедуры, используемые в примере и чего ожидаете от Вашего кода.

Александр Иванов (2005-02-25 16:17:00) [6]
words1:=TStringList.Create;
Это лишнее

denis24 (2005-02-25 16:12:00) [7]
. . var form2: Tform2; words1:TStringList; implementation . .

Anatoly Podgoretsky (2005-02-25 16:12:00) [8]
Ошибся (можно предположить, что это TStringList - хотя это только предположение, на уровне гадания), но здесь только одна ошибка, утечка памяти. А ошибки в коде связанной с порчей или уничтожением нет.

Anatoly Podgoretsky (2005-02-25 16:04:00) [9]
words1 такого нет в Дельфи!

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »