delphi открыть файл



Автор ЛЕНА ПОЛИКАРПОВА задал вопрос в разделе Другие языки и технологии

Как в делфи сделать открытие файла? и получил лучший ответ

Ответ от Jurii[гуру]
Reset(F) - открытие. Но это тебе не нужно!
Тебе нужно курить команду ShellExecute:

Функция ShellExecute

ShellExecute( hwnd: THandle, // указатель на родительское окно
lpOperation: PChar, //выполняемая операция
lpFile: PChar, // файл или папка
lpParameters: PСhar, //строка параметров запускаемой программы
lpDirectory: PChar, // директория по умолчанию
nShowCmd: integer // состояние окна запущенной программы
);

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

lpOperation
Определяет выполняемую оперерацию.
"open" - открывает файл lpFile. Файл может быть документом, приложением или папкой.
"print" - печатает файл lpFile. Файл должен быть документом. Если передано приложение, то выполняются действия, аналогичные "open".
"explore" - открывает папку lpFile в проводнике Windows.
nil - аналогично "open".

lpFile
Файл или папка. Функция может открыть или напечатать файл, открыть папку, запустить приложение.

lpParameters
Если lpFile - приложение, то lpParametrs может содержать строку параметров приложения.
Если lpFile - документ или папка, lpParameters должен быть nil.

nShowCmd
Определяет как должно выглядеть окно запущенного приложения, приведу несколько основных констант, остальные можно посмотреть в Windows SDK.

Константа
Описание
SW_HIDEСкрывает окно.
SW_MAXIMIZEРазворачивает окно.
SW_MINIMIZEСворачивает окно.
SW_SHOWMAXIMIZEDАктивизирует и разворачивает окно.
SW_SHOWMINIMIZEDАктивизирует и сворачивает окно.
SW_SHOWNORMALАктивизирует и показывает окно в состоянии, определяемым самим приложением.
Примеры использования функции.

Открытие файлов через OpenDialog:
procedure TForm1.Button1Click(Sender: TObject);
begin
if OpenDialog1.Execute then
ShellExecute(Self.Handle, \'open\', PChar(OpenDialog1.FileName), nil, nil, SW_SHOWNORMAL);
end;

Открытие IE с заданным URL:
ShellExecute(Self.Handle, \'open\', \' ссылка\', nil, nil, SW_SHOWMAXIMIZED);

Запуск почтового клиента:
ShellExecute(Self.Handle, \'open\', \'mailto:vasya@mail.ru\', nil, nil, SW_SHOWNORMAL);

Примечание. Для использования ShellExecute в раздел uses надо добавить модуль ShellAPI.

Ответ от Алексей Арыков[гуру]
var t:textfile; ... assignfile(t,'1.txt'); reset(t); readln(t,s); ... closefile(t); или же более нормальный вариант: str : TStringList; ... str : =TStringList.Create; str.LoadFromFile('1.txt'); ... s

Ответ от Александр Кузьмич[гуру]
это ж в школу нужно регулярно ходить, чтоб знать...

Ответ от Maximmka[гуру]
ищи по тегам ShellAPI..

Ответ от Jurijus Zaksas[гуру]
Запускай через ShellExecute, подробный синтаксис в MSDN.

Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: Как в делфи сделать открытие файла?
спросили в по языкам
Delphi Mediaplayer
Трындец. Скачай справочник по языкам программирования - там все есть и очень просто !

подробнее...
спросили в Чтение
как открыть текстовый файл в Delphi и сделать построчное чтение?
var
var f : TextFile; // объявлена файловая переменная f типа TextFile
beginподробнее...
спросили в Delphi
как запустить исходник delphi. как запустить исходник delphi 7?
записать на болванку вместе с самой delphi и запустить в окно
подробнее...

Как программно в Делфи7 очистить файл тхт?
var
st:tstringlist;
begin
st:=tstringlist.create;
st.savetofile('text.txt');подробнее...

открыть файл EXCEL в проекте Delphi 7
Вместо абсолютного пути можно попробовать относительный
".файл"
точка - текущий каталог.
подробнее...
Ответ от 3 ответа[гуру]
Привет! Вот еще темы с похожими вопросами:

Delphi 7. открыть файл, а потом удалить его.
Вы запускаете торрент, он грузится (программа запускается, все такое) , допустим 5 секунд. А ваша
подробнее...
спросили в NetWare Novell
Какой прогой открыть файл с расширением "dsk"???
Смотря откуда этот файл взят.. .Если это файл из папки проекта , то это настройки рабочего стола
подробнее...
спросили в Файлы
какой прогой открыть файл с расширением .db
Если это база данных, то откроется Excell в MsOffice(или Calc в OpenOffice) где его можно будет
подробнее...

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

С помощью какой программы можно открыть файл с расширением .dcp ?
Формат файла DCP! Чем открыть .DCP format? Описание расширения *.DCP
Мы описали большинство
подробнее...
спросили в Техника
как пользоваться компонентом Open Dialog в Delphi....
TOpenDialog (TSaveDialog) и TOpenPictureDialog (TSavePictureDialog) отображают модальные диалоговые
подробнее...
спросили в Файл
Как в Delphi програмно создать ini файл??
Раз не создается, значит не "Все делаю как нужно! ". А вы в него пишите хоть что-нибудь?
подробнее...
спросили в SAP Open Windows API
Как запустить из программы Windows Media Player на проигрывание указанного файла?Программу пишу на Delphi 7.ShellExecute
Открытие файла той программой которая ему сопоставлена, или запуск exe файла-
подробнее...
спросили в Гриды
Ecxel в Delphi
Доброго времени суток.

Боюсь пальцами и парой слов не обойдемся. Если интересует про что
подробнее...
 

Ответить на вопрос:

Имя*

E-mail:*

Текст ответа:*
Проверочный код(введите 22):*