Скачать: CL | DM;

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

← →
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.

---

← →
Smithson ©   (2003-07-18 15:11) [6]

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

---

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

Smithson © (18.07.03 15:11)

В папке SendTo ярлык
Вообщем отправить > Project1

---

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

?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c