Насчёт формата файла для программы, но...

← →
SleD (2002-06-05 16:12) [0]

Вот, например, когда вы просто открываете Winamp, то появляется его окно и всё. А когда запускаете *.mp3, ассоц. с ним, то делается то же самое, но ещё и начинает сразу же обрабатываться этот файл и играет музыка. Уловили в чём разница. Я конечно не плеер пишу, но как сделать типа такого. Ассоц. файлы я делать умею, но при клике на них всего лишь запускается прога. Т.е. как обычный ярлык. А мне надо, чтобы кликнул и в Memo1 на Form1 сразу загрузилсось содержимое файла

← →
cult (2002-06-05 16:15) [1]

по-моему, это назывется как-то типа commandline, функция, которая забирает параметры из командной строки. обработай ее - и вперед, грузи файл в memo

← →
SleD (2002-06-05 16:18) [2]

Да я понимаю, но код не подскажешь?

← →
MBo (2002-06-05 16:19) [3]

ParamCount ParamStr(i)

← →
SleD (2002-06-05 16:21) [4]

MBo а можно поподробнее, а то я в программировании ещё не сильно шарю :-)

← →
MBo (2002-06-05 16:38) [5]

uses mmsystem;
var i: Integer;
begin
for i := 0 to ParamCount – 1 do
begin
if ParamStr(i)="/?" then
ShowMessage("нет пока хелпа ;(");
if Pos(".wav",ParamStr(i))>0 then
PlaySound(Pchar(ParamStr(i)),0,SND_FILENAME);
end;

← →
SPeller (2002-06-05 18:02) [6]

2 MBo © (05.06.02 16:38)

А зачем uses mmsystem; ??

← →
Song (2002-06-05 19:45) [7]

2SPeller © (05.06.02 18:02)
Для PlaySound()

← →
SleD (2002-06-05 20:30) [8]

В OnCreate поставил то, что сказал MBo. Запускаю прогу в таком виде:

proga /? , но сообщение не выдаётся!
Что не так?

← →
Anatoly Podgoretsky (2002-06-05 20:48) [9]

SPeller © (05.06.02 18:02)
На всякий случай :-)

← →
cyborg (2002-06-05 23:29) [10]

SleD - -1 убери :-)

← →
Song (2002-06-06 08:48) [11]

Не надо ничего убирать, Вы уважаемый, Cyborg, думайте прежде чем чего-нить ляпнуть.

← →
Agent Smith (2002-06-06 09:42) [12]

ParamStr() , если я не ошибаюсь дает адрес файла, по которому кликнули, а не exe-шник приложения, поэтому можно определить файл-ресурс, открать его програмно и считывать что угодно.

← →
MBo (2002-06-06 13:22) [13]

for i :=1 to ParamCount
так сработало.
кстати, в paramstr(0) лежит имя exe

Насчёт формата файла для программы, но... Найти похожие ветки