Командная строка

← →
Stranger2003 (2003-07-18 13:56) [0]

Уважаемые мастера , помогите пожалуйста (Я еще новичёк).
procedure TForm1.FormShow(Sender: TObject); var I:Integer; begin for I:=1 to ParamCount do ListBox1.Items.Add(ParamStr(I)); end;
Мне нужно чтоб в ListBox по команде "Открыть с помощью (Моя программа)" появлялся список файлов , но открывается только один файл.

← →
Lord Warlock © (2003-07-18 13:59) [1]

for I:=1 to ParamCount-1 do

← →
Lord Warlock © (2003-07-18 14:03) [2]

нет, извиняюсь, все-таки ParamCount
а ты пробовал запускать скомпилированный exe без дельфи с параметрами, например так:

Project1.exe Project1.res Project1.dof Unit1.dcu Unit1.dfm Unit1.pas Unit2.dcu

← →
Stranger2003 (2003-07-18 14:27) [3]

Lord Warlock © (18.07.03 14:03)

Нет не пробывал и не пойму вас зачем?

← →
Lord Warlock © (2003-07-18 14:32) [4]

Яснее вырази вопрос.

Твой код заполняет список параметрами, переданными в командной строке. Это не обязательно могут быть файлы, может быть любой текст. Например Project1.exe aaa bbb ccc выдаст в списке 3 строки

aaa
bbb
ccc

← →
Stranger2003 (2003-07-18 14:54) [5]

Lord Warlock © (18.07.03 14:32)

Есть например десять файлов.
Всплывающее меню(Win"ды) > Открыть с помощью Project1.
И мне надо чтоб список из 10 файлов с путем к ним отображался в ListBox"e
А отображается только один файл а не 10.

Есть например десять файлов... Ты их помечаешь в проводнике и говоришь - Открыть с помощью... Или нет?

← →
Stranger2003 (2003-07-18 15:40) [7]

← →
Stranger2003 (2003-07-19 07:24) [8]

Командная строка Найти похожие ветки