Форум: "Основная";
Текущий архив: 2005.03.13;
Скачать: [xml.tar.bz2];
Вниз
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 вся ветка
Форум: "Основная";
Текущий архив: 2005.03.13;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.043 c
