Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2007.03.04;
Скачать: [xml.tar.bz2];

Вниз

Сохранение в файл   Найти похожие ветки 

 
Sapos ©   (2007-02-12 17:40) [0]

Я использую метод SaveToFile. Подскажите как мне сделать так, чтобы файл сохранялся в том месте, где у меня лежит проект. Т.е. без указания абсолютного пути, чтобы при переносе на другой комп, например, программа могла подгружать инфу и сохранять ее в этот файл без проблем.
Спасибо!


 
@!!ex ©   (2007-02-12 17:43) [1]

SaveToFile(ExtractFilePath(ParamStr(0))+"имя.файла");

Если программа например лежит скажем в "C:\Cool Program\Program.exe"
то
ParamStr(0) вернет C:\Cool Program\Program.exe
ExtractFilePath(ParamStr(0)) вернет C:\Cool Program\
ExtractFilePath(ParamStr(0))+"имя.файла" вернет C:\Cool Program\имя.файла

Вообще путь к проекту еще храниьтся в Application.
Но это путь ламеров, забудь о нем.


 
Игорь Шевченко ©   (2007-02-12 17:50) [2]


> Но это путь ламеров, забудь о нем.


Фигасе. Ламеры - они где, в Борланд или в где ?


 
iXT ©   (2007-02-12 17:56) [3]


> @!!ex ©   (12.02.07 17:43) [1]

И что тебе TApplication такого плохого сделало?


 
RASkov   (2007-02-12 17:56) [4]

> Вообще путь к проекту еще храниьтся в Application.
> Но это путь ламеров, забудь о нем.

function TApplication.GetExeName: string;
begin
 Result := ParamStr(0);
end;
:)


 
@!!ex ©   (2007-02-12 18:16) [5]


> Игорь Шевченко ©   (12.02.07 17:50) [2]


> iXT ©   (12.02.07 17:56) [3]


> RASkov   (12.02.07 17:56) [4]

Не наезд на Борладн и т.д.
Просто надо знать как это работает,  ане тупо юзать Application функцию.
Захочеться написать без VCL поргу, а как путь получить и не знаем. Поэтому получение пути через PAramStr(0) и считаю нормальный в сравнении с получением пути из Application.
^^^^
IMHO


 
koha ©   (2007-02-12 18:29) [6]


> Вообще путь к проекту еще храниьтся в Application.Но это
> путь ламеров, забудь о нем.


- А мог бы вообще тогда и спользовать только эту функцию  GetModuleFileName , а про зту забудь ParamStr(0) - это путь ламеров.


 
medved_68 ©   (2007-02-12 18:32) [7]

Удалено модератором


 
@!!ex ©   (2007-02-12 19:31) [8]

Удалено модератором


 
iXT ©   (2007-02-12 19:44) [9]

Не согласен, что это ламерство. Так же кому то могли сказать что вот ParamStr и он тупо использовал бы это. Если человек знает, вернее может узнать, как работает Application.GetExeName (при необходимости), то в его использовании я не вижу ничего предосудительного, ИМХО.


 
koha ©   (2007-02-13 00:35) [10]


> @!!ex ©   (12.02.07 19:31) [8]
> > koha ©   (12.02.07 18:29) [6] ParamStr(0) не отличаеться
> по юзабельности от Application.GetExeName в отличие GetModuleFileName.
>


> - А мог бы вообще тогда и спользовать только эту функцию
>  GetModuleFileName , а про зту забудь ParamStr(0) - это
> путь ламеров.


- Это пример логической эскалации проблемы отношения к коду и к предпочтениям, а не вовсе попытка навязать новое мышление.



Страницы: 1 вся ветка

Форум: "Начинающим";
Текущий архив: 2007.03.04;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.47 MB
Время: 0.043 c
5-1149350300
setik
2006-06-03 19:58
2007.03.04
как в поле edit написать текст справа?


1-1168354965
sia
2007-01-09 18:02
2007.03.04
принудительное закрытие приложения


6-1158652641
pirate
2006-09-19 11:57
2007.03.04
Элементарная передача строк


8-1151835583
Socers'
2006-07-02 14:19
2007.03.04
Звук


2-1171529046
wander
2007-02-15 11:44
2007.03.04
атрибутика файлов





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский