Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как сделать так что бы мой текстовый редактор открывал ........ [D6, Win95/98, Win2k]


buba ©   (2003-04-20 11:34:00) 

Как сделать так что бы мой текстовый редактор открывал файл при
нажатии на этот файл (сейчас у меня открывается только мой текстовый редактор)


Songoku   (2003-04-20 20:43:00) [1]

Смотрешь в RegEdit по этому адресу
HKEY_CLASSES_ROOT\.txt\ и по умолчанию там стоит " txtfile"
теперь открываешь
HKEY_CLASSES_ROOT\ txtfile\shell\open\command
и по умолчанию прописываешь путь твоей проги!!!

А что бы открыть файл используй даную функцию!!!

function Parameters: string;
var
P: PChar;
begin
P := GetCommandLine;
if P^ = """ then begin
Inc(P);
P := StrPos(P, """);
Inc(P);
end else P := StrPos(P, " ");
Inc(P);
Result:=P;
end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо