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

Вниз

Почему не ставится SaveDialog1.FileName ?   Найти похожие ветки 

 
Digital   (2008-03-10 02:03) [0]

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

procedure TForm1.SaveDialog1TypeChange(Sender: TObject);
begin
 SaveDialog1.FileName := "test.txt";
end;


 
Германн ©   (2008-03-10 02:33) [1]


> Почему не ставится SaveDialog1.FileName ?
>
> Digital   (10.03.08 02:03)
>
> Отлавливаю событие, когда пользователь сменит расшинерие
> файла, и хочу подписать ему другое расшерение по этому событию,
>  а оно не подписывается. Почему?
>
> procedure TForm1.SaveDialog1TypeChange(Sender: TObject);
>
> begin
>  SaveDialog1.FileName := "test.txt";
> end;
>

Вообще-то SaveDialog1.FileName подразумевает иметь в себе "полное имя файла"!


 
Digital   (2008-03-10 02:45) [2]

Полное тоже не ставится.
SaveDialog1.FileName := ChangeFileExt(SaveDialog1.FileName, ".bmp");


 
Reindeer Moss Eater ©   (2008-03-10 11:12) [3]

Интересная мысль.
Сначала создать для диалога боле одного фильтра, затем менять  указанное пользователем расширение на свое правильное.


 
korneley ©   (2008-03-10 11:45) [4]

А я после праздников не догоняю: "Зачем именно в SaveDialog что-то менять?" Ну выбрал пользователь "не то" расширение, ну получили мы имя файла, заменили расширение, записали файл. Зачем новое имя в диалог пихать?


 
Digital   (2008-03-11 02:34) [5]


> Reindeer Moss Eater ©   (10.03.08 11:12) [3]
>
> Интересная мысль.
> Сначала создать для диалога боле одного фильтра, затем менять
>  указанное пользователем расширение на свое правильное.


Дурак что ли?
Когда пользователь изменяет расширение, у файла расширениен остаётся каким и было. Его надо в ручную менять на правильное.

А я хочу чтоб само менялось. А оно не меняется.


 
Германн ©   (2008-03-11 03:15) [6]


> А я хочу чтоб само менялось. А оно не меняется.
>

"По щучьему велению, по моему хотению".  А ты щуку-то поймал?

А с какого оно, это расширение, у реального файла поменяется?


 
Reindeer Moss Eater ©   (2008-03-11 16:23) [7]

Дурак что ли?

Ты вообще читал доку про то, когда именно генерится событие, которое ты хочешь использовать?


 
Reindeer Moss Eater ©   (2008-03-11 16:30) [8]

OnTypeChange

Description

The OnTypeChange event occurs when the user selects a new filter from the Files of Type list box at the bottom of the dialog.


 
{RASkov} ©   (2008-03-11 16:48) [9]

Я подозреваю, что автору необходимо при смене того самого типа файлов
> Type list box at the bottom of the dialog

менялось расширение у имени файла в строке имени файла диалога FileName.<ext>....
Т.е. имеем три типа файлов в списке типов, например:
*.txt
*.doc
*.rtf

Это при включенной галке "отображать расширения зарег. типов"
Я тоже как-то искал на этот вопрос ответ - нашел.
Digital, если я правильно догодался, то могу кинуть кусок кода из моего проекта.....
Там насколько я помню через EnumChildWindows делается..... Удачи.

> [5] Digital   (11.03.08 02:34)
> Дурак что ли?

Это ты зря.... так как дурак здесь - ты :) почти шутка.


 
Digital   (2008-03-12 04:23) [10]


> Reindeer Moss Eater ©   (11.03.08 16:30) [8]
>
> OnTypeChange
>
> Description
>
> The OnTypeChange event occurs when the user selects a new
> filter from the Files of Type list box at the bottom of
> the dialog.


Здорово, что ты умеешь делать кат энд паст английскому тексту, и выделять жирным.


> {RASkov} ©   (11.03.08 16:48) [9]
> Digital, если я правильно догодался, то могу кинуть кусок
> кода из моего проекта.....
> Там насколько я помню через EnumChildWindows делается...
> .. Удачи.


А без EnumChildWindows нельзя?
Ведь зачем вообще это событие нужно? Оно и нужно, чтобы подменять расширение. Значит возможно всё-таки есть какой-то нормальный путь.


 
Германн ©   (2008-03-12 04:29) [11]


> Digital   (12.03.08 04:23) [10]
>
>

Ты лучше просто и понятно скажи что тебе нужно.


 
saNat ©   (2008-03-12 14:36) [12]

Прошу прощения за то что в лез в тему, но хамство уже просто бесит... Digital, Вас учили манерам общения (уж не говоря про правила Форума)?! Я давно тут обитаю и, честно говоря, удивлен, что после таких высказываний кто-то решился оказывать Вам услугу.
:(


 
{RASkov} ©   (2008-03-12 14:43) [13]

> [12] saNat ©   (12.03.08 14:36)

Он "крутой".... ну этот.... как его.... КП :)


 
Digital   (2008-03-13 05:14) [14]


> saNat ©   (12.03.08 14:36) [12]
>
> Прошу прощения за то что в лез в тему, но хамство уже просто
> бесит... Digital, Вас учили манерам общения (уж не говоря
> про правила Форума)?! Я давно тут обитаю и, честно говоря,
>  удивлен, что после таких высказываний кто-то решился оказывать
> Вам услугу.
> :(


В чём собственно выразилось хамство, которое вас так бесит?

И чтобы оказать услугу нужено хотя бы что-нибудь знать по теме. А лямзить ненужные советы с delphiworld - это каждый может.


> Германн ©   (12.03.08 04:29) [11]
>
>
> > Digital   (12.03.08 04:23) [10]
> >
> >
>
> Ты лучше просто и понятно скажи что тебе нужно.


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



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

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

Наверх




Память: 0.48 MB
Время: 0.006 c
2-1205392293
031178
2008-03-13 10:11
2008.04.06
DateTimePicker1


2-1205254732
NaRuTo
2008-03-11 19:58
2008.04.06
Проиграть видео без MediaPlayer и DirectX


3-1194865899
Den
2007-11-12 14:11
2008.04.06
управление БД из dll


2-1205144932
TX12
2008-03-10 13:28
2008.04.06
Компонент Image. Копирование изображений.


2-1205344281
Wowa
2008-03-12 20:51
2008.04.06
fsStayOnTop, виснит приложение





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский