![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
SaveDialog [D7, XP]
Dark © (2007-11-15 20:43:00)Прочитал про savedialog...
Сделал все как просят...диалог не появляется...у меня такое чувство, что я чего-то не понимаю...привидите рабочий пример, если не сложно, с использованием этого метода. Ну или обьясните как вызвать этот диалог...
Dark (2007-11-15 22:24:00) [1]
> Плохиш © (15.11.07 22:15) [19]
>
> > Dark © (15.11.07 20:50) [8]
> > У них как-то сервак летает. Вот код,скопированный из примера(весь):
>
>
> Враньё! Там не такой пример
Обоснуй.
Если тебе моска не хватает, чтобы он работал хотя бы 3 мин. 32 сек. (ровно столько нужно, для читания этой страницы) беспребойно, то просьба не флудить в темах.
Плохиш (2007-11-15 22:17:00) [2]
> Dark © (15.11.07 22:03) [18]
Дочитал всё-таки до этого поста :-( надо было раньше бросить это занятие...
Плохиш (2007-11-15 22:15:00) [3]
> Dark © (15.11.07 20:50) [8]
> У них как-то сервак летает. Вот код,скопированный из примера(весь):
Враньё! Там не такой пример.
Dark (2007-11-15 22:03:00) [4]saveDialog := TSaveDialog.Create(self);
Если оставить одну эту строку-не работает...*щас будет ламерский вопрос*...Почему?
Dark (2007-11-15 22:03:00) [5]
DVM ©
Thanks very much!
DVM (2007-11-15 22:01:00) [6]
> Переменной(какой?!) присваивается полный путь к этому файлу
Open(Save)Dialog.FileName
> Потом можно просто юзать эту переменную в сохранении?
Memo1.Lines.SaveToFile(Open(Save)Dialog.FileName);
Dark (2007-11-15 21:52:00) [7]Так, я понял как создать диалог) Получилось)
А собственно его детали функционированния:
1) Пользователь выбирает файл(или создаёт)
2) Переменной(какой?!) присваивается полный путь к этому файлу
3) Потом можно просто юзать эту переменную в сохранении?
DVM (2007-11-15 21:34:00) [8]
> and (savedialog1.filename<>'')
> then
это лишнее
Юрий Зотов (2007-11-15 21:30:00) [9]> Dark © (15.11.07 20:50) [8]
Создали диалог, настроили его - и убили.
А где же самое главное-то? Где показ и проверка его результата?
В примере ведь это есть.
Gydvin (2007-11-15 21:07:00) [10]тьфу блин заврался ))
соответсвенно не открываем в мемо, а пишем из него
memo1.lines.savetofile(savedialog1.filename);
Gydvin (2007-11-15 21:02:00) [11]
> Dark © (15.11.07 20:50) [8]
))
> ^) за метлой... да и источник прочитанного не указан...
Однозначно...
Но седня добрый.
Заходим на вкладку dialogs, выбираем компонент Tsavedialog, кидаем его на форму. Следом кидаем туда батон. В обработчике батона пишем следущее
...
savedialog1.filename:='';
If (savedialog1.Execute) and (savedialog1.filename<>'') then
begin
//вот здесь уже пишем сам код открытия файла. Например в тмемо.
memo1.lines.loadfromfile(savedialog1.filename);
end;
Dark (2007-11-15 20:52:00) [12]Ещё переменная в начале
var
saveDialog : TSaveDialog;
Palladin (2007-11-15 20:52:00) [13]^) за метлой... да и источник прочитанного не указан...
Dark (2007-11-15 20:50:00) [14]У них как-то сервак летает. Вот код,скопированный из примера(весь):
saveDialog := TSaveDialog.Create(self);
saveDialog.Title := 'Savefile';
saveDialog.InitialDir := GetCurrentDir;
saveDialog.Filter := 'Text file|*.txt|';
saveDialog.DefaultExt := 'txt';
saveDialog.FilterIndex := 1;
saveDialog.Free;
Gydvin (2007-11-15 20:49:00) [15]И вообще меня эта ссылка нафиг послала...
Gydvin (2007-11-15 20:48:00) [16]
> Dark © (15.11.07 20:46) [4]
> сорри, жаль низя править сообщения. ВотЪ: http://www.delphisources.
> ru/pages/faq/faq_delphi_basics/TSaveDialog.php.html
Где код с "пробами"?
Dark (2007-11-15 20:46:00) [17]И я непонял из описания, Execute создает окно?
Dark (2007-11-15 20:46:00) [18]сорри, жаль низя править сообщения. ВотЪ:
http://www.delphisources.ru/pages/faq/faq_delphi_basics/TSaveDialog.php.html
Gydvin (2007-11-15 20:46:00) [19]Execute?
> Сделал все как просят...
где код?
asm_viator (2007-11-15 20:44:00) [20]
> Сделал все как просят
Исходник в студию!