Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RusFAQ.ru: Программирование на Delphi


Хостинг Портала RusFAQ.ru:
MosHoster.ru - Профессиональный хостинг на Windows 2008

РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

Чемпионы рейтинга экспертов в этой рассылке

Влaдимир
Статус: 4-й класс
Рейтинг: 47
∙ повысить рейтинг >>
Genia007
Статус: Студент
Рейтинг: 25
∙ повысить рейтинг >>
Motoden
Статус: 4-й класс
Рейтинг: 24
∙ повысить рейтинг >>

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 1327
от 24.03.2009, 18:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 427, Экспертов: 40
В номере:Вопросов: 2, Ответов: 2

Нам важно Ваше мнение об этой рассылке.
Оценить этот выпуск рассылки >>

Вопрос № 162677: Здравствуйте! Я делаю что-то типа блокнота, но со вкладками. Программа почти готова и осталось только установить связи с расширение .txt и обработать запуск программы с параметрами. В обработчике события OnFormCreate я проверяю переданы ли про...


Вопрос № 162730: Здравствуйте, господа эксперты и все кто может помочь Вот такая проблема: Я создал новый класс <i>unit Unit5; interface uses ExtCtrls, dialogs, forms; type Tgrafic = class(Tpaintbox) private im_hei...

Вопрос № 162.677
Здравствуйте!
Я делаю что-то типа блокнота, но со вкладками. Программа почти готова и осталось только установить связи с расширение .txt и обработать запуск программы с параметрами.
В обработчике события OnFormCreate я проверяю переданы ли программе какие либо параметры, если да, то открываю файл указаный в них:
Код:
procedure TForm1.FormCreate(Sender: TObject);
var
Str: String;
i: Integer;
begin
if (ParamCount > 0) then
begin
Str := ParamStr(1);
for i := 2 to ParamCount do
begin
Str := Str + ' ' + ParamStr(i);
end;
//CreteTab создает вкладку с memo и загружает в него файл указанные в параметре
CreateTab(Str);
end;
end;

Все работает отлично, файл открывается. Но если попытаться вывести имя файла, указаного в параметре запуска программы, то, например, для файла Текстовой документ.txt, расположенный на рабочем столе, получится это: C:DOCUME~1MARKED~1.MYP


В избранное