Лёгкий вопрос

← →
Katya2100000000 (2005-10-24 18:32) [0]

Почему когда я пользуюсь например
memo1.SaveToFile("parametr.rty"),он(parametr.rty)
сохраняется в папку с программой, а если перед сохранением файла пользуюсь opendialogom то файл(parametr.rty) сохраняется в папку с последним открытым файлом.Как это обойти.Это-memo2.Lines.savetoFile(ExtractFilePath(Application.ExeName)+"parametr.rty");и это OpenDialog1.Options:=ExtractFilePath(Application.ExeName);не помогает.

← →
clickmaker © (2005-10-24 18:34) [1]

> Katya2100000000 (24.10.05 18:32)

if OpenDialog.Execute then
memo1.SaveToFile(OpenDialog.FileName);

что наберешь в диалоге, туда и сохранит

← →
Джо © (2005-10-24 18:34) [2]

> OpenDialog1.Options:=ExtractFilePath(Application.ExeName)

Это бред.

> Lines.savetoFile(ExtractFilePath(Application.ExeName)+"parametr.rty");не помогает.

Не верю! (c)

← →
BFG9k © (2005-10-24 18:35) [3]

Когда с помощью диалога лазишь по каталогам - это меняет текущий каталог. Отсюда все беды.

Вот это :

memo2.Lines.savetoFile(ExtractFilePath(Application.ExeName)+"parametr.rty");

должно было помочь.

← →
Tonich © (2005-10-24 18:36) [4]

> memo2.Lines.savetoFile(ExtractFilePath(Application.ExeName)+"parametr.
> rty")

этим ты опять говоришь его сохранять в папку с экзешником, так как
ExtractFilePath(Application.ExeName) вернет путь к нему )))))

второй вариант таже фигня.

Укажи просто путь по которому хочешь сохранить файл ))

← →
Katya2100000000 (2005-10-24 18:36) [5]

Я и говорю не помогает.Как сохранить файл в директорию с программой

← →
clickmaker © (2005-10-24 18:37) [6]

> > OpenDialog1.Options:=ExtractFilePath(Application.ExeName)
>
> Это бред

да это, собссно, и скомпилицца не должно..

← →
clickmaker © (2005-10-24 18:38) [7]

> Katya2100000000 (24.10.05 18:36) [5]
> Я и говорю не помогает.Как сохранить файл в директорию с
> программой

memo1.SaveToFile(ExtractFilePath(Application.ExeName) + "filename.ext");

← →
Katya2100000000 (2005-10-24 18:38) [8]

clickmaker но у меня то компилируется

← →
clickmaker © (2005-10-24 18:40) [9]

> Katya2100000000 (24.10.05 18:38) [8]
> clickmaker но у меня то компилируется

видимо очень долго компилятор упрашивала. Он не смог отказать женщине :)

← →
Джо © (2005-10-24 18:43) [10]

[9] clickmaker © (24.10.05 18:40)
Этот компилятор построен не на булевской, а на женской логике, вероятно.

Катя, ты чего хочешь? Сохранить в папку с программой или же сохранить в папку и файл, выбранный в TOpenDialog"е?

П.С. Есть предположение, что Катя с усами :)

← →
Katya2100000000 (2005-10-24 18:43) [11]

Ну подожди дай я ещё раз посмотрю

← →
Джо © (2005-10-24 18:43) [12]

> TOpenDialog"е?

SaveDialog, конечно

← →
Германн © (2005-10-24 18:46) [13]

> Katya2100000000 (24.10.05 18:43) [11]
>
> Ну подожди дай я ещё раз посмотрю

С усами или без? :)

← →
Katya2100000000 (2005-10-24 18:48) [14]

С усами или без? :) В смысле?

← →
Германн © (2005-10-24 18:50) [15]

В смысле:

> П.С. Есть предположение, что Катя с усами :)
> ---------------------------------------------
> Katya2100000000 (24.10.05 18:43) [11]
>
> Ну подожди дай я ещё раз посмотрю
>
:)

← →
Katya2100000000 (2005-10-24 18:52) [16]

Ты бы лучше с вопросом помог а с усами я или без -Тебе не всё равно-
но всётаки без.

← →
Германн © (2005-10-24 18:55) [17]

Так ведь уже всё сказано. Чем ещё помочь?
Сказать что вместо
> OpenDialog1.Options:=ExtractFilePath(Application.ExeName);

у тебя наверняка было OpenDialog1.InitialDir:=ExtractFilePath(Application.ExeName);
Так это и не поможет. :(

← →
Katya2100000000 (2005-10-24 18:58) [18]

Германн а как поможет?

че-то запутки какие-то начались... ответ-то дан уже давно

← →
Банзай (2005-10-24 19:10) [21]

Перд вызовом диалога выполни ChDir(ExtractFileDir(ParamStr(0)));

> Банзай (24.10.05 19:10) [21]
> Перд вызовом диалога выполни ChDir(ExtractFileDir(ParamStr(0)));
>

свежее решение. Ментос?

← →
Банзай (2005-10-24 19:29) [23]

> свежее решение. Ментос?

Нет, дирол.

Сглупил, конечно.
Достаточно
OpenDialog1.FileName := ParamStr(0); OpenDialog1.Execute;

Чтобы OpenDialog не менял текущую директорию надо в дизайнтайме (или в рантайме) включить в OpenDialog.Options флаг foNoChangeDir. И все

> foNoChangeDir

очепатка вышла. ofNoChangeDir

← →
Katya2100000000 (2005-10-24 20:35) [26]

Спасибо

Лёгкий вопрос Найти похожие ветки