Текущий архив: 2003.06.16;
Скачать: CL | DM;
Вниз
Как бороться с AV Найти похожие ветки
← →
TCrash © (2003-06-03 14:43) [0]имеется TListView.при выполнении кода
procedure TForm3.ListAdminsClick(Sender: TObject);
var
p: PAdmin; //указатель но структуру
i:integer;
b:boolean;
procedure eav;
var i:integer;
begin
..................
end;
begin
b:=false;
try
p:=ListAdmins.Selected.Data;
except
on EAccessViolation do eav
end;
if b then exit;
.................
end;
выскакивет AccessViolation (если клик происходит мимо элемента списка). Я согласен, должна возникать ошибка, но ведь try..except вродебы и призван бороться с такими вещами.
Где я на грабли наступаю.
← →
Palladin © (2003-06-03 14:49) [1]из IDE наверно запускаешь, или AV возникает не тут...
← →
clickmaker © (2003-06-03 14:49) [2]А не проще ли проверить if (ListAdmins.Selected <> nil) ? Уж на такие неприкрытые грабли зачем наступать ? :)
← →
DVM © (2003-06-03 14:50) [3]
> TCrash ©
не проще ли проверить выделен элемент или нет, чем городить try-except
← →
Song © (2003-06-03 14:55) [4]IF Assigned(Selected) then ...
← →
TCrash © (2003-06-03 14:58) [5]Всем спасибо, про проверку не догнал.
Наверное не доспал вчера :-)
Страницы: 1 вся ветка
Текущий архив: 2003.06.16;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.02 c
