ReSQL.ru
     
powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Караул глюк Vcl60.bpl ???
10 сообщений из 10, страница 1 из 1
Караул глюк Vcl60.bpl ???
    #32334834
Фотография Jojo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jojo
Участник
Люди помогите с ошибкой !
Access violation at adress 0029032C in module vcl60.bpl write of adress 0000000018
Программа не снимается CTRL+F2(RESET), потом выдает еще одно окно
Internal Error COM-631
Компилирую программу все нормально ...
запускаю на исполнение все нормально все выполняется ...
выхожу через Close ... вот такой глюк
даже не знаю чего делать то ...Delphi переставить что-ли
Так то exe файл компилируется, но так надоело снимать задачу ...
подскажите пожалуйста в чем причина ?
Стоит : Delphi6+RX+FastReports? Windows 2000 SP3
...
Рейтинг: 0 / 0
26.11.2003, 08:09
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32334835
StarWind
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
StarWind
Участник
скорее всего ошибки в программе... у меня такое было... долго искал, в конце концов бага нашлась в моем приложении...
...
Рейтинг: 0 / 0
26.11.2003, 08:11
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32334836
pkarklin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
pkarklin
Участник
автор писал:выхожу через Close ... вот такой глюк

Ну так смотри, что на Close то делаешь. Наверняка чет с объектом делаешь, который уже уничтожен.
...
Рейтинг: 0 / 0
26.11.2003, 08:14
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32334843
Фотография Jojo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jojo
Участник
А если например у меня есть форма для вывода ProgressBar
я ее Show, потом Hide в конце процедуры... потом close
потом у меня есть класс Парсер Pr:=TfrParser.Create;
в конце процедуры Pr.Destroy;
- здесь ведь нет ошибок ?
...
Рейтинг: 0 / 0
26.11.2003, 08:24
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32334844
Фотография Jojo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jojo
Участник
Или есть процедура для разбора строки с разделителями
здесь надо делать : varTempStrList.Destroy; - я счас поправил ?

function StrToArrays(varString: string; Razdelitel: string): TStrings;
var
j: integer;
varTempStrList: TStringList;
begin
varTempStrList := TStringList.Create();
while varString <> '' do
begin
j := Pos (Razdelitel, varString);
if j=0 then j := Length (varString) + 1;
varTempStrList.Add (Copy (varString, 1, j-1));
Delete (varString, 1, j + length(Razdelitel) - 1);
end;
Result := varTempStrList;
varTempStrList.Destroy;
end;
...
Рейтинг: 0 / 0
26.11.2003, 08:30
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32334848
Фотография Jojo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jojo
Участник
вроде получилось ... не ругается однако
нашел похоже глючило из-за того что я не ликвидировал
объект TStringList - varTempStrList.Destroy;
...
Рейтинг: 0 / 0
26.11.2003, 08:35
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32334851
Фотография Jojo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jojo
Участник
StarWind и pkarklin
Спасибо за помощь, наставили на след так сказать ...
...
Рейтинг: 0 / 0
26.11.2003, 08:41
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32334879
Артем1
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Артем1
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
function StrToArrays(varString: string; Razdelitel: string): TStrings; 
var 
j: integer; 
varTempStrList: TStringList; 
begin 
varTempStrList := TStringList.Create(); 
while varString <> '' do 
begin 
j := Pos (Razdelitel, varString); 
if j= 0  then j := Length (varString) +  1 ; 
varTempStrList.Add (Copy (varString,  1 , j- 1 )); 
Delete (varString,  1 , j + length(Razdelitel) -  1 ); 
end; 
Result := varTempStrList; 
varTempStrList.Destroy; //???
end;


Что-то я не пойму?
У вас получается воспользоваться результатом работы этой функции?
Как минимум должен быть Access Violation at ...
...
Рейтинг: 0 / 0
26.11.2003, 09:21
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32334909
Фотография Jojo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jojo
Участник
Да не то ... ну то есть там все правильно ...
опять полезло ...ищу ошибку ...
...
Рейтинг: 0 / 0
26.11.2003, 09:47
| Ответить | Цитировать | Написать  
Караул глюк Vcl60.bpl ???
    #32335033
Фотография Jojo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Jojo
Участник
Ошибку нашел таки ...
она оказалась не в создании объектов, а в разборе строки ...
короче одну переменную надо было инициализировать в цикле
Хорошая штука - Пошаговый отладчик - F8
хотя для объектов Create сделал Free вместо Destroy(неправильно)
...
Рейтинг: 0 / 0
26.11.2003, 11:20
| Ответить | Цитировать | Написать  
10 сообщений из 10, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / Караул глюк Vcl60.bpl ???
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]