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

stringlist и создание модальной формы   Найти похожие ветки 

← →
denis24   (2005-02-25 15:59) [0]

Уважаемые мастера ,подскажите кто знает..
В событии на жития кнопки создаю стринглист
Потом забиваю его.
Затем создаю модальную форму через свой конструктов ,в котором передаю этой форме значения этого стринглист.
Потом пытаюсь уничтожить его и выдает 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;


---

← →
Anatoly Podgoretsky ©   (2005-02-25 16:04) [1]

words1 такого нет в Дельфи!

---

← →
denis24   (2005-02-25 16:12) [2]


.
.
var
 form2: Tform2;
 words1:TStringList;
implementation
.
.


---

← →
Anatoly Podgoretsky ©   (2005-02-25 16:12) [3]

Ошибся (можно предположить, что это TStringList - хотя это только предположение, на уровне гадания), но здесь только одна ошибка, утечка памяти. А ошибки в коде связанной с порчей или уничтожением нет.

---

← →
Александр Иванов ©   (2005-02-25 16:17) [4]

words1:=TStringList.Create;
Это лишнее

---

← →
icWasya ©   (2005-02-25 16:23) [5]

опять телепатируем!! может имелось ввиду это
constructor Tform2.Create1(aOwner: TComponent;const words:StringList);
begin
inherited Create(AOwner);
words1:=TStringList.Create;
words1.assign(words);end;//!!!!!!!!

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

---

← →
reonid ©   (2005-02-25 16:25) [6]

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

---

← →
Александр Иванов ©   (2005-02-25 16:28) [7]

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

---

← →
denis24   (2005-02-25 16:33) [8]

Да телепортируем.
words1.assign(words);
помогло
спасибо

---

← →
denis24   (2005-02-25 16:36) [9]

Да телепортируем.
words1.assign(words);
помогло
спасибо

---

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

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



Память: 0.47 MB
Время: 0.026 c