Вверх ↑
Этот топик читают: Гость
Ответов: 1841
Рейтинг: 369
#1: 2009-12-22 18:58:54 ЛС | профиль | цитата
При задействовании события, которое запрашивает инфу у нижних точек элемента FileAttributes, скомпилированная программа вылетает...
Собирал под delphi, так как под FPS приведённая схема не хочет вообще компилиться ...
SVN: rev 2507
Пример:
code_16093.txt

карма: 1
0
файлы: 1code_16093.txt [837B] [339]
vip
#1.1контекстная реклама от партнеров
Разработчик
Ответов: 4697
Рейтинг: 426
#2: 2009-12-22 19:04:57 ЛС | профиль | цитата
Попробуй то же самое с HiAsm.exe, и ты поймешь в чем проблема
карма: 10
0
Ответов: 1841
Рейтинг: 369
#3: 2009-12-22 19:12:48 ЛС | профиль | цитата
Assasin, ок, вот другой пример...

code_16095.txt
------------ Дoбавленo в 19.14:
Ааа, всё извиняюсь за ложный баг репорт...
карма: 1
0
файлы: 1code_16095.txt [837B] [332]
Разработчик
Ответов: 4697
Рейтинг: 426
#4: 2009-12-22 19:25:09 ЛС | профиль | цитата
Надеюсь правильно понял
code_16096.txt
карма: 10
0
файлы: 1code_16096.txt [850B] [344]
Ответов: 1841
Рейтинг: 369
#5: 2009-12-22 19:47:58 ЛС | профиль | цитата
Assasin, да, именно так и понял
карма: 1
0
Ответов: 4621
Рейтинг: 746
#6: 2015-06-15 14:33:44 ЛС | профиль | цитата
code_35851.txt
И что, кому-то лень было пофиксить?

Наводящий вопрос: в строке 156
hiFileAttributes.pas писал(а):
if not GetFileAttributesEx(PChar(fn),GetFileExInfoStandard,@sys) then
какой тип имеет переменная sys, указатель на которую передаётся в функцию GetFileAttributesEx?

[offtop]PS: имею сильное желание привести в человеческий вид код этого файла...[/offtop]
карма: 26

0
файлы: 1code_35851.txt [355B] [361]
Разработчик
Ответов: 26061
Рейтинг: 2120
#7: 2015-06-15 16:36:21 ЛС | профиль | цитата
Netspirit писал(а):
какой тип имеет переменная sys, указатель на которую передаётся в функцию GetFileAttributesEx?

TSystemTime
карма: 22

0
Ответов: 4621
Рейтинг: 746
#8: 2015-06-15 16:37:40 ЛС | профиль | цитата
А что требует функция GetFileAttributesEx?
карма: 26

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#9: 2015-06-15 17:04:02 ЛС | профиль | цитата
Netspirit писал(а):
А что требует функция GetFileAttributesEx?

Указатель на буфер, который при GetFileExInfoStandard будет иметь структуру WIN32_FILE_ATTRIBUTE_DATA
карма: 22

0
Ответов: 4621
Рейтинг: 746
#10: 2015-06-15 17:05:58 ЛС | профиль | цитата
Именно.
карма: 26

0
Разработчик
Ответов: 26061
Рейтинг: 2120
#11: 2015-06-15 17:09:30 ЛС | профиль | цитата
Увы, но я не придал значение этому коду, тк не я его писал, там и по стилю видно, что не мой
------------ Дoбавленo в 17.09:
Netspirit, ты это, приведи тогда этот код в порядок, если желание есть
карма: 22

0
Ответов: 4621
Рейтинг: 746
#12: 2015-06-15 17:52:47 ЛС | профиль | цитата
hifileattributes 2015-06-15.7z
карма: 26

1
Голосовали:andrestudio
Разработчик
Ответов: 26061
Рейтинг: 2120
#13: 2015-06-15 19:58:55 ЛС | профиль | цитата
Netspirit, я еще пока не смотрел, но что ты что там поменял? Огласи список всех изменений.
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#14: 2015-06-15 21:53:03 ЛС | профиль | цитата
nesco писал(а):
что ты что там поменял?

Обычно старые коды выключают, а возле новых пишут дату и кто изменил.
Везде так, но у нас (в HiAsm) так не принято.

карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Ответов: 4621
Рейтинг: 746
#15: 2015-06-16 13:52:33 ЛС | профиль | цитата
1) В плане функционала - исправлена выше озвученная ошибка в THIFileAttributes.GetTimeV
2) Остальное - косметические изменения во всем коде.
------------ Дoбавленo в 13.52:
Не работает такая комбинация:
Add(Dir,8403047,182,168)
{
}
Add(FileSearch,6264206,175,231)
{
SubDir=1
link(onSearch,6304104:doValue,[])
link(Dir,8403047:CurrentDir,[])
}
Add(Button,4230642,91,224)
{
Left=10
Top=55
Width=80
link(onClick,718587:doEvent1,[])
}
Add(Memo,4634910,413,266)
{
Left=10
Top=90
Width=370
Height=160
ScrollBars=3
}
Add(Hub,718587,133,224)
{
link(onEvent1,4634910:doClear,[(226,230)(226,279)])
link(onEvent2,6264206:doSearch,[])
}
Add(FileAttributes,7610809,315,168)
{
Point(DateModifyReal)
link(FileName,6304104:Value,[(321,156)(300,156)(300,274)(258,274)])
}
Add(StrCatDelim,15306188,329,231)
{
Delimiter="; "
link(onStrCatDlm,4634910:doAdd,[(387,237)(387,272)])
link(Str2,7610809:DateModifyReal,[])
}
Add(Memory,6304104,252,231)
{
link(onData,15306188:doStrCatDlm,[])
}
При чтении с нижней точки данные первого файла сохраняются навсегда и при изменении имени (на верхней точке) не обновляются.
То же самое касается точки FileSize.

Предлагаю следующее: hifileattributes 2015-06-16.7z

карма: 26

0
15
Сообщение
...
Прикрепленные файлы
(файлы не залиты)