Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.03;
Скачать: CL | DM;

Вниз

TTreeView...... подскажите где ошибка   Найти похожие ветки 

 
Term ©   (2003-10-23 16:43) [0]

var CurItem:TTreeNode;
begin
if DataModule1.Spr_Kurs.RecordCount<>0 then
begin
CurItem:=First_Tab.TreeView1.Items.GetFirstNode;
while CurItem<>nil do
begin
if CurItem.Text=DataModule1.Spr_Kurs.FieldByName("KURS_NAME").AsString then
First_Tab.TreeView1.Items.Delete(CurItem);
CurItem:=CurItem.GetNext;
end;
DataModule1.Spr_Kurs.Delete;

выскакивает Accsess Violation.....


 
willys ©   (2003-10-23 16:44) [1]

вызываешь CurItem.GetNext после уничтожения CurItem.



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

Текущий архив: 2003.11.03;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.029 c
14-8670
Думкин
2003-10-11 04:55
2003.11.03
С днем рождения! 11 октября.


1-8408
zedich
2003-10-22 14:55
2003.11.03
Книжка по Delphi 6


3-8290
td
2003-10-11 00:14
2003.11.03
CREATE TABLE


1-8435
SniZ
2003-10-21 22:04
2003.11.03
Про внедрение в программу


1-8348
MaXie
2003-10-23 12:01
2003.11.03
Как дождаться завершение приложения?