Потестируйте пожалуйста программу

← →
koha © (2007-01-24 21:14) [40]

> SaveToFile(ExtractFilePath(Application.ExeName).....)
А это вообще зачем писать каждый раз можно ведь использовать глобальную переменную например:
CurPath:=ExtractFilePath(Application.ExeName); //.......... SaveToFile(CurPath+"Filename");
и код будет экономно выглядеть.

← →
Стаффаж © (2007-01-24 21:18) [41]

xayam ©
Программу не смотрел.
Прислушайтесь, пожалуйста к Gero, на счет интерфейсов. У Gero я лично вижу по DMC очень хорошие знания в этой области.

koha © (24.01.07 21:14) [40]
ExtractFilePath(Application.ExeName);
Лучше ИМХО использовать ExtractShortPathName, что бы не было проблем в win2000.

← →
Джо © (2007-01-24 21:21) [42]

> [41] Стаффаж © (24.01.07 21:18)
> Лучше ИМХО использовать ExtractShortPathName, что бы не
> было проблем в win2000.

А какие проблемы в Win2000 с длинными путями?

← →
MikePetrichenko © (2007-01-24 21:24) [43]

Мдя.

Посомтрел на скриншоты. Первый перенес достойно, на втором матюкнулся, на третьем зарычал. На чертвертый готов был пойти искать автора. На пятом передумал... Прогу качать не стал.

Озадачился одним вопросом: А нафига оно нужно, если есть тот же GExpert? Help&Manual и куча других?

Ладно. Вот если бы кто подсказал утилитку для построение графической иерархии классов... Вот то была бы вешь...

← →
Стаффаж © (2007-01-24 21:28) [44]

Джо © (24.01.07 21:21) [42]
А какие проблемы в Win2000 с длинными путями?

В двух разных моих программах были проблемы с "C:\Program Files\...", почему-то эта функция возвращала "C:\Program" - именно в win2000. После замены на Short проблем не возникало.

PS: Я люблю в .dpr проекта вставлять код:
SetCurrentDir(ExtractShortPathName(ParamStr(0)));

← →
koha © (2007-01-24 21:29) [45]

> Стаффаж © (24.01.07 21:18) [41]
> Лучше ИМХО использовать ExtractShortPathName, что бы не было проблем в win2000.

эту функцию я не из головы взял, она у него в коде есть везде ExtractFilePath И вообще Джо © (24.01.07 21:21) [42] - Прав!

← →
Джо © (2007-01-24 21:32) [46]

> [44] Стаффаж © (24.01.07 21:28)
> Джо © (24.01.07 21:21) [42]
> А какие проблемы в Win2000 с длинными путями?
>
> В двух разных моих программах были проблемы с "C:\Program
> Files\...", почему-то эта функция возвращала "C:\Program"
> - именно в win2000. После замены на Short проблем не возникало.

Ну, это просто проблема в твоих программах, а не в Windows 2000.

> PS: Я люблю в .dpr проекта вставлять код:
> SetCurrentDir(ExtractShortPathName(ParamStr(0)));

Ну, между «я люблю» и «это стоит делать» — целая пропасть.

← →
koha © (2007-01-24 21:32) [47]

Стаффаж © (24.01.07 21:28) [44]
> SetCurrentDir(ExtractShortPathName(ParamStr(0))); ->

бред

← →
Стаффаж © (2007-01-24 21:36) [48]

Джо © (24.01.07 21:32) [46]
> [44] Стаффаж © (24.01.07 21:28)
> В двух разных моих программах были проблемы с "C:\Program
> Files\...", почему-то эта функция возвращала "C:\Program"
> - именно в win2000. После замены на Short проблем не возникало.

Ну, это просто проблема в твоих программах, а не в Windows 2000.ъ

То, что функция возвращала это проблема в моей программе? :)

Вобщем я с Вами не спорю.

> PS: Я люблю в .dpr проекта вставлять код:
> SetCurrentDir(ExtractShortPathName(ParamStr(0)));

Ну, между «я люблю» и «это стоит делать» — целая пропасть.

А в чем проблема?

koha © (24.01.07 21:32) [47]
Стаффаж © (24.01.07 21:28) [44]
> SetCurrentDir(ExtractShortPathName(ParamStr(0))); ->

бред

поясните
?

← →
Стаффаж © (2007-01-24 21:39) [49]

Стаффаж © (24.01.07 21:36)
Ну, это просто проблема в твоих программах, а не в Windows 2000.ъ

То, что функция возвращала это проблема в моей программе? :)

Тем более, что заненена одна функция, я не считаю, что это проблема моей программы. :)

← →
Джо © (2007-01-24 21:40) [50]

> [48] Стаффаж © (24.01.07 21:36)
> То, что функция возвращала это проблема в моей программе?
> :)

Библиотечная функция ExtractPathName — она одна и та же, что в Windows 2000, что в Windows 200x. И она крайне проста, что несложно заметить, посмотрев ее исходный код. И поэтому, согласись, самым достоверным будет предположить, что проблема имеется в коде, который написал ты, а не в коде VCL и не в коде Windows 2000.

← →
koha © (2007-01-24 21:41) [51]

Все зависит от того, куда и откуда ты вызывал программу свою и как и зачем она получает ParamStr(0)?

← →
Стаффаж © (2007-01-24 21:46) [52]

Джо © (24.01.07 21:40) [50]

Я Вас понимаю, но:

Вот так программа работала на всех win и не работала в win2000:
SetCurrentDir(ExtractPathName(ParamStr(0)));

а так больше проблем не возникало:
SetCurrentDir(ExtractShortPathName(ParamStr(0)));

отсюда я и сделал орг вывод. Я и не навязываю, обе функции существуют, выбирайте по вкусу, о чем я исказал используя аббревиатуру ИМХО.

Что плохого в перестраховке.

koha © (24.01.07 21:41) [51]
Все зависит от того, куда и откуда ты вызывал программу свою и как и зачем она получает ParamStr(0)?

А какая разница?

← →
Стаффаж © (2007-01-24 21:53) [53]

koha © (24.01.07 21:41) [51]
Все зависит от того, куда и откуда ты вызывал программу свою и как и зачем она получает ParamStr(0)?

В ParamStr(0) находится строка: путь к exe\сам exe программы, т.е., например, если бы я создал winrar он бы у меня получил бы такую строку:
C:\Program Files\WinRAR\WinRAR.exe

Так что мне не понятен Ваш вопрос.

← →
xayam © (2007-01-24 22:09) [54]

> koha © (24.01.07 20:47) [33]
> > koha © (24.01.07 20:37) [31]
> > А когда не указал исходный файл
> - пардонте указал .... повторно это сделал .. результат
> тотже: "I/O error 183"
> запускал с рабочего стола - а этот косяк более серьезный,
> чем говорят здесь про все остальное, так, что разбирайся!

да ерунда это, я конечно исправлю, но про это я уже знал. Я же ясным языком в справке написал, если нажимаете повторно кнопку Сохранить, то удалите все из папки Out, все кроме таблицы стилей)) Просто не тратил время на это.

← →
koha © (2007-01-24 22:42) [55]

> Стаффаж © (24.01.07 21:53) [53]
>
> koha © (24.01.07 21:41) [51]
> Все зависит от того, куда и откуда ты вызывал программу
> свою и как и зачем она получает ParamStr(0)?
>
> В ParamStr(0) находится строка: путь к exe\сам exe программы,
> т.е., например, если бы я создал winrar он бы у меня получил
> бы такую строку:
> C:\Program Files\WinRAR\WinRAR.exe
>
> Так что мне не понятен Ваш вопрос.

*.exe = exefile
[HKEY_CLASSES_ROOT\exefile\shell\open\command]
@="%1" %* - Когда то, я делал программу она получала путь из этого параметра и когда попадались папки с пробелами типа C:\Program Files\..\..\.. То получался такойже эффект как и у тебя: имел символы до первого пробела. Вот тогда я задумался о смысле этой функции и как правильно обрабатывать ее когда появляютя глюки. В таких случаях надо понять вообще предназночение и сущьность вещей. Ведь есть и другие функции, например, GetCurrentDir, а что заставило тебя использовать именно эту функцию paramstr(0) - так это недостаток знаний на тот момент.
Не возможно судить, что именно ты хотел добиться используя эту функцию.

На тот момент я свою проблему тоже решил оригенальным способом:
Procedure Add_Path_Name; var i: integer; begin i:=1; Repeat InName:=InName+paramstr(i); Inc(i); if paramstr(i) <> "" then InName:=InName+" "; Until Paramstr(i) = ""; end;

А на твоем месте я бы возможно использовал другую функцию.

← →
koha © (2007-01-24 22:49) [56]

> xayam © (24.01.07 22:09) [54]

> но про это я уже знал.

- а что же сразу не исправи, когда делал? Вот еще и лишнии слова извел на справку.

← →
Стаффаж © (2007-01-24 22:52) [57]

koha © (24.01.07 22:42) [55]

А ведь ShortName возвращает - нормально! Вот в чем прикол!

Не возможно судить, что именно ты хотел добиться используя эту функцию.

Программа не зависимо от откуда запустил ее пользователь(возможно забыл прописать "Рабочую директорию" или еще что), должна была подгружать файлы относительно пути где находится exe.
Вот, чтобы не хранить этот путь я устанавливал сразу каталог где находится exe, и относительно его стоил дольнейшие-локальные пути.

← →
Стаффаж © (2007-01-24 22:53) [58]

Сейчас проверю, что возвращает GetCurrentDir если я сделаю "Рабочую директорию" отличную от той где находится exe.

← →
Стаффаж © (2007-01-24 23:01) [59]

Сделал ярлык на рабочем столе, удалил рабочию директорию в ярлыке, запустил.

Как и предпологалось GetCurrentDir вернул директорию откуда была запущена программа, а не дирекоторию где лежит exe.

← →
Джо © (2007-01-24 23:02) [60]

> [59] Стаффаж © (24.01.07 23:01)
> Как и предпологалось GetCurrentDir вернул директорию откуда
> была запущена программа, а не дирекоторию где лежит exe.

А разве кто-то предполагал иное? :)

← →
Стаффаж © (2007-01-24 23:06) [61]

Джо © (24.01.07 23:02) [60]

Дада, из названия все понятно, но я проверил подойдет ли она мне.

Мне вот посоветовали:

koha © (24.01.07 22:42) [55]
Ведь есть и другие функции, например, GetCurrentDir, а что заставило тебя использовать именно эту функцию paramstr(0) - так это недостаток знаний на тот момент.

← →
Джо © (2007-01-24 23:07) [62]

> [61] Стаффаж © (24.01.07 23:06)
> Мне вот посоветовали:
>
> koha © (24.01.07 22:42) [55]
> Ведь есть и другие функции, например, GetCurrentDir, а что
> заставило тебя использовать именно эту функцию paramstr(0)
> - так это недостаток знаний на тот момент.

Ну, это к koha, не ко мне :)

← →
antonn © (2007-01-24 23:10) [63]

Стаффаж © (24.01.07 23:01) [59]
Как и предпологалось GetCurrentDir вернул директорию откуда была запущена программа, а не дирекоторию где лежит exe.
а зачем оно это делает?

← →
Стаффаж © (2007-01-24 23:14) [64]

antonn © (24.01.07 23:10) [63]
Стаффаж © (24.01.07 23:01) [59]
Как и предпологалось GetCurrentDir вернул директорию откуда была запущена программа, а не дирекоторию где лежит exe.
а зачем оно это делает?

Возвращает текущую директорию. Как зачем? Я ее попросил, сказал GET///.
:)

← →
koha © (2007-01-24 23:22) [65]

> В двух разных моих программах были проблемы с "C:\Program
> Files\...", почему-то эта функция возвращала "C:\Program"
> - именно в win2000. После замены на Short проблем не возникало.
>

Так какя именно функция тебе вернула "C:\Program" ?

← →
xayam © (2007-01-24 23:47) [66]

ребят кончайте спорить, заняться нечем что ли))

← →
xayam © (2007-01-25 18:37) [67]

Новая версия v0.22
http://xayam.by.ru/Download/Sources/DelphiTo/v0.22/

Обновлен раздел скриншотов и выходных файлов
http://xayam.by.ru/Download/Sources/DelphiTo/ScreenShots/
http://xayam.by.ru/Download/Sources/DelphiTo/Out/DelphiTo.dpr/

Изменения
http://xayam.by.ru/Download/Sources/DelphiTo/ChangeLog.txt

← →
Zeqfreed © (2007-01-25 18:48) [68]

Почему ченджлог написан в повелительном наклонении? Это скорее на TODO-список похоже :)

> [68] Zeqfreed © (25.01.07 18:48)
> Почему ченджлог написан в повелительном наклонении? Это
> скорее на TODO-список похоже :)

Ибо писать по-русски некузяво, а английского не знаем :D

> Джо © (25.01.07 18:51) [69]
> Ибо писать по-русски некузяво, а английского не знаем :D

да не то чтобы, но думаю мастера делфи знают английский и исправят эту проблему))

← →
Vovan #2 (2007-01-25 20:17) [71]

>а, понял, буду доделывать, может тогда завтра выложу

Да ладно, не надо спешить. Тут наговорили на неделю. Соберись, представь, как было бы людям удобно и сделай так. Дело хорошее делаешь, но чтобы тут не упоминали GExpert, надо переплюнуть это дело.

> Vovan #2 (25.01.07 20:17) [71]
> >а, понял, буду доделывать, может тогда завтра выложу
> Да ладно, не надо спешить. Тут наговорили на неделю. Соберись,
> представь, как было бы людям удобно и сделай так. Дело
> хорошее делаешь, но чтобы тут не упоминали GExpert, надо
> переплюнуть это дело.

кстати да)) а я даже незнаю как это дело выглядит у конкурентов))

> а я даже незнаю как это дело выглядит у конкурентов

вот посмотрел уже)) по-моему даже и сравнивать не за чем (не с чем)), и так все ясно. Сохранять можно только один (текущий) файл, подсветка желает лучшего, навигации ноль, нет возможности изменить подсветку (только через IDE) и т.д. Так что решайте сами))

> [73] xayam © (25.01.07 20:29)
> нет возможности изменить подсветку (только через IDE) и

Ошибаешься. Там все прекрасно настраивается, нажми кнопку Configure и удивись :)

Кстати, еще и в rtf сохраняет, помимо HTML ;)

> Джо © (25.01.07 20:56) [74]
> > [73] xayam © (25.01.07 20:29)
> > нет возможности изменить подсветку (только через IDE) и
> Ошибаешься. Там все прекрасно настраивается, нажми кнопку
> Configure и удивись :)

да я нажимал, имею ввиду стандартные стили нет возможности не выходя из окошечка Configure использовать

> Джо © (25.01.07 20:56) [75]
> Кстати, еще и в rtf сохраняет, помимо HTML ;)

все впереди, я над pdf подумываю. Хотя думаю сначала стоит научится его в xml конвертить, а из него в любой))

> Vovan #2 (25.01.07 20:17) [71]
> >а, понял, буду доделывать, может тогда завтра выложу
> Да ладно, не надо спешить.

да последний день отпуска, вот и спешу)) завтра все, работа, труба зовет))

> [76] xayam © (25.01.07 21:00)
> да я нажимал, имею ввиду стандартные стили нет возможности
> не выходя из окошечка Configure использовать

Есть такая возможность. Нажми кнопочку "Load IDE settings" и удивись дважды! :)

А интерфейс FExpertовского модуля "Source Export" бьет твой, как ребенка :)

> Джо © (25.01.07 21:03) [78]
> > [76] xayam © (25.01.07 21:00)
> > да я нажимал, имею ввиду стандартные стили нет возможности
> > не выходя из окошечка Configure использовать
> Есть такая возможность. Нажми кнопочку "Load IDE settings"
> и удивись дважды! :)

Вы издеваетесь? Три раза нажимал - ничего не происходит. Как поменять? Только через IDE))

> Джо © (25.01.07 21:04) [79]
> А интерфейс FExpertовского модуля "Source Export"

а у меня никаких интерфейсов нет вообще-то))

Потестируйте пожалуйста программу Найти похожие ветки