Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 27.08.2009, 22:25
StipJey StipJey вне форума
Прохожий
 
Регистрация: 27.08.2009
Адрес: Ивановская область
Сообщения: 12
Репутация: 10
Лампочка Работа с OpnDlg, SaveDlg и не только

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

Суть проблемы:
Совершенно не понимаю как работают OpenDialog и SaveDialog

Какая требуется помошь
Написание примерного кода программы (ниже) с комментариями (желательно)

Описание программы

Программа состоит из двух форм.

на первой форме находятся 3 Edit'а.
в первый и второй вводится текст, третий содержит полное имя сохраняемого файла (незнаю, наверно можно и без него), рядом с ним кнопка открытия SaveDialog'а (вот здесь поподробней нужно). далее вводим название файла для сохранения и жмем сохранить. Текст из двух эдитов сохраняется в текстовый файл (пусть будет разрешение *.SJ) так, что текст из первого эдита на первой строчке, а из второго на второй.
На второй форме тоже находятся три эдита (или два, если путь к файлу не нужен) и кнопка, которая вызывает окно OpenDialog'а. При нажатии на кнопку открывается это окно, пользователь выбирает файл и нажимает открыть. (программа может открывать файлы только *.SJ) Информация из него (там всего две строчки) попадает в соответствующие эдиты. Первая строчка в первый эдит, вторая - во второй.

Дополнение:
Нужно чтоб у программы было меню для переключения между формами.

Вот в принципе и все! Очень жду помощи. в форум можно выложить код, и желательно отправить исходники на мэйл Stip@xaker.ru
Ответить с цитированием
  #2  
Старый 27.08.2009, 22:29
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,107
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Курсовые, лабораторные, зачетные и т.д. работы - это в другой раздел. Это раз.
Два. Эти диалоги предназначены для получения имени файла для открытия/сохранения, а не для выполнения собственно самих операций. Вызываешь у диалога метод execute. Если он вернул True, то в свойстве FileName будет выбранное пользователем имя файла. Берешь его и начинаешь сохранять свои данные. Все.
Ответить с цитированием
  #3  
Старый 27.08.2009, 22:48
StipJey StipJey вне форума
Прохожий
 
Регистрация: 27.08.2009
Адрес: Ивановская область
Сообщения: 12
Репутация: 10
По умолчанию хм.

Это не курсовая работа, я учусь всего лишь в 10 классе (1 сентября пойду)

Возможно название для темы я подобрал неверно, но увидеть исходник описанной мной программы мне необходимо, чтобы я понял работу этих диалогов - раз и работу с файлами - два .

если невозможно сделать исходник, то объясните мне в коде как это все работает.

у меня был первый вариант моей работы, где имя файла задавалось в самом коде, соответственно можно было работать только с одним файлом, который заново перезаписывался.
Тем более я не уверен в правильной работе с файлами (несколько команд из Turbo паскаля (это мой первый язык))

Думаю вы меня поймете.
Ответить с цитированием
  #4  
Старый 27.08.2009, 23:01
ApxaHGe1 ApxaHGe1 вне форума
Активный
 
Регистрация: 08.04.2008
Адрес: Нижний новгород
Сообщения: 311
Репутация: 38
По умолчанию

opendialog1.execute
a:=opendialog1.filename ... и далше уже работай с "a"
Ответить с цитированием
  #5  
Старый 27.08.2009, 23:07
StipJey StipJey вне форума
Прохожий
 
Регистрация: 27.08.2009
Адрес: Ивановская область
Сообщения: 12
Репутация: 10
По умолчанию

так, это уже хорошо.
сэйвдиалог работает по такому же принципу (как я понял)? А в "А" будет храниться путь к файлу? тоесть можно Edit3.text:=a; ?

а как насчет заполнения эдитов информацией из файла с редким разширением *.SJ?
Ответить с цитированием
  #6  
Старый 27.08.2009, 23:10
ApxaHGe1 ApxaHGe1 вне форума
Активный
 
Регистрация: 08.04.2008
Адрес: Нижний новгород
Сообщения: 311
Репутация: 38
По умолчанию

Ты распарси файл и заполняй.. не просто же так ты хотел его открыт ьи что бы он стал "читабельным" ?))
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра
Комбинированный вид Комбинированный вид

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 13:48.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025