Вот код процедуры


Если убрать ShowMessage('1') то возникает ошибка  что делать ?

Это сообщение отредактировал(а) SlaUr - 25.7.2014, 16:04

Запустите из IDE в режиме отладки и укадите строчку, на которой остановилась программа при ошибке, дополнительно неплохо было бы указать call-stack.

Дополнительно отформатируйте, пожалуйста, код - если там ошибка дальше 3й строки то ничего не понятно. 

спасибо за совет буду разбираться с отладчиком.
Но меня  интересует почему при ShowMessage ошибка пропадает.

ShowMessage создаёт модальное окно и прекращает на время выполнение данного кода, хотя другой код может выполняться. Ошибку надо смотреть в дебаге. 

Вылетает ошибка на строке ListAllRun.Clear 
фигня какая-то 

А вы уверены?
В строке ListAllRun.Clear; CheckListBox1.Clear;
имеется два оператора. Как вы определили, что ошибка возникла именно на первом?
Присоединяюсь к призыву форматировать текст.

Ошибка может быть не в приведённом куске.
В частности, неизвестно, где создаётся ListAllRun и не уничтожался ли он.
Небольшое изменение кода может привести к тому, что в одном случае работа по указателю на уничтоженный объект вызовет ошибку, а в другом - нет. Проверьте, что ListAllRun на момент вызова scanAllRun создан и не уничтожен.

Если вышеизложенное не поможет, имеет смысл привести побольше кода, где можно было бы проследить что как создаётся с самого начала. В частности, существует ли на момент вызова form1 и т.д.

Кстати, зачем нужна завязка на глобальную переменную form1? Зачем вашй процедуре что-то знать о ней?
Возможно, я что-то просмотрел, но, вроде бы от form1 здесь используется только CheckListBox1.
И только из-за него вы всё засунули под with form1 do ?
Если вам с form1 нужен только CheckListBox1, так и передавайте его в процедуру параметром:
Procedure scanAllRun(ACheckListBox: TCheckListBox);
Если через параметр передавать ещё и ListAllRun, так вообще получится полностью автономная процедура, ни к чему не привязанная, которую можно испозьзовать где угодно, не интересуясь именами глобальных переменных.
Но это потом, а сначала надо разобраться с проблемой в текущем виде.

Ещё судя по тому, что процедура scanAllRun статическая, а доступ идёт к форме то возможно формы ещё нету или уже нету. Call-stack бы это показал.

очень просто  когда у меня возникала ошибка на первой строке я его поставил на 4 строку и программа стала вылетать после прохождения 4 строки


Нет у меня эта процедура выполняется во первых когда создается форма (тогда ошибки не возникает) и при нажатии кнопки (тогда и возникает ошибка)


ListAllRun создается при создании формы

Это сообщение отредактировал(а) SlaUr - 28.7.2014, 06:07

Исключил ListAllRun из кода и тогда ошибка возникает 
в строке

Опять же ошибка возникает с  ListAllRun.

Ладно буду экспериминтировать дальше

Это сообщение отредактировал(а) SlaUr - 28.7.2014, 06:48

Странный у вас подход...
Ошибка уже найдена.
Со 100% вероятностью.
Вот она:
Указатель ListAllRun не указывает на реально существующий объект.
Осталось только найти причину этого.
Вам нужно пройти цепочку:

1. Создание ListAllRun:   ListAllRun := TStringList.Create;
2. Место, где уничтожается объект, на который указывает ListAllRun, например:   ListAllRun.Free;
3. Вызов scanAllRun, в котором возникает ошибка:   scanAllRun;

Проблема лежит за пределами scanAllRun.
Ваша задача сводится к поиску пункта 2.
Вам предложили привести код, чтобы помочь найти совместно.
Вы говорите, что это всё ерунда и ошибки там быть не может.
Пожалуйста. Ищите сами. Ошибку вам указали.
У меня хватает фантазии только на три варианта:

1. Вы создаёте ListAllRun в неудачном месте.
2. Где-то ListAllRun уничтожается.
3. Где-то объект, на который указывает ListAllRun уничтожается и вновь создаётся, но в переменной ListAllRun сохраняется старый указатель на уже уничтоженный объект.

Попробовал этот же проект в Delphi 7 (до этого работал в Delphi 2010)  и все стало нормально - никаких ошибок .
Удалил со своего компа 2010 поставил 7 . 
Вообще проект писался давно в delphi7. 

Это сообщение отредактировал(а) SlaUr - 28.7.2014, 12:07